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

-- cambio de nombre de función

Browse Source
This commit is contained in:
rrene
2023-12-18 07:02:38 -07:00
parent d41075a401
commit f12ab35356
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Compras/PopUpVerFactura.aspx.vb
View File

@@ -210,9 +210,8 @@ Partial Class PopUpVerFactura
imprimirpallet(Request("CvePallet").ToString.ToEntero()) imprimirpallet(Request("CvePallet").ToString.ToEntero())
End If End If
If Request("onlyPrint").ToString() = "PalletCaja2" AndAlso Not IsNothing(Request("CvePallet")) Then If Request("onlyPrint").ToString() = "PalletCaja2" AndAlso Not IsNothing(Request("CvePallet")) Then
imprimirpalletWalamart(Request("CvePallet").ToString.ToEntero()) imprimirpalletWalmart(Request("CvePallet").ToString.ToEntero())
End If End If
If Request("onlyPrint").ToString() = "manifiesto" AndAlso Not IsNothing(Request("cveEmbarqueManifiesto")) Then If Request("onlyPrint").ToString() = "manifiesto" AndAlso Not IsNothing(Request("cveEmbarqueManifiesto")) Then
imprimirManifiesto(Request("cveEmbarqueManifiesto").ToString.ToEntero()) imprimirManifiesto(Request("cveEmbarqueManifiesto").ToString.ToEntero())
End If End If
@@ -935,7 +934,7 @@ Partial Class PopUpVerFactura
End Sub End Sub
Private Sub imprimirpalletWalamart(cvePallet As Integer) Private Sub imprimirpalletWalmart(cvePallet As Integer)
Dim Envase As String = "" Dim Envase As String = ""
Dim Tamano As String = "" Dim Tamano As String = ""
Dim Cultivo As String = "" Dim Cultivo As String = ""