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

--correciones de visualizacion en consulta de existencias

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-12-08 01:56:01 -07:00
parent 4dd60bfc86
commit 35e34173ed
2 changed files with 5 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Inventarios/PopUpExistenciasAlmacen.aspx
View File

@@ -146,7 +146,7 @@
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div> </div>
<div id="DivMedRin" style="overflow-y: auto; width: 765px; height: 325px;" runat="server" visible="False"> <div id="DivMedRin" style="overflow-y: auto; width: 765px; height: 325px;" runat="server" visible="false" >
<asp:GridView ID="GvMedRin" Width="100%" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron registros" CssClass="table table-striped table-hover" GridLines="None"> <asp:GridView ID="GvMedRin" Width="100%" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron registros" CssClass="table table-striped table-hover" GridLines="None">
<Columns> <Columns>
<asp:BoundField DataField="Almacen" HeaderText="Almacén" /> <asp:BoundField DataField="Almacen" HeaderText="Almacén" />

14
Inventarios/PopUpExistenciasAlmacen.aspx.vb
View File

@@ -46,12 +46,6 @@ Partial Class Inventarios_Default
DivSucursal.Visible = True DivSucursal.Visible = True
End If End If
If UsuarioActual.CveEmpresa.Contiene(119) Then
LtPrecioPS.Visible = True
DivSucursal.Visible = True
End If
If UsuarioActual.CveEmpresa.Contiene(186) Then If UsuarioActual.CveEmpresa.Contiene(186) Then
LtPrecioPS.Visible = True LtPrecioPS.Visible = True
DivListasPrecios.Visible = True DivListasPrecios.Visible = True
@@ -303,16 +297,16 @@ Partial Class Inventarios_Default
Dim ObjInventarios As New ClsInventarios Dim ObjInventarios As New ClsInventarios
If ObjInventarios.GetExistenciasMedRin(DDlPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlRin.SelectedValue.ToEntero, DdlMedidas.SelectedValue.ToEntero) Then If ObjInventarios.GetExistenciasMedRin(DDlPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlRin.SelectedValue.ToEntero, DdlMedidas.SelectedValue.ToEntero) Then
GvMedRin.DataSource = ObjInventarios.DtResultados GvMedRin.DataSource = ObjInventarios.DtResultados.Copy()
If ObjInventarios.DtResultados.Rows.Count > 0 Then If ObjInventarios.DtResultados.Rows.Count > 0 Then
TblBusqueda.Visible = True
GvMedRin.Columns(5).Visible = ObjInventarios.DtResultados.MAX("CantidadMinimaPromo") <> "" GvMedRin.Columns(5).Visible = ObjInventarios.DtResultados.MAX("CantidadMinimaPromo") <> ""
End If End If
End If End If
ObjInventarios.Dispose() ObjInventarios.Dispose()
GvMedRin.DataBind()
UPDatos.Update()
DivMedRin.Visible = True DivMedRin.Visible = True
GvMedRin.DataBind()
UPDatos.Update()
End Sub End Sub
Private Sub CargaEquivalencia() Private Sub CargaEquivalencia()