Contratos, regsitro Ventas estado de cuenta

This commit is contained in:
Rakcsle Supertramp
2020-11-18 19:33:05 -07:00
parent cc263e6ffb
commit 0809344d0a
6 changed files with 310 additions and 27 deletions

View File

@@ -1594,6 +1594,7 @@
<asp:LinkButton ID="LBAvanceXFacturarImporte" OnClick="MuestaModalVentasAvance" Text='<%# Eval("AvanceXFacturarImporte", "{0:###,###,##0.00##}") %>' runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Importe $" DataField="Anticipos" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###,##0.00##}" ItemStyle-Width="10%" />
</Columns>
@@ -1688,6 +1689,88 @@
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabEstadoCuenta" Visible="False" runat="server" HeaderText="Estado de Cuenta">
<ContentTemplate>
<asp:UpdatePanel ID="UpEstoCuenta" runat="server" UpdateMode="Conditional">
<ContentTemplate>
</ContentTemplate>
</asp:UpdatePanel>
<div class="row">
<div class="col-md-6">
<div class="portlet smmallpadding light bordered">
<div class="portlet-title">
<div class="tools">
<a href="javascript;" data-idchekbox="C_chkexpand" class=" collapse" data-original-title="" title=""></a><span class="hidden">
<input id="chkestadocuentaantyicipos" type="checkbox" name="nmchkestadocuentaantyicipos" checked="checked"></span>
</div>
<div class="caption uppercase" style="position: relative;"><i class="fa fa-list"></i>Anticipos</div>
</div>
<div class="portlet-body rowpadding">
<asp:GridView ID="GvEstadoCuentaAnticipos" ClientIDMode="Static" ShowHeader="true" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron documentos."
CssClass="table table-striped table-hover Widthall" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Fecha" DataField="Fecha" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:HyperLinkField HeaderText="Serie-Folio" DataTextField="SerieFolio" Target="_blank" ItemStyle-Width="10%" ItemStyle-CssClass="Texto Izquierda" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Importe" DataField="Importe" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:N2}" />
</Columns>
</asp:GridView>
</div>
</div>
</div>
<div class="col-md-6">
<div class="portlet smmallpadding light bordered">
<div class="portlet-title">
<div class="tools">
<a href="javascript;" data-idchekbox="C_chkexpand" class=" collapse" data-original-title="" title=""></a><span class="hidden">
<input id="chkestadocuentaFacturas" type="checkbox" name="nmchkestadocuentaFacturas" checked="checked"></span>
</div>
<div class="caption uppercase" style="position: relative;"><i class="fa fa-list"></i>Facturas</div>
</div>
<div class="portlet-body rowpadding">
<asp:GridView ID="GvEstadoCuentaFacturas" ClientIDMode="Static" ShowHeader="true" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron documentos."
CssClass="table table-striped table-hover Widthall" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Fecha" DataField="Fecha" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:HyperLinkField HeaderText="Serie-Folio" DataTextField="SerieFolio" Target="_blank" ItemStyle-Width="10%" ItemStyle-CssClass="Texto Izquierda" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Importe" DataField="Importe" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:N2}" />
<asp:BoundField HeaderText="Amortizado" DataField="ImporteAmortizado" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:N2}" />
</Columns>
</asp:GridView>
</div>
</div>
</div>
</div>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabAvanveDocumento" runat="server" HeaderText="Avance Por Documento">
<ContentTemplate>

View File

@@ -405,6 +405,10 @@ Partial Class Contratos_ContratoObra
End If
CargaEstadoCueta()
TabEstadoCuenta.Visible = True
Else
'Configuración de Modalidad Insert
LblFechaCaptura.Text = Now.ToShortDateString()
@@ -438,6 +442,8 @@ Partial Class Contratos_ContratoObra
CargaPSInsumos()
ConfiguraTipos()
CargaDatosEncabezado()
' CargaImpuestosLocales()
End If
@@ -2592,7 +2598,7 @@ Partial Class Contratos_ContratoObra
Dim ObjContratos As New ClsContratos
If ObjContratos.GetReporteContratosAvancesDetalleCP(CveContrato, UsuarioActual.CveEmpresa) Then
If ObjContratos.GetReporteContratosObraAvancesDetalle(CveContrato, UsuarioActual.CveEmpresa) Then
GvDatosAvance.DataSource = ObjContratos.DtResultados
SumaAvance = ObjContratos.DtResultados.SUM("AvanceImporte", "CveClasificacion IS NULL")
SumaUtilidad = ObjContratos.DtResultados.SUM("AvanceUtilidad", "CveClasificacion IS NULL")
@@ -5116,6 +5122,37 @@ Partial Class Contratos_ContratoObra
objContrato.Dispose()
End Sub
Private Sub CargaEstadoCueta()
Dim ObjContratos As New ClsContratos
If ObjContratos.GetContratosObraEstadoCuenta(CveContrato, UsuarioActual.CveEmpresa, 1) Then
GvEstadoCuentaAnticipos.DataSource = ObjContratos.DtResultados
Else
GvEstadoCuentaAnticipos.DataSource = Nothing
End If
If ObjContratos.GetContratosObraEstadoCuenta(CveContrato, UsuarioActual.CveEmpresa, 2) Then
GvEstadoCuentaFacturas.DataSource = ObjContratos.DtResultados
Else
GvEstadoCuentaFacturas.DataSource = Nothing
End If
ObjContratos.Dispose()
GvEstadoCuentaAnticipos.DataBind()
GvEstadoCuentaFacturas.DataBind()
UpEstoCuenta.Update()
End Sub
End Class