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

- al registar comra manual activar cxc en NC

Browse Source
This commit is contained in:
rrene
2019-12-03 16:50:50 -07:00
parent 11611d6bc5
commit 9d38072e21
2 changed files with 11 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Compras/Compras.aspx
View File

@@ -197,7 +197,7 @@
<div class="form-group whitoutcol" style="width: 280px;"> <div class="form-group whitoutcol" style="width: 280px;">
<span class="whitoutcol linewhitsize comprasdfleft">Tipo:</span> <span class="whitoutcol linewhitsize comprasdfleft">Tipo:</span>
<div class="whitoutcol whitoutcol comprasdfleftvar"> <div class="whitoutcol whitoutcol comprasdfleftvar">
<asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small"> <asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small" OnSelectedIndexChanged="DdlTipoComprobante_SelectedIndexChanged">
<asp:ListItem Selected="True" Text="Factura" Value="Fac"></asp:ListItem> <asp:ListItem Selected="True" Text="Factura" Value="Fac"></asp:ListItem>
<asp:ListItem Text="Nota de Crédito" Value="NC"></asp:ListItem> <asp:ListItem Text="Nota de Crédito" Value="NC"></asp:ListItem>
<asp:ListItem Text="Anticipo" Value="Ant"></asp:ListItem> <asp:ListItem Text="Anticipo" Value="Ant"></asp:ListItem>

10
Compras/Compras.aspx.vb
View File

@@ -15644,6 +15644,16 @@ Partial Class Compras_Compras
RBLPago.Items(2).Enabled = True RBLPago.Items(2).Enabled = True
End If End If
ImgAnticiposPendientes.Visible = False ImgAnticiposPendientes.Visible = False
If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then
paneldevolucion.Visible = True
Pnlalmaceninventarios.Visible = False
cargaddldevoluciones(CveProveedor, TxtSubTotal.Text.ToDouble)
InicializaAplicaNCFact()
DivReembolso.Visible = False
RBLPago.Items(2).Enabled = False
UpPS.Update()
End If
End If End If
UPCondicionesPago.Update() UPCondicionesPago.Update()
End Sub End Sub