This commit is contained in:
janeth arvizu
2019-10-17 14:08:10 -07:00

View File

@@ -212,8 +212,14 @@ Partial Class ContabilidadC_RegPrePoliza
End If
Exit Sub
Else
CreaDT()
BtnEliminar.Visible = False
If UsuarioActual.Empresa.UsaAC Then
ChkAutoConta.Checked = True
End If
End If
@@ -889,7 +895,7 @@ Partial Class ContabilidadC_RegPrePoliza
Next
'El movimiento 2 es el de Pago
If ChkAutoConta.Checked AndAlso UsuarioActual.Empresa.Funcionalidad(200) = "1" AndAlso MsgError = "" Then
If ChkAutoConta.Checked AndAlso MsgError = "" Or UsuarioActual.Empresa.Funcionalidad(200) = "1" And MsgError = "" Then
If idCuentaContabilizacion > 0 Then
If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then