if($ls_operacion=="H")
{
$li_debe=0;
$li_haber=abs($io_report->DS_detalle->data["monto"][$li_i]);
$li_totalcontadebe=$li_totalcontadebe+$li_debe;
$li_totalcontahaber=$li_totalcontahaber+$li_haber;
$li_debe=$io_fun_nomina->uf_formatonumerico($li_debe);
$li_haber=$io_fun_nomina->uf_formatonumerico($li_haber);
$la_data[$li_i]=array('cuenta'=>$ls_cueconpatcon,'denominacion'=>$ls_denominacion,'debe'=>$li_debe,'haber'=>$li_haber);
}
}
$io_report->DS_detalle->resetds("sc_cuenta");
if($li_totrow>0)
{
uf_print_cabecera_contable($io_pdf);// Imprimimos la cabecera contable
uf_print_detalle_contable($la_data,$io_pdf); // Imprimimos el detalle contable
$li_totalcontadebe=$io_fun_nomina->uf_formatonumerico($li_totalcontadebe);
$li_totalcontahaber=$io_fun_nomina->uf_formatonumerico($li_totalcontahaber);
uf_print_pie_cabecera_contable($li_totalcontadebe,$li_totalcontahaber,$io_pdf); // imprimimos los totales contable
uf_print_firmas($io_pdf);
unset($la_data);
}
//-------------------------------------------------------------------------------------------------------------------------------
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>");
{
$ls_debhab=$ds_dt_scg->getValue("debhab",$li_a);
if($ls_debhab=="D")
{
$ldec_mondeb=number_format($ds_dt_scg->getValue("monto",$li_a),2,",",".");
$ldec_monhab="";
}
else
{
$ldec_monhab=number_format($ds_dt_scg->getValue("monto",$li_a),2,",",".");
$ldec_mondeb="";
}
$la_data[$li_a]=array('cuenta'=>$ds_dt_scg->getValue("scg_cuenta",$li_a),'debe'=>$ldec_mondeb,
'haber'=>$ldec_monhab, 'descripcion'=>$ds_dt_scg->getValue("desmov",$li_a));
}
uf_print_detalle_contable($la_data,$io_pdf);
unset($la_data);
}
//Obtengo el detalle presupuestario del movimiento.
unset($ds_dt_spg->data);
$ds_dt_spg->data=$class_report->uf_cargar_dt_spg_op($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope,$ls_estmov);
$li_totspg=$ds_dt_spg->getRowCount("spg_cuenta");
if($li_totspg>0)
{
for($li_b=1;$li_b<=$li_totspg;$li_b++)
{
$la_data[$li_b]=array('programatica'=>$ds_dt_spg->getValue("estpro",$li_b),
'cuenta'=>$ds_dt_spg->getValue("spg_cuenta",$li_b),
'monto'=>number_format($ds_dt_spg->getValue("monto",$li_b),2,",","."));
}
uf_print_detalle_presupuestario($la_data,$io_pdf);