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 End If
Exit Sub Exit Sub
Else Else
CreaDT() CreaDT()
BtnEliminar.Visible = False BtnEliminar.Visible = False
If UsuarioActual.Empresa.UsaAC Then
ChkAutoConta.Checked = True
End If
End If End If
@@ -889,7 +895,7 @@ Partial Class ContabilidadC_RegPrePoliza
Next Next
'El movimiento 2 es el de Pago '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 idCuentaContabilizacion > 0 Then
If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then