public PagoAcreedorDetailRpt GetPagoAcreedorDetailReport(PaymentSummary item, Payments pagos)
        {
            if (item == null)
            {
                return(null);
            }

            PagoAcreedorDetailRpt doc = new PagoAcreedorDetailRpt();

            List <PaymentPrint>   pagosList = new List <PaymentPrint>();
            List <PaymentSummary> pList     = new List <PaymentSummary>();

            foreach (Payment pago in pagos)
            {
                pagosList.Add(PaymentPrint.New(pago.GetInfo(true), null, false));
            }

            //Si no existen conceptos, no tiene sentido un informe detallado. Además, falla en Crystal Reports
            if (pagosList.Count <= 0)
            {
                return(null);
            }

            pList.Add(item);

            doc.SetDataSource(pList);
            doc.Subreports["Cuerpo"].SetDataSource(pagosList);

            FormatHeader(doc);

            return(doc);
        }
 public ControlPagosPrint GetControlPagosPrintObject(ExpedientInfo expediente, PaymentSummary resumen)
 {
     return(ControlPagosPrint.New(this, expediente, resumen));
 }
示例#3
0
        protected void CopyValues(InputInvoiceInfo factura, ExpedientInfo expediente, PaymentSummary resumen)
        {
            if (factura == null)
            {
                return;
            }

            _base.Record.NFactura = factura.NFactura;
            _fecha_fac            = factura.Fecha;
            _fecha_prev           = factura.Prevision;
            _base._fecha_pago     = factura.FechaPagoFactura;
            _base._id_pago        = factura.IDPago;
            _base.Record.Total    = factura.Total;
            _base.Pagado          = factura.Pagado;
            _base.Pendiente       = factura.Pendiente;
            _detalles             = factura.CuentaBancaria;
            _nombre_elemento      = factura.Acreedor;
            _tipo_elemento        = moleQule.Common.Structs.EnumText <ETipoAcreedor> .GetLabel(factura.ETipoAcreedor);

            _base._efectos_negociados     = factura.PendienteVencimiento;
            _base._efectos_devueltos      = factura.Vencido;
            _base._efectos_pendientes_vto = factura.EfectosPendientesVto;

            if (expediente != null)
            {
                _contenedor       = expediente.Contenedor;
                _base._expediente = expediente.Codigo;
            }
            else
            {
                _contenedor       = "---";
                _base._expediente = "No Asignado";
            }

            if (resumen != null)
            {
                _total_estimado = resumen.TotalEstimado;
            }
        }