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

--FIX kardex horizontal

Browse Source
This commit is contained in:
JPerez
2025-07-10 16:42:03 -07:00
parent a7ca525f30
commit aa4ab13801
2 changed files with 30 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
Inventarios/KardexAlmacenHorizontal.aspx
View File

@@ -261,15 +261,6 @@
<asp:ListItem Text="Sucursales" Value="2" />
</asp:DropDownList>
</div>
<div class="col-md-1" style="display: flex; align-items: center;">
<div style="width: 100px;">Tránsito?</div>
<asp:DropDownList ID="DdlIncluyeTransitorios" CssClass="select2me" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
<asp:ListItem Text="No" Value="0" Selected="True"></asp:ListItem>
<asp:ListItem Text="Si (Origen)" Value="1"></asp:ListItem>
<asp:ListItem Text="Si (Destino)" Value="2"></asp:ListItem>
<asp:ListItem Text="Separado(Destino)" Value="3" />
</asp:DropDownList>
</div>
</div>
</div>
</div>
@@ -282,7 +273,7 @@
</asp:DropDownList>
</div>
<div class="col-md-2" style="display: flex; align-items: center;">
<div class="col-md-2" style="display: none; align-items: center;">
<div style="width: 100px;" class="truncate text" title="Unidad de medida">Unidad de medida</div>
<asp:DropDownList ID="DdlUnidadMedida" runat="server" CssClass="select2me " Style="width: 100% !important;" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida">
<asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
@@ -296,12 +287,6 @@
</asp:DropDownList>
</div>
<div class="col-md-4" style="display: flex; align-items: center;">
<div style="width: 100px;">Almacén</div>
<asp:ListBox ID="ddlAlmacen" SelectionMode="Multiple" data-text="Todos" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"
DataTextField="Almacen" DataValueField="CveAlmacen"></asp:ListBox>
</div>
<div class="col-md-1" style="display: flex; align-items: center;">
<div style="width: 100px;" class="truncate text" title="Incluir Proyectados">Incluir Proyectados</div>
<asp:DropDownList ID="DdlProyeccionFiltro" runat="server" CssClass="select2me" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
@@ -311,6 +296,20 @@
<asp:ListItem Text="No" Value="0" Selected="True" />
</asp:DropDownList>
</div>
<div class="col-md-1" style="display: flex; align-items: center;">
<div style="width: 100px;">Tránsito?</div>
<asp:DropDownList ID="DdlIncluyeTransitorios" CssClass="select2me" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
<asp:ListItem Text="No" Value="0" Selected="True"></asp:ListItem>
<asp:ListItem Text="Si (Origen)" Value="1"></asp:ListItem>
<asp:ListItem Text="Si (Destino)" Value="2"></asp:ListItem>
<asp:ListItem Text="Separado(Destino)" Value="3" />
</asp:DropDownList>
</div>
<div class="col-md-4" style="display: flex; align-items: center;">
<div style="width: 120px;margin-left: -10px;">Almacén</div>
<asp:ListBox ID="ddlAlmacen" SelectionMode="Multiple" data-text="Todos" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100% !important;" runat="server"
DataTextField="Almacen" DataValueField="CveAlmacen"></asp:ListBox>
</div>
</div>
<asp:Panel ID="pnlOrden" runat="server" CssClass="row">
<div class="col-md-2" style="display: flex; align-items: center;">

29
Inventarios/KardexAlmacenHorizontal.aspx.vb
View File

@@ -184,7 +184,7 @@ Partial Class Inventarios_KardexAlmacenHorizontal
dt = ObjMovimientos.DtResultados
Dim ListaBorrar As New List(Of DataColumn)
If Not TienePermisoImportes AndAlso DdlExistencia.SelectedValue.ToEntero = 2 Then
If Not TienePermisoImportes AndAlso DdlExistencia.SelectedValue.ToEntero().Contiene(2, 4) Then
dt.Columns.RemoveAt(dt.Columns.Count - 2) 'CP-quito columna de importe total
dt.Columns.RemoveAt(dt.Columns.Count - 2) 'Valor-quito columna de importe total
End If
@@ -247,17 +247,21 @@ Partial Class Inventarios_KardexAlmacenHorizontal
'Dim Liga As String = String.Format($"/Inventarios/Kardex.aspx?CvePS={ddlProducto2.SelectedValue.ToEntero}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CveUM={DdlUnidadMedida.SelectedValue.ToEntero}&FechaI={TxtFechaI.Text}&FechaF={TxtFechaF.Text}")
'e.Row.FCHyperLink("HplAlmacen").NavigateUrl = Liga
If e.Row.RowIndex = 0 Then
If e.Row.RowIndex = 0 AndAlso DdlExistencia.SelectedValue.ToEntero().Contiene(2, 4) Then
e.Row.CssClass = "Totales"
End If
'e.Row.Attributes.Add("style", " max-height:31px!important")
e.Row.HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Left
e.Row.Cells(1).HorizontalAlign = HorizontalAlign.Left
e.Row.Cells(2).HorizontalAlign = HorizontalAlign.Left
If DdlExistencia.SelectedValue.ToEntero = 3 Then
e.Row.HorizontalAlign = HorizontalAlign.Left
Else
e.Row.HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Left
e.Row.Cells(1).HorizontalAlign = HorizontalAlign.Left
e.Row.Cells(2).HorizontalAlign = HorizontalAlign.Left
End If
Dim Index As Integer = 0
For Each Cells As TableCell In e.Row.Cells
@@ -315,17 +319,15 @@ Partial Class Inventarios_KardexAlmacenHorizontal
'Escondo CvePS y CveAlmacén (Se generan por autogeneratecolumns por eso se borran por aqui).
' e.Row.Cells(0).Width = New Unit("200px")
If DdlExistencia.SelectedValue.ToEntero = 2 Then
If DdlExistencia.SelectedValue.ToEntero.Contiene(2, 3, 4) Then
Try
If DdlExistencia.SelectedValue.ToEntero = 3 Then
e.Row.Cells(1).Visible = False
End If
e.Row.Cells(2).Visible = False
e.Row.Cells(3).Visible = False
Catch ex As Exception
End Try
Else
e.Row.Cells(0).Visible = False
End If
If e.Row.RowType = DataControlRowType.Header Then
@@ -334,7 +336,6 @@ Partial Class Inventarios_KardexAlmacenHorizontal
End Sub
Private Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
Imprimir("Excel")
End Sub
Private Sub Imprimir(Optional reporte As String = "PDF")