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

-

Browse Source
This commit is contained in:
Antonio Gonzalez
2020-08-10 21:49:02 -07:00
parent cac6ee80a7
commit d35958755b
4 changed files with 15 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Contabilidad2/RepLibroDiario.aspx.vb
View File

@@ -94,10 +94,16 @@ Partial Class Contabilidad2_RepLibroDiario
If e.Row.DBCampo("TipoRenglon").ToString.ToEntero = 1 Then
e.Row.Font.Bold = True
e.Row.Cells(4).Text = ""
e.Row.Cells(4).Visible = False
e.Row.Cells(5).Text = ""
e.Row.Cells(5).Visible = False
e.Row.Cells(6).Text = ""
e.Row.Cells(6).Visible = False
e.Row.Cells(7).Text = ""
e.Row.Cells(7).Visible = False
e.Row.Cells(8).Text = ""
e.Row.Cells(8).Visible = False
e.Row.Cells(3).ColumnSpan = 6
e.Row.CssClass = "SubTotales" '
End If
@@ -107,6 +113,8 @@ Partial Class Contabilidad2_RepLibroDiario
e.Row.Cells(1).Text = ""
e.Row.Cells(2).Text = ""
e.Row.Cells(3).Text = ""
e.Row.Cells(7).Text = If(e.Row.Cells(7).Text.ToEntero() > 0, e.Row.Cells(7).Text, "")
e.Row.Cells(8).Text = If(e.Row.Cells(8).Text.ToEntero() > 0, e.Row.Cells(8).Text, "")
End If
'SUBTOTAL