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

Reporte usados

Browse Source
This commit is contained in:
rakcsle
2022-03-31 18:41:15 -07:00
parent 7445f05ec7
commit 48ab0bfb2e
5 changed files with 35 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Acumuladores/RepEntradasUsadosClientes.aspx.vb
View File

@@ -65,10 +65,25 @@ Partial Class Acumuladores_RepEntradasUsadosClientes
Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.DBCampo("EsHeader").ToString = "-1" Or e.Row.DBCampo("Codigo").ToString = "" Then
If e.Row.DBCampo("EsHeader").ToString = "-1" Or e.Row.DBCampo("Codigo").ToString = "" And e.Row.DataKey("CveVenta").ToString.ToEntero = 0 Then
e.Row.CssClass = "SubTotales2"
End If
If e.Row.DataKey("CveVenta").ToString.ToEntero > 0 Then
e.Row.Cells(1).Text = $"<a class='Texto' href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta")}' Target='_blank' >{e.Row.DataKey("SerieFolio")}</a>"
Else
e.Row.Cells(2).Text = ""
e.Row.Cells(3).Text = ""
e.Row.Cells(4).Text = ""
e.Row.Cells(6).Text = ""
End If
If e.Row.DataKey("EsDistribuidor") <> "" Then
e.Row.Cells(5).Text = $"<a class='Texto' href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta")}' Target='_blank' >{e.Row.DataKey("Total").ToDecimal.ToString("###,###,###.00")}</a>"
End If
End If
End Sub