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

orden de carga de almacenes, cuando son devoluciones

Browse Source
This commit is contained in:
rrene
2020-12-15 16:55:44 -07:00
parent 8e84982a17
commit 099f939deb
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -938,12 +938,12 @@ Partial Class Inventarios_RecepcionAlmacen
TotalCompraOC = ObjCompras.DtResultados.Rows(0)("SubTotal").ToString.ToDecimal - ObjCompras.DtResultados.Rows(0)("Descuentos").ToString.ToDecimal TotalCompraOC = ObjCompras.DtResultados.Rows(0)("SubTotal").ToString.ToDecimal - ObjCompras.DtResultados.Rows(0)("Descuentos").ToString.ToDecimal
CveTipoCompra = ObjCompras.DtResultados.Rows(0)("CveTipoCompra").ToString.ToEntero CveTipoCompra = ObjCompras.DtResultados.Rows(0)("CveTipoCompra").ToString.ToEntero
If TipoMovimiento = 3 Then If CveTipoCompra = 9 Then
CargaAlmacenes(-1, "21,2", CveTipoCompra)
ElseIf CveTipoCompra = 9 Then
CargaAlmacenes(-1, "27", CveTipoCompra) CargaAlmacenes(-1, "27", CveTipoCompra)
ElseIf CveTipoCompra = 10 Then ElseIf CveTipoCompra = 10 Then
CargaAlmacenes(-1, CveTipoCompra:=CveTipoCompra) CargaAlmacenes(-1, CveTipoCompra:=CveTipoCompra)
ElseIf TipoMovimiento = 3 Then
CargaAlmacenes(-1, "21,2", CveTipoCompra)
Else Else
CargaAlmacenes(-1) CargaAlmacenes(-1)
End If End If