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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rakcsle
2022-09-01 08:18:53 -07:00
parent 53cb2bbbc8 2646bd5ab5
commit 7016f79b23
1 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -1394,6 +1394,9 @@ Partial Class Inventarios_RecepcionAlmacen
If Not TmDT.Columns.Contains("CantidadSeleccionada") Then If Not TmDT.Columns.Contains("CantidadSeleccionada") Then
TmDT.Columns.Add("CantidadSeleccionada", GetType(Decimal)) TmDT.Columns.Add("CantidadSeleccionada", GetType(Decimal))
End If End If
If Not TmDT.Columns.Contains("CveCategoria") Then
TmDT.Columns.Add("CveCategoria", GetType(Integer))
End If
GvInv.Columns(2).Visible = False GvInv.Columns(2).Visible = False
@@ -1557,6 +1560,11 @@ Partial Class Inventarios_RecepcionAlmacen
'FUNCIONALIDAD PISTOLA DE CODIGOS 'FUNCIONALIDAD PISTOLA DE CODIGOS
If UsuarioActual.Empresa.Funcionalidad(132) = "1" And e.Row.DBCampo("CodigoBarras").Trim <> "" And Not UsuarioActual.TienePermisoProceso(174) Then If UsuarioActual.Empresa.Funcionalidad(132) = "1" And e.Row.DBCampo("CodigoBarras").Trim <> "" And Not UsuarioActual.TienePermisoProceso(174) Then
e.Row.FCTextBox("TbCantidadF").Enabled = False e.Row.FCTextBox("TbCantidadF").Enabled = False
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'acumuladoras
If e.Row.DBCampo("CveCategoria") <> "249" Then
e.Row.FCTextBox("TbCantidadF").Enabled = True
End If
End If
End If End If
If e.Row.DBCampo("CantidadF").ToDecimal = 0 Then If e.Row.DBCampo("CantidadF").ToDecimal = 0 Then