-- cambio a unificación función validaciónprepolizas

This commit is contained in:
2023-11-18 13:20:20 -07:00
parent 3904343f17
commit f91dd14387
26 changed files with 87 additions and 354 deletions

View File

@@ -366,25 +366,7 @@ Partial Class Bancos_ProductosFinancieros
If Not ObjMov.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, Opcion:=4) Then
ErrorTransaccion = True
End If
'Por el momento no hay movimiento para estas plantillas y no debe entrar aqui
If UsuarioActual.Empresa.Funcionalidad(200).ToEntero > 0 And Not ErrorTransaccion Then
If idCuentaContabilizacion > 0 Then
If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
Alert(alertaContabilizacion, ModExtensiones.TipoMensaje.MsgInformacion)
Else
Alert("Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico")
End If
Else
Alert(String.Format("No se puede contabilizar la Prepoliza debido a que las siguientes cuentas son invalidas: {0}", CuentasContablesInvalidas))
End If
End If
End If
Else
ErrorTransaccion = True
End If