";
print "close();";
print "opener.document.form1.submit();";
print "";
}
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_insert_seguridad($as_titulo)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_insert_seguridad
// Access: private
// Arguments: as_titulo // Título del reporte
// Description: función que guarda la seguridad de quien generó el reporte
// Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang
// Fecha Creación: 03/07/2007
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_fun_cxp;
$ls_descripcion="Generó el Reporte ".$as_titulo;
$lb_valido=$io_fun_cxp->uf_load_seguridad_reporte("CXP","sigesp_cxp_r_retencionesislr.php",$ls_descripcion);
return $lb_valido;
}
//-----------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_encabezado_pagina($as_titulo,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_encabezadopagina
// Access: private
// Arguments: as_titulo // Título del Reporte
// io_pdf // Instancia de objeto pdf
// Description: función que imprime los encabezados por página
// Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang
// Fecha Creación: 04/07/2007
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_encabezado=$io_pdf->openObject();
$io_pdf->saveState();
$io_pdf->line(50,40,960,40);
$io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],40,510,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo
$io_pdf->addText(910,595,8,date("d/m/Y")); // Agregar la Fecha
$io_pdf->addText(916,585,7,date("h:i a")); // Agregar la Hora
$io_pdf->setStrokeColor(0,0,0);
$io_pdf->addText(260,508,13,"COMPROBANTE DE RETENCION DEL I.S.L.R"); // Agregar el t?ulo
$io_pdf->addText(300,550,9,"REPUBLICA BOLIVARIANA DE VENEZUELA"); // Agregar el título
$io_pdf->addText(288,539,9,"FONDO DE COMPENSACIÓN INTERTERRITORIAL"); // Agregar el título
$io_pdf->addText(320,528,9,"GERENCIA DE GESTIÓN INTERNA"); // Agregar el título
$io_pdf->line(45,500,750,500);
$io_pdf->addText(45,490,9,"A los fines de la aplicación de los porcentajes de retención correspondiente a las actividades "); // Agregar el t?ulo
$io_pdf->addText(45,481,9,"distintas de sueldos, salarios y remuneraciones similares, previstos en el Art.-9 del "); // Agregar el t?ulo
$io_pdf->addText(45,473,9,"reglamento de la Ley de Impuesto Sobre la Renta en materia de retenciones."); // Agregar el t?ulo
//$io_pdf->addText(345,451,9,"Datos del Agente de Retención"); // Agregar el t?ulo
//$io_pdf->addText(345,351,9,"Datos del Contribuyente"); // Agregar el t?ulo
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_encabezadopagina
//--------------------------------------------------------------------------------------------------------------------------------
//uf_print_encabezado($as_agenteret,$as_rifagenteret,$as_perfiscal,$as_codsujret,$as_nomsujret,$as_rif,$as_diragenteret,
// $as_numcon,$ad_fecrep,$ai_estcmpret,$as_tlfagenteret,&$io_pdf)
function uf_print_encabezado($ad_fecrep,$as_agente,$as_nombre,$as_rifagenteret,$as_rif,$as_telagenteret,$as_diragenteret,$as_numsol,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_encabezadopagina
// Access: private
// Arguments: as_agenteret // Nombre del Agente de retención
// as_rifagenteret // Rif del Agente de retención
// as_perfiscal // Período fiscal
// as_codsujret // Código del Sujeto a retención
// as_nomsujret // Nombre del Sujeto a retención
// as_diragenteret // Dirección del agente de retención
// as_numcon // Número de Comprobante
// ad_fecrep // Fecha del comprobante
// ai_estcmpret // estatus del comprobante
// io_pdf // Instancia de objeto pdf
// Description: función que imprime los encabezados por página
// Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang
// Fecha Creación: 14/07/2007
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->setStrokeColor(0,0,0);
/*if($ai_estcmpret==2)
{
$io_pdf->Rectangle(45,480,180,30);
$io_pdf->addText(90,490,15," ANULADO ");
}*/
//---> ubicar en el datastore estos campos
$io_pdf->ezSetY(450);
$as_perfiscal=substr($ad_fecrep,3,2).'/'.substr($ad_fecrep,8,2);
//$io_pdf->Rectangle(500,467,120,28);
//$io_pdf->addText(505,485,9,"Número de Solicitud"); // Agregar el titulo
//$io_pdf->addText(505,475,9,"".$as_numsol); // Agregar el titulo
$io_pdf->Rectangle(650,370,100,28);
$io_pdf->addText(660,388,9,"ORDEN DE PAGO"); // Agregar el titulo
$io_pdf->addText(660,375,9,$as_numsol); // Agregar el titulo
$io_pdf->Rectangle(650,408,100,28);
$io_pdf->addText(665,425,9,"Periodo Fiscal"); // Agregar el titulo
$io_pdf->addText(653,410,9,"Año: ".substr($ad_fecrep,8,2)." Mes: ".substr($ad_fecrep,3,2)); // Agregar el titulo
$io_pdf->Rectangle(650,467,100,28);
$io_pdf->addText(655,485,9,"Fecha"); // Agregar el titulo
$io_pdf->addText(660,470,9,$ad_fecrep); // Agregar el titulo
$io_pdf->addText(345,451,9,"Datos del Agente de Retención"); // Agregar el t?ulo
$io_pdf->addText(345,351,9,"Datos del Contribuyente"); // Agregar el t?ulo
$la_data[1]=array('titulo'=>'');
$la_columna=array('titulo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Letras
'shaded'=>0, // Sombra entre lineas
'xOrientation'=>'center', // Orientacion de la tabla
'width'=>500, // Ancho de la tabla
'justification'=>'center', // Ancho de la tabla
'maxWidth'=>500,
'cols'=>array('titulo'=>array('justification'=>'center','width'=>500))); // Ancho M�imo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
$la_data[1]=array('name'=>'Nombre: '.$as_agente.'');
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>1, // Mostrar lineas
'shaded'=>0, // Sombra entre lineas
'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra
'xOrientation'=>'left', // Orientacion de la tabla
'xPos'=>350, // Orientacion de la tabla
'width'=>300, // Ancho de la tabla
'maxWidth'=>450,
'rowGap' => 7,
'yPos'=>200 ); // Ancho Minimo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
$io_pdf->Rectangle(400,408,200,27);
$io_pdf->addText(405,420,9,"No. R.I.F: ".$as_rifagenteret); // Agregar el titulo
//---------------------------------------------------------------------------------------------------
$la_data[1]=array('titulo'=>'');
$la_columna=array('titulo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Letras
'shaded'=>0, // Sombra entre lineas
'xOrientation'=>'center', // Orientacion de la tabla
'width'=>500, // Ancho de la tabla
'justification'=>'center', // Ancho de la tabla
'maxWidth'=>500,
'cols'=>array('titulo'=>array('justification'=>'center','width'=>500))); // Ancho Minimo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
//---------------------------------------------------------------------------------------------------
$la_data[1]=array('name'=>'Dirección: '.$as_diragenteret);
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>1, // Mostrar LÃneas
'shaded'=>0, // Sombra entre lÃneas
'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra
'xOrientation'=>'left', // Orientacion de la tabla
'xPos'=>606, // Orientacion de la tabla
'width'=>555, // Ancho de la tabla
'rowGap' => 7,
'maxWidth'=>500); // Ancho Minimo de la tabl
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
//---------------------------------------------------------------------------------------------------
$la_data[1]=array('titulo'=>'');
$la_columna=array('titulo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Letras
'shaded'=>0, // Sombra entre lineas
'xOrientation'=>'center', // Orientacion de la tabla
'width'=>500, // Ancho de la tabla
'justification'=>'center', // Ancho de la tabla
'maxWidth'=>500,
'rowGap' => 15,
'cols'=>array('titulo'=>array('justification'=>'center','width'=>500))); // Ancho Minimo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
//---------------------------------------------------------------------------------------------------
$la_data[1]=array('name'=>'Nombre o Razon Social: ');
$la_data[2]=array('name'=>$as_nombre.'');
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>1, // Mostrar lineas
'shaded'=>0, // Sombra entre lineas
'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra
'xOrientation'=>'left', // Orientacion de la tabla
'xPos'=>350, // Orientacion de la tabla
'width'=>300, // Ancho de la tabla
'maxWidth'=>450,
'rowGap' => 7,
'maxWidth'=>500); // Ancho Minimo de la tabla
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
$io_pdf->Rectangle(400,273,200,50);
$io_pdf->addText(440,310,9,"RIF. del Sujeto Retenido:"); // Agregar el titulo
$io_pdf->addText(455,284,9,$as_rif); // Agregar el titulo
}// end function uf_print_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_detalle($la_data,$ai_totalpagado,$ai_totalconiva,$ai_totalbaseimp,$ai_totalporcentaje,$ai_totalivaret,$as_ordenp,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_detalle
// Access: private
// Arguments: as_numsol // Número de recepción
// as_concepto // Concepto de la solicitud
// as_fechapago // Fecha de la recepción
// ad_monto // monto de la recepción
// ad_monret // monto retenido
// ad_porcentaje // porcentaje de retención
// as_numcon // numero de referencia
// io_pdf // Instancia de objeto pdf
// Description: función que imprime el detalle por recepción
// Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang
// Fecha Creación: 05/07/2007
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$la_data1[1]=array('titulo'=>'');
$la_columna=array('titulo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Letras
'shaded'=>0, // Sombra entre lineas
'xOrientation'=>'center', // Orientacion de la tabla
'width'=>900, // Ancho de la tabla
'justification'=>'center', // Ancho de la tabla
'maxWidth'=>900,
'rowGap' => 7,
'cols'=>array('titulo'=>array('justification'=>'center','width'=>900))); // Ancho Minimo de la tabla
$io_pdf->ezTable($la_data1,$la_columna,'',$la_config);
unset($la_data1);
unset($la_columna);
unset($la_config);
$ls_titulo1="Total Compras Incluyendo el IVA";
$columna=array('fecfac'=>'Fecha de Factura',
'numfac'=>'Numero de Factura',
'numref'=>'N° Control',
'monto'=>'Total Facturado',
'baseimp'=>'Base Imponible',
'porimp'=>'% Alic.',
'sustraendo'=>'Sustraendo',
'totimp'=>'ISRL Retenido');
$la_config=array('showHeadings'=>1, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>1, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>900, // Ancho de la tabla
'maxWidth'=>900, // Ancho Mínimo de la tabla
'xPos'=>400, // Orientación de la tabla
'Titulo_Color' => 'si', // Para poner color de fondo y de letra al titulo
'TituloCol' => array(0.1,0.4,0.6), //Color de fondo del titulo
'Letra_Titulo' => array(1,1,1), //Color de letra del titulo
'cols'=>array('fecfac'=>array('justification'=>'center','width'=>120),
'numfac'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'numref'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'monto'=>array('justification'=>'right','width'=>70),
'baseimp'=>array('justification'=>'right','width'=>100),
'porimp'=>array('justification'=>'right','width'=>90),
'sustraendo'=>array('justification'=>'right','width'=>70),
'totimp'=>array('justification'=>'right','width'=>70)),
'cabecera_cols'=>array('fecfac'=>array('justification'=>'center','width'=>120),
'numfac'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'numref'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'monto'=>array('justification'=>'center','width'=>70),
'baseimp'=>array('justification'=>'center','width'=>100),
'porimp'=>array('justification'=>'center','width'=>90),
'sustraendo'=>array('justification'=>'center','width'=>70),
'totimp'=>array('justification'=>'center','width'=>70))
);
$io_pdf->ezSetDy(-5);
$io_pdf->ezTable($la_data,$columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
}// end function uf_print_detalle
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_totales($ai_totalpagado,$ai_totalconiva,$ai_totalbaseimp,$ai_totalporcentaje,$ai_totalivaret,&$io_pdf){
$la_data[1]=array('numnotdeb'=>'TOTAL','numnotcre'=>$ai_totalpagado,
'name1'=>$ai_totalbaseimp,'name3'=>$ai_totalporcentaje,'name4'=>'','name5'=>$ai_totalivaret);
$la_columna=array('numnotdeb'=>'','numnotcre'=>'',
'name1'=>'','name3'=>'','name4'=>'','name5'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' =>8, // Tamaño de Letras
'showLines'=>1, // Mostrar Lineas
'shaded'=>0, // Sombra entre Lineas
'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra
'xPos'=>500,
'yPos'=>734, // Orientacion de la tabla
'width'=>900,
'maxWidth'=>900,
'cols'=>array('numnotdeb'=>array('justification'=>'left','width'=>80),
'numnotcre'=>array('justification'=>'right','width'=>70),
'name1'=>array('justification'=>'right','width'=>100), // Justificacion y ancho de la columna
'name3'=>array('justification'=>'right','width'=>90), // Justificacion y ancho de la columna
'name4'=>array('justification'=>'right','width'=>70),
'name5'=>array('justification'=>'right','width'=>70)));
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
}
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_firmas(&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_firmas
// Access: private
// Arguments: io_pdf // Instancia de objeto pdf
// Description: función que imprime el detalle por recepción
// Creado Por: Ing. Yesenia Moreno / Ing. Luis Lang
// Fecha Creación: 05/07/2007
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->addText(150,70,9,"_______________________________________ ___________________________"); // Agregar el tulo
$io_pdf->addText(150,60,9,"FIRMA Y SELLO DEL AGENTE DE RETENCION CONTRIBUYENTE"); // Agregar el tulo
$io_pdf->addText(210,50,9,"RIF: G-20002451-8"); // Agregar el titulo
/*
$la_data[0]=array('firma1'=>'','firma2'=>'');
$la_data[1]=array('firma1'=>'','firma2'=>'');
$la_data[2]=array('firma1'=>'_______________________________','firma2'=>'____________________________________');
$la_data[3]=array('firma1'=>'FIRMA DEL AGENTE DE RETENCION','firma2'=>'FIRMA Y SELLO DEL SUJETO RETENIDO');
$la_data[4]=array('firma1'=>'','firma2'=>'');
$la_columna=array('firma1'=>'','firma2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 10, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'outerLineThickness'=>0.5,
'innerLineThickness' =>0.5,
'width'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('firma1'=>array('justification'=>'center','width'=>250), // Justificación y ancho de la columna
'firma2'=>array('justification'=>'center','width'=>250))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
*/
}// end function uf_print_firmas
//--------------------------------------------------------------------------------------------------------------------------------
require_once("../../shared/ezpdf_plus/class.ezpdf.php");
require_once("../../shared/ezpdf_plus/class.covensol_pdf.php");
require_once("sigesp_cxp_class_report.php");
$io_report=new sigesp_cxp_class_report();
require_once("../../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
require_once("../class_folder/class_funciones_cxp.php");
$io_fun_cxp=new class_funciones_cxp();
//---------------------------------------------------- Parámetros del encabezado -----------------------------------------------
$ls_titulo="COMPROBANTE DE RETENCION I.S.L.R.";
$ls_agente=$_SESSION["la_empresa"]["nombre"];
$ls_rifagenteret=$_SESSION["la_empresa"]["rifemp"];
$ls_telagenteret=$_SESSION["la_empresa"]["telemp"];
$ls_diragenteret=$_SESSION["la_empresa"]["direccion"];
//-------------------------------------------------- Parámetros para Filtar el Reporte -----------------------------------------
$ls_comprobantes=$io_fun_cxp->uf_obtenervalor_get("comprobantes","");
$ls_procedencias=$io_fun_cxp->uf_obtenervalor_get("procedencias","");
$ls_tiporeporte=$io_fun_cxp->uf_obtenervalor_get("tiporeporte",0);
global $ls_tiporeporte;
if($ls_tiporeporte==1)
{
require_once("sigesp_cxp_class_reportbsf.php");
$io_report=new sigesp_cxp_class_reportbsf();
}
//--------------------------------------------------------------------------------------------------------------------------------
$lb_valido=uf_insert_seguridad($ls_titulo); // Seguridad de Reporte
if($lb_valido)
{
$la_procedencias=split('<<<',$ls_procedencias);
$la_comprobantes=split('<<<',$ls_comprobantes);
$la_datos=array_unique($la_comprobantes);
$li_totrow=count($la_datos);
sort($la_datos,SORT_STRING);
if($li_totrow<=0)
{
print("");
}
else
{
//error_reporting(E_ALL);
//set_time_limit(1800);
//$io_pdf=new Cezpdf('LETTER','landscape');
$io_pdf=new covensol_pdf('LETTER','landscape');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(5,3,3,3);
$lb_valido=true;
$ls_codigoant="";
$li_totalconiva = 0;
$li_totalbaseimp = 0;
$li_totalivaret = 0;
$li_totalporcentaje= 0;
$li_totalpagado = 0;
$pagina = 1;
uf_print_encabezado_pagina($ls_titulo,$io_pdf);
$solicitudes="";
foreach($la_datos as $solic){
if(!$solicitudes){$solicitudes="'".$solic."'";}
else{$solicitudes .= ",'".$solic."'";}
}
$io_report->Solic = $solicitudes;
$resul = $io_report->SolicIsrl_cxp();
$i=0;
foreach($resul as $DatosSolic){
$io_report->tipproben = $DatosSolic['tipproben'];
$io_report->cod_pro = $DatosSolic['cod_pro'];
$io_report->ced_bene = $DatosSolic['ced_bene'];
$io_report->numsol = $DatosSolic['numsol'];
$retislr=$io_report->uf_retencionesislr_cxp2();
$li_i=0;
$li_totalconiva = 0;
$li_totalbaseimp = 0;
$li_totalivaret = 0;
$li_totalporcentaje= 0;
$li_totalpagado = 0;
if($DatosSolic["tipproben"]=="P"){
$ls_codigo=$DatosSolic["cod_pro"];
$ls_nombre=$DatosSolic["proveedor"];
$ls_rif=$DatosSolic["rifpro"];
$ls_telefpb=$DatosSolic["telpro"];
$ls_dirpb=$DatosSolic["dirpro"];
}
else{
$ls_codigo=$DatosSolic["ced_bene"];
$ls_nombre=$DatosSolic["beneficiario"];
$ls_rif=$DatosSolic["rifben"];
$ls_telefpb=$DatosSolic["telbene"];
$ls_dirpb=$DatosSolic["dirbene"];
}
$DatosSolic["fecemisol"]=$io_funciones->uf_convertirfecmostrar($DatosSolic["fecemisol"]);
uf_print_encabezado($DatosSolic['fecemisol'],$ls_agente,$ls_nombre,$ls_rifagenteret,$ls_rif,$ls_telagenteret,$ls_diragenteret,$DatosSolic['numsol'],&$io_pdf);
//$ls_codigoant=$ls_codigo;
$la_data=array();
foreach($retislr as $datos){
$ls_numcom_esp= $datos["numcom"];
$datos["fecemidoc"]=$io_funciones->uf_convertirfecmostrar($datos["fecemidoc"]);
$li_totsiniva=($datos["montotdoc"]-$datos["moncardoc"]+$datos["mondeddoc"]);
$li_totconiva=($li_totsiniva+$datos["moncardoc"]);
$ls_fecche=$io_funciones->uf_convertirfecmostrar($datos["fecche"]);
//echo $li_totconiva.'
';
$li_totalbaseimp = $li_totalbaseimp + $datos["monobjret"];
$li_totalpagado = $li_totalpagado + $li_totconiva;
$li_totalivaret=$li_totalivaret + $datos["retenido"];
//echo $li_totalpagado.'
';
$xmontotdoc=number_format($li_totconiva,2,",",".");
//echo $xmontotdoc.'
';
$xmonobjret=number_format($datos["monobjret"],2,',','.');
$xretenido=number_format($datos["retenido"],2,',','.');
$xporcentaje=number_format($datos["porcentaje"],2,',',',');
$xmondeducible=number_format($datos["monded"],2,',',',');
$la_data[$li_i]=array('numope'=>$li_i,'fecfac'=>$datos["fecemidoc"],'numfac'=>$datos["numdoc"],
'numref'=>$datos["numref"],'actsuret'=>$datos["consol"],'monto'=>$xmontotdoc,'baseimp'=>$xmonobjret,
'porimp'=>$xporcentaje,'sustraendo'=>$xmondeducible,
'totimp'=>$xretenido);
$li_i++;
}
$xtotalconiva= number_format($li_totalconiva,2,",",".");
$xtotalbaseimp= number_format($li_totalbaseimp,2,",",".");
$xtotalporcentaje= number_format($li_totalporcentaje,2,',','.');
$xtotalivaret= number_format($li_totalivaret,2,",",".");
$xtotalpagado= number_format($li_totalpagado,2,",",".");
uf_print_detalle($la_data,$xtotalpagado,$xtotalconiva,$xtotalbaseimp,$xtotalporcentaje,$xtotalivaret,$ls_numcom_esp,&$io_pdf);
uf_print_totales($xtotalpagado,$xtotalconiva,$xtotalbaseimp,"",$xtotalivaret,&$io_pdf);
uf_print_firmas($io_pdf);
++$i;
if($resul->RecordCount()>$i){$io_pdf->ezNewPage();}
}
}
if($lb_valido) // Si no ocurrio ningún error
{
$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
$io_pdf->ezStream(); // Mostramos el reporte
}
else // Si hubo algún error
{
print("");
}
unset($io_pdf);
}
unset($io_report);
unset($io_funciones);
unset($io_fun_cxp);
?>