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

-- activación de tipo de compra (16) apoyo sin virtuales

Browse Source
This commit is contained in:
rrene
2025-02-13 11:41:24 -07:00
parent 60243c001e
commit 48ea850000
1 changed files with 5 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -1076,7 +1076,9 @@ Partial Class Inventarios_RecepcionAlmacen
If TipoMovimiento = 3 Then If TipoMovimiento = 3 Then
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "21", CveTipoCompra) CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "21", CveTipoCompra)
Else Else
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, "22", CveTipoCompra) Dim tTipoAlm As String = "22"
If CveTipoCompra = 16 Then tTipoAlm = "22,1,24" ' apoyos, "acumuladores sin virtual" o "virtual solo"
CargaAlmacenes(DtRecepcion.Rows(0)("CveSubProyecto").ToString.ToEntero, tTipoAlm, CveTipoCompra)
End If End If
Else Else
@@ -1112,8 +1114,8 @@ Partial Class Inventarios_RecepcionAlmacen
DivVirtualAdvertencia.Visible = False DivVirtualAdvertencia.Visible = False
End If End If
'SI LA COMPRA ES DE TIPO "APOYO LOGISTICO" NO DEBE GENERAR VIRTUAL 'SI LA COMPRA ES DE TIPO "APOYO LOGISTICO" NO DEBE GENERAR VIRTUAL (9) y apoyo sin virtual (16)
If Not SumarImporteUsados AndAlso CveTipoCompra = 9 Then If Not SumarImporteUsados AndAlso CveTipoCompra.Contiene(9, 16) Then
RealizarMovimientoVirtual = False RealizarMovimientoVirtual = False
DivVirtualAdvertencia.Visible = False DivVirtualAdvertencia.Visible = False
End If End If