Mejora validacion de naturaleza

This commit is contained in:
rakcsle
2022-02-18 15:17:11 -07:00
parent cb4706f8cb
commit d9b8c5bae6

View File

@@ -2461,7 +2461,7 @@ Partial Class ContabilidadC_RegPrePolizaS
End If
If Row("Abono").ToString.ToDecimal > 0 And TipoNaturalesa = "Ing" Then
If Row("Abono").ToString.ToDecimal > 0 And TipoNaturalesa = "Ing" Or Row("Cargo").ToString.ToDecimal > 0 And TipoNaturalesa = "Egs" Then
Alert($"El movimiento con cuenta: {NombreCuenta} , importe: {ImporteDocumento.ToString("###,###,###.00")} (registro {ContadorRegistros}), no tiene la naturaleza correcta", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
@@ -2571,7 +2571,7 @@ Partial Class ContabilidadC_RegPrePolizaS
End If
Return CType(ViewState("ArregloCuentasFolios"), DataTable)
End Get
End Get
Set(value As DataTable)
ViewState("ArregloCuentasFolios") = value
End Set