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

corrección de código

Browse Source
This commit is contained in:
rrene
2021-06-09 19:02:33 -07:00
parent 2b709d998b
commit 2882360775
1 changed files with 19 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -3009,10 +3009,8 @@ Partial Class Inventarios_RecepcionAlmacen
Row("CveUM") = GvRow.DataKey("CveUM").ToEntero() Row("CveUM") = GvRow.DataKey("CveUM").ToEntero()
DtPSVirtual.Rows.Add(Row) DtPSVirtual.Rows.Add(Row)
End If End If
End If End If
Next Next
End If End If
Next Next
@@ -3065,8 +3063,6 @@ Partial Class Inventarios_RecepcionAlmacen
Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacen.SelectedValue.ToEntero()).FiltroPrimeroValor("CveAlmacenVirtual").ToEntero() Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacen.SelectedValue.ToEntero()).FiltroPrimeroValor("CveAlmacenVirtual").ToEntero()
If CveMovimientoVirtual > 0 Then
CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, 13, 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, CveMovimientoRelacionado:=CveMovimientoRef, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/VD") CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, 13, 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, CveMovimientoRelacionado:=CveMovimientoRef, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/VD")
If CveMovimientoVirtual > 0 Then If CveMovimientoVirtual > 0 Then
@@ -3093,8 +3089,6 @@ Partial Class Inventarios_RecepcionAlmacen
Else Else
ErrorMovInv = True ErrorMovInv = True
End If End If
End If
Else Else
ErrorMovInv = True ErrorMovInv = True
End If End If