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

--FIX ventas

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2025-01-10 16:47:11 -07:00
parent 0342ac6220
commit 27938cf515
1 changed files with 28 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Ventas/Ventas.aspx.vb
View File

@@ -37794,7 +37794,7 @@ Partial Class Ventas
If CveVenta > 0 Then If CveVenta > 0 Then
Dim ObjVta As New ClsVentas Dim ObjVta As New ClsVentas
If ObjVta.AddAutorizacionLimite(UsuarioActual.CveEmpresa, CveCliente, DdlVendedor.SelectedValue.ToEntero(), TxtTotal.Text.ToDecimal(), 0, UsuarioActual.CveUsuario, 1, TipoDocumento:="Ing", DiasVencidos:=25, CveVenta:=CveVenta) Then If ObjVta.AddAutorizacionLimite(UsuarioActual.CveEmpresa, CveCliente, DdlVendedor.SelectedValue.ToEntero(), TxtTotal.Text.ToDecimal(), 0, UsuarioActual.CveUsuario, 1, TipoDocumento:=DdlTipoComprobante.SelectedValue, DiasVencidos:=25, CveVenta:=CveVenta) Then
RegistraScript("$('#DivModalSolicitarCredito').modal('hide')") RegistraScript("$('#DivModalSolicitarCredito').modal('hide')")
Alert("La autorización se agregó correctamente.", TipoMensaje.MsgInformacion) Alert("La autorización se agregó correctamente.", TipoMensaje.MsgInformacion)
'signal 'signal
@@ -37809,7 +37809,7 @@ Partial Class Ventas
Exit Sub Exit Sub
End If End If
End If Else
Dim DiasVencidos As Integer = 0 Dim DiasVencidos As Integer = 0
Dim CveEstatus As Integer = 0 Dim CveEstatus As Integer = 0
@@ -37836,6 +37836,9 @@ Partial Class Ventas
End If End If
ObjPS.Dispose() ObjPS.Dispose()
End If
UpModalSolicitud.Update() UpModalSolicitud.Update()
End Sub End Sub
Protected Sub DdlTipoAutorizacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoAutorizacion.SelectedIndexChanged Protected Sub DdlTipoAutorizacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoAutorizacion.SelectedIndexChanged