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

-- acomodo

Browse Source
This commit is contained in:
rrene
2023-07-03 07:33:09 -07:00
parent d11cf65c87
commit 7030ef0a40
2 changed files with 10 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Inventarios/RecepcionUsados.aspx
View File

@@ -78,7 +78,7 @@
<asp:UpdatePanel ID="UpGenerales" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-6">
<div class="portlet smmallpadding light bordered infomov" style="width: 100%">
<div class="portlet smmallpadding light xspadding bordered infomov" style="width: 100%">
<div class="portlet-title">
<div class="tools">
<a href="javascript;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
@@ -92,7 +92,6 @@
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style='display:none;'")%>>
<div id="tbEncabezado" runat="server" class="rowpadding" visible="true">
<div class="row" style="display: none;">
<label class="col-md-1 truncate" style="width: 110px">Movimiento:</label>
<div class="col-md-2">
<asp:RadioButtonList runat="server" ID="RBLOpcion" RepeatDirection="Horizontal" AutoPostBack="true" Font-Size="18pt">
@@ -100,7 +99,6 @@
<asp:ListItem Value="3">Salida</asp:ListItem>
</asp:RadioButtonList>
</div>
</div>
<div class="row" style="margin-left: 105px">
<asp:RadioButtonList runat="server" ID="RblUsadosAjuste" RepeatDirection="Horizontal" AutoPostBack="true" Font-Size="18pt" Width="70%" OnSelectedIndexChanged="OnRblUsadosAjuste_Change">
@@ -192,9 +190,9 @@
</div>
</div>
</div>
<label class="col-md-1 truncate" style="width: 110px" id="DivFolio1" runat="server">Folio:</label>
<label class="col-md-1 truncate" style="width: 80px" id="DivFolio1" runat="server">Folio:</label>
<div class="col-md-2" id="DivFolio2" runat="server">
<asp:TextBox ID="TxtFolio" runat="server" Style="" Width="100%"></asp:TextBox>
<asp:TextBox ID="TxtFolio" runat="server" Style="" Width="100px"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumerosFolio" runat="server" TargetControlID="TxtFolio" FilterType="Numbers" />
</div>
</div>

13
Inventarios/RecepcionUsados.aspx.vb
View File

@@ -3089,7 +3089,7 @@ Partial Class Inventarios_RecepcionUsados
End If
DdlTipoUso.Items.Clear()
DdlTipoUso.DataSource = GlobalDTAcumGarantiasMesesTipoUso(UsuarioActual.CveEmpresa, CveMarca)
DdlTipoUso.DataSource = GlobalDTAcumGarantiasMesesTipoUso(UsuarioActual.CveEmpresa, CveMarca, -1, -1)
DdlTipoUso.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlTipoUso.DataBind()
@@ -3246,10 +3246,11 @@ Partial Class Inventarios_RecepcionUsados
CveMarca = GlobalDTPS(UsuarioActual.CveEmpresa, DdlPSAjuste.SelectedValue.ToEntero).FiltroPrimeroValor("CveMarca", "").ToEntero
Dim ObjAcum As New ClsAcumuladores
If ObjAcum.GarantiasMesesGet(-1, UsuarioActual.CveEmpresa, CveMarca, DdlTipoUso.SelectedValue.ToEntero, TxtMesesUso.Text.ToEntero) Then
If ObjAcum.DtResultados.Rows.Count > 0 Then
TxtPorcentajeAjuste.Text = (ObjAcum.DtResultados.Rows(0)("Valor").ToString.ToDouble / 100.0).FormatoNumero
Dim dtt As DataTable = GlobalDTAcumGarantiasMesesTipoUso(UsuarioActual.CveEmpresa, CveMarca, DdlTipoUso.SelectedValue.ToEntero, TxtMesesUso.Text.ToEntero)
If dtt IsNot Nothing Then
If dtt.Rows.Count > 0 Then
TxtPorcentajeAjuste.Text = (dtt.Rows(0)("Valor").ToString.ToDouble / 100.0).FormatoNumero
TxtImporteAjuste.Text = (TxtPorcentajeAjuste.Text.ToDecimal * TxtPUFactura.Text.ToDecimal).FormatoNumero
@@ -3293,7 +3294,7 @@ Partial Class Inventarios_RecepcionUsados
TxtImporteAjuste.Text = "0.00"
End If
End If
ObjAcum.Dispose()
End If
Catch ex As Exception
OnError("Ocurrió un error al recalcular el costo", ex)