This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2021-03-04 04:25:49 -07:00
41 changed files with 15927 additions and 13912 deletions

View File

@@ -1716,13 +1716,22 @@ Partial Class Clientes
End If
CargaEventoBitacora()
If UsuarioActual.Empresa.Funcionalidad(300) = "1" Then
'If UsuarioActual.Empresa.Funcionalidad(300) = "1" Then
' CargaCuentasConceptos()
' divCuentas.Visible = True
' divCuentasContp.Visible = False
'Else
' divCuentas.Visible = False
' divCuentasContp.Visible = True
'End If
If UsuarioActual.Empresa.TipoContabilidad = 1 Then
CargaCuentasConceptos()
divCuentas.Visible = True
divCuentasContp.Visible = False
Else
divCuentas.Visible = False
divCuentasContp.Visible = True
divCuentasContp.Visible = False
ElseIf UsuarioActual.Empresa.TipoContabilidad = 2 Then
divCuentas.Visible = False
divCuentasContp.Visible = True
End If