Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -574,7 +574,7 @@
|
||||
<ContentTemplate>
|
||||
<div class="row">
|
||||
<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>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -795,15 +795,7 @@
|
||||
<asp:UpdatePanel ID="UPPCreditoDisponible" runat="server" UpdateMode="Conditional" style="width: 250px;">
|
||||
<ContentTemplate>
|
||||
<asp:Label ID="LblCreditoDisponible" runat="server" Text=""></asp:Label>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</td>
|
||||
</tr>
|
||||
<tr align="left" id="TrPorcentajeCredito" runat="server" visible="False">
|
||||
<td><b>Limite Al:</b> </td>
|
||||
<td>
|
||||
<asp:UpdatePanel ID="UpPorcenctajeCredito" runat="server" UpdateMode="Conditional" style="width: 250px;">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:Label ID="LblPorcentajeCredito" runat="server" Text=""></asp:Label>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
@@ -1088,8 +1080,6 @@
|
||||
<asp:UpdatePanel ID="UpPS" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<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">
|
||||
<%--width="100%"--%>
|
||||
<tr class="Titulos TextTab">
|
||||
@@ -1120,6 +1110,10 @@
|
||||
<asp:Label runat="server" ID="LblProyectoHeader" Text="" />
|
||||
<asp:Label runat="server" ID="LblSubProyecto" Text="" /></th>
|
||||
<th>P.U. <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>
|
||||
<th id="thPredial1" runat="server" visible="false">Predial
|
||||
@@ -1141,7 +1135,7 @@
|
||||
<th></th>
|
||||
<th runat="server" visible="false" id="nomostrar2"></th>
|
||||
<th runat="server" visible="false" id="thProntoPago2"></th>
|
||||
<th runat="server" visible="false" id="thCosto2"></th>
|
||||
|
||||
</tr>
|
||||
<tr class="TextTab" runat="server" id="TrEdit">
|
||||
<th>
|
||||
@@ -1247,6 +1241,9 @@
|
||||
</div>
|
||||
</div>
|
||||
</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="thPredial2" runat="server" visible="false">
|
||||
<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" visible="false" id="nomostrar"></th>
|
||||
<th runat="server" visible="false" id="thProntoPago"></th>
|
||||
<th runat="server" visible="false" id="thCosto"></th>
|
||||
</tr>
|
||||
</table>
|
||||
<%--</asp:Panel>--%>
|
||||
|
||||
<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"
|
||||
@@ -1434,6 +1429,13 @@
|
||||
</EditItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--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="">
|
||||
<ItemTemplate>
|
||||
<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>
|
||||
</EditItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--11--%>
|
||||
<%--12--%>
|
||||
<asp:TemplateField HeaderText="" Visible="False">
|
||||
<ItemTemplate>
|
||||
<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>
|
||||
</EditItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--12--%>
|
||||
<%--13--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="LblIVA" runat="server" Text='<%# Eval("ImporteIVA", "{0:#,##0.00##}") %>'></asp:Label><br />
|
||||
@@ -1464,7 +1466,7 @@
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--<asp:BoundField DataField="ImporteIVA" HeaderText="" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" />--%>
|
||||
<%--13--%>
|
||||
<%--14--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="LblIEPS" runat="server" Text='<%# Eval("ImporteIEPS", "{0:#,##0.00##}") %>'></asp:Label><br />
|
||||
@@ -1472,17 +1474,17 @@
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--<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--%>
|
||||
<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--%>
|
||||
<asp:BoundField DataField="ImporteRetISR" HeaderText="Ret ISR" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ReadOnly="true" Visible="false" />
|
||||
<%--17--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
|
||||
<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>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--17--%>
|
||||
<%--18--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Editar">
|
||||
<EditItemTemplate>
|
||||
<div style="width: 85px;">
|
||||
@@ -1496,14 +1498,14 @@
|
||||
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--18--%>
|
||||
<%--19--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Eliminar">
|
||||
<ItemTemplate>
|
||||
<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" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--19--%>
|
||||
<%--20--%>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Center">
|
||||
<ItemTemplate>
|
||||
<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>" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--20--%>
|
||||
<%--21--%>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
<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") %>' />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--21--%>
|
||||
<%--22--%>
|
||||
<asp:TemplateField HeaderText="Presupuesto de Ingreso" Visible="false">
|
||||
<ItemTemplate>
|
||||
<asp:DropDownList runat="server" ID="DdlFR" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="FuenteRecaudacionCodigoRubroIngreso" DataValueField="CvePresupuestoIngreso" Style="max-width: 100px;" OnSelectedIndexChanged="DdlFR_SelectedIndexChanged"></asp:DropDownList>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<%--22--%>
|
||||
<asp:BoundField DataField="TieneProntoPago" HeaderText="Pronto Pago" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center" ReadOnly="true" Visible="false" />
|
||||
<%--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>
|
||||
<RowStyle CssClass="Texto" />
|
||||
<AlternatingRowStyle CssClass="TextoAlterno" />
|
||||
@@ -6399,36 +6399,6 @@
|
||||
<h4 class="modal-title">Cargar Conceptos</h4>
|
||||
</div>
|
||||
<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="col-md-12">
|
||||
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
|
||||
@@ -6446,13 +6416,8 @@
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body formnombottom">
|
||||
<h4>Paso 2: Cargar Plantilla</h4>
|
||||
<h4>Arrastre o haga click para subir el archivo Excel</h4>
|
||||
<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="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>
|
||||
@@ -6465,9 +6430,10 @@
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<div class="row">
|
||||
<%-- <div class="col-md-2" style="text-align: left">
|
||||
</div>--%>
|
||||
<div class="col-md-12" style="text-align: center">
|
||||
<div class="col-md-3" style="text-align: left">
|
||||
<asp:LinkButton ID="LbDescargarExcelVentas" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
|
||||
</div>
|
||||
<div class="col-md-9" style="text-align: right">
|
||||
<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>
|
||||
</div>
|
||||
@@ -6492,36 +6458,6 @@
|
||||
<h4 class="modal-title">Cargar Conceptos</h4>
|
||||
</div>
|
||||
<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="col-md-12">
|
||||
<div class="portlet light xspadding bordered whitoutcol" style="width: 100%;">
|
||||
@@ -6539,7 +6475,7 @@
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body formnombottom">
|
||||
<h4>Paso 2: Cargar Plantilla</h4>
|
||||
<h4>Arrastre o haga click para subir el archivo Excel</h4>
|
||||
<br />
|
||||
<div class="row">
|
||||
<div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 20px;">
|
||||
@@ -6553,9 +6489,10 @@
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<div class="row">
|
||||
<%-- <div class="col-md-2" style="text-align: left">
|
||||
</div>--%>
|
||||
<div class="col-md-12" style="text-align: center">
|
||||
<div class="col-md-3" style="text-align: left">
|
||||
<asp:LinkButton ID="LbDescargarExcelCotizaciones" runat="server" CssClass="btn btn-warning" Text="Descargar Plantilla" />
|
||||
</div>
|
||||
<div class="col-md-9" style="text-align: right">
|
||||
<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>
|
||||
</div>
|
||||
|
||||
@@ -20,15 +20,15 @@ Partial Class Ventas
|
||||
#Region "Propiedades"
|
||||
Private Const NumeroDecimales As Integer = 2
|
||||
|
||||
Dim ColumnaDescuento As Integer = 10
|
||||
Dim ColumnaPredial As Integer = 11
|
||||
Dim ColumnaDescuento As Integer = 11
|
||||
Dim ColumnaPredial As Integer = 12
|
||||
Dim ColumnaSubProyecto As Integer = 8
|
||||
Dim ColumnaIVA As Integer = 12
|
||||
Dim ColumnaIEPS As Integer = 13
|
||||
Dim ColumnaRetIVA As Integer = 14
|
||||
Dim ColumnaRetISR As Integer = 15
|
||||
Dim ColumnaEditar As Integer = 17
|
||||
Dim ColumnaEliminar As Integer = 18
|
||||
Dim ColumnaIVA As Integer = 13
|
||||
Dim ColumnaIEPS As Integer = 14
|
||||
Dim ColumnaRetIVA As Integer = 15
|
||||
Dim ColumnaRetISR As Integer = 16
|
||||
Dim ColumnaEditar As Integer = 18
|
||||
Dim ColumnaEliminar As Integer = 19
|
||||
|
||||
'Factura de ventas
|
||||
Dim DTConceptos As DataTable
|
||||
@@ -2704,7 +2704,7 @@ Partial Class Ventas
|
||||
End If
|
||||
AC.Dispose()
|
||||
'columna de Fuente de recaudacion
|
||||
GvPS.Columns(21).Visible = True
|
||||
GvPS.Columns(22).Visible = True
|
||||
nomostrar.Visible = True
|
||||
nomostrar2.Visible = True
|
||||
'GvPS.Width = 1250
|
||||
@@ -3184,9 +3184,7 @@ Partial Class Ventas
|
||||
|
||||
CargaEstatusFactura()
|
||||
'DdlEstatus.SelectedValueExist("2")
|
||||
If UsuarioActual.Empresa.CveEmpresa = 189 Then
|
||||
ImgAntiPend.Visible = False
|
||||
End If
|
||||
|
||||
ConfiguraTipoDocto()
|
||||
|
||||
|
||||
@@ -3619,6 +3617,10 @@ Partial Class Ventas
|
||||
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.CveEmpresa = 189 Then
|
||||
ImgAntiPend.Visible = False
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
@@ -5848,8 +5850,8 @@ Partial Class Ventas
|
||||
End If
|
||||
|
||||
'Ocultamos los botones Clonar y Ordenar
|
||||
GvPS.Columns(19).Visible = False
|
||||
GvPS.Columns(20).Visible = False
|
||||
GvPS.Columns(21).Visible = False
|
||||
thOrden.Visible = False
|
||||
|
||||
GvFirmas.DataSource = DTmpF
|
||||
@@ -7725,8 +7727,8 @@ Partial Class Ventas
|
||||
Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero())
|
||||
If CreditoDispo > 0 Then
|
||||
TrCreditoDisponible.Visible = True
|
||||
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero
|
||||
TrPorcentajeCredito.Visible = True : LblPorcentajeCredito.Text = $"{PorcentajeCredito.FormatoNumero}%"
|
||||
LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
|
||||
LblPorcentajeCredito.Text = $"({PorcentajeCredito.FormatoNumero}%)"
|
||||
End If
|
||||
|
||||
End If
|
||||
@@ -7754,8 +7756,8 @@ Partial Class Ventas
|
||||
|
||||
If CreditoDispo > 0 Then
|
||||
TrCreditoDisponible.Visible = True
|
||||
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero
|
||||
If PorcentajeCredito > 80 Then TrPorcentajeCredito.Visible = True : LblPorcentajeCredito.Text = $"{PorcentajeCredito.FormatoNumero}%"
|
||||
LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
|
||||
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
|
||||
Dim Vta As New ClsVentas
|
||||
@@ -8266,7 +8268,7 @@ Partial Class Ventas
|
||||
Dim CreditoDispo As Decimal = CargaCreditoDisponible(CveCliente, DdlSucursalCliente.SelectedValue.ToEntero(), ObjVentas)
|
||||
|
||||
TrCreditoDisponible.Visible = True
|
||||
LblCreditoDisponible.Text = CreditoDispo.FormatoNumero
|
||||
LblCreditoDisponible.Text = String.Format("{0:C}", CreditoDispo)
|
||||
UPPCreditoDisponible.Update()
|
||||
UpParametros.Update()
|
||||
End If
|
||||
@@ -8907,6 +8909,20 @@ Partial Class Ventas
|
||||
e.Row.FCLinkButton("LnkExistencias").Visible = True
|
||||
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
|
||||
' e.Row.FCLinkButton("imgE").Enabled = False
|
||||
' 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
|
||||
'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()
|
||||
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)
|
||||
@@ -17067,9 +17083,12 @@ Partial Class Ventas
|
||||
|
||||
#Region " ANTICIPOS "
|
||||
Private Sub CargaAnticipos(CveCliente As Integer)
|
||||
|
||||
Dim CargaAnticipos As Boolean = True
|
||||
If UsuarioActual.CveEmpresa = 189 Then
|
||||
CargaAnticipos = False
|
||||
End If
|
||||
HdnTieneAnticipos.Value = "0"
|
||||
If CveCliente > 0 Then
|
||||
If CveCliente > 0 AndAlso CargaAnticipos Then
|
||||
|
||||
'QUE NO SE PUEDA REALIZAR AMORTIZACIÓN DE ANTICIPO POR DESCUENTO
|
||||
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
|
||||
@@ -18346,6 +18365,28 @@ Partial Class Ventas
|
||||
|
||||
If UsuarioActual.CveEmpresa = 189 Then
|
||||
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
|
||||
|
||||
If AgregarPSAutomaticamente Then
|
||||
@@ -19837,8 +19878,10 @@ Partial Class Ventas
|
||||
End If
|
||||
|
||||
'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
|
||||
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
|
||||
|
||||
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
|
||||
|
||||
TxtObsPS.Text = ""
|
||||
LtlHeaderCosto.Text = ""
|
||||
TxtPrecio.Text = ""
|
||||
LblTotalPS.Text = "0.00"
|
||||
HdnIVAPS.Value = "-1"
|
||||
@@ -20363,7 +20407,7 @@ Partial Class Ventas
|
||||
Row("TieneProntoPago") = "Si"
|
||||
'SOLO DEBE MOSTRASE SI EL PAGO ES DE CONTADO
|
||||
If RBLPago.SelectedValue = "2" Then
|
||||
GvPS.Columns(22).Visible = True
|
||||
GvPS.Columns(23).Visible = True
|
||||
thProntoPago.Visible = True
|
||||
thProntoPago2.Visible = True
|
||||
End If
|
||||
@@ -21596,12 +21640,14 @@ Partial Class Ventas
|
||||
HlAgregarExcel.Visible = True
|
||||
End If
|
||||
|
||||
If (CveVenta <= 0 OrElse EsCreaApartirDe) AndAlso UsuarioActual.Empresa.Funcionalidad(382) = "1" AndAlso DdlTipoComprobante.SelectedValue = "Cot" Then
|
||||
GvPS.Columns(23).Visible = True
|
||||
Dim PuedeVerCosto As Boolean = UsuarioActual.TienePermisoProceso(201) OrElse UsuarioActual.TienePermisoProceso(385)
|
||||
|
||||
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
|
||||
thCosto2.Visible = True
|
||||
Else
|
||||
GvPS.Columns(23).Visible = False
|
||||
GvPS.Columns(10).Visible = False
|
||||
thCosto.Visible = False
|
||||
thCosto2.Visible = False
|
||||
End If
|
||||
@@ -24279,11 +24325,11 @@ Partial Class Ventas
|
||||
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
|
||||
|
||||
If RBLPago.SelectedValue = "2" Then
|
||||
GvPS.Columns(22).Visible = True
|
||||
GvPS.Columns(23).Visible = True
|
||||
thProntoPago.Visible = True
|
||||
thProntoPago2.Visible = True
|
||||
Else
|
||||
GvPS.Columns(22).Visible = False
|
||||
GvPS.Columns(23).Visible = False
|
||||
thProntoPago.Visible = False
|
||||
thProntoPago2.Visible = False
|
||||
End If
|
||||
@@ -27345,9 +27391,9 @@ Partial Class Ventas
|
||||
|
||||
|
||||
'Ocultamos los botones Editar, Clonar y Ordenar
|
||||
GvPS.Columns(17).Visible = False
|
||||
GvPS.Columns(19).Visible = False
|
||||
GvPS.Columns(18).Visible = False
|
||||
GvPS.Columns(20).Visible = False
|
||||
GvPS.Columns(21).Visible = False
|
||||
thOrden.Visible = False
|
||||
|
||||
DdlVendedor.SelectedValue = DbRowVenta("CveVendedor").ToString()
|
||||
@@ -31871,10 +31917,10 @@ Partial Class Ventas
|
||||
|
||||
'REINICIALIZA GENERALES PS
|
||||
LbAgregar.Visible = False
|
||||
GvPS.Columns(17).Visible = False
|
||||
GvPS.Columns(18).Visible = False
|
||||
GvPS.Columns(19).Visible = False
|
||||
GvPS.Columns(20).Visible = False
|
||||
GvPS.Columns(21).Visible = False
|
||||
thOrden.Visible = False
|
||||
|
||||
DivRemisionesFacturadas.Visible = False
|
||||
@@ -32563,7 +32609,7 @@ Partial Class Ventas
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
|
||||
GvPS.Columns(19).Visible = True
|
||||
GvPS.Columns(20).Visible = True
|
||||
End If
|
||||
|
||||
UpPS.Update()
|
||||
@@ -34340,8 +34386,8 @@ Partial Class Ventas
|
||||
DdlLineaAdicional_SelectedIndexChanged(DdlLineaAdicional, EventArgs.Empty)
|
||||
|
||||
'HABILITA EDITAR Y ELIMINAR DEL GV
|
||||
GvPS.Columns(17).Visible = True
|
||||
GvPS.Columns(18).Visible = True
|
||||
GvPS.Columns(19).Visible = True
|
||||
|
||||
SetPermisos()
|
||||
|
||||
@@ -34781,6 +34827,7 @@ Partial Class Ventas
|
||||
'LIMPIAR LAS VARIABLES
|
||||
TxtCantidad.Text = ""
|
||||
TxtPrecio.Text = ""
|
||||
LtlHeaderCosto.Text = ""
|
||||
HdnPS.Value = "-1"
|
||||
DdlPS.SelectedValue = "-1"
|
||||
DdlPS.SelectedText = "-"
|
||||
@@ -34812,6 +34859,7 @@ Partial Class Ventas
|
||||
HdnCvePSComparar.Value = "-1"
|
||||
TxtCantidad.Text = ""
|
||||
TxtPrecio.Text = ""
|
||||
LtlHeaderCosto.Text = ""
|
||||
HdnPS.Value = "-1"
|
||||
DdlPS.SelectedValue = "-1"
|
||||
DdlPS.SelectedText = "-"
|
||||
@@ -36011,7 +36059,7 @@ Partial Class Ventas
|
||||
End If
|
||||
AC.Dispose()
|
||||
'columna de Fuente de recaudacion
|
||||
GvPS.Columns(21).Visible = True
|
||||
GvPS.Columns(22).Visible = True
|
||||
nomostrar.Visible = True
|
||||
nomostrar2.Visible = True
|
||||
'GvPS.Width = 1250
|
||||
@@ -39787,11 +39835,13 @@ Partial Class Ventas
|
||||
|
||||
|
||||
Protected Sub ChkRemEspecial_CheckedChanged(sender As Object, e As EventArgs)
|
||||
Dim objV As New ClsVentas
|
||||
If objV.UpdateVentaRemisionEspecial(CveVenta, If(ChkRemEspecial.Checked, 2000, 0), Now.AddDays(7), UsuarioActual.CveEmpresa) Then
|
||||
Alert("Se aplicó el cambio", TipoMensaje.ToastInformacion)
|
||||
If CveVenta > 0 Then
|
||||
Dim objV As New ClsVentas
|
||||
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
|
||||
objV.Dispose()
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
Reference in New Issue
Block a user