Actualizar
This commit is contained in:
rakcsle
@@ -4224,7 +4224,7 @@ Partial Class PopUpVerFactura
|
|||||||
|
|
||||||
params.Add(New ReportParameter("Capturo", dr("NombreCapturo").ToString))
|
params.Add(New ReportParameter("Capturo", dr("NombreCapturo").ToString))
|
||||||
|
|
||||||
If UsuarioActual.CveEmpresa.Contiene(189) Then
|
If UsuarioActual.CveEmpresa.Contiene(189, 193, 197) Then
|
||||||
|
|
||||||
params.Add(New ReportParameter("Concepto", "DEVOLUCIÓN A PROVEEDOR"))
|
params.Add(New ReportParameter("Concepto", "DEVOLUCIÓN A PROVEEDOR"))
|
||||||
|
|
||||||
@@ -4256,12 +4256,17 @@ Partial Class PopUpVerFactura
|
|||||||
ObjCompra.Dispose()
|
ObjCompra.Dispose()
|
||||||
|
|
||||||
If Not Archivo.Exists Then
|
If Not Archivo.Exists Then
|
||||||
|
|
||||||
params.Add(New ReportParameter("LogoPath", RutaImagenLogo))
|
params.Add(New ReportParameter("LogoPath", RutaImagenLogo))
|
||||||
|
|
||||||
ImprimirPDF(String.Format("Empresas/Grales/Formatos/DevolucionProveedor.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
ImprimirPDF(String.Format("Empresas/Grales/Formatos/DevolucionProveedor.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
||||||
|
|
||||||
Else
|
Else
|
||||||
ImprimirPDF(String.Format("{0}Formatos\DevolucionProveedor.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
If UsuarioActual.CveEmpresa.Contiene(189, 193, 197) Then
|
||||||
|
ImprimirPDF(String.Format("{0}Formatos\DevolucionProveedor.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios", DtDatos2:=DTPrePoliza, RDSName2:="DsPrePoliza")
|
||||||
|
Else
|
||||||
|
ImprimirPDF(String.Format("{0}Formatos\DevolucionProveedor.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
||||||
|
End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
'ImprimirPDF(UsuarioActual.Empresa.Ruta & "Formatos/DevolucionProveedor.rdlc", DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
'ImprimirPDF(UsuarioActual.Empresa.Ruta & "Formatos/DevolucionProveedor.rdlc", DtMovimientos, params, String.Format("Devolucion Proveedor - {0}", Folio), RDSName:="DsInventarios")
|
||||||
|
|||||||
@@ -265,10 +265,10 @@
|
|||||||
|
|
||||||
|
|
||||||
<div class="col-md-4">
|
<div class="col-md-4">
|
||||||
|
|
||||||
<asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" Style="margin: auto" AutoPostBack="True" RepeatColumns="3">
|
<asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" Style="margin: auto" AutoPostBack="True" RepeatColumns="3">
|
||||||
<asp:ListItem Value="6" Selected="True" >Caja Chica</asp:ListItem>
|
<asp:ListItem Value="6" Selected="True" >Caja Chica</asp:ListItem>
|
||||||
<asp:ListItem Value="2">Viáticos</asp:ListItem>
|
<asp:ListItem Value="2">Viáticos</asp:ListItem>
|
||||||
|
<asp:ListItem Value="4">Deudores</asp:ListItem>
|
||||||
</asp:RadioButtonList>
|
</asp:RadioButtonList>
|
||||||
</div>
|
</div>
|
||||||
|
|
||||||
@@ -334,6 +334,7 @@
|
|||||||
</asp:RequiredFieldValidator>
|
</asp:RequiredFieldValidator>
|
||||||
|
|
||||||
</div>
|
</div>
|
||||||
|
<asp:LinkButton runat="server" ID="LnlMostarProrateo" OnClick="LnlMostarProrateo_Click" Text="Prorratear" ></asp:LinkButton>
|
||||||
</div>
|
</div>
|
||||||
|
|
||||||
|
|
||||||
@@ -362,6 +363,79 @@
|
|||||||
</asp:RequiredFieldValidator>
|
</asp:RequiredFieldValidator>
|
||||||
|
|
||||||
</div>
|
</div>
|
||||||
|
<div class="row" id="DivDeudores" runat="server" visible="false" >
|
||||||
|
<div class="col-md-12">
|
||||||
|
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<asp:DropDownList ID="DdlDeudor" runat="server" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="RazonSocialSaldo" DataValueField="ConcatCveIE"
|
||||||
|
Width="100%" ValidationGroup="GrpGuardar">
|
||||||
|
</asp:DropDownList>
|
||||||
|
<label runat="server" id="Label2" for="<%= DdlDeudor.ClientID.ToString()%>">Deudor:</label>
|
||||||
|
<asp:RequiredFieldValidator ID="RFVDeudores" runat="server" ControlToValidate="DdlDeudor" InitialValue="-1" Display="None"
|
||||||
|
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Deudor''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpRegistraCompra"></asp:RequiredFieldValidator>
|
||||||
|
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVDeudores" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<asp:UpdatePanel ID="UpDeudores" runat="server" UpdateMode="Conditional">
|
||||||
|
<ContentTemplate>
|
||||||
|
<asp:GridView ID="GvDeudores" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron movimientos" DataKeyNames="CveIE,Saldo,RazonSocial,Folio,CveProveedor,SaldoVentas,CveMoneda,TipoCambio"
|
||||||
|
ToolTip="Listado de Movimientos" data-height="300" Style="width: 100%; height: 100%; text-align: center;" GridLines="None" HeaderStyle-ForeColor="Black">
|
||||||
|
<Columns>
|
||||||
|
<asp:TemplateField>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:CheckBox ID="Chk" runat="server" />
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField>
|
||||||
|
<HeaderTemplate>Fecha</HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaDocumento", "{0:d}") %>'></asp:Literal>
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField>
|
||||||
|
<HeaderTemplate>Folio</HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Literal ID="LtlFolio" runat="server" Text='<%# Eval("Folio") %>'></asp:Literal>
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField>
|
||||||
|
<HeaderTemplate>Saldo</HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>
|
||||||
|
</ItemTemplate>
|
||||||
|
<ItemStyle HorizontalAlign="Right" />
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField>
|
||||||
|
<HeaderTemplate>Saldo Abonar</HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Label ID="LblTotalDeudores" runat="server" ClientIDMode="Static" Text="0.00" Visible="false"></asp:Label>
|
||||||
|
<asp:TextBox ID="TxtSaldoDeudor" runat="server" CausesValidation="true" Enabled="false" MaxLength="12" Width="76px"></asp:TextBox>
|
||||||
|
|
||||||
|
<asp:CompareValidator ID="CVAmortAnti" runat="server" ControlToValidate="TxtSaldoDeudor" Display="None" ErrorMessage="El campo <b>''Importe Deudor''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency"></asp:CompareValidator>
|
||||||
|
<ajax:ValidatorCalloutExtender ID="VCOAmortAnti" runat="server" HighlightCssClass="vco" TargetControlID="CVAmortAnti" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField Visible="false">
|
||||||
|
<HeaderTemplate></HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:TextBox ID="TxtSaldoMonedaOriginal" runat="server" CausesValidation="true" Enabled="False" MaxLength="12" Width="70px" Text="0.00" Style="text-align: right;" BackColor="Transparent" BorderStyle="None" ForeColor="White"></asp:TextBox>
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField Visible="false">
|
||||||
|
<HeaderTemplate></HeaderTemplate>
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:TextBox ID="LbTipoMoneda" runat="server" Style="text-align: left;" Width="30px" Enabled="False" BackColor="Transparent" BorderStyle="None" ForeColor="White" />
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
</Columns>
|
||||||
|
</asp:GridView>
|
||||||
|
</ContentTemplate>
|
||||||
|
</asp:UpdatePanel>
|
||||||
|
|
||||||
|
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@@ -827,6 +901,134 @@
|
|||||||
</asp:UpdatePanel>
|
</asp:UpdatePanel>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
<%--PRORRATE INICIO--%>
|
||||||
|
|
||||||
|
|
||||||
|
<div id="DVModalProrrateoGasolina" class="modal ADS fade" role="dialog">
|
||||||
|
<div class="modal-dialog">
|
||||||
|
<!-- Modal content-->
|
||||||
|
<div class="modal-content">
|
||||||
|
<div class="modal-header ">
|
||||||
|
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||||
|
<h4 class="modal-title">
|
||||||
|
<asp:UpdatePanel runat="server" ID="UpProrratearTitulo" UpdateMode="Conditional">
|
||||||
|
<ContentTemplate>
|
||||||
|
<asp:Label runat="server" id="LblRiruloProrrareo">Prorratear</asp:Label>
|
||||||
|
</ContentTemplate>
|
||||||
|
</asp:UpdatePanel>
|
||||||
|
|
||||||
|
|
||||||
|
</h4>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="modal-body">
|
||||||
|
<asp:UpdatePanel runat="server" ID="UpModalProrrateoGasolina" UpdateMode="Conditional">
|
||||||
|
<ContentTemplate>
|
||||||
|
|
||||||
|
<div class="row">
|
||||||
|
<div class="col-md-6">
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<ADS:Dropdownlost runat="server" ID="DdlPSProrrateoGasolina" CssStyle="width:100%" CssClass="form-control input-sm DdlPS" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
|
||||||
|
<label for="<%= DdlPSProrrateoGasolina.ClientID.ToString()%>">
|
||||||
|
Productos / Servicio:
|
||||||
|
<label>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="row" style="margin-top:10px">
|
||||||
|
<div class="col-md-4">
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<asp:DropDownList ID="DdlSubProyectoProrrateoGasolina" CssClass=" form-control input-sm select2me" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto">
|
||||||
|
<asp:ListItem Selected="true" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||||
|
</asp:DropDownList>
|
||||||
|
<%--<asp:RequiredFieldValidator ID="RfvDdlSubProyectoProrrateoGasolina" runat="server" ControlToValidate="DdlSubProyectoProrrateoGasolina" CssClass="help-block errorimput" InitialValue="-1"
|
||||||
|
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo." ValidationGroup="GprAgregaPSProrateo">
|
||||||
|
</asp:RequiredFieldValidator>--%>
|
||||||
|
<label runat="server" id="Label10" for="<%= DdlSubProyectoProrrateoGasolina.ClientID.ToString()%>">
|
||||||
|
<asp:Label runat="server" id="LblSubProyectoProrrateoGasolina"></asp:Label>:
|
||||||
|
</label>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
</div>
|
||||||
|
<div class="col-md-4">
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<asp:TextBox ID="TxtPrecioProrrateoGasolina" ClientIDMode="Static" runat="server" CssClass=" form-control " CausesValidation="true" MaxLength="12" ValidationGroup="GprAgregaPSProrateo"></asp:TextBox>
|
||||||
|
<ajax:FilteredTextBoxExtender ID="FilTxtPrecioProrrateoGasolina" runat="server" TargetControlID="TxtPrecioProrrateoGasolina" FilterType="Custom, Numbers" ValidChars="." />
|
||||||
|
<asp:RequiredFieldValidator ID="RfvTxtPrecioProrrateoGasolina" runat="server" ControlToValidate="TxtPrecioProrrateoGasolina" CssClass="help-block errorimput"
|
||||||
|
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Precio''</b> es necesario, por favor ingréselo." ValidationGroup="GprAgregaPSProrateo">
|
||||||
|
</asp:RequiredFieldValidator>
|
||||||
|
<label for="<%= TxtPrecioProrrateoGasolina.ClientID.ToString()%>">Porcentaje:</label>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
<div class="col-md-4" style="margin-top:10px;text-align:right">
|
||||||
|
<asp:LinkButton ID="LnkAgregarProrrateoGasolina" OnClick="LnkAgregarProrrateoGasolina_Click" runat="server" Text="Agregar" CssClass="btn btn-primary" ValidationGroup="GprAgregaPSProrateo" > </asp:LinkButton>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="row" style="margin-top:10px">
|
||||||
|
<div class="col-md-6">
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<asp:Label runat="server" ID="LblTotalProrrateoGasolina" CssClass="form-control" Text="100%"></asp:Label>
|
||||||
|
<label for="<%= LblTotalProrrateoGasolina.ClientID.ToString()%>">Porcentaje:</label>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
<div class="col-md-6">
|
||||||
|
<div class="form-group form-md-line-input input-iconright">
|
||||||
|
<asp:Label runat="server" ID="LblRestoProrrateoGasolina" CssClass="form-control"></asp:Label>
|
||||||
|
<label for="<%= LblRestoProrrateoGasolina.ClientID.ToString()%>">% Restante:</label>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
<div class="row">
|
||||||
|
<div class="col-md-12">
|
||||||
|
<asp:GridView ID="GvProrrateoGasolina" runat="server" AutoGenerateColumns="false" GridLines="none" BorderWidth="0" Width="100%"
|
||||||
|
DataKeyNames=""
|
||||||
|
CssClass="table table-striped table-hover table-advance ScrollAD mysmallbtn">
|
||||||
|
<Columns>
|
||||||
|
<asp:BoundField DataField="SubProyecto" HeaderText="SubProyecto" />
|
||||||
|
<asp:BoundField DataField="Subtotal" HeaderText="Subtotal" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,##0.####}" Visible="false" />
|
||||||
|
<asp:BoundField DataField="IVA" HeaderText="IVA" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,##0.######}" Visible="false" />
|
||||||
|
<asp:BoundField DataField="RetIVA" HeaderText="Ret. IVA" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,##0.####}" Visible="false" />
|
||||||
|
<asp:BoundField DataField="RetISR" HeaderText="RetISR" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,##0.####}" Visible="false" />
|
||||||
|
<asp:BoundField DataField="Total" DataFormatString="{0:#,##0.00##}" HeaderText="Total" ItemStyle-HorizontalAlign="Right" Visible="false" />
|
||||||
|
<asp:BoundField DataField="Porcentaje" DataFormatString="{0:#,##0.00##}" HeaderText="%" ItemStyle-HorizontalAlign="Right" />
|
||||||
|
<asp:TemplateField ItemStyle-Width="50px" ItemStyle-HorizontalAlign="Center">
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:LinkButton ID="LnkEliminarProrrateoGasolina" runat="server" Width="22px"
|
||||||
|
CssClass="btn btn-circle btn-xs red" OnClick="LnkEliminarProrrateoGasolina_Click"
|
||||||
|
data-toggle="confirmation"
|
||||||
|
data-popout="true" data-original-title="¿Seguro que desea eliminar el prorrateo?" data-btn-ok-label="si">
|
||||||
|
<i style="margin-left:-2px!important" class='icon-trash'></i>
|
||||||
|
</asp:LinkButton>
|
||||||
|
</ItemTemplate>
|
||||||
|
</asp:TemplateField>
|
||||||
|
</Columns>
|
||||||
|
</asp:GridView>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
|
||||||
|
</ContentTemplate>
|
||||||
|
</asp:UpdatePanel>
|
||||||
|
</div>
|
||||||
|
<div class="modal-footer">
|
||||||
|
<asp:UpdatePanel runat="server">
|
||||||
|
<ContentTemplate>
|
||||||
|
|
||||||
|
<asp:Button ID="BtnGuardarProrrateoGasolina" OnClick="BtnGuardarProrrateoGasolina_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />
|
||||||
|
<button type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
|
||||||
|
|
||||||
|
</ContentTemplate>
|
||||||
|
</asp:UpdatePanel>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
</div>
|
||||||
|
<%--PRORRATEO FIN--%>
|
||||||
|
|
||||||
|
|
||||||
<div id="divDescripcion" class="modal ADS fade" role="dialog">
|
<div id="divDescripcion" class="modal ADS fade" role="dialog">
|
||||||
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UpDescripcion" UpdateMode="Conditional">
|
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UpDescripcion" UpdateMode="Conditional">
|
||||||
<ContentTemplate>
|
<ContentTemplate>
|
||||||
@@ -1536,7 +1738,6 @@
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
</asp:Content>
|
</asp:Content>
|
||||||
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
||||||
<script type="text/javascript">
|
<script type="text/javascript">
|
||||||
|
|||||||
@@ -756,13 +756,24 @@ Partial Class Compras_eFacturas
|
|||||||
End Set
|
End Set
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
Private Property CveMonedaFiltros As Integer
|
||||||
|
Get
|
||||||
|
If ViewState("CveMonedaFiltros") Is Nothing Then
|
||||||
|
ViewState("CveMonedaFiltros") = -1
|
||||||
|
End If
|
||||||
|
Return ViewState("CveMonedaFiltros").ToString.ToEntero
|
||||||
|
End Get
|
||||||
|
Set(value As Integer)
|
||||||
|
ViewState("CveMonedaFiltros") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
#End Region
|
#End Region
|
||||||
|
|
||||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||||
If Not Page.IsPostBack Then
|
If Not Page.IsPostBack Then
|
||||||
|
|
||||||
'EsGrupoDiaz = False ' If(UsuarioActual.Empresa.Funcionalidad(382) = "1", True, False)
|
EsGrupoDiaz = If(UsuarioActual.Empresa.Funcionalidad(382) = "1", True, False)
|
||||||
|
|
||||||
ChecandoCorreo = False
|
ChecandoCorreo = False
|
||||||
|
|
||||||
@@ -816,12 +827,16 @@ Partial Class Compras_eFacturas
|
|||||||
CargaPersonalViaticos()
|
CargaPersonalViaticos()
|
||||||
CargaDdlRetIVA()
|
CargaDdlRetIVA()
|
||||||
CargaDdlRetISR()
|
CargaDdlRetISR()
|
||||||
|
CargaDeudores()
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
Dim LblSubProyectoTemp As New Label
|
Dim LblSubProyectoTemp As New Label
|
||||||
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyectoTemp, "Seleccione")
|
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyectoTemp, "Seleccione")
|
||||||
LblSubProyecto.InnerText = $"{LblSubProyectoTemp.Text}:"
|
LblSubProyecto.InnerText = $"{LblSubProyectoTemp.Text}:"
|
||||||
|
|
||||||
|
InicializaDTProrrateoGasolina()
|
||||||
|
|
||||||
End If
|
End If
|
||||||
removeasincevent()
|
removeasincevent()
|
||||||
End Sub
|
End Sub
|
||||||
@@ -5176,6 +5191,23 @@ Partial Class Compras_eFacturas
|
|||||||
|
|
||||||
End Property
|
End Property
|
||||||
|
|
||||||
|
Private Property DtDeudoresDetalle As DataTable
|
||||||
|
Get
|
||||||
|
Return CType(ViewState("DtDeudoresDetalle"), DataTable)
|
||||||
|
End Get
|
||||||
|
Set(value As DataTable)
|
||||||
|
ViewState("DtDeudoresDetalle") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Private Property DtDeudores As DataTable
|
||||||
|
Get
|
||||||
|
Return CType(ViewState("DtDeudores"), DataTable)
|
||||||
|
End Get
|
||||||
|
Set(value As DataTable)
|
||||||
|
ViewState("DtDeudores") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
Private Sub CargaClasificacionesComprobaciones()
|
Private Sub CargaClasificacionesComprobaciones()
|
||||||
|
|
||||||
@@ -5268,7 +5300,7 @@ Partial Class Compras_eFacturas
|
|||||||
|
|
||||||
DivPersonalReembolso.Visible = False
|
DivPersonalReembolso.Visible = False
|
||||||
DivCuentaCajaChicaReembolso.Visible = False
|
DivCuentaCajaChicaReembolso.Visible = False
|
||||||
|
DivDeudores.Visible = False
|
||||||
|
|
||||||
Select Case RBLContado.SelectedValue
|
Select Case RBLContado.SelectedValue
|
||||||
|
|
||||||
@@ -5280,6 +5312,10 @@ Partial Class Compras_eFacturas
|
|||||||
DivCuentaCajaChicaReembolso.Visible = True
|
DivCuentaCajaChicaReembolso.Visible = True
|
||||||
RfvTxtNumeroReembolso.Enabled = True
|
RfvTxtNumeroReembolso.Enabled = True
|
||||||
|
|
||||||
|
Case "4" ' Deudores
|
||||||
|
DivDeudores.Visible = True
|
||||||
|
RfvTxtNumeroReembolso.Enabled = True
|
||||||
|
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
UpRegistroFacturas.Update()
|
UpRegistroFacturas.Update()
|
||||||
@@ -5314,6 +5350,47 @@ Partial Class Compras_eFacturas
|
|||||||
DdlRetISRConcepto.Items.Insert(1, New ListItem("Resico", "3"))
|
DdlRetISRConcepto.Items.Insert(1, New ListItem("Resico", "3"))
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Protected Sub CargaDeudores(Optional CveMoneda As Integer = 1)
|
||||||
|
Dim Deudores As New ClsMovimientos
|
||||||
|
DdlDeudor.Items.Clear()
|
||||||
|
|
||||||
|
|
||||||
|
If Deudores.GetDeudoresSaldos2(-1, UsuarioActual.CveEmpresa) Then
|
||||||
|
DtDeudores = Deudores.DtResultados.FiltraParametros($"CveProveedor > 0 AND Saldo > 0 AND CveMoneda = {CveMoneda}")
|
||||||
|
DdlDeudor.DataSource = DtDeudores
|
||||||
|
DdlDeudor.DataBind()
|
||||||
|
DdlDeudor.Items.Insert(0, New ListItem("Seleccione Deudor", "-1"))
|
||||||
|
UpDatos.Update()
|
||||||
|
CambieDeudor()
|
||||||
|
End If
|
||||||
|
|
||||||
|
|
||||||
|
Deudores.Dispose()
|
||||||
|
End Sub
|
||||||
|
Private Sub DdlDeudor_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlDeudor.SelectedIndexChanged
|
||||||
|
CambieDeudor()
|
||||||
|
End Sub
|
||||||
|
Private Sub CambieDeudor()
|
||||||
|
Dim stringDeudor As String = DdlDeudor.SelectedItem.ToString
|
||||||
|
Dim SaldoD As Decimal = stringDeudor.Substring(stringDeudor.IndexOf("$") + 1, stringDeudor.Length - (stringDeudor.IndexOf("$") + 1)).ToDecimal
|
||||||
|
|
||||||
|
If DdlDeudor.SelectedValue.ToEntero > 0 Then
|
||||||
|
Dim Deudores As New ClsMovimientos
|
||||||
|
Dim OpcionSaldo As Integer = 1
|
||||||
|
|
||||||
|
If Deudores.GetDeudoresSaldosDetalle(DdlDeudor.SelectedValue.ToEntero, CveMonedaFiltros, UsuarioActual.CveEmpresa) Then
|
||||||
|
DtDeudoresDetalle = Deudores.DtResultados.FiltraParametros("CveProveedor > 0 AND Saldo > 0")
|
||||||
|
GvDeudores.DataSource = DtDeudoresDetalle
|
||||||
|
GvDeudores.DataBind()
|
||||||
|
End If
|
||||||
|
Deudores.Dispose()
|
||||||
|
Else
|
||||||
|
GvDeudores.DataSource = Nothing
|
||||||
|
GvDeudores.DataBind()
|
||||||
|
End If
|
||||||
|
|
||||||
|
UpDeudores.Update()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
Protected Sub DdlPersonal2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlPersonalReembolso.SelectedIndexChanged
|
Protected Sub DdlPersonal2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlPersonalReembolso.SelectedIndexChanged
|
||||||
@@ -5332,6 +5409,344 @@ Partial Class Compras_eFacturas
|
|||||||
ViewState("CveCajaChica") = DdlCuentaCajaChicaReembolso.SelectedValue
|
ViewState("CveCajaChica") = DdlCuentaCajaChicaReembolso.SelectedValue
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#Region "PRORATEO"
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#Region "PRORRATEO GASOLINA"
|
||||||
|
|
||||||
|
Protected Sub LnlMostarProrateo_Click(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
'InicializaDTProrrateoGasolina()
|
||||||
|
CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectoProrrateoGasolina,)
|
||||||
|
GvProrrateoGasolina.Columns(0).HeaderText = LblSubProyectoProrrateoGasolina.Text
|
||||||
|
LblRiruloProrrareo.Text = $"Prorratear por { LblSubProyectoProrrateoGasolina.Text}"
|
||||||
|
|
||||||
|
DdlSubProyectoProrrateoGasolina.Items.Clear()
|
||||||
|
DdlSubProyectoProrrateoGasolina.DataSource = If(Not UsuarioActual.TienePermisoProceso(110), GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1), GlobalDTSubProyectos(UsuarioActual.CveEmpresa, CveProyecto:=-1))
|
||||||
|
DdlSubProyectoProrrateoGasolina.DataBind()
|
||||||
|
DdlSubProyectoProrrateoGasolina.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||||
|
|
||||||
|
'LblTotalProrrateoGasolina.Text = TxtTotal.Text
|
||||||
|
|
||||||
|
CargaProrratePS(-1)
|
||||||
|
|
||||||
|
RegistraScript("$('#DVModalProrrateoGasolina').modal();")
|
||||||
|
UpModalProrrateoGasolina.Update()
|
||||||
|
UpProrratearTitulo.Update()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
Property DTProrrateoTmp As DataTable
|
||||||
|
Get
|
||||||
|
If ViewState("DTProrrateoTmp") Is Nothing Then
|
||||||
|
ViewState("DTProrrateoTmp") = New DataTable
|
||||||
|
End If
|
||||||
|
Return DirectCast(ViewState("DTProrrateoTmp"), DataTable)
|
||||||
|
End Get
|
||||||
|
Set(value As DataTable)
|
||||||
|
ViewState("DTProrrateoTmp") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Property DTProrrateo As DataTable
|
||||||
|
Get
|
||||||
|
If ViewState("DTProrrateo") Is Nothing Then
|
||||||
|
ViewState("DTProrrateo") = New DataTable
|
||||||
|
End If
|
||||||
|
Return DirectCast(ViewState("DTProrrateo"), DataTable)
|
||||||
|
End Get
|
||||||
|
Set(value As DataTable)
|
||||||
|
ViewState("DTProrrateo") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Property ProrratearFacturas As Boolean
|
||||||
|
Get
|
||||||
|
If ViewState("ProrratearFacturas") Is Nothing Then
|
||||||
|
ViewState("ProrratearFacturas") = False
|
||||||
|
End If
|
||||||
|
Return Boolean.Parse(ViewState("ProrratearFacturas").ToString)
|
||||||
|
End Get
|
||||||
|
Set(value As Boolean)
|
||||||
|
ViewState("ProrratearFacturas") = value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
Private Sub InicializaDTProrrateoGasolina()
|
||||||
|
Dim TmpDTProrrateoGasolina As New DataTable
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("CvePS", GetType(Integer))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("CveSubProyecto", GetType(Integer))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("SubProyecto", GetType(String))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("SubTotal", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("IVA", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("RetIVA", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("RetISR", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("Total", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("PorcentajeIVA", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("RetISRPorcentaje", GetType(Decimal))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("RetIVAPorcentaje", GetType(Decimal))
|
||||||
|
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("CveUM", GetType(Integer))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("CveClasificacion", GetType(Integer))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("UM", GetType(String))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("Clasificacion", GetType(String))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("PS", GetType(String))
|
||||||
|
TmpDTProrrateoGasolina.Columns.Add("Porcentaje", GetType(Decimal))
|
||||||
|
|
||||||
|
|
||||||
|
DTProrrateoTmp = TmpDTProrrateoGasolina
|
||||||
|
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Protected Sub LnkProrrateoGasolina_Click(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
'InicializaDTProrrateoGasolina()
|
||||||
|
CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectoProrrateoGasolina,)
|
||||||
|
GvProrrateoGasolina.Columns(0).HeaderText = LblSubProyectoProrrateoGasolina.Text
|
||||||
|
LblRiruloProrrareo.Text = $"Prorratear por { LblSubProyectoProrrateoGasolina.Text}"
|
||||||
|
|
||||||
|
DdlSubProyectoProrrateoGasolina.Items.Clear()
|
||||||
|
DdlSubProyectoProrrateoGasolina.DataSource = If(Not UsuarioActual.TienePermisoProceso(110), GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1), GlobalDTSubProyectos(UsuarioActual.CveEmpresa, CveProyecto:=-1))
|
||||||
|
DdlSubProyectoProrrateoGasolina.DataBind()
|
||||||
|
DdlSubProyectoProrrateoGasolina.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||||
|
|
||||||
|
'LblTotalProrrateoGasolina.Text = TxtTotal.Text
|
||||||
|
|
||||||
|
CargaProrratePS(-1)
|
||||||
|
|
||||||
|
RegistraScript("$('#DVModalProrrateoGasolina').modal();")
|
||||||
|
UpModalProrrateoGasolina.Update()
|
||||||
|
UpProrratearTitulo.Update()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub CargaProrratePS(CveClasificacion As Integer)
|
||||||
|
|
||||||
|
DdlPSProrrateoGasolina.setEsWebService(UsuarioActual.Empresa.Funcionalidad(105) = "1")
|
||||||
|
|
||||||
|
If UsuarioActual.Empresa.Funcionalidad(105) = "1" Then
|
||||||
|
'DdlPSProrrateoGasolina.ddlWS.Attributes.Add("data-cveclasificacion", ""-1)
|
||||||
|
DdlPSProrrateoGasolina.SelectedText = ""
|
||||||
|
DdlPSProrrateoGasolina.SelectedValue = "-1"
|
||||||
|
Else
|
||||||
|
DdlPSProrrateoGasolina.ddl.Items.Clear()
|
||||||
|
|
||||||
|
'DdlPS.ddl.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CveClasificacion:=CveClasificacion)
|
||||||
|
|
||||||
|
If UsuarioActual.TienePermisoProceso(300) Or UsuarioActual.TienePermisoProceso(301) Then
|
||||||
|
|
||||||
|
Dim DTTemp As New DataTable
|
||||||
|
DTTemp.Columns.Add("CvePS", GetType(Integer))
|
||||||
|
DTTemp.Columns.Add("PSCodigo", GetType(String))
|
||||||
|
DTTemp.Columns.Add("CveClasificacion", GetType(Integer))
|
||||||
|
|
||||||
|
For Each dRow As DataRow In GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).Rows
|
||||||
|
For Each drowCla As DataRow In DTClasificacionesComprobaciones.Rows
|
||||||
|
|
||||||
|
If drowCla("CveClasificacion").ToString.ToEntero = dRow("CveClasificacion").ToString.ToEntero Then
|
||||||
|
|
||||||
|
Dim InRow As DataRow = DTTemp.NewRow
|
||||||
|
InRow("CvePS") = dRow("CvePS").ToString.ToEntero
|
||||||
|
InRow("PSCodigo") = dRow("PSCodigo").ToString
|
||||||
|
InRow("CveClasificacion") = dRow("CveClasificacion").ToString.ToEntero
|
||||||
|
DTTemp.Rows.Add(InRow)
|
||||||
|
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
Next
|
||||||
|
DdlPSProrrateoGasolina.DataSource = If(CveClasificacion > 0, DTTemp.FiltraParametros($"CveClasificacion = {CveClasificacion}"), DTTemp)
|
||||||
|
Else
|
||||||
|
DdlPSProrrateoGasolina.DataSource = If(CveClasificacion > 0, GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltraParametros($"CveClasificacion = {CveClasificacion}"), GlobalDTPSSimplificado(UsuarioActual.CveEmpresa))
|
||||||
|
End If
|
||||||
|
|
||||||
|
DdlPSProrrateoGasolina.ddl.DataBind()
|
||||||
|
DdlPSProrrateoGasolina.ddl.Items.Insert(0, New ListItem("Seleccione el Producto", "-1"))
|
||||||
|
End If
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub GvProrrateoGasolinaBind()
|
||||||
|
GvProrrateoGasolina.DataSource = DTProrrateoTmp
|
||||||
|
GvProrrateoGasolina.DataBind()
|
||||||
|
UpModalProrrateoGasolina.Update()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Protected Sub LnkEliminarProrrateoGasolina_Click(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
|
||||||
|
DTProrrateoTmp.Rows.RemoveAt(GvRow.RowIndex)
|
||||||
|
DTProrrateoTmp.AcceptChanges()
|
||||||
|
ProrateoCalculaRestante()
|
||||||
|
GvProrrateoGasolinaBind()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Protected Sub LnkAgregarProrrateoGasolina_Click(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
Dim CvePs As Integer = DdlPSProrrateoGasolina.SelectedValue.ToEntero
|
||||||
|
|
||||||
|
If Not CvePs > 0 Then
|
||||||
|
Alert("Debe seleccionar un producto", TipoMensaje.MsgAdvertencia)
|
||||||
|
Exit Sub
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim PsRow As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePs).FiltroPrimero("")
|
||||||
|
|
||||||
|
If PsRow Is Nothing Then
|
||||||
|
Alert("No se encontro el producto", TipoMensaje.MsgAdvertencia)
|
||||||
|
Exit Sub
|
||||||
|
End If
|
||||||
|
|
||||||
|
Dim CveUM As Integer = PsRow("CveUM").ToString.ToEntero
|
||||||
|
Dim UM As String = GlobalDTUnidadesMedida(UsuarioActual.CveEmpresa).FiltroPrimeroValor("UnidadMedida", $" CveUnidadMedida = {CveUM} ")
|
||||||
|
|
||||||
|
Dim CveClasificacion As Integer = PsRow("CveClasificacion").ToString.ToEntero
|
||||||
|
Dim Clasificacion As String = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Clasificacion", $" CveClasificacion = {CveClasificacion} ")
|
||||||
|
|
||||||
|
|
||||||
|
If DdlSubProyectoProrrateoGasolina.SelectedValue.ToEntero > 0 Then
|
||||||
|
AgregarProrrateoGasolina(DdlSubProyectoProrrateoGasolina.SelectedValue.ToEntero, DdlSubProyectoProrrateoGasolina.SelectedItem.Text, CvePs, CveUM, UM, CveClasificacion, Clasificacion)
|
||||||
|
Else
|
||||||
|
DTProrrateoTmp.Rows.Clear()
|
||||||
|
|
||||||
|
For Each item As ListItem In DdlSubProyectoProrrateoGasolina.Items
|
||||||
|
If item.Value.ToEntero > 0 Then
|
||||||
|
AgregarProrrateoGasolina(item.Value.ToEntero, item.Text, CvePs, CveUM, UM, CveClasificacion, Clasificacion)
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
End If
|
||||||
|
|
||||||
|
TxtPrecioProrrateoGasolina.Text = ""
|
||||||
|
DdlSubProyectoProrrateoGasolina.SelectedValueExist(-1)
|
||||||
|
UpModalProrrateoGasolina.Update()
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub AgregarProrrateoGasolina(CveSubProyecto As Integer, SubProyecto As String, CvePS As Integer, CveUM As Integer, UM As String, CveClasificacion As Integer, Clasificacion As String)
|
||||||
|
|
||||||
|
''' este prco3eso compratira todo esto se debe de llevar a la genracion de la factura por porcentaje
|
||||||
|
|
||||||
|
Dim SubTotalOriginal As Decimal = 1
|
||||||
|
Dim IVAOriginal As Decimal = 0D 'TxtIVA.Text.ToDecimal
|
||||||
|
Dim RetISROriginal As Decimal = 0D 'TxtRetISR.Text.ToDecimal
|
||||||
|
Dim RetIVAOriginal As Decimal = 0D 'TxtRetIVA.Text.ToDecimal
|
||||||
|
Dim TotalOriginal As Decimal = 1
|
||||||
|
|
||||||
|
Dim totalParcialDeseado As Decimal = TxtPrecioProrrateoGasolina.Text.ToDecimal
|
||||||
|
Dim PorcentajeCalculado As Decimal = totalParcialDeseado / TotalOriginal
|
||||||
|
|
||||||
|
Dim subtotalParcial As Decimal = SubTotalOriginal * PorcentajeCalculado
|
||||||
|
Dim ivaParcial As Decimal = IVAOriginal * PorcentajeCalculado
|
||||||
|
Dim retIsrParcial As Decimal = RetISROriginal * PorcentajeCalculado
|
||||||
|
Dim retIvaParcial As Decimal = RetIVAOriginal * PorcentajeCalculado
|
||||||
|
|
||||||
|
Dim nRow As DataRow = DTProrrateoTmp.NewRow
|
||||||
|
|
||||||
|
nRow("CvePS") = DdlPSProrrateoGasolina.SelectedValue.ToEntero
|
||||||
|
nRow("CveSubProyecto") = CveSubProyecto
|
||||||
|
nRow("SubProyecto") = SubProyecto
|
||||||
|
|
||||||
|
'If CveFactura > 0 Then
|
||||||
|
nRow("IVA") = ivaParcial.RoundSQL(4)
|
||||||
|
nRow("RetIVA") = retIvaParcial.RoundSQL(4)
|
||||||
|
nRow("RetISR") = retIsrParcial.RoundSQL(4)
|
||||||
|
'Else
|
||||||
|
'nRow("IVA") = (ivaParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
'nRow("RetIVA") = (retIvaParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
'nRow("RetISR") = (retIsrParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
'End If
|
||||||
|
|
||||||
|
nRow("SubTotal") = subtotalParcial.RoundSQL(4)
|
||||||
|
|
||||||
|
nRow("Total") = totalParcialDeseado.RoundSQL(4)
|
||||||
|
nRow("PorcentajeIVA") = (ivaParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
nRow("Porcentaje") = TxtPrecioProrrateoGasolina.Text.ToDecimal '((totalParcialDeseado.RoundSQL(4) * 100) / TotalOriginal).RoundSQL(2)
|
||||||
|
|
||||||
|
'nRow("RetIVAPorcentaje") = (retIvaParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
'nRow("RetISRPorcentaje") = (retIsrParcial / subtotalParcial).RoundSQL(4)
|
||||||
|
|
||||||
|
nRow("CveUM") = CveUM
|
||||||
|
nRow("UM") = UM
|
||||||
|
nRow("CveClasificacion") = CveClasificacion
|
||||||
|
nRow("Clasificacion") = Clasificacion
|
||||||
|
nRow("PS") = DdlPSProrrateoGasolina.txtText.Value
|
||||||
|
|
||||||
|
DTProrrateoTmp.Rows.Add(nRow)
|
||||||
|
|
||||||
|
ProrateoCalculaRestante()
|
||||||
|
GvProrrateoGasolinaBind()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Function ProrateoCalculaRestante(Optional MostrarMensaje As Boolean = False) As Boolean
|
||||||
|
'''Esto no aplica por que es por factura
|
||||||
|
|
||||||
|
Dim Acumulado As Decimal = DTProrrateoTmp.SUM("Porcentaje").RoundSQL(2)
|
||||||
|
Dim Total As Decimal = 100 'TxtTotal.Text.ToDecimal.RoundSQL(2)
|
||||||
|
Dim Respuesta As Boolean = False
|
||||||
|
|
||||||
|
LblRestoProrrateoGasolina.Text = (Total - Acumulado).ToString("###,###,###.00")
|
||||||
|
|
||||||
|
If Acumulado = Total Then
|
||||||
|
Respuesta = True
|
||||||
|
Else
|
||||||
|
Respuesta = False
|
||||||
|
If MostrarMensaje Then
|
||||||
|
|
||||||
|
If Acumulado <> Total Then
|
||||||
|
Alert($"El porcentaje prorrateado es diferente de 100%, Diferencia: {(Acumulado - Total).Abs()}, Prorrateado:{Acumulado.ToString("###,###,###.00")}", TipoMensaje.MsgAdvertencia)
|
||||||
|
End If
|
||||||
|
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return Respuesta
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
Protected Sub BtnGuardarProrrateoGasolina_Click(sender As Object, e As EventArgs)
|
||||||
|
|
||||||
|
'esto se debe ejecutar en cada factura seleccionada
|
||||||
|
|
||||||
|
If Not ProrateoCalculaRestante(True) Then
|
||||||
|
Exit Sub
|
||||||
|
End If
|
||||||
|
|
||||||
|
DTProrrateo = DTProrrateoTmp
|
||||||
|
RegistraScript("$('#DVModalProrrateoGasolina').modal('hide');")
|
||||||
|
|
||||||
|
'If DTProrrateoGasolina.Rows.Count > 0 Then
|
||||||
|
' TmpDT.Rows.Clear()
|
||||||
|
' For Each dRow As DataRow In DTProrrateoGasolina.Rows
|
||||||
|
' AddPS(1, dRow("CveUM").ToString.ToEntero, dRow("UM").ToString, dRow("CveClasificacion").ToString.ToEntero, dRow("Clasificacion").ToString, dRow("CvePS").ToString.ToEntero, dRow("PS").ToString, 1, dRow("CveSubProyecto").ToString, dRow("SubProyecto").ToString, "",
|
||||||
|
' "-1", "", dRow("SubTotal").ToString.ToDecimal, dRow("Total").ToString.ToDecimal, dRow("IVA").ToString.ToDecimal, dRow("RetIVA").ToString.ToDecimal, dRow("RetISR").ToString.ToDecimal, 0, 0, 0, PorcentajeIVA:=dRow("PorcentajeIVA").ToString.ToDecimal,
|
||||||
|
' CargaXml:=True, PorcentajeRetIVA:=dRow("RetIVAPorcentaje").ToString.ToDecimal, PorcentajeRetISR:=dRow("RetISRPorcentaje").ToString.ToDecimal)
|
||||||
|
' Next
|
||||||
|
|
||||||
|
' AddPS2()
|
||||||
|
' RegistraScript("$('#DVModalProrrateoGasolina').modal('hide');")
|
||||||
|
|
||||||
|
'End If
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
#End Region
|
#End Region
|
||||||
|
|
||||||
Protected Sub LnkRegistarFactura_Click(sender As Object, e As EventArgs)
|
Protected Sub LnkRegistarFactura_Click(sender As Object, e As EventArgs)
|
||||||
@@ -5405,6 +5820,8 @@ Partial Class Compras_eFacturas
|
|||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -81,6 +81,94 @@
|
|||||||
<rd:TableAdapterGetDataMethod />
|
<rd:TableAdapterGetDataMethod />
|
||||||
<rd:TableAdapterName />
|
<rd:TableAdapterName />
|
||||||
</rd:DataSetInfo>
|
</rd:DataSetInfo>
|
||||||
|
</DataSet>
|
||||||
|
<DataSet Name="DsPrePoliza">
|
||||||
|
<Query>
|
||||||
|
<DataSourceName>DsPrePoliza</DataSourceName>
|
||||||
|
<CommandText>/* Local Query */</CommandText>
|
||||||
|
</Query>
|
||||||
|
<Fields>
|
||||||
|
<Field Name="Id">
|
||||||
|
<DataField>Id</DataField>
|
||||||
|
<rd:TypeName>System.Int32</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Fecha">
|
||||||
|
<DataField>Fecha</DataField>
|
||||||
|
<rd:TypeName>System.DateTime</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="TipoPoliza">
|
||||||
|
<DataField>TipoPoliza</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="NombreCuenta">
|
||||||
|
<DataField>NombreCuenta</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="CodigoCuenta">
|
||||||
|
<DataField>CodigoCuenta</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Numero">
|
||||||
|
<DataField>Numero</DataField>
|
||||||
|
<rd:TypeName>System.Int32</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Folio">
|
||||||
|
<DataField>Folio</DataField>
|
||||||
|
<rd:TypeName>System.Int32</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Referencia">
|
||||||
|
<DataField>Referencia</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Concepto">
|
||||||
|
<DataField>Concepto</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="ConceptoPoliza">
|
||||||
|
<DataField>ConceptoPoliza</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="TipoMovto">
|
||||||
|
<DataField>TipoMovto</DataField>
|
||||||
|
<rd:TypeName>System.Int32</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Cargos">
|
||||||
|
<DataField>Cargos</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Abonos">
|
||||||
|
<DataField>Abonos</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="SegNeg">
|
||||||
|
<DataField>SegNeg</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Cargo">
|
||||||
|
<DataField>Cargo</DataField>
|
||||||
|
<rd:TypeName>System.Decimal</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Abono">
|
||||||
|
<DataField>Abono</DataField>
|
||||||
|
<rd:TypeName>System.Decimal</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="Codigo">
|
||||||
|
<DataField>Codigo</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
<Field Name="NombreUsuario">
|
||||||
|
<DataField>NombreUsuario</DataField>
|
||||||
|
<rd:TypeName>System.String</rd:TypeName>
|
||||||
|
</Field>
|
||||||
|
</Fields>
|
||||||
|
<rd:DataSetInfo>
|
||||||
|
<rd:DataSetName>DataSet1</rd:DataSetName>
|
||||||
|
<rd:SchemaPath>C:\inetpub\wwwroot\ADSistemas\Ventas.root\Reportes\DataSet1.xsd</rd:SchemaPath>
|
||||||
|
<rd:TableName>DataTable1</rd:TableName>
|
||||||
|
<rd:TableAdapterFillMethod />
|
||||||
|
<rd:TableAdapterGetDataMethod />
|
||||||
|
<rd:TableAdapterName />
|
||||||
|
</rd:DataSetInfo>
|
||||||
</DataSet>
|
</DataSet>
|
||||||
</DataSets>
|
</DataSets>
|
||||||
<ReportSections>
|
<ReportSections>
|
||||||
@@ -909,7 +997,7 @@
|
|||||||
</Paragraph>
|
</Paragraph>
|
||||||
</Paragraphs>
|
</Paragraphs>
|
||||||
<rd:DefaultName>Textbox8</rd:DefaultName>
|
<rd:DefaultName>Textbox8</rd:DefaultName>
|
||||||
<Top>2.92184cm</Top>
|
<Top>4.47759cm</Top>
|
||||||
<Left>0.13338cm</Left>
|
<Left>0.13338cm</Left>
|
||||||
<Height>0.97952cm</Height>
|
<Height>0.97952cm</Height>
|
||||||
<Width>21.08648cm</Width>
|
<Width>21.08648cm</Width>
|
||||||
@@ -943,7 +1031,7 @@
|
|||||||
</Paragraph>
|
</Paragraph>
|
||||||
</Paragraphs>
|
</Paragraphs>
|
||||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||||
<Top>2.20719cm</Top>
|
<Top>3.76294cm</Top>
|
||||||
<Left>0.13338cm</Left>
|
<Left>0.13338cm</Left>
|
||||||
<Height>0.60882cm</Height>
|
<Height>0.60882cm</Height>
|
||||||
<Width>3.98167cm</Width>
|
<Width>3.98167cm</Width>
|
||||||
@@ -958,8 +1046,647 @@
|
|||||||
<PaddingBottom>2pt</PaddingBottom>
|
<PaddingBottom>2pt</PaddingBottom>
|
||||||
</Style>
|
</Style>
|
||||||
</Textbox>
|
</Textbox>
|
||||||
|
<Tablix Name="Tablix3">
|
||||||
|
<TablixBody>
|
||||||
|
<TablixColumns>
|
||||||
|
<TablixColumn>
|
||||||
|
<Width>1.87234cm</Width>
|
||||||
|
</TablixColumn>
|
||||||
|
<TablixColumn>
|
||||||
|
<Width>5.22297cm</Width>
|
||||||
|
</TablixColumn>
|
||||||
|
<TablixColumn>
|
||||||
|
<Width>9.86336cm</Width>
|
||||||
|
</TablixColumn>
|
||||||
|
<TablixColumn>
|
||||||
|
<Width>2.16521cm</Width>
|
||||||
|
</TablixColumn>
|
||||||
|
<TablixColumn>
|
||||||
|
<Width>2.07009cm</Width>
|
||||||
|
</TablixColumn>
|
||||||
|
</TablixColumns>
|
||||||
|
<TablixRows>
|
||||||
|
<TablixRow>
|
||||||
|
<Height>0.44125cm</Height>
|
||||||
|
<TablixCells>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox3">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Cuenta</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Center</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
<TopBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</TopBorder>
|
||||||
|
<BottomBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</BottomBorder>
|
||||||
|
<LeftBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</LeftBorder>
|
||||||
|
<RightBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</RightBorder>
|
||||||
|
<BackgroundColor>#e36c09</BackgroundColor>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox6">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Descripción</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Center</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox6</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
<TopBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</TopBorder>
|
||||||
|
<BottomBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</BottomBorder>
|
||||||
|
<LeftBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</LeftBorder>
|
||||||
|
<RightBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</RightBorder>
|
||||||
|
<BackgroundColor>#e36c09</BackgroundColor>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox13">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Concepto</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Center</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox13</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
<TopBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</TopBorder>
|
||||||
|
<BottomBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</BottomBorder>
|
||||||
|
<LeftBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</LeftBorder>
|
||||||
|
<RightBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</RightBorder>
|
||||||
|
<BackgroundColor>#e36c09</BackgroundColor>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox16">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Cargos</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Center</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox16</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
<TopBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</TopBorder>
|
||||||
|
<BottomBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</BottomBorder>
|
||||||
|
<LeftBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</LeftBorder>
|
||||||
|
<RightBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</RightBorder>
|
||||||
|
<BackgroundColor>#e36c09</BackgroundColor>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox23">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Abonos</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Center</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox23</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
<TopBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</TopBorder>
|
||||||
|
<BottomBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>Solid</Style>
|
||||||
|
<Width>1pt</Width>
|
||||||
|
</BottomBorder>
|
||||||
|
<LeftBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</LeftBorder>
|
||||||
|
<RightBorder>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
</RightBorder>
|
||||||
|
<BackgroundColor>#e36c09</BackgroundColor>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
</TablixCells>
|
||||||
|
</TablixRow>
|
||||||
|
<TablixRow>
|
||||||
|
<Height>0.3cm</Height>
|
||||||
|
<TablixCells>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="CodigoCuenta">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=Fields!CodigoCuenta.Value</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>6.5pt</FontSize>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style />
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>CodigoCuenta</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="NombreCuenta">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=Fields!NombreCuenta.Value</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>6.5pt</FontSize>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style />
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>NombreCuenta</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Concepto">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=Fields!Concepto.Value</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>6.5pt</FontSize>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style />
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Concepto</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Cargos">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=IIf(
|
||||||
|
Fields!Cargo.Value = 0,
|
||||||
|
"",
|
||||||
|
Format(Fields!Cargo.Value, "###,###,###.00")
|
||||||
|
)</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>6.5pt</FontSize>
|
||||||
|
<Format>###,###,###.00</Format>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Right</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Cargos</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Abonos">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=IIf(
|
||||||
|
Fields!Abono.Value = 0,
|
||||||
|
"",
|
||||||
|
Format(Fields!Abono.Value, "###,###,###.00")
|
||||||
|
)</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>6.5pt</FontSize>
|
||||||
|
<Format>###,###,###.00</Format>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Right</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Abonos</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
</TablixCells>
|
||||||
|
</TablixRow>
|
||||||
|
<TablixRow>
|
||||||
|
<Height>0.43773cm</Height>
|
||||||
|
<TablixCells>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox28">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value />
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style />
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox28</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox29">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value />
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style />
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox29</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox30">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>Total </Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Right</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox30</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox32">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=IIf(
|
||||||
|
Sum(Fields!Cargo.Value) = 0,
|
||||||
|
"",
|
||||||
|
Format(Sum(Fields!Cargo.Value), "###,###,###.00")
|
||||||
|
)</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
<Format>###,###,###.00</Format>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Right</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox32</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
<TablixCell>
|
||||||
|
<CellContents>
|
||||||
|
<Textbox Name="Textbox37">
|
||||||
|
<CanGrow>true</CanGrow>
|
||||||
|
<KeepTogether>true</KeepTogether>
|
||||||
|
<Paragraphs>
|
||||||
|
<Paragraph>
|
||||||
|
<TextRuns>
|
||||||
|
<TextRun>
|
||||||
|
<Value>=IIf(
|
||||||
|
Sum(Fields!Abono.Value) = 0,
|
||||||
|
"",
|
||||||
|
Format(Sum(Fields!Abono.Value), "###,###,###.00")
|
||||||
|
)</Value>
|
||||||
|
<Style>
|
||||||
|
<FontFamily>MYRIAd Pro</FontFamily>
|
||||||
|
<FontSize>7.5pt</FontSize>
|
||||||
|
<FontWeight>Bold</FontWeight>
|
||||||
|
<Format>###,###,###.00</Format>
|
||||||
|
</Style>
|
||||||
|
</TextRun>
|
||||||
|
</TextRuns>
|
||||||
|
<Style>
|
||||||
|
<TextAlign>Right</TextAlign>
|
||||||
|
</Style>
|
||||||
|
</Paragraph>
|
||||||
|
</Paragraphs>
|
||||||
|
<rd:DefaultName>Textbox37</rd:DefaultName>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Color>LightGrey</Color>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Textbox>
|
||||||
|
</CellContents>
|
||||||
|
</TablixCell>
|
||||||
|
</TablixCells>
|
||||||
|
</TablixRow>
|
||||||
|
</TablixRows>
|
||||||
|
</TablixBody>
|
||||||
|
<TablixColumnHierarchy>
|
||||||
|
<TablixMembers>
|
||||||
|
<TablixMember />
|
||||||
|
<TablixMember />
|
||||||
|
<TablixMember />
|
||||||
|
<TablixMember />
|
||||||
|
<TablixMember />
|
||||||
|
</TablixMembers>
|
||||||
|
</TablixColumnHierarchy>
|
||||||
|
<TablixRowHierarchy>
|
||||||
|
<TablixMembers>
|
||||||
|
<TablixMember>
|
||||||
|
<KeepWithGroup>After</KeepWithGroup>
|
||||||
|
</TablixMember>
|
||||||
|
<TablixMember>
|
||||||
|
<Group Name="Details1" />
|
||||||
|
</TablixMember>
|
||||||
|
<TablixMember>
|
||||||
|
<KeepWithGroup>Before</KeepWithGroup>
|
||||||
|
</TablixMember>
|
||||||
|
</TablixMembers>
|
||||||
|
</TablixRowHierarchy>
|
||||||
|
<DataSetName>DsPrePoliza</DataSetName>
|
||||||
|
<Top>2.40894cm</Top>
|
||||||
|
<Left>0.07495cm</Left>
|
||||||
|
<Height>1.17898cm</Height>
|
||||||
|
<Width>21.19397cm</Width>
|
||||||
|
<ZIndex>5</ZIndex>
|
||||||
|
<Style>
|
||||||
|
<Border>
|
||||||
|
<Style>None</Style>
|
||||||
|
</Border>
|
||||||
|
</Style>
|
||||||
|
</Tablix>
|
||||||
</ReportItems>
|
</ReportItems>
|
||||||
<Height>1.53597in</Height>
|
<Height>2.14847in</Height>
|
||||||
<Style />
|
<Style />
|
||||||
</Body>
|
</Body>
|
||||||
<Width>8.4031in</Width>
|
<Width>8.4031in</Width>
|
||||||
|
|||||||
Reference in New Issue
Block a user