- correción de tipocontabilidad
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user