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

parametro de usuario

Browse Source
This commit is contained in:
rrene
2025-01-20 18:25:40 -07:00
parent 8fc357dbc0
commit 65773677c8
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -4677,7 +4677,7 @@ Partial Class Inventarios_EntregaAlmacen
Dim CveVentaDetalle As Integer = Dr("CveVentaDetalle").ToString().ToEntero() Dim CveVentaDetalle As Integer = Dr("CveVentaDetalle").ToString().ToEntero()
Dim Cantidad As Decimal = Dr("Cantidad").ToString().ToDecimal Dim Cantidad As Decimal = Dr("Cantidad").ToString().ToDecimal
If CveVentaDetalle > 0 Then If CveVentaDetalle > 0 Then
If Not ObjInventario.UpdatePedidoDetalleCantidad(CveVentaDetalle, Cantidad) Then If Not ObjInventario.UpdatePedidoDetalleCantidad(CveVentaDetalle, Cantidad, UsuarioActual.CveUsuario) Then
Respuesta = False Respuesta = False
Exit For Exit For
End If End If