$io_report->rs_data_detalle->MoveNext();
}
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle
uf_print_piecabecera($li_tottra,$li_montot,$io_pdf); // Imprimimos el pie de la cabecera
$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
if($li_i<$li_totrow)
{
$io_pdf->ezNewPage(); // Insertar una nueva página
}
unset($io_cabecera);
unset($la_data);
}
$li_i++;
$io_report->rs_data->MoveNext();
}
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("<script language=JavaScript>");
print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');");
print(" close();");
print("</script>");
}
unset($io_pdf);
}
unset($io_report);
$la_valores["valorasig"]=$la_data_a[$li_s]["valor"];
}
if($li_s<=$li_dedu)
{
$la_valores["denomdedu"]=$la_data_d[$li_s]["denominacion"];
$la_valores["valordedu"]=$la_data_d[$li_s]["valor"];
}
$la_data[$li_s]=$la_valores;
}
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle
$li_totnet=$li_toting-$li_totded;
$li_toting=$io_fun_nomina->uf_formatonumerico($li_toting);
$li_totded=$io_fun_nomina->uf_formatonumerico($li_totded);
$li_totnet=$io_fun_nomina->uf_formatonumerico($li_totnet);
uf_print_pie_cabecera($li_toting,$li_totded,$li_totnet,$ls_codcueban,$io_pdf); // Imprimimos pie de la cabecera
uf_print_firmas($ls_cedper,$ls_nomper,&$io_pdf);
unset($la_data_a);
unset($la_data_d);
unset($la_data);
$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
if($li_i<$li_totrow)
{
$io_pdf->ezNewPage(); // Insertar una nueva página
}
}
$li_i++;
$io_report->rs_data->MoveNext();
}
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
$li_retenido = number_format($io_report->DS->data["retenido"][$li_i], 2, ',', '.');
$li_porcentaje = number_format($io_report->DS->data["porcentaje"][$li_i], 2, ',', '.');
if ($ls_codigo != $ls_codigoant) {
if ($li_z >= 1) {
uf_print_firmas($ls_nombre, $io_pdf);
$io_pdf->ezNewPage();
}
uf_print_encabezado($ls_agente, $ls_nombre, $ls_rif, $ls_nit, $ls_telefono, $ls_direccion, $ls_consol, $io_pdf);
$ls_codigoant = $ls_codigo;
}
uf_print_detalle($ls_numdoc, $ls_consol, $ld_fecemidoc, $li_monobjret, $li_retenido, $li_porcentaje, $ls_numref, $li_montotdoc, $ls_dended, $ls_cheque, $io_pdf);
}
}
}
if ($lb_valido) {
uf_print_firmas($ls_nombre, $io_pdf);
$io_pdf->ezStopPageNumbers(1, 1);
// Detenemos la impresión de los números de página
$io_pdf->ezStream();
// Mostramos el reporte
} else {
print "<script language=JavaScript>";
print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');";
print " close();";
print "</script>";
}
unset($io_pdf);
}
}
unset($io_report);
unset($io_funciones);
$li_totalbonvacper=$io_fun_nomina->uf_formatonumerico($li_totalbonvacper);
$li_totalbonfinper=$io_fun_nomina->uf_formatonumerico($li_totalbonfinper);
$li_totalapoper=$io_fun_nomina->uf_formatonumerico($li_totalapoper);
if($ls_tiporeporte==1)
{
$ls_titulobs="Bs.F.";
}
else
{
$ls_titulobs="Bs.";
}
$la_data[1]=array('total'=>'<b>Total '.$ls_titulobs.'</b>','sueldointegral'=>$li_totalsueintper,'bonovacacional'=>$li_totalbonvacper,
'bonofin'=>$li_totalbonfinper,'aporte'=>$li_totalapoper);
uf_print_totales($la_data,$io_pdf); // Imprimimos el detalle
uf_print_firmas($io_pdf); // Imprimimos el encabezado de la página
unset($la_data);
$io_report->DS->resetds("cedper");
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("<script language=JavaScript>");
print(" alert('Ocurrio un error al generar el reporte. Intente de Nuevo');");
print(" close();");
print("</script>");
}
$ls_numdoc = $ds_voucher->data["numdoc"][$li_i];
$ls_codban = $ds_voucher->data["codban"][$li_i];
$ls_nomban = $class_report->uf_select_data($io_sql,"SELECT nomban FROM scb_banco WHERE codban ='".$ls_codban."' AND codemp='".$ls_codemp."'","nomban");
$ls_ctaban = $ds_voucher->data["ctaban"][$li_i];
$ls_chevau = $ds_voucher->data["chevau"][$li_i];
$ld_fecmov = $io_funciones->uf_convertirfecmostrar($ds_voucher->data["fecmov"][$li_i]);
$ls_nomproben = $ds_voucher->data["nomproben"][$li_i];
$ls_solicitudes=$class_report->uf_select_solicitudes($ls_numdoc,$ls_codban,$ls_ctaban);
$ls_conmov = $ds_voucher->getValue("conmov",$li_i);
$ldec_monret = $ds_voucher->getValue("monret",$li_i);
$ldec_monto = $ds_voucher->getValue("monto",$li_i);
$ldec_total = $ldec_monto-$ldec_monret;
$ls_monto = $numalet->uf_convertir_letra($ldec_total,'','');
uf_print_encabezado_pagina(number_format($ldec_total,2,",","."),$ls_nomproben,$ls_monto,$_SESSION["la_empresa"]["ciuemp"].", ".$ld_fecmov,$io_pdf); // Imprimimos el encabezado de la página
uf_print_cabecera($ls_numdoc,$ls_chevau,$ls_nomban,$ls_ctaban,$ls_nomproben,$ls_solicitudes,$ld_fecmov,$ls_conmov,$ls_monto,$ldec_total,$io_pdf); // Imprimimos la cabecera del registro
uf_print_firmas($io_sql,$class_report,&$io_pdf);
$ds_dt_scg->data=$class_report->uf_cargar_dt_scg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope); // Obtenemos el detalle del reporte
$ds_dt_spg->data=$class_report->uf_cargar_dt_spg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope);
$la_campos=array("scg_cuenta");
$la_monto=array("monto");
$ds_dt_scg->group_by($la_campos,$la_monto,"scg_cuenta");
$la_campos=array("spg_cuenta","estpro");
$ds_dt_spg->group_by($la_campos,$la_monto,"spg_cuenta");
$li_totrow_det=$ds_dt_scg->getRowCount("scg_cuenta");
$li_totrow_spg=$ds_dt_spg->getRowCount("spg_cuenta");
$la_contable = array();
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Hago un ciclo para unir en una sola matriz los detalles de presupuesto y los contables para proceder luego a pintarlos
$li_totrowpre = $li_totrowcon = 0;
$la_datapre='';
if ($li_totrow_det>=$li_totrow_spg)
{
$valor2=$ELEMENTOS2[$j];
$ls_data_a[$j]=array('acc'=>$valor2);
}
uf_print_comentarios ($comensup, $ls_data_o, $ls_data_a,&$io_pdf);
$total=$row["total"];
$rango_act = $row["actuacion"];
}
//---------------------------------------------------------------
$io_pdf->ezNewPage(); // Insertar una nueva página
uf_print_firmas ($total,$rango_act,&$io_pdf);
//---------------------------------------------------------------
//---------------------------------------------------------------
for($li_i=1;$li_i<=$li_total;$li_i++)
{
$io_pdf->ezStopPageNumbers(1,1);
$io_pdf->ezStream(); // Mo
}
}
?>
$li_porimp = 'RETENCION 1 X 1.000';
$li_porcentaje = '0,001';
$li_totimp = $io_report->ds_detalle->data["iva_ret"][$li_i];
$lb_valido = $io_report->uf_select_datos_cheque_retencion($ls_numsop, $ls_nummov, $ld_fecmov, $li_monto);
$li_totalbaseimp = $li_totalbaseimp + $li_baseimp;
$li_totalmontoimp = $li_totalmontoimp + $li_totimp;
$li_baseimp = number_format($li_baseimp, 2, ",", ".");
$li_totimp = number_format($li_totimp, 2, ",", ".");
$li_monto = number_format($li_monto, 2, ",", ".");
$ld_fecmov = $io_funciones->uf_convertirfecmostrar($ld_fecmov);
}
if ($lb_valido) {
$li_totalbaseimp = number_format($li_totalbaseimp, 2, ",", ".");
$li_totalmontoimp = number_format($li_totalmontoimp, 2, ",", ".");
uf_print_detalle($li_monto, $li_baseimp, $li_porcentaje, $li_porimp, $li_totimp, $ls_nummov, $ld_fecmov, &$io_pdf);
uf_print_firmas($ls_agente, &$io_pdf);
}
}
}
$io_report->DS->reset_ds();
if ($li_z < $li_totrow - 1) {
$io_pdf->ezNewPage();
}
}
if ($lb_valido) {
$io_pdf->ezStopPageNumbers(1, 1);
// Detenemos la impresión de los números de página
$io_pdf->ezStream();
// Mostramos el reporte
} else {
print "<script language=JavaScript>";
