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

CAt AF Ultima Iamgen, Entyardas salidas formato EMD

Browse Source
This commit is contained in:
rakcsle
2025-05-13 08:50:56 -07:00
parent 10a00c992e
commit 00a5ebfd33
7 changed files with 197 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Compras/PopUpVerFactura.aspx.vb
View File

@@ -3538,7 +3538,12 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("Almacen", Almacen))
params.Add(New ReportParameter("Fecha", Fecha))
params.Add(New ReportParameter("FacturaProveedor", FolioVenta))
params.Add(New ReportParameter("FacturadoA", If(DtMovimientos(0)("Nombre").ToString <> "", DtMovimientos(0)("Nombre").ToString, NombreCliente)))
If NombreCliente = "" Then
params.Add(New ReportParameter("FacturadoA", Recibio))
Else
params.Add(New ReportParameter("FacturadoA", If(DtMovimientos(0)("Nombre").ToString <> "", DtMovimientos(0)("Nombre").ToString, NombreCliente)))
End If
params.Add(New ReportParameter("Observaciones", Observaciones))
params.Add(New ReportParameter("FechaImpresion", NowADS().ToString("dd/MM/yyyy")))
params.Add(New ReportParameter("Folio", Folio))