diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index e7aa74343..c7fe1ca9c 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -3619,22 +3619,10 @@ Namespace Modelos
CveIEAnticipo = -1
CveSubProyectoContabilizar = CveSubProyectoVenta
- Dim CveVenta As Integer = ObjFactura.CveVenta
- Dim CveVentaAmortizacion As Integer = row2("CveVenta").ToString().ToEntero
+ Dim CveVenta As Integer = row2("CveVenta").ToString().ToEntero
+ Dim CveVentaAmortizacion As Integer = ObjFactura.CveVenta
+
If row2("CveIE").ToString().ToEntero > 0 Then CveIEAnticipo = row2("CveIE").ToString().ToEntero
- 'FALTA LA MONEDA PAR ALA CUENTA .RMF Y MANDAR EL CVEIE
-
- 'SI ES FACTURA EN 0 Y TIENE ANTICIPOS
- If (ObjFactura.Total = 0 AndAlso UsuarioActual.CveEmpresa.Contiene(72) AndAlso ObjFactura.TipoDocto.Contiene("Ing")) AndAlso row2("TipoDocto").ToString() = "Ant" Then
- CveVenta = row2("CveVenta").ToString().ToEntero
- CveVentaAmortizacion = ObjFactura.CveVenta
- End If
-
- 'SI ES EGRESO Y TIENE ANTICIPOS VINCULADOS
- If (ObjFactura.TipoDocto.Contiene("Egs") AndAlso row2("TipoDocto").ToString() = "Ant" AndAlso EsNCAmortizacion) Then
- CveVenta = row2("CveVenta").ToString().ToEntero
- CveVentaAmortizacion = ObjFactura.CveVenta
- End If
If importeMovimiento <> 0 Then
If Not ObjConta.AddPrePolizasDetalle(ObjFactura.CvePrePoliza, TipoMovimiento, importeMovimiento, importeMovimiento, ConceptoContable, Referencia, Concepto,
diff --git a/Compras/ReembolsosComprobaciones.aspx.vb b/Compras/ReembolsosComprobaciones.aspx.vb
index c193f5885..c514d4ee2 100644
--- a/Compras/ReembolsosComprobaciones.aspx.vb
+++ b/Compras/ReembolsosComprobaciones.aspx.vb
@@ -5,6 +5,7 @@ Imports System.Data
Imports Extensiones
Imports Microsoft.Reporting.WebForms
+
Partial Class Compras_ReembolsosComprobaciones
Inherits ClsPaginas
@@ -364,7 +365,13 @@ Partial Class Compras_ReembolsosComprobaciones
Dim Dep As New ClsGenerales
If Dep.GetCuentasDepositos(CvePersonal:=CvePersonal, CveEmpresa:=UsuarioActual.CveEmpresa) Then
- DdlCuentaDeposito.DataSource = Dep.DtResultados
+ If DdlTipoTransaccion.SelectedValue = "9" Then
+ DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros(" EstatusPagoElectronico = 'True'")
+ Else
+ DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros(" EstatusPagoElectronicoGrupos = 'True'")
+ End If
+
+
If Dep.DtResultados.Rows.Count > 0 Then
trCuentaDeposito.Visible = True
@@ -431,8 +438,9 @@ Partial Class Compras_ReembolsosComprobaciones
#Region " BTN GUARDAR "
Protected Sub BtnIEGuardar_Click(sender As Object, e As EventArgs) Handles BtnIEGuardar.Click
+
Dim CvecuentaDeposito As Integer = If(DdlCuentaDeposito.SelectedValue.ToEntero > 0, DdlCuentaDeposito.SelectedValue.ToEntero, -1)
- If DdlTipoTransaccion.SelectedValue.Contiene("9", "17") Then
+ If DdlTipoPago.SelectedValue.ToEntero = 1 AndAlso DdlTipoTransaccion.SelectedValue.Contiene("9", "17") Then
If CvecuentaDeposito <= 0 Then
Alert("Debe de seleccionar una cuenta deposito", TipoMensaje.MsgAdvertencia)
Exit Sub
@@ -738,7 +746,7 @@ Partial Class Compras_ReembolsosComprobaciones
Pago.CveIE = CveIEPago
Pago.CveMonedaPago = CveMonedaPago
Pago.TCPago = TipoCambioPago
- Pago.CvePersonal =CvePersonal
+ Pago.CvePersonal = CvePersonal
ImportePagoTotal = ImportePagoTotal + ImporteMovto
If UsuarioActual.CveEmpresa.Contiene(7, 11, 12, 122, 145) Then
diff --git a/Contabilidad/DiarioAmortizaciones.aspx b/Contabilidad/DiarioAmortizaciones.aspx
index caf44dd74..1ce31b891 100644
--- a/Contabilidad/DiarioAmortizaciones.aspx
+++ b/Contabilidad/DiarioAmortizaciones.aspx
@@ -439,6 +439,7 @@
+
@@ -616,6 +617,7 @@
+
@@ -791,6 +793,7 @@
+
diff --git a/Contabilidad/DiarioAmortizaciones.aspx.vb b/Contabilidad/DiarioAmortizaciones.aspx.vb
index 6d14073d2..9efa59878 100644
--- a/Contabilidad/DiarioAmortizaciones.aspx.vb
+++ b/Contabilidad/DiarioAmortizaciones.aspx.vb
@@ -624,6 +624,7 @@ Partial Class Contabilidad_DiarioAmortizaciones
For Each gvrc As GridViewRow In GvCompras.Rows
+ Dim PorcentajeIVA As Decimal = (gvrc.FCHiddenField("HdnPorcentajeIVA").Value.ToDecimal() * 100).ToEntero
AbonoProveedor = 0 : CargoProveedor = 0 : CargoAnticipo = 0 : AbonoAnticipo = 0
@@ -783,15 +784,51 @@ Partial Class Contabilidad_DiarioAmortizaciones
MsgError = "No se pudo insertar movimientos de devoluciones de IVA" : Exit For
End If
End If
+
+ Dim UUID As String = gvrc.FCHiddenField("HdnUUID").Value
If Not Conta.AddDevolucionesIVA(IDPoliza, IdCuentaBancos, IdProveedor, 16,
SubTotal,
IVAAcreditable * TipoCambioPago,
CompraPagadoRetIVA * TipoCambioPago,
CompraPagadoRetISR * TipoCambioPago,
- Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, "", UsuarioActual.CveEmpresa) Then
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, UsuarioActual.CveEmpresa) Then
MsgError = "No se pudo insertar movimientos de devoluciones de IVA" : Exit For
End If
+ If MsgError = "" Then
+
+ Dim GuidMov As String = Guid.NewGuid().ToString()
+
+ Dim NoDeducible = False
+ Dim IVANoAcred As Decimal = 0 'si NoDeducible es true -- > Es el iva no deducible , ivano deducible totald e la compra
+
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, PorcentajeIVA, SubTotal, IVAAcreditable * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMov, "", 1, 2) Then
+ MsgError = "No se pudo insertar movimientos de impuesto de IVA" : Exit For
+ End If
+
+
+ If MsgError = "" AndAlso CompraPagadoRetIVA > 0 Then
+ Dim GuidMovRetIVA As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetIVA * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetIVA * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetIVA, GuidMov, 2, 2) Then
+ MsgError = "No se pudo insertar movimientos de retención de IVA" : Exit For
+ End If
+ End If
+
+ If MsgError = "" AndAlso CompraPagadoRetISR > 0 Then
+ Dim GuidMovRetISR As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetISR * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetISR * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetISR, GuidMov, 2, 1) Then
+ MsgError = "No se pudo insertar movimientos de retención de ISR" : Exit For
+ End If
+ End If
+
+ End If
+
+
End If
@@ -1093,6 +1130,7 @@ Partial Class Contabilidad_DiarioAmortizaciones
For Each gvrc As GridViewRow In GvCompras.Rows
+ Dim PorcentajeIVA As Decimal = (gvrc.FCHiddenField("HdnPorcentajeIVA").Value.ToDecimal() * 100).ToEntero
AbonoProveedor = 0 : CargoProveedor = 0 : CargoAnticipo = 0 : AbonoAnticipo = 0
@@ -1241,15 +1279,50 @@ Partial Class Contabilidad_DiarioAmortizaciones
End If
End If
+ Dim UUID As String = gvrc.FCHiddenField("HdnUUID").Value
+
If IdCuentaBancos > 0 AndAlso Not Conta.AddDevolucionesIVA(IDPoliza, IdCuentaBancos, IdProveedor, 16,
SubTotal,
IVAAcreditable * TipoCambioPago,
CompraPagadoRetIVA * TipoCambioPago,
CompraPagadoRetISR * TipoCambioPago,
- Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, "", UsuarioActual.CveEmpresa) Then
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, UsuarioActual.CveEmpresa) Then
MsgError = "No se pudo insertar movimientos de devoluciones de IVA" : Exit For
End If
+ If MsgError = "" Then
+
+ Dim GuidMov As String = Guid.NewGuid().ToString()
+
+ Dim NoDeducible = False
+ Dim IVANoAcred As Decimal = 0 'si NoDeducible es true -- > Es el iva no deducible , ivano deducible totald e la compra
+
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, PorcentajeIVA, SubTotal, IVAAcreditable * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMov, "", 1, 2) Then
+ MsgError = "No se pudo insertar movimientos de impuesto de IVA" : Exit For
+ End If
+
+
+ If MsgError = "" AndAlso CompraPagadoRetIVA > 0 Then
+ Dim GuidMovRetIVA As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetIVA * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetIVA * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetIVA, GuidMov, 2, 2) Then
+ MsgError = "No se pudo insertar movimientos de retención de IVA" : Exit For
+ End If
+ End If
+
+ If MsgError = "" AndAlso CompraPagadoRetISR > 0 Then
+ Dim GuidMovRetISR As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetISR * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetISR * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetISR, GuidMov, 2, 1) Then
+ MsgError = "No se pudo insertar movimientos de retención de ISR" : Exit For
+ End If
+ End If
+
+ End If
+
End If
'afecto los movimientos en los que se hizo el pago
@@ -1568,6 +1641,7 @@ Partial Class Contabilidad_DiarioAmortizaciones
For Each gvrc As GridViewRow In GvCompras.Rows
+ Dim PorcentajeIVA As Decimal = (gvrc.FCHiddenField("HdnPorcentajeIVA").Value.ToDecimal() * 100).ToEntero
AbonoProveedor = 0 : CargoProveedor = 0 : CargoAnticipo = 0 : AbonoAnticipo = 0
@@ -1666,15 +1740,50 @@ Partial Class Contabilidad_DiarioAmortizaciones
End If
End If
+ Dim UUID As String = gvrc.FCHiddenField("HdnUUID").Value
+
If Not Conta.AddDevolucionesIVA(IDPoliza, IdCuentaBancos, IdProveedor, 16,
SubTotal,
IVAAcreditable * TipoCambioPago,
CompraPagadoRetIVA * TipoCambioPago,
CompraPagadoRetISR * TipoCambioPago,
- Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, "", UsuarioActual.CveEmpresa) Then
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, UsuarioActual.CveEmpresa) Then
MsgError = "No se pudo insertar movimientos de devoluciones de IVA" : Exit For
End If
+ If MsgError = "" Then
+
+ Dim GuidMov As String = Guid.NewGuid().ToString()
+
+ Dim NoDeducible = False
+ Dim IVANoAcred As Decimal = 0 'si NoDeducible es true -- > Es el iva no deducible , ivano deducible totald e la compra
+
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, PorcentajeIVA, SubTotal, IVAAcreditable * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMov, "", 1, 2) Then
+ MsgError = "No se pudo insertar movimientos de impuesto de IVA" : Exit For
+ End If
+
+
+ If MsgError = "" AndAlso CompraPagadoRetIVA > 0 Then
+ Dim GuidMovRetIVA As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetIVA * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetIVA * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetIVA, GuidMov, 2, 2) Then
+ MsgError = "No se pudo insertar movimientos de retención de IVA" : Exit For
+ End If
+ End If
+
+ If MsgError = "" AndAlso CompraPagadoRetISR > 0 Then
+ Dim GuidMovRetISR As String = Guid.NewGuid().ToString()
+ Dim TasaOCuotaRetIVA As Decimal = (((CompraPagadoRetISR * TipoCambioPago) / SubTotal) * 100).ToDecimal.RoundSQL(4)
+ If Not Conta.AddMovimientoImpuesto(IDPoliza, IdCuentaBancos, IdProveedor, PorcentajeIVA, TasaOCuotaRetIVA, SubTotal, CompraPagadoRetISR * TipoCambioPago,
+ Fecha, NumPoliza.ToString, gvrc.FCHiddenField("HdnSerie").Value, gvrc.FCHiddenField("HdnFolio").Value.StrToNum, UUID, NoDeducible, IVANoAcred, GuidMovRetISR, GuidMov, 2, 1) Then
+ MsgError = "No se pudo insertar movimientos de retención de ISR" : Exit For
+ End If
+ End If
+
+ End If
+
End If
'afecto los movimientos en los que se hizo el pago
diff --git a/Ventas/RepAnticipo-NC-IXCAplicados.aspx b/Ventas/RepAnticipo-NC-IXCAplicados.aspx
index c47a680dd..587f29b93 100644
--- a/Ventas/RepAnticipo-NC-IXCAplicados.aspx
+++ b/Ventas/RepAnticipo-NC-IXCAplicados.aspx
@@ -87,26 +87,14 @@
-
-
- |
- Anticipos |
- Notas de crédito |
- Ingresos por Comprobar |
-
-
-
-
-
+
+
+
diff --git a/Ventas/RepAnticipo-NC-IXCAplicados.aspx.cs b/Ventas/RepAnticipo-NC-IXCAplicados.aspx.cs
index 8bd231733..301e29c7f 100644
--- a/Ventas/RepAnticipo-NC-IXCAplicados.aspx.cs
+++ b/Ventas/RepAnticipo-NC-IXCAplicados.aspx.cs
@@ -55,7 +55,6 @@ public partial class Ventas_RepAnticipo_NC_IXCAplicados : ClsPaginas
Vendedor = 0;
CargaSucursales();
CargaClientes();
- CargaVendedores();
CargaDatos();
}
@@ -77,13 +76,6 @@ public partial class Ventas_RepAnticipo_NC_IXCAplicados : ClsPaginas
DdlCliente.setEsWebService(true);
DdlCliente.Attributes.Add("data-metodo", "getcliente");
}
- protected void CargaVendedores()
- {
- DdlVendedor.DataSource = get_GlobalDTVendedores(UsuarioActual.CveEmpresa);
- DdlVendedor.DataBind();
- DdlVendedor.Items.Insert(0, new ListItem("Todos", "-1"));
- //DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor);
- }
protected void CargaDatos()
{
@@ -99,20 +91,26 @@ public partial class Ventas_RepAnticipo_NC_IXCAplicados : ClsPaginas
CveCliente = DdlCliente.SelectedValue.ToEntero();
}
if (ObjVenta.GetRepAnticiposNCIXCAplicados(CveCliente, DdlSucursal.SelectedValue.ToEntero(), ModExtensiones.MinFecha,
- ModExtensiones.MaxFecha, UsuarioActual.CveEmpresa, FechaICorte, FechaFCorte, TipoCambio, TCEspecifico, DdlVendedor.SelectedValue.ToEntero(), DdlConSaldo.SelectedValue.ToEntero()))
+ ModExtensiones.MaxFecha, UsuarioActual.CveEmpresa, FechaICorte, FechaFCorte, TipoCambio, TCEspecifico, -1, -1))
{
- GvDatos.DataSource = ObjVenta.DtResultados;
- DtDatos = ObjVenta.DtResultados;
+ DtDatos = ObjVenta.DtResultados.Copy();
}
ObjVenta.Dispose();
+
+ GvDatos.DataSource = DtDatos;
+
+ GvDatos.Columns[2].Visible = ChkAnticipos.Checked;
+ GvDatos.Columns[3].Visible = ChkNCxAplicar.Checked;
+ GvDatos.Columns[4].Visible = ChkIngresosxComprobar.Checked;
+
GvDatos.DataBind();
+
UpDatos.Update();
}
protected void BtnConsultar_Click(object sender, EventArgs e)
{
CargaDatos();
- Vendedor = DdlVendedor.SelectedIndex;
}
protected void LnkExcel_Click(object sender, EventArgs e)
@@ -132,38 +130,49 @@ public partial class Ventas_RepAnticipo_NC_IXCAplicados : ClsPaginas
//String FechaF;
//if (txtFechaF.Text == "" || txtFechaF.Text == "__/__/____") { FechaF = ""; } else { FechaF = $" Fecha Final: {txtFechaF.Text}"; }
String FechaICorte;
- if (TxtFechaICorte.Text == "" || TxtFechaICorte.Text == "__/__/____") { FechaICorte = ""; } else { FechaICorte = $" Fecha Inicial Corte: {TxtFechaICorte.Text}"; }
+ if (TxtFechaICorte.Text == "" || TxtFechaICorte.Text == "__/__/____") { FechaICorte = ""; } else { FechaICorte = $" Fecha Inicial: {TxtFechaICorte.Text}"; }
String FechaFCorte;
- if (TxtFechaFCorte.Text == "" || TxtFechaFCorte.Text == "__/__/____") { FechaFCorte = ""; } else { FechaFCorte = $" Fecha Final Corte: {TxtFechaFCorte.Text}"; }
+ if (TxtFechaFCorte.Text == "" || TxtFechaFCorte.Text == "__/__/____") { FechaFCorte = ""; } else { FechaFCorte = $" Fecha Final: {TxtFechaFCorte.Text}"; }
String Sucursal;
if (DdlSucursal.SelectedValue != "-1") { Sucursal = $" Sucursal: {DdlSucursal.SelectedItem.Text}"; } else { Sucursal = ""; }
String Cliente;
- if (DdlCliente.SelectedValue != "-1") { Cliente = $" Cliente: {DdlCliente.SelectedText}"; } else { Cliente = ""; }
+ if (!DdlCliente.SelectedValue.Contiene("-1","")) { Cliente = $" Cliente: {DdlCliente.SelectedText}"; } else { Cliente = ""; }
if (DtDatos.Rows.Count > 0)
{
+
System.IO.FileInfo Imagen = new System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png");
String logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa);
- List para = new List();
- para.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa));
- para.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
- para.Add(new ReportParameter("FechaImpresion", NowADS().ToString()));
- para.Add(new ReportParameter("AgrupadoPor", $"Agrupado Por: {Cliente}{Sucursal}{FechaICorte}{FechaFCorte}"));
-
-
-
- para.Add(new ReportParameter("MostarAnticipos", ChkAnticipos.Checked ? "1" : "0"));
- para.Add(new ReportParameter("MostarNCxAplicar", ChkNCxAplicar.Checked ? "1" : "0"));
- para.Add(new ReportParameter("MostarIngresosxComprobar", ChkIngresosxComprobar.Checked ? "1" : "0"));
-
- if (Imagen.Exists)
+ string AgrupadoPor = $"{Cliente}{Sucursal}{FechaICorte}{FechaFCorte}";
+ if (Opcion == "PDF")
{
- para.Add(new ReportParameter("LogoPath", logouri));
+ List para = new List();
+ para.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa));
+ para.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
+ para.Add(new ReportParameter("FechaImpresion", NowADS().ToString()));
+ para.Add(new ReportParameter("AgrupadoPor", $"Agrupado Por: {AgrupadoPor}"));
+
+
+
+ para.Add(new ReportParameter("MostarAnticipos", ChkAnticipos.Checked ? "1" : "0"));
+ para.Add(new ReportParameter("MostarNCxAplicar", ChkNCxAplicar.Checked ? "1" : "0"));
+ para.Add(new ReportParameter("MostarIngresosxComprobar", ChkIngresosxComprobar.Checked ? "1" : "0"));
+
+ if (Imagen.Exists)
+ {
+ para.Add(new ReportParameter("LogoPath", logouri));
+ }
+ else
+ {
+ para.Add(new ReportParameter("LogoPath", ""));
+ }
+ ImprimirPDF("Empresas/Grales/Formatos/RepAnt-NC-IXCAplicados.rdlc", DtDatos, para, "Reporte de aplicaciones de Anticipos - NC - IXC", Opcion);
}
else
{
- para.Add(new ReportParameter("LogoPath", ""));
+ var TextoFiltro = AgrupadoPor.Replace(" ", "").Replace("", "").Replace("", "");
+
+ GvDatos.ExportToExcelGembox("RepAnticiposNCIxCAplicados", UsuarioActual, "Reporte de aplicaciones de Anticipos - NC - Ingresos X Comprobar", DatosFiltros: TextoFiltro, AlturaImagen: 0, AnchoImagen: 0);
}
- ImprimirPDF("Empresas/Grales/Formatos/RepAnt-NC-IXC.rdlc", DtDatos, para, "Reporte de Anticipos - NCXAplicar - IXC", Opcion);
}
else
{
@@ -171,6 +180,10 @@ public partial class Ventas_RepAnticipo_NC_IXCAplicados : ClsPaginas
}
}
+ public override void VerifyRenderingInServerForm(System.Web.UI.Control control)
+ {
+ }
+
protected void GvDatos_RowDataBound(object sender, GridViewRowEventArgs e)
{
if (e.Row.RowType == DataControlRowType.DataRow)