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

--FIX

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2025-02-06 19:07:36 -07:00
parent cc5c3af9cc
commit 8a837105c3
2 changed files with 40 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Ventas/CatAutorizacionLimites.aspx.vb
View File

@@ -240,6 +240,8 @@ Partial Class Ventas_CatAutorizacionLimites
End If End If
Dim Importe As Decimal = gvRow.DataKey("Importe").ToDecimal().RoundSQL(2) Dim Importe As Decimal = gvRow.DataKey("Importe").ToDecimal().RoundSQL(2)
If UsuarioActual.Empresa.Funcionalidad(595).Contiene("1", "2") Then
'AUTORIZACION DE IMPORTE, 'AUTORIZACION DE IMPORTE,
'el cliente limite de 500, y saldo de 501. autorización que puede autorizar no puede ser mayor a 49 ( limite * 1.% - Saldo) 'el cliente limite de 500, y saldo de 501. autorización que puede autorizar no puede ser mayor a 49 ( limite * 1.% - Saldo)
If TipoAutorizacion = 1 Then If TipoAutorizacion = 1 Then
@@ -286,6 +288,7 @@ Partial Class Ventas_CatAutorizacionLimites
End If End If
End If End If
End If End If
End If
Dim ObjVentas As New ClsVentas Dim ObjVentas As New ClsVentas
If ObjVentas.AutorizacionLimitesUpdate(CveAutorizacion, CveCliente, CveVendedor, Importe, CveEstatusAutorizacion, UsuarioActual.CveUsuario) Then If ObjVentas.AutorizacionLimitesUpdate(CveAutorizacion, CveCliente, CveVendedor, Importe, CveEstatusAutorizacion, UsuarioActual.CveUsuario) Then

5
Ventas/PVCobranza.aspx.vb
View File

@@ -1493,6 +1493,7 @@ Partial Class Ventas_PVCobranza
ObjNC.CalculaTotales() ObjNC.CalculaTotales()
Dim CveIE As Integer = -1 Dim CveIE As Integer = -1
Dim UUIDFactura As String = "" 'VACIO PORQUE AUN NO SE HA GENERADO
If GvRowAnticipo IsNot Nothing Then If GvRowAnticipo IsNot Nothing Then
CveIE = GvRowAnticipo.DataKey("CveIE").ToEntero() CveIE = GvRowAnticipo.DataKey("CveIE").ToEntero()
End If End If
@@ -1501,13 +1502,13 @@ Partial Class Ventas_PVCobranza
DtVentasNC.Columns.Add("CveVenta", GetType(Integer)) DtVentasNC.Columns.Add("CveVenta", GetType(Integer))
DtVentasNC.Columns.Add("Importe", GetType(Decimal)) DtVentasNC.Columns.Add("Importe", GetType(Decimal))
DtVentasNC.Columns.Add("FolioFiscal", GetType(String)) DtVentasNC.Columns.Add("FolioFiscal", GetType(String))
'DtVentasNC.Columns.Add("CveIE", GetType(Integer)) DtVentasNC.Columns.Add("CveIE", GetType(Integer))
DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "TC", .DataType = GetType(Decimal), .DefaultValue = 1}) DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "TC", .DataType = GetType(Decimal), .DefaultValue = 1})
DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "TCCambioValuacion", .DataType = GetType(Decimal), .DefaultValue = 1}) DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "TCCambioValuacion", .DataType = GetType(Decimal), .DefaultValue = 1})
DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "CveEstatusFactura", .DataType = GetType(Integer), .DefaultValue = -1}) DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "CveEstatusFactura", .DataType = GetType(Integer), .DefaultValue = -1})
DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "Folio", .DataType = GetType(String), .DefaultValue = ""}) DtVentasNC.Columns.Add(New DataColumn With {.ColumnName = "Folio", .DataType = GetType(String), .DefaultValue = ""})
'DtVentasNC.Rows.Add(Venta.CveVenta, CveIE, Total, "") DtVentasNC.Rows.Add(Venta.CveVenta, Total, UUIDFactura, CveIE)
ObjNC.DtVentasNC = DtVentasNC ObjNC.DtVentasNC = DtVentasNC