-- usuario contabilización
This commit is contained in:
@@ -8482,8 +8482,6 @@ Partial Class Compras_Compras
|
|||||||
|
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
If ErrorMovtosCxP = 0 And CvePrePolizaNueva > 0 Then
|
If ErrorMovtosCxP = 0 And CvePrePolizaNueva > 0 Then
|
||||||
|
|
||||||
If (UsuarioActual.Empresa.UsaAC Or UsuarioActual.Empresa.Funcionalidad(200).ToString = "1") AndAlso IdPoliza > 0 AndAlso UsuarioActual.Empresa.TipoContabilidad = 2 Then
|
If (UsuarioActual.Empresa.UsaAC Or UsuarioActual.Empresa.Funcionalidad(200).ToString = "1") AndAlso IdPoliza > 0 AndAlso UsuarioActual.Empresa.TipoContabilidad = 2 Then
|
||||||
@@ -8492,7 +8490,7 @@ Partial Class Compras_Compras
|
|||||||
ObjContaAC.IniciaTransacSQL()
|
ObjContaAC.IniciaTransacSQL()
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If Not ObjConta.ContabilizarPrePoliza(CvePrePolizaNueva, UsuarioActual.CveEmpresa, UsuarioActual.Empresa, MinFecha, "", ObjContaAC) Then
|
If Not ObjConta.ContabilizarPrePoliza(CvePrePolizaNueva, UsuarioActual.CveUsuario, UsuarioActual.Empresa, MinFecha, "", ObjContaAC) Then
|
||||||
ErrorMovtosCxP = 3
|
ErrorMovtosCxP = 3
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user