AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ERROR DE ANALISIS DE CREDITO

Browse Source
This commit is contained in:
HECTOR RODRIGUEZ
2021-03-18 08:52:49 -07:00
parent 87f016d59f
commit 834fd9cb28
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Ventas/Clientes.aspx.vb
View File

@@ -7981,7 +7981,11 @@ Partial Class Clientes
Dim Row2 As DataRow = Nothing Dim Row2 As DataRow = Nothing
Row2 = Dt2.NewRow() Row2 = Dt2.NewRow()
LtlLimiteCreditoModal.Text = LimiteCredito.FormatoNumero() LtlLimiteCreditoModal.Text = LimiteCredito.FormatoNumero()
Row2("limite") = LimiteCredito - Saldo If LimiteCredito > 0 Then
Row2("limite") = LimiteCredito - Saldo
Else
Row2("limite") = 0
End If
Row2("saldo") = Saldo Row2("saldo") = Saldo
Dt2.Rows.Add(Row2) Dt2.Rows.Add(Row2)
Dim query2 = From s In Dt2.AsEnumerable() Select New With {.year = "", .limite = s("limite").ToString(), .saldo = s("saldo").ToString()} Dim query2 = From s In Dt2.AsEnumerable() Select New With {.year = "", .limite = s("limite").ToString(), .saldo = s("saldo").ToString()}