-- condición e almacenes usados

This commit is contained in:
2021-08-18 07:17:30 -07:00
parent 9d705a520b
commit 4f86169b89

View File

@@ -1010,7 +1010,11 @@ Partial Class Inventarios_RecepcionAlmacen
ValidarRecepcionUsados = True
DtRecepcion = ObjInventario.DtResultados.Copy()
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "22", CveTipoCompra)
If TipoMovimiento = 3 Then
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "21", CveTipoCompra)
Else
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "22", CveTipoCompra)
End If
Else
DtRecepcion = ObjInventario.DtResultados.Copy()