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

-- visualización de folio de importación/indirecto y su liga respectiva

Browse Source
This commit is contained in:
rrene
2023-03-11 11:21:00 -07:00
parent 0e540d295a
commit b9e766d706
2 changed files with 21 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
Compras/Compras.aspx
View File

@@ -531,10 +531,17 @@
</div>
<div class="form-group proveedoreespes" runat="server" id="divImportacion" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">Importación </span>
<div class="whitoutcol whitoutcol">
<div class="whitoutcol">
<asp:CheckBox runat="server" ID="chkImportacion"> </asp:CheckBox>
</div>
</div>
<div class="form-group proveedoreespes" runat="server" id="divCompraImportacion" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">
<asp:Literal ID="LtlImportacionTexto" runat="server">Importación</asp:Literal>:</span>
<div class="whitoutcol">
<asp:HyperLink runat="server" ID="HplCompraImportacion" CssClass="Texto"> </asp:HyperLink>
</div>
</div>
<div class="form-group proveedoreespes" runat="server" id="divFolioGarantia" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">Folio Garantía </span>
<div class="whitoutcol whitoutcol">

16
Compras/Compras.aspx.vb
View File

@@ -2841,6 +2841,19 @@ Partial Class Compras_Compras
TxtRembolsoNumero.Enabled = If(IdPoliza > 0, False, True)
If dr("CveImportacion").ToString <> "" Then
divCompraImportacion.Visible = True
HplCompraImportacion.Text = dr("Importacion").ToString
If dr("TipoImportacion").ToString = "2" Then 'flete/indirecto
LtlImportacionTexto.Text = "Indirecto"
HplCompraImportacion.NavigateUrl = $"/Inventarios/Fletes.aspx?CveFlete={dr("CveImportacion")}"
Else
HplCompraImportacion.NavigateUrl = $"/Compras/Importaciones.aspx?CveImportacion={dr("CveImportacion")}"
End If
End If
If dr("CveFolioGarantia").ToString <> "" Then
divFolioGarantia.Visible = True
DdlFolioGarantia.Items.Insert(0, New ListItem(dr("FolioGarantia").ToString, dr("CveFolioGarantia").ToString))
@@ -3004,7 +3017,6 @@ Partial Class Compras_Compras
ImgFecha.Enabled = False
CEFecha.Enabled = False
If UsuarioActual.TienePermisoProceso(342) Then
TxtFecha.Enabled = True
ImgFecha.Enabled = True
@@ -3012,8 +3024,6 @@ Partial Class Compras_Compras
LnkActualziarFechadecompra.Visible = True
End If
DdlProveedor.Enabled = False
DdlProveedorSucursal.Enabled = False
DdlEstatus.Enabled = False