- correción de tipocontabilidad

This commit is contained in:
2021-05-21 08:11:24 -07:00
parent 7589ecf114
commit cf8a3fd05d

View File

@@ -141,7 +141,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
DdlCtaContable.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlCtaContable.Items.Insert(0, New ListItem("Seleccione", "-1"))
If UsuarioActual.Empresa.TipoContabilizacion = 2 Then If UsuarioActual.Empresa.TipoContabilidad = 1 Then
Dim Conta As New ClsContabilidad Dim Conta As New ClsContabilidad
Dim dtt As New DataTable Dim dtt As New DataTable
@@ -378,7 +378,7 @@ CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then
'cargar la cuenta 'cargar la cuenta
If UsuarioActual.Empresa.TipoContabilizacion = 0 Then If UsuarioActual.Empresa.TipoContabilidad = 1 Then
'busco en la cuenta contable, lo que tenga asignado 'busco en la cuenta contable, lo que tenga asignado
Dim Con As New ClsContabilidad Dim Con As New ClsContabilidad
Dim dtt As DataTable = Nothing Dim dtt As DataTable = Nothing