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

- paramero empresa

Browse Source
This commit is contained in:
rrene
2024-05-27 20:14:21 -07:00
parent 9c1e3b2e48
commit 6bafeeb524
1 changed files with 1 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -2173,8 +2173,6 @@ Partial Class Inventarios_EntregaAlmacen
DtDatos.Rows(Index)("Lote") = gvr.FCTextBox("TxtLote").Text DtDatos.Rows(Index)("Lote") = gvr.FCTextBox("TxtLote").Text
End If End If
End If End If
Index += 1 Index += 1
Next Next
@@ -3322,9 +3320,7 @@ Partial Class Inventarios_EntregaAlmacen
OnError("Ocurrió un error al guardar", ex) OnError("Ocurrió un error al guardar", ex)
End Try End Try
If Not ErrorMovInv AndAlso EsDevolucionVenta = 1 AndAlso CveOSSurtir > 0 AndAlso TipoMovimiento = 2 AndAlso TipoDocto = "Ped" Then
If EsDevolucionVenta = 1 AndAlso CveOSSurtir > 0 AndAlso TipoMovimiento = 2 AndAlso TipoDocto = "Ped" Then
If Not CierreOS(CveOSSurtir, CveMovimiento, ObjInventario.IniciaTransacSQL) Then If Not CierreOS(CveOSSurtir, CveMovimiento, ObjInventario.IniciaTransacSQL) Then
ErrorMovInv = True ErrorMovInv = True
Alert("Error al finalizar orden de servicio", TipoMensaje.MsgError) Alert("Error al finalizar orden de servicio", TipoMensaje.MsgError)