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

option strict on

Browse Source
This commit is contained in:
rrene
2023-08-23 10:21:50 -07:00
parent 1ab4b815cd
commit bf1317817c
11 changed files with 107 additions and 118 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Ventas/PV.aspx.vb
View File

@@ -2121,7 +2121,7 @@ Partial Class PV
'REGENERAR LOS SALDOS
If Not OcurrioError Then
OcurrioError = Not ObjFactura.RegenerarPrePolizas(ObjVentas.IniciaTransacSQL(), ObjAC)
OcurrioError = Not ObjFactura.RegenerarPrePolizas(ObjVentas.IniciaTransacSQL())
End If
Catch ex As Exception
@@ -3454,7 +3454,7 @@ Partial Class PV
Dim SbAlert As New StringBuilder
Try
Retorno = ObjFactura.EmitirFactura(Transac:=ObjAcum.IniciaTransacSQL(), ObjContPaqTransac:=ObjContPaq)
Retorno = ObjFactura.EmitirFactura(Transac:=ObjAcum.IniciaTransacSQL())
If Retorno IsNot Nothing AndAlso Retorno.CveVenta > 0 Then