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

-- cambio en nombre. del archivo de descarga de universo de productos.

Browse Source 
-- cambio de texto Varras a Barras
This commit is contained in:
rrene
2023-06-29 10:25:13 -07:00
parent 87f727d4b8
commit 6880840885
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Inventarios/InventarioFisicoDetalle.aspx
View File

@@ -208,7 +208,7 @@
<asp:UpdatePanel ID="UpBuscar" runat="server" RenderMode="Inline" ViewStateMode="Inherit" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-3">
<asp:Panel ID="Panel1" runat="server" DefaultButton="BtnBuscarCodVarras">
<asp:Panel ID="Panel1" runat="server" DefaultButton="BtnBuscarCodBarras">
<div class="portlet smmallpadding light bordered" id="Div2" runat="server">
<div class="portlet-title">
<div class="tools">
@@ -223,10 +223,10 @@
<div class="row" style="margin-top: 5px;">
<label class="col-sm-4">Código.Barras</label>
<div class="col-sm-4">
<asp:TextBox runat="server" CssClass="form-control" ID="TxtConCodigoVarras"></asp:TextBox>
<asp:TextBox runat="server" CssClass="form-control" ID="TxtConCodigoBarras"></asp:TextBox>
</div>
<div class="col-sm-4">
<asp:Button ID="BtnBuscarCodVarras" OnClick="BtnBuscarCodVarras_Click" runat="server" Text="Consultar" class="btn btn-primary" Enabled="true" />
<asp:Button ID="BtnBuscarCodBarras" OnClick="BtnBuscarCodBarras_Click" runat="server" Text="Consultar" class="btn btn-primary" Enabled="true" />
</div>
</div>
<div class="row" style="margin-top: 5px;">

6
Inventarios/InventarioFisicoDetalle.aspx.vb
View File

@@ -687,13 +687,13 @@ Partial Class Inventarios_InventarioFisicoDetalle
worksheet.Columns(i).AutoFit(1, worksheet.Rows(0), worksheet.Rows(worksheet.Rows.Count - 1))
Next
NombreArchivo = "Productos"
NombreArchivo = "Productos-" + lbTitulo.Text
workbook.Save(Response, $"{NombreArchivo}.xlsx", SaveOptions.XlsxDefault)
End Sub
#End Region
Protected Sub BtnBuscarCodVarras_Click(sender As Object, e As EventArgs)
Dim CodigoBarras As String = If(TxtConCodigoVarras.Text.Trim <> "", TxtConCodigoVarras.Text.Trim, "-1").Replace("'", "''")
Protected Sub BtnBuscarCodBarras_Click(sender As Object, e As EventArgs)
Dim CodigoBarras As String = If(TxtConCodigoBarras.Text.Trim <> "", TxtConCodigoBarras.Text.Trim, "-1").Replace("'", "''")
LblContador.Text = "No se encontraron resultados"
Using Inventarios As New ClsInventarios
If Inventarios.GetInventarioFisicoContador(CveInventarioFisico, ddlUsuario.SelectedValue.ToString.ToEntero, CodigoBarras) Then