This commit is contained in:
2023-08-31 21:56:13 -07:00
14 changed files with 25865 additions and 14 deletions

View File

@@ -352,10 +352,10 @@ Partial Class Inventarios_InventarioFisicoDetalle
CveProducto = dr("CvePS").ToString.ToEntero
CveUnidadMedida = dr("CveUnidadMedida").ToString.ToEntero
'Dim AplicaSeccion As Boolean = dr("AplicaSeccion") = "1"
Dim AplicaCaducidad As Boolean = dr("AplicaCaducidad").ToString = "True"
Dim AplicaLote As Boolean = dr("AplicaLote").ToString = "True"
Dim AplicaSerie As Boolean = dr("AplicaSerie").ToString = "True"
Dim AplicaSeccion As Boolean = dr("AplicaSeccion").ToString = "True"
Dim AplicaCaducidad As Boolean = Boolean.Parse(dr("AplicaCaducidad").ToString)
Dim AplicaLote As Boolean = Boolean.Parse(dr("AplicaLote").ToString)
Dim AplicaSerie As Boolean = Boolean.Parse(dr("AplicaSerie").ToString)
Dim AplicaSeccion As Boolean = Boolean.Parse(dr("AplicaSeccion").ToString)
'divSeccionAlmacen.Visible = AplicaSeccion
divLote.Visible = AplicaLote