";
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/logo_mh.jpg',47,552,800,50); // 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(350,542,10,"".$as_titulo.""); // Agregar el t?ulo
$io_pdf->addText(220,530,9,"SEGÚN DECRETO 1.808 REGLAMENTO PARCIAL EN MATERIA DE RETENCIONES DE IMPUESTO SOBRE LA RENTA"); // Agregar el título
$io_pdf->addText(338,519,9,"SEGÚN GACETA N°36.203 DE FECHA 12 DE MAYO DE 1997"); // Agregar el título
$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,&$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(500);
$as_perfiscal=substr($ad_fecrep,3,2).'/'.substr($ad_fecrep,8,2);
$la_data[1]=array('name'=>'PERIODO FISCAL');
$la_data[2]=array('name'=>$as_perfiscal);
$la_columna=array('name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'showLines'=>1, // Mostrar Lieas
'shaded'=>0, // Sombra entre lineas
'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra
'xPos'=>125, // Orientación de la tabla
'width'=>150, // Ancho de la tabla
'maxWidth'=>150); // 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(500,473,100,28);
$io_pdf->addText(505,490,9,"FECHA"); // Agregar el titulo
$io_pdf->addText(500,480,9,$ad_fecrep); // 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 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 O RAZON SOCIAL DEL AGENTE DE RETENCION ');
$la_data[2]=array('name'=>$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'=>450, // Orientacion de la tabla
'width'=>400, // Ancho de la tabla
'maxWidth'=>500,
'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(500,425,450,30);
$io_pdf->addText(505,445,9,"REGISTRO DE INFORMACION FISCAL"); // Agregar el titulo
$io_pdf->addText(505,432,9,$as_rifagenteret); // 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 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'=>'DIRECCION FISCAL DEL AGENTE DE RETENCION ');
$la_data[2]=array('name'=>$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'=>450, // Orientacion de la tabla
'width'=>400, // Ancho de la tabla
'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);
$io_pdf->Rectangle(500,388,450,28);
$io_pdf->addText(503,407,9,"TELEFONO"); // Agregar el titulo
$io_pdf->addText(503,393,9,$as_telagenteret); // 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'=>'NOMBRE O RAZON SOCIAL DEL SUJETO RETENIDO ');
$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'=>450, // Orientacion de la tabla
'width'=>400, // Ancho de la tabla
'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(500,342,450,30);
$io_pdf->addText(505,361,9,"REGISTRO DE INFORMACION FISCAL DEL SUJETO RETENIDO (R.I.F)"); // Agregar el titulo
$io_pdf->addText(505,349,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,&$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,
'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";
$la_columna=array('numope'=>'Oper.N°',
'fecfac'=>'Fecha de Pago o Abono en Cuenta',
'numfac'=>'Factura',
'numref'=>'Control',
'actsuret'=>'Actividad Sujeta a Retencion',
'monto'=>'Monto del Pago o Abono en Cuenta',
'baseimp'=>'Monto Sujeto a Retención',
'porimp'=>'Alicuota',
'sustraendo'=>'Sustraendo',
'totimp'=>'Monto Retenido');
$la_config=array('showHeadings'=>1, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 9, // 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'=>500, // Orientación de la tabla
'cols'=>array('numope'=>array('justification'=>'center','width'=>110),
'fecfac'=>array('justification'=>'center','width'=>120),
'numfac'=>array('justification'=>'center','width'=>60), // Justificacion y ancho de la columna
'numref'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'actsuret'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'monto'=>array('justification'=>'center','width'=>50),
'baseimp'=>array('justification'=>'center','width'=>50),
'porimp'=>array('justification'=>'center','width'=>90),
'sustraendo'=>array('justification'=>'center','width'=>70),
'totimp'=>array('justification'=>'center','width'=>70)));
$io_pdf->ezSetDy(-15);
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
$la_data[1]=array('fecche'=>'','fecfac'=>'','numfac'=>'','numref'=>'','numnotdeb'=>'TOTAL','numnotcre'=>$ai_totalpagado,
'name1'=>$ai_totalbaseimp,'name3'=>$ai_totalporcentaje,'name4'=>'','name5'=>$ai_totalivaret);
$la_columna=array('fecche'=>'','fecfac'=>'','numfac'=>'','numref'=>'','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('fecche'=>array('justification'=>'center','width'=>110),
'fecfac'=>array('justification'=>'center','width'=>120), // Justificacion y ancho de la columna
'numfac'=>array('justification'=>'center','width'=>60), // Justificacion y ancho de la columna
'numref'=>array('justification'=>'center','width'=>80), // Justificacion y ancho de la columna
'numnotdeb'=>array('justification'=>'center','width'=>80),
'numnotcre'=>array('justification'=>'center','width'=>50),
'name1'=>array('justification'=>'center','width'=>50), // Justificacion y ancho de la columna
'name3'=>array('justification'=>'center','width'=>90), // Justificacion y ancho de la columna
'name4'=>array('justification'=>'center','width'=>70),
'name5'=>array('justification'=>'center','width'=>70)));
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
unset($la_data);
unset($la_columna);
unset($la_config);
}// end function uf_print_detalle
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
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
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$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 DEL PROVEEDOR');
$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/class.ezpdf.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('LEGAL','landscape');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(3.5,3,3,3);
$lb_valido=true;
$ls_codigoant="";
for ($li_z=0;($li_z<$li_totrow)&&($lb_valido);$li_z++)
{
uf_print_encabezado_pagina($ls_titulo,$io_pdf);
$ls_numsol=$la_datos[$li_z];
$ls_numcom=$la_datos[$li_z];
$ls_procede=$la_procedencias[$li_z];
if($ls_procede=="SCBBCH")
{
$lb_valido=$io_report->uf_retencionesislr_scb($ls_numsol);
}
else
{
$lb_valido=$io_report->uf_retencionesislr_cxp($ls_numsol);
}
if($lb_valido)
{
$li_totalconiva = 0;
$li_totalbaseimp = 0;
$li_totalivaret = 0;
$li_totalporcentaje= 0;
$li_totalpagado = 0;
$li_total=$io_report->DS->getRowCount("numdoc");
for($li_i=1;($li_i<=$li_total);$li_i++)
{
$ls_tipproben=$io_report->DS->data["tipproben"][$li_i];
if($ls_tipproben=="P")
{
$ls_codigo=$io_report->DS->data["cod_pro"][$li_i];
$ls_nombre=$io_report->DS->data["proveedor"][$li_i];
$ls_rif=$io_report->DS->data["rifpro"][$li_i];
$ls_telefpb=$io_report->DS->data["telpro"][$li_i];
$ls_dirpb=$io_report->DS->data["dirpro"][$li_i];
}
else
{
$ls_codigo=$io_report->DS->data["ced_bene"][$li_i];
$ls_nombre=$io_report->DS->data["beneficiario"][$li_i];
$ls_rif=$io_report->DS->data["rifben"][$li_i];
$ls_telefpb=$io_report->DS->data["telbene"][$li_i];
$ls_dirpb=$io_report->DS->data["dirbene"][$li_i];
}
$ls_numref=$io_report->DS->data["numref"][$li_i];
$ld_fecemidoc=$io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecemidoc"][$li_i]);
$li_mondeducible=$io_report->DS->data["monded"][$li_i];
$li_montotdoc=$io_report->DS->data["montotdoc"][$li_i];
$li_monobjret=$io_report->DS->data["monobjret"][$li_i];
$li_retenido=$io_report->DS->data["retenido"][$li_i];
$li_porcentaje=$io_report->DS->data["porcentaje"][$li_i];
$li_montotdoc=$io_report->DS->data["montotdoc"][$li_i];
$li_moncardoc=$io_report->DS->data["moncardoc"][$li_i];
$li_mondeddoc=$io_report->DS->data["mondeddoc"][$li_i];
$li_totsiniva=($li_montotdoc-$li_moncardoc+$li_mondeddoc);
$li_totconiva=($li_totsiniva+$li_moncardoc);
$ls_numche = $io_report->DS->data["cheque"][$li_i];
$ls_numfac = $io_report->DS->data["numdoc"][$li_i];
$ls_consol = $io_report->DS->data["consol"][$li_i];
$ls_fecche=$io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecche"][$li_i]);
$li_totalbaseimp=$li_totalbaseimp + $li_monobjret;
$li_montotdoc=number_format($li_montotdoc,2,",",".");
$li_monobjret=number_format($li_monobjret,2,',','.');
$li_retenido=number_format($li_retenido,2,',','.');
$li_porcentaje=number_format($li_porcentaje,2,',',',');
$la_data[$li_i]=array('numope'=>$li_i,'fecfac'=>$ld_fecemidoc,'numfac'=>$ls_numfac,
'numref'=>$ls_numref,'actsuret'=>$ls_consol,'monto'=>$li_montotdoc,'baseimp'=>$li_monobjret,
'porimp'=>$li_porcentaje,'sustraendo'=>$li_mondeducible,
'totimp'=>$li_retenido);
}
$li_totconiva=number_format($li_totconiva,2,',',',');
$li_totalconiva=$li_totalconiva + $li_totconiva;
$li_totalporcentaje=$li_totalporcentaje + $li_porcentaje;
$li_totalivaret=$li_totalivaret + $li_retenido;
$li_totalpagado = $li_totalpagado + $li_montotdoc;
$li_totalconiva= number_format($li_totalconiva,2,",",".");
$li_totalbaseimp= number_format($li_totalbaseimp,2,",",".");
$li_totalporcentaje= number_format($li_totalporcentaje,2,',','.');
$li_totalivaret= number_format($li_totalivaret,2,",",".");
$li_totalpagado= number_format($li_totalpagado,2,",",".");
if($ls_codigo!=$ls_codigoant)
{
if($li_z>=1)
{
uf_print_firmas($io_pdf);
$io_pdf->ezNewPage();
}
uf_print_encabezado($ld_fecemidoc,$ls_agente,$ls_nombre,$ls_rifagenteret,$ls_rif,$ls_telagenteret,$ls_diragenteret,&$io_pdf);
$ls_codigoant=$ls_codigo;
}//if
uf_print_detalle($la_data,$li_totalpagado,$li_totalconiva,$li_totalbaseimp,$li_totalporcentaje,$li_totalivaret,&$io_pdf);
}
}
}
uf_print_firmas($io_pdf);
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);
?>