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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2024-11-06 08:52:52 -07:00
parent f2420770d4 a3d27d0a5b
commit 5525a23701
3 changed files with 127 additions and 140 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Bancos/ProveedoresAbonar.aspx
View File

@@ -574,7 +574,7 @@
<ContentTemplate> <ContentTemplate>
<div class="row"> <div class="row">
<div class="col-md-2">Proveedor:</div> <div class="col-md-2">Proveedor:</div>
<div class="col-md-6"> <div class="col-md-10">
<ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost> <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>
</div> </div>
</div> </div>

139
Ventas/Ventas.aspx
View File

@@ -795,15 +795,7 @@
<asp:UpdatePanel ID="UPPCreditoDisponible" runat="server" UpdateMode="Conditional" style="width: 250px;"> <asp:UpdatePanel ID="UPPCreditoDisponible" runat="server" UpdateMode="Conditional" style="width: 250px;">
<ContentTemplate> <ContentTemplate>
<asp:Label ID="LblCreditoDisponible" runat="server" Text=""></asp:Label> <asp:Label ID="LblCreditoDisponible" runat="server" Text=""></asp:Label>
</ContentTemplate> &nbsp;
</asp:UpdatePanel>
</td>
</tr>
<tr align="left" id="TrPorcentajeCredito" runat="server" visible="False">
<td><b>Limite Al:</b>&nbsp;</td>
<td>
<asp:UpdatePanel ID="UpPorcenctajeCredito" runat="server" UpdateMode="Conditional" style="width: 250px;">
<ContentTemplate>
<asp:Label ID="LblPorcentajeCredito" runat="server" Text=""></asp:Label> <asp:Label ID="LblPorcentajeCredito" runat="server" Text=""></asp:Label>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -1088,8 +1080,6 @@
<asp:UpdatePanel ID="UpPS" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpPS" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div style="overflow-x: auto; width: 100%;"> <div style="overflow-x: auto; width: 100%;">
<%--<asp:Panel ID="PnlTitulosPS" runat="server" DefaultButton="LbAgregar">--%>
<table border="0" style="min-width: 980px;" id="tbps" class="table table-striped Widthall"> <table border="0" style="min-width: 980px;" id="tbps" class="table table-striped Widthall">
<%--width="100%"--%> <%--width="100%"--%>
<tr class="Titulos TextTab"> <tr class="Titulos TextTab">
@@ -1120,6 +1110,10 @@
<asp:Label runat="server" ID="LblProyectoHeader" Text="" /> <asp:Label runat="server" ID="LblProyectoHeader" Text="" />
<asp:Label runat="server" ID="LblSubProyecto" Text="" /></th> <asp:Label runat="server" ID="LblSubProyecto" Text="" /></th>
<th>P.U.&nbsp;<asp:LinkButton ID="ImgDescPU" runat="server" Text="<i class='fa fa-comment-o'></i>" Style="cursor: pointer;" AlternateText="Agregar Descuento" Visible="false" /></th> <th>P.U.&nbsp;<asp:LinkButton ID="ImgDescPU" runat="server" Text="<i class='fa fa-comment-o'></i>" Style="cursor: pointer;" AlternateText="Agregar Descuento" Visible="false" /></th>
<th runat="server" visible="false" id="thCosto2">
Costo <br />
Utilidad
</th>
<th id="thEncDesc1" runat="server" visible="true">Desc <th id="thEncDesc1" runat="server" visible="true">Desc
</th> </th>
<th id="thPredial1" runat="server" visible="false">Predial <th id="thPredial1" runat="server" visible="false">Predial
@@ -1141,7 +1135,7 @@
<th></th> <th></th>
<th runat="server" visible="false" id="nomostrar2"></th> <th runat="server" visible="false" id="nomostrar2"></th>
<th runat="server" visible="false" id="thProntoPago2"></th> <th runat="server" visible="false" id="thProntoPago2"></th>
<th runat="server" visible="false" id="thCosto2"></th>
</tr> </tr>
<tr class="TextTab" runat="server" id="TrEdit"> <tr class="TextTab" runat="server" id="TrEdit">
<th> <th>
@@ -1247,6 +1241,9 @@
</div> </div>
</div> </div>
</th> </th>
<th runat="server" visible="false" id="thCosto">
<asp:Literal ID="LtlHeaderCosto" runat="server" Text=""></asp:Literal>
</th>
<th id="thEncDesc2" runat="server" visible="true"></th> <th id="thEncDesc2" runat="server" visible="true"></th>
<th id="thPredial2" runat="server" visible="false"> <th id="thPredial2" runat="server" visible="false">
<asp:TextBox ID="TxtCuentaPredial" runat="server" Width="75px" CssClass="form-control input-sm" type="number"></asp:TextBox> <asp:TextBox ID="TxtCuentaPredial" runat="server" Width="75px" CssClass="form-control input-sm" type="number"></asp:TextBox>
@@ -1268,10 +1265,8 @@
<th runat="server" id="thOrden"></th> <th runat="server" id="thOrden"></th>
<th runat="server" visible="false" id="nomostrar"></th> <th runat="server" visible="false" id="nomostrar"></th>
<th runat="server" visible="false" id="thProntoPago"></th> <th runat="server" visible="false" id="thProntoPago"></th>
<th runat="server" visible="false" id="thCosto"></th>
</tr> </tr>
</table> </table>
<%--</asp:Panel>--%>
<asp:GridView ID="GvPS" GridLines="None" runat="server" data-tableheader="#tbps" ShowHeader="true" AutoGenerateColumns="False" <asp:GridView ID="GvPS" GridLines="None" runat="server" data-tableheader="#tbps" ShowHeader="true" AutoGenerateColumns="False"
DataKeyNames="Consec,CvePS,Total, IEPS, CveClasificacion,Clasificacion,CveUM,UM,CveProyecto,CveSubProyecto,TipoDocto,PS,Obs,Cantidad,PU,Descuento,IVA,ImporteIVA,CantidadInventario,CantidadFacturadaRem,CveVentaDetalle,CvePromocionDetalle" DataKeyNames="Consec,CvePS,Total, IEPS, CveClasificacion,Clasificacion,CveUM,UM,CveProyecto,CveSubProyecto,TipoDocto,PS,Obs,Cantidad,PU,Descuento,IVA,ImporteIVA,CantidadInventario,CantidadFacturadaRem,CveVentaDetalle,CvePromocionDetalle"
@@ -1434,6 +1429,13 @@
</EditItemTemplate> </EditItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--10--%> <%--10--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" Visible="false" ItemStyle-Width="20px" >
<ItemTemplate>
<asp:Label ID="LblCosto" runat="server"></asp:Label><br />
<asp:Label ID="LblCostoPorcentaje" runat="server"></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<%--11--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText=""> <asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlDesc" runat="server" Text='<%# Eval("Descuento", "{0:N2}") %>'></asp:Literal> <asp:Literal ID="LtlDesc" runat="server" Text='<%# Eval("Descuento", "{0:N2}") %>'></asp:Literal>
@@ -1447,7 +1449,7 @@
<ajax:ValidatorCalloutExtender ID="VCEDescuentoEdit" runat="server" HighlightCssClass="vco" TargetControlID="CVDescuentoEdit" Width="300px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCEDescuentoEdit" runat="server" HighlightCssClass="vco" TargetControlID="CVDescuentoEdit" Width="300px"></ajax:ValidatorCalloutExtender>
</EditItemTemplate> </EditItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--11--%> <%--12--%>
<asp:TemplateField HeaderText="" Visible="False"> <asp:TemplateField HeaderText="" Visible="False">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlPredial" runat="server" Text='<%# Eval("CuentaPredial") %>'></asp:Literal> <asp:Literal ID="LtlPredial" runat="server" Text='<%# Eval("CuentaPredial") %>'></asp:Literal>
@@ -1456,7 +1458,7 @@
<asp:TextBox ID="TxtPredial" runat="server" CausesValidation="true" MaxLength="50" Text='<%# Eval("CuentaPredial") %>' type="number" Width="60px"></asp:TextBox> <asp:TextBox ID="TxtPredial" runat="server" CausesValidation="true" MaxLength="50" Text='<%# Eval("CuentaPredial") %>' type="number" Width="60px"></asp:TextBox>
</EditItemTemplate> </EditItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--12--%> <%--13--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblIVA" runat="server" Text='<%# Eval("ImporteIVA", "{0:#,##0.00##}") %>'></asp:Label><br /> <asp:Label ID="LblIVA" runat="server" Text='<%# Eval("ImporteIVA", "{0:#,##0.00##}") %>'></asp:Label><br />
@@ -1464,7 +1466,7 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--<asp:BoundField DataField="ImporteIVA" HeaderText="" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" />--%> <%--<asp:BoundField DataField="ImporteIVA" HeaderText="" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" />--%>
<%--13--%> <%--14--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblIEPS" runat="server" Text='<%# Eval("ImporteIEPS", "{0:#,##0.00##}") %>'></asp:Label><br /> <asp:Label ID="LblIEPS" runat="server" Text='<%# Eval("ImporteIEPS", "{0:#,##0.00##}") %>'></asp:Label><br />
@@ -1472,17 +1474,17 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--<asp:BoundField DataField="ImporteIEPS" HeaderText="" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />--%> <%--<asp:BoundField DataField="ImporteIEPS" HeaderText="" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />--%>
<%--14--%>
<asp:BoundField DataField="ImporteRetIVA" HeaderText="Ret IVA" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />
<%--15--%> <%--15--%>
<asp:BoundField DataField="ImporteRetISR" HeaderText="Ret ISR" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" /> <asp:BoundField DataField="ImporteRetIVA" HeaderText="Ret IVA" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />
<%--16--%> <%--16--%>
<asp:BoundField DataField="ImporteRetISR" HeaderText="Ret ISR" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />
<%--17--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# If(UsuarioActual.Empresa.Funcionalidad(109) = "1", Eval("TotalConImpuestos", "{0:#,##0.00##}"), Eval("TotalImporte", "{0:#,##0.00##}")) %>'></asp:Literal> <asp:Literal ID="LtlTotal" runat="server" Text='<%# If(UsuarioActual.Empresa.Funcionalidad(109) = "1", Eval("TotalConImpuestos", "{0:#,##0.00##}"), Eval("TotalImporte", "{0:#,##0.00##}")) %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--17--%> <%--18--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Editar"> <asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Editar">
<EditItemTemplate> <EditItemTemplate>
<div style="width: 85px;"> <div style="width: 85px;">
@@ -1496,14 +1498,14 @@
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" /> CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--18--%> <%--19--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Eliminar"> <asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Eliminar">
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" <asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete"
CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="confirmar" data-btn-ok-label="si" /> CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="confirmar" data-btn-ok-label="si" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--19--%> <%--20--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Center"> <asp:TemplateField ItemStyle-HorizontalAlign="Center">
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="LnkExistencias" runat="server" Visible="false" AlternateText="Ver Existencias" CausesValidation="False" CommandName="Existencias" CommandArgument='<%# GvPS.Rows.Count.ToString() %>' <asp:LinkButton ID="LnkExistencias" runat="server" Visible="false" AlternateText="Ver Existencias" CausesValidation="False" CommandName="Existencias" CommandArgument='<%# GvPS.Rows.Count.ToString() %>'
@@ -1514,7 +1516,7 @@
CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-clone'></i>" /> CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-clone'></i>" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--20--%> <%--21--%>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate> <HeaderTemplate>
<asp:LinkButton ID="LnkOrdenarGvPS" runat="server" CssClass="Texto" Text="<i class='fa fa-retweet'></i>" OnClick="OrdenarGvPS" /> <asp:LinkButton ID="LnkOrdenarGvPS" runat="server" CssClass="Texto" Text="<i class='fa fa-retweet'></i>" OnClick="OrdenarGvPS" />
@@ -1523,16 +1525,14 @@
<asp:TextBox ID="TxtOrden" runat="server" MaxLength="3" Type="number" Width="30px" Text='<%# Eval("Orden") %>' /> <asp:TextBox ID="TxtOrden" runat="server" MaxLength="3" Type="number" Width="30px" Text='<%# Eval("Orden") %>' />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--21--%> <%--22--%>
<asp:TemplateField HeaderText="Presupuesto de Ingreso" Visible="false"> <asp:TemplateField HeaderText="Presupuesto de Ingreso" Visible="false">
<ItemTemplate> <ItemTemplate>
<asp:DropDownList runat="server" ID="DdlFR" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="FuenteRecaudacionCodigoRubroIngreso" DataValueField="CvePresupuestoIngreso" Style="max-width: 100px;" OnSelectedIndexChanged="DdlFR_SelectedIndexChanged"></asp:DropDownList> <asp:DropDownList runat="server" ID="DdlFR" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="FuenteRecaudacionCodigoRubroIngreso" DataValueField="CvePresupuestoIngreso" Style="max-width: 100px;" OnSelectedIndexChanged="DdlFR_SelectedIndexChanged"></asp:DropDownList>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--22--%>
<asp:BoundField DataField="TieneProntoPago" HeaderText="Pronto Pago" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center" ReadOnly="true" Visible="false" />
<%--23--%> <%--23--%>
<asp:BoundField DataField="Costo" HeaderText="Costo" DataFormatString="{0:0.######}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" /> <asp:BoundField DataField="TieneProntoPago" HeaderText="Pronto Pago" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center" ReadOnly="true" Visible="false" />
</Columns> </Columns>
<RowStyle CssClass="Texto" /> <RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" /> <AlternatingRowStyle CssClass="TextoAlterno" />
@@ -6399,36 +6399,6 @@
<h4 class="modal-title">Cargar Conceptos</h4> <h4 class="modal-title">Cargar Conceptos</h4>
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="row">
<div class="col-md-12">
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Descargar Plantilla </span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body formnombottom">
<h4>Paso 1 : Descargar Plantilla</h4>
<br />
<div align="center">
<asp:LinkButton ID="LbDescargarExcelVentas" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
</div>
<br />
</div>
</div>
</div>
</div>
<br />
<br />
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;"> <div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
@@ -6446,13 +6416,8 @@
</div> </div>
</div> </div>
<div class="portlet-body formnombottom"> <div class="portlet-body formnombottom">
<h4>Paso 2: Cargar Plantilla</h4> <h4>Arrastre o haga click para subir el archivo Excel</h4>
<br /> <br />
<%-- <div class="row">
<div class="col-md-12" align="center">
<h4>Arraste o haga click para subir el archivo Excel</h4>
</div>
</div>--%>
<div class="row"> <div class="row">
<div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 20px;"> <div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 20px;">
<asp:TextBox ID="TxtExcel" CssClass="ADSdropzone hidden" Text="" data-maxFile="1" runat="server"></asp:TextBox> <asp:TextBox ID="TxtExcel" CssClass="ADSdropzone hidden" Text="" data-maxFile="1" runat="server"></asp:TextBox>
@@ -6465,9 +6430,10 @@
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<div class="row"> <div class="row">
<%-- <div class="col-md-2" style="text-align: left"> <div class="col-md-3" style="text-align: left">
</div>--%> <asp:LinkButton ID="LbDescargarExcelVentas" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
<div class="col-md-12" style="text-align: center"> </div>
<div class="col-md-9" style="text-align: right">
<asp:Button ID="BtnCargaExcel" runat="server" CssClass="btn btn-success" Text="Procesar"></asp:Button> <asp:Button ID="BtnCargaExcel" runat="server" CssClass="btn btn-success" Text="Procesar"></asp:Button>
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button> <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div> </div>
@@ -6492,36 +6458,6 @@
<h4 class="modal-title">Cargar Conceptos</h4> <h4 class="modal-title">Cargar Conceptos</h4>
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="row">
<div class="col-md-12">
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Descargar Plantilla </span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body formnombottom">
<h4>Paso 1 : Descargar Plantilla</h4>
<br />
<div align="center">
<asp:LinkButton ID="LbDescargarExcelCotizaciones" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
</div>
<br />
</div>
</div>
</div>
</div>
<br />
<br />
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;"> <div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
@@ -6539,7 +6475,7 @@
</div> </div>
</div> </div>
<div class="portlet-body formnombottom"> <div class="portlet-body formnombottom">
<h4>Paso 2: Cargar Plantilla</h4> <h4>Arrastre o haga click para subir el archivo Excel</h4>
<br /> <br />
<div class="row"> <div class="row">
<div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 20px;"> <div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 20px;">
@@ -6553,9 +6489,10 @@
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<div class="row"> <div class="row">
<%-- <div class="col-md-2" style="text-align: left"> <div class="col-md-3" style="text-align: left">
</div>--%> <asp:LinkButton ID="LbDescargarExcelCotizaciones" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
<div class="col-md-12" style="text-align: center"> </div>
<div class="col-md-9" style="text-align: right">
<asp:Button ID="BtnCargarExcelCotizaciones" runat="server" CssClass="btn btn-success" Text="Procesar"></asp:Button> <asp:Button ID="BtnCargarExcelCotizaciones" runat="server" CssClass="btn btn-success" Text="Procesar"></asp:Button>
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button> <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div> </div>

126
Ventas/Ventas.aspx.vb
View File

@@ -20,15 +20,15 @@ Partial Class Ventas
#Region "Propiedades" #Region "Propiedades"
Private Const NumeroDecimales As Integer = 2 Private Const NumeroDecimales As Integer = 2
Dim ColumnaDescuento As Integer = 10 Dim ColumnaDescuento As Integer = 11
Dim ColumnaPredial As Integer = 11 Dim ColumnaPredial As Integer = 12
Dim ColumnaSubProyecto As Integer = 8 Dim ColumnaSubProyecto As Integer = 8
Dim ColumnaIVA As Integer = 12 Dim ColumnaIVA As Integer = 13
Dim ColumnaIEPS As Integer = 13 Dim ColumnaIEPS As Integer = 14
Dim ColumnaRetIVA As Integer = 14 Dim ColumnaRetIVA As Integer = 15
Dim ColumnaRetISR As Integer = 15 Dim ColumnaRetISR As Integer = 16
Dim ColumnaEditar As Integer = 17 Dim ColumnaEditar As Integer = 18
Dim ColumnaEliminar As Integer = 18 Dim ColumnaEliminar As Integer = 19
'Factura de ventas 'Factura de ventas
Dim DTConceptos As DataTable Dim DTConceptos As DataTable
@@ -2704,7 +2704,7 @@ Partial Class Ventas
End If End If
AC.Dispose() AC.Dispose()
'columna de Fuente de recaudacion 'columna de Fuente de recaudacion
GvPS.Columns(21).Visible = True GvPS.Columns(22).Visible = True
nomostrar.Visible = True nomostrar.Visible = True
nomostrar2.Visible = True nomostrar2.Visible = True
'GvPS.Width = 1250 'GvPS.Width = 1250
@@ -3184,9 +3184,7 @@ Partial Class Ventas
CargaEstatusFactura() CargaEstatusFactura()
'DdlEstatus.SelectedValueExist("2") 'DdlEstatus.SelectedValueExist("2")
If UsuarioActual.Empresa.CveEmpresa = 189 Then
ImgAntiPend.Visible = False
End If
ConfiguraTipoDocto() ConfiguraTipoDocto()
@@ -3619,6 +3617,10 @@ Partial Class Ventas
End If End If
If UsuarioActual.Empresa.CveEmpresa = 189 Then
ImgAntiPend.Visible = False
End If
End If End If
End Sub End Sub
@@ -5848,8 +5850,8 @@ Partial Class Ventas
End If End If
'Ocultamos los botones Clonar y Ordenar 'Ocultamos los botones Clonar y Ordenar
GvPS.Columns(19).Visible = False
GvPS.Columns(20).Visible = False GvPS.Columns(20).Visible = False
GvPS.Columns(21).Visible = False
thOrden.Visible = False thOrden.Visible = False
GvFirmas.DataSource = DTmpF GvFirmas.DataSource = DTmpF
@@ -7725,8 +7727,8 @@ Partial Class Ventas
Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero()) Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero())
If CreditoDispo > 0 Then If CreditoDispo > 0 Then
TrCreditoDisponible.Visible = True TrCreditoDisponible.Visible = True
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
TrPorcentajeCredito.Visible = True : LblPorcentajeCredito.Text = $"{PorcentajeCredito.FormatoNumero}%" LblPorcentajeCredito.Text = $"({PorcentajeCredito.FormatoNumero}%)"
End If End If
End If End If
@@ -7754,8 +7756,8 @@ Partial Class Ventas
If CreditoDispo > 0 Then If CreditoDispo > 0 Then
TrCreditoDisponible.Visible = True TrCreditoDisponible.Visible = True
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
If PorcentajeCredito > 80 Then TrPorcentajeCredito.Visible = True : LblPorcentajeCredito.Text = $"{PorcentajeCredito.FormatoNumero}%" If PorcentajeCredito > 80 Then LblPorcentajeCredito.Text = $"({PorcentajeCredito.FormatoNumero}%)"
If Not UsuarioActual.TienePermisoProceso(268) AndAlso (DdlTipoComprobante.SelectedValue.Contiene("Ing", "Ant", "Rem", "PA") OrElse (DdlTipoComprobante.SelectedValue.Contiene("Cot") AndAlso CveVenta > 0)) AndAlso (Not UsuarioActual.Empresa.Funcionalidad(702).Contiene("2")) Then If Not UsuarioActual.TienePermisoProceso(268) AndAlso (DdlTipoComprobante.SelectedValue.Contiene("Ing", "Ant", "Rem", "PA") OrElse (DdlTipoComprobante.SelectedValue.Contiene("Cot") AndAlso CveVenta > 0)) AndAlso (Not UsuarioActual.Empresa.Funcionalidad(702).Contiene("2")) Then
Dim Vta As New ClsVentas Dim Vta As New ClsVentas
@@ -8266,7 +8268,7 @@ Partial Class Ventas
Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero(), ObjVentas) Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero(), ObjVentas)
TrCreditoDisponible.Visible = True TrCreditoDisponible.Visible = True
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
UPPCreditoDisponible.Update() UPPCreditoDisponible.Update()
UpParametros.Update() UpParametros.Update()
End If End If
@@ -8907,6 +8909,20 @@ Partial Class Ventas
e.Row.FCLinkButton("LnkExistencias").Visible = True e.Row.FCLinkButton("LnkExistencias").Visible = True
End If End If
If CveVenta <= 0 Then
Dim PuedeVerCosto As Boolean = UsuarioActual.TienePermisoProceso(201) OrElse UsuarioActual.TienePermisoProceso(385)
If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso PuedeVerCosto Then
If e.Row.DBCampo("PU").ToDecimal() > 0 Then
e.Row.FCLabel("LblCosto").Text = String.Format("{0:N2}", e.Row.DBCampo("Costo").ToDecimal())
e.Row.FCLabel("LblCostoPorcentaje").Text = String.Format("{0:N2} %", ((e.Row.DBCampo("PU").ToDecimal() - e.Row.DBCampo("Costo").ToDecimal()) / e.Row.DBCampo("PU").ToDecimal()) * 100D)
Else
e.Row.FCLabel("LblCosto").Text = ""
e.Row.FCLabel("LblCostoPorcentaje").Text = ""
End If
End If
End If
'If GvInv.Rows.Count > 0 AndAlso ModalidadEdicion AndAlso DdlTipoComprobante.SelectedValue = "Rem" AndAlso e.Row.DataKey("CveVentaDetalle").ToString().ToEntero() > 0 Then 'If GvInv.Rows.Count > 0 AndAlso ModalidadEdicion AndAlso DdlTipoComprobante.SelectedValue = "Rem" AndAlso e.Row.DataKey("CveVentaDetalle").ToString().ToEntero() > 0 Then
' e.Row.FCLinkButton("imgE").Enabled = False ' e.Row.FCLinkButton("imgE").Enabled = False
' e.Row.FCLinkButton("imgE").ToolTip = "No se puede editar debido a que ya hay un movimiento de almacen." ' e.Row.FCLinkButton("imgE").ToolTip = "No se puede editar debido a que ya hay un movimiento de almacen."
@@ -10534,7 +10550,7 @@ Partial Class Ventas
' Exit Sub ' Exit Sub
'End If 'End If
If ObjFactura.TipoDocto = "Ing" AndAlso (DtRemisionesPS Is Nothing OrElse DtRemisionesPS.Rows.Count = 0) Then If UsuarioActual.CveEmpresa <> 158 AndAlso ObjFactura.TipoDocto = "Ing" AndAlso (DtRemisionesPS Is Nothing OrElse DtRemisionesPS.Rows.Count = 0) Then
TmpDT = TmpDTError.Copy() TmpDT = TmpDTError.Copy()
CalculaTotalesVenta(RecalcularTotalOriginal:=False) CalculaTotalesVenta(RecalcularTotalOriginal:=False)
Alert("No se puede generar un ingreso con una linea adicional de credito si este no viene de una remisión", TipoMensaje.MsgAdvertencia) Alert("No se puede generar un ingreso con una linea adicional de credito si este no viene de una remisión", TipoMensaje.MsgAdvertencia)
@@ -17067,9 +17083,12 @@ Partial Class Ventas
#Region " ANTICIPOS " #Region " ANTICIPOS "
Private Sub CargaAnticipos(CveCliente As Integer) Private Sub CargaAnticipos(CveCliente As Integer)
Dim CargaAnticipos As Boolean = True
If UsuarioActual.CveEmpresa = 189 Then
CargaAnticipos = False
End If
HdnTieneAnticipos.Value = "0" HdnTieneAnticipos.Value = "0"
If CveCliente > 0 Then If CveCliente > 0 AndAlso CargaAnticipos Then
'QUE NO SE PUEDA REALIZAR AMORTIZACIÓN DE ANTICIPO POR DESCUENTO 'QUE NO SE PUEDA REALIZAR AMORTIZACIÓN DE ANTICIPO POR DESCUENTO
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
@@ -18346,6 +18365,28 @@ Partial Class Ventas
If UsuarioActual.CveEmpresa = 189 Then If UsuarioActual.CveEmpresa = 189 Then
AgregarPSAutomaticamente = False AgregarPSAutomaticamente = False
Dim PuedeVerCosto As Boolean = UsuarioActual.TienePermisoProceso(201) OrElse UsuarioActual.TienePermisoProceso(385)
Dim Costo As Decimal = 0
If (CveVenta <= 0 OrElse EsCreaApartirDe) AndAlso DdlTipoComprobante.SelectedValue = "Cot" AndAlso PuedeVerCosto Then
GvPS.Columns(10).Visible = True
thCosto.Visible = True
thCosto2.Visible = True
Dim ObjInventarios As New ClsInventarios
Costo = ObjInventarios.GetCostoPS(CvePSParametro, TxtCantidad.Text.Trim.ToDecimal, -1, "-1", TxtFecha.Text.ToDate, DdlSubProyectoDatos.SelectedValue.ToEntero(), CveTipoAlmacen:=1)
'si el costo es cero, puede ser que no halla movimientos del producto, en esa sucursal. y se volverá a sacar sin especificar sucursal
If Costo <= 0 Then Costo = ObjInventarios.GetCostoPS(CvePSParametro, TxtCantidad.Text.Trim.ToDecimal, -1, "-1", TxtFecha.Text.ToDate, -1, CveTipoAlmacen:=1)
ObjInventarios.Dispose()
If Costo > 0 Then
Dim PorUtilidad = String.Format("{0:N2} %", ((TxtPrecio.Text.ToDecimal() - Costo) / TxtPrecio.Text.ToDecimal()) * 100D)
LtlHeaderCosto.Text = String.Format("{0:N2} <br/> {1}", Costo, PorUtilidad)
End If
End If
End If End If
If AgregarPSAutomaticamente Then If AgregarPSAutomaticamente Then
@@ -19837,8 +19878,10 @@ Partial Class Ventas
End If End If
'SI TIENE PERMISO PARA VER COSTO, QUE LO AGREGUE AL TMPDT 'SI TIENE PERMISO PARA VER COSTO, QUE LO AGREGUE AL TMPDT
Dim PuedeVerCosto As Boolean = UsuarioActual.TienePermisoProceso(201) OrElse UsuarioActual.TienePermisoProceso(385)
Dim Costo As Decimal = 0 Dim Costo As Decimal = 0
If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso UsuarioActual.TienePermisoProceso(385) Then If UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso PuedeVerCosto Then
Dim ObjInventarios As New ClsInventarios Dim ObjInventarios As New ClsInventarios
Costo = ObjInventarios.GetCostoPS(CvePS, TxtCantidad.Text.Trim.ToDecimal, -1, "-1", TxtFecha.Text.ToDate, DdlSubProyectoDatos.SelectedValue.ToEntero(), CveTipoAlmacen:=1) Costo = ObjInventarios.GetCostoPS(CvePS, TxtCantidad.Text.Trim.ToDecimal, -1, "-1", TxtFecha.Text.ToDate, DdlSubProyectoDatos.SelectedValue.ToEntero(), CveTipoAlmacen:=1)
@@ -20067,6 +20110,7 @@ Partial Class Ventas
End If End If
TxtObsPS.Text = "" TxtObsPS.Text = ""
LtlHeaderCosto.Text = ""
TxtPrecio.Text = "" TxtPrecio.Text = ""
LblTotalPS.Text = "0.00" LblTotalPS.Text = "0.00"
HdnIVAPS.Value = "-1" HdnIVAPS.Value = "-1"
@@ -20363,7 +20407,7 @@ Partial Class Ventas
Row("TieneProntoPago") = "Si" Row("TieneProntoPago") = "Si"
'SOLO DEBE MOSTRASE SI EL PAGO ES DE CONTADO 'SOLO DEBE MOSTRASE SI EL PAGO ES DE CONTADO
If RBLPago.SelectedValue = "2" Then If RBLPago.SelectedValue = "2" Then
GvPS.Columns(22).Visible = True GvPS.Columns(23).Visible = True
thProntoPago.Visible = True thProntoPago.Visible = True
thProntoPago2.Visible = True thProntoPago2.Visible = True
End If End If
@@ -21596,12 +21640,14 @@ Partial Class Ventas
HlAgregarExcel.Visible = True HlAgregarExcel.Visible = True
End If End If
If (CveVenta <= 0 OrElse EsCreaApartirDe) AndAlso UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso DdlTipoComprobante.SelectedValue = "Cot" Then Dim PuedeVerCosto As Boolean = UsuarioActual.TienePermisoProceso(201) OrElse UsuarioActual.TienePermisoProceso(385)
GvPS.Columns(23).Visible = True
If (CveVenta <= 0 OrElse EsCreaApartirDe) AndAlso UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso DdlTipoComprobante.SelectedValue = "Cot" AndAlso PuedeVerCosto Then
GvPS.Columns(10).Visible = True
thCosto.Visible = True thCosto.Visible = True
thCosto2.Visible = True thCosto2.Visible = True
Else Else
GvPS.Columns(23).Visible = False GvPS.Columns(10).Visible = False
thCosto.Visible = False thCosto.Visible = False
thCosto2.Visible = False thCosto2.Visible = False
End If End If
@@ -24279,11 +24325,11 @@ Partial Class Ventas
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
If RBLPago.SelectedValue = "2" Then If RBLPago.SelectedValue = "2" Then
GvPS.Columns(22).Visible = True GvPS.Columns(23).Visible = True
thProntoPago.Visible = True thProntoPago.Visible = True
thProntoPago2.Visible = True thProntoPago2.Visible = True
Else Else
GvPS.Columns(22).Visible = False GvPS.Columns(23).Visible = False
thProntoPago.Visible = False thProntoPago.Visible = False
thProntoPago2.Visible = False thProntoPago2.Visible = False
End If End If
@@ -27345,9 +27391,9 @@ Partial Class Ventas
'Ocultamos los botones Editar, Clonar y Ordenar 'Ocultamos los botones Editar, Clonar y Ordenar
GvPS.Columns(17).Visible = False GvPS.Columns(18).Visible = False
GvPS.Columns(19).Visible = False
GvPS.Columns(20).Visible = False GvPS.Columns(20).Visible = False
GvPS.Columns(21).Visible = False
thOrden.Visible = False thOrden.Visible = False
DdlVendedor.SelectedValue = DbRowVenta("CveVendedor").ToString() DdlVendedor.SelectedValue = DbRowVenta("CveVendedor").ToString()
@@ -31871,10 +31917,10 @@ Partial Class Ventas
'REINICIALIZA GENERALES PS 'REINICIALIZA GENERALES PS
LbAgregar.Visible = False LbAgregar.Visible = False
GvPS.Columns(17).Visible = False
GvPS.Columns(18).Visible = False GvPS.Columns(18).Visible = False
GvPS.Columns(19).Visible = False GvPS.Columns(19).Visible = False
GvPS.Columns(20).Visible = False GvPS.Columns(20).Visible = False
GvPS.Columns(21).Visible = False
thOrden.Visible = False thOrden.Visible = False
DivRemisionesFacturadas.Visible = False DivRemisionesFacturadas.Visible = False
@@ -32563,7 +32609,7 @@ Partial Class Ventas
End If End If
If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
GvPS.Columns(19).Visible = True GvPS.Columns(20).Visible = True
End If End If
UpPS.Update() UpPS.Update()
@@ -34340,8 +34386,8 @@ Partial Class Ventas
DdlLineaAdicional_SelectedIndexChanged(DdlLineaAdicional, EventArgs.Empty) DdlLineaAdicional_SelectedIndexChanged(DdlLineaAdicional, EventArgs.Empty)
'HABILITA EDITAR Y ELIMINAR DEL GV 'HABILITA EDITAR Y ELIMINAR DEL GV
GvPS.Columns(17).Visible = True
GvPS.Columns(18).Visible = True GvPS.Columns(18).Visible = True
GvPS.Columns(19).Visible = True
SetPermisos() SetPermisos()
@@ -34781,6 +34827,7 @@ Partial Class Ventas
'LIMPIAR LAS VARIABLES 'LIMPIAR LAS VARIABLES
TxtCantidad.Text = "" TxtCantidad.Text = ""
TxtPrecio.Text = "" TxtPrecio.Text = ""
LtlHeaderCosto.Text = ""
HdnPS.Value = "-1" HdnPS.Value = "-1"
DdlPS.SelectedValue = "-1" DdlPS.SelectedValue = "-1"
DdlPS.SelectedText = "-" DdlPS.SelectedText = "-"
@@ -34812,6 +34859,7 @@ Partial Class Ventas
HdnCvePSComparar.Value = "-1" HdnCvePSComparar.Value = "-1"
TxtCantidad.Text = "" TxtCantidad.Text = ""
TxtPrecio.Text = "" TxtPrecio.Text = ""
LtlHeaderCosto.Text = ""
HdnPS.Value = "-1" HdnPS.Value = "-1"
DdlPS.SelectedValue = "-1" DdlPS.SelectedValue = "-1"
DdlPS.SelectedText = "-" DdlPS.SelectedText = "-"
@@ -36011,7 +36059,7 @@ Partial Class Ventas
End If End If
AC.Dispose() AC.Dispose()
'columna de Fuente de recaudacion 'columna de Fuente de recaudacion
GvPS.Columns(21).Visible = True GvPS.Columns(22).Visible = True
nomostrar.Visible = True nomostrar.Visible = True
nomostrar2.Visible = True nomostrar2.Visible = True
'GvPS.Width = 1250 'GvPS.Width = 1250
@@ -39787,11 +39835,13 @@ Partial Class Ventas
Protected Sub ChkRemEspecial_CheckedChanged(sender As Object, e As EventArgs) Protected Sub ChkRemEspecial_CheckedChanged(sender As Object, e As EventArgs)
Dim objV As New ClsVentas If CveVenta > 0 Then
If objV.UpdateVentaRemisionEspecial(CveVenta, If(ChkRemEspecial.Checked, 2000, 0), Now.AddDays(7), UsuarioActual.CveEmpresa) Then Dim objV As New ClsVentas
Alert("Se aplicó el cambio", TipoMensaje.ToastInformacion) If objV.UpdateVentaRemisionEspecial(CveVenta, If(ChkRemEspecial.Checked, 2000, 0), Now.AddDays(7), UsuarioActual.CveEmpresa) Then
Alert("Se aplicó el cambio", TipoMensaje.ToastInformacion)
End If
objV.Dispose()
End If End If
objV.Dispose()
End Sub End Sub
End Class End Class