-- desbloquea antes de cancelar
This commit is contained in:
@@ -247,17 +247,15 @@ Partial Class PopUpAuxiliar
|
|||||||
|
|
||||||
Dim TieneError = False
|
Dim TieneError = False
|
||||||
|
|
||||||
If Not TieneError Then
|
If Not Conta.UpdatePrePolizasDetalleBloquear(ClavePrePoliza, False) Then
|
||||||
If Not Conta.UpdatePrePolizasDetalleBloquear(ClavePrePoliza, False) Then
|
|
||||||
TieneError = True
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
|
|
||||||
If Not Conta.RemovePrePolizas(ClavePrePoliza, UsuarioActual.CveEmpresa) Then
|
|
||||||
TieneError = True
|
TieneError = True
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If Conta.ValidacionPrePolizaCuadre(ClavePrePoliza, -1) Then
|
If Not TieneError AndAlso Not Conta.RemovePrePolizas(ClavePrePoliza, UsuarioActual.CveEmpresa) Then
|
||||||
|
TieneError = True
|
||||||
|
End If
|
||||||
|
|
||||||
|
If Not TieneError AndAlso Conta.ValidacionPrePolizaCuadre(ClavePrePoliza, -1) Then
|
||||||
If Conta.ValorPolizaDescuadre > 0 Then
|
If Conta.ValorPolizaDescuadre > 0 Then
|
||||||
TieneError = True
|
TieneError = True
|
||||||
End If
|
End If
|
||||||
|
|||||||
Reference in New Issue
Block a user