-- visualización mensaje de comparativo

This commit is contained in:
2024-10-04 16:28:18 -07:00
parent 697358047d
commit 67bb092a95

View File

@@ -279,8 +279,8 @@ Partial Class Bancos_ConciliacionesBancariasaspx
End If End If
End If End If
Next Next
If SumaSIGAbono <> SumaExcelAbono Or SumaSIGCargo <> SumaExcelCargo Then If SumaSIGCargo <> SumaExcelCargo OrElse SumaSIGAbono <> SumaExcelAbono Then
Alert("La suma de los importes no cuadran", TipoMensaje.MsgAdvertencia) Alert($"La suma de los importes no cuadran ({SumaSIGCargo}-{SumaExcelCargo}**{SumaSIGAbono}-{SumaExcelAbono})", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If
Dim ObjBancos As New ClsBancos Dim ObjBancos As New ClsBancos