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

--Cambios en cortes E193

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-04-13 15:06:30 -07:00
parent 87f7ff34ef
commit 86f5cbc15d
2 changed files with 419 additions and 273 deletions
Download Patch File Download Diff File Expand all files Collapse all files

66
Compras/PopUpVerFactura.aspx.vb
View File

@@ -1646,16 +1646,12 @@ Partial Class PopUpVerFactura
For Each row As DataRow In DtTT.Rows
Dim Total = row(1).ToString()
If IsNumeric(Total) Then
If IsNumeric(Total) OrElse row(0).ToString().Contiene("TotalRetiros", "TotalIngresos") Then
Dim TipoTabla As Integer = 0
Dim Orden As Integer = 0
Dim rowData = DtDatosVentas.NewRow()
Select Case row(0).ToString()
Case "ImporteInicial"
rowData("Columna") = "Importe Inicial"
Orden = 1
TipoTabla = 2
Case "VentasCorte"
rowData("Columna") = "Total Ventas"
Orden = 1
@@ -1681,35 +1677,53 @@ Partial Class PopUpVerFactura
rowData("Columna") = "Ventas Remisiones"
Orden = 6
TipoTabla = 1
'Case "TotalEfectivo"
' rowData("Columna") = "Total Efectivo"
'Case "TotalCheque"
' rowData("Columna") = "Total Cheque"
'Case "TarjDebito"
' rowData("Columna") = "Tarj. Débito"
'Case "TarjCredito"
' rowData("Columna") = "Tarj. Crédito"
'Case "VentasTransferencia"
' rowData("Columna") = "Total Transf."
Case "TotalRetiros"
rowData("Columna") = "Total Retiro"
Orden = 6
TipoTabla = 2
Case "TotalIngresos"
rowData("Columna") = "Total Ingreso"
Orden = 5
TipoTabla = 2
Case "Devoluciones"
rowData("Columna") = "Devoluciones"
Case "TotalEfectivo"
rowData("Columna") = "Total Efectivo"
Orden = 7
TipoTabla = 1
Case "TotalCheque"
rowData("Columna") = "Total Cheque"
Orden = 8
TipoTabla = 1
Case "TarjDebito"
rowData("Columna") = "Tarj. Débito"
Orden = 9
TipoTabla = 1
Case "TarjCredito"
rowData("Columna") = "Tarj. Crédito"
Orden = 10
TipoTabla = 1
Case "VentasTransferencia"
rowData("Columna") = "Total Transf."
Orden = 11
TipoTabla = 1
Case "TotalDevRNC"
rowData("Columna") = "Total DEV-RNC."
Orden = 12
TipoTabla = 1
'Case "SaldoAnteriorAplicado"
' rowData("Columna") = "Saldo Aplicado"
' Orden = 0
' TipoTabla = 0
Case "ImporteInicial"
rowData("Columna") = "Importe Inicial"
Orden = 1
TipoTabla = 2
Case "TotalRetiros"
rowData("Columna") = "Total Retiro"
Orden = 2
TipoTabla = 2
Case "TotalIngresos"
rowData("Columna") = "Total Ingreso"
Orden = 3
TipoTabla = 2
Case "Devoluciones"
rowData("Columna") = "Devoluciones"
Orden = 4
TipoTabla = 2
Case "TotalCaja"
rowData("Columna") = "Total Caja"
Orden = 9
Orden = 5
TipoTabla = 2
Case Else
rowData("Columna") = row(0).ToString()