$ls_titulo="Bien o Material";
uf_load_bienes($ls_numordcom,$ls_tipsol);
uf_load_creditos($ls_titulo,$ls_numordcom,"B",$ls_tipsol,"B");
uf_load_cuentas($ls_numordcom,"B",$ls_tipsol);
if ($ls_tipafeiva=='P')
{
uf_load_cuentas_cargo($ls_numordcom,"B",$ls_tipsol);
}
uf_load_total($li_subtotal,$li_cargos,$li_total);
break;
case "LOADSERVICIOS":
$ls_titulo="Servicios";
uf_load_servicios($ls_numordcom,$ls_tipsol);
uf_load_creditos($ls_titulo,$ls_numordcom,"S",$ls_tipsol,"S");
uf_load_cuentas($ls_numordcom,"S",$ls_tipsol);
if ($ls_tipafeiva=='P')
{
uf_load_cuentas_cargo($ls_numordcom,"S",$ls_tipsol);
}
uf_load_total($li_subtotal,$li_cargos,$li_total);
break;
case "AGREGARBIENES":
$ls_titulo="Bien o Material";
uf_print_bienes($li_totalbienes,$ls_tipconpro,$ls_tipsol);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"B",$ls_tipconpro,$ls_tipsol);
break;
case "AGREGARSERVICIOS":
$ls_titulo="Servicios";
uf_load_cuentas_cargo($ls_numsol,"S");
}
uf_load_total($li_subtotal,$li_cargos,$li_total);
break;
case "AGREGARCONCEPTOS":
$ls_titulo="Conceptos";
uf_print_conceptos($li_totalconceptos);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"O");
break;
case "LOADCONCEPTOS":
$ls_titulo="Conceptos";
uf_load_conceptos($ls_numsol);
uf_load_creditos($ls_titulo,$ls_numsol,"O");
uf_load_cuentas($ls_numsol,"O");
if ($ls_tipafeiva=='P')
{
uf_load_cuentas_cargo($ls_numsol,"O");
}
uf_load_total($li_subtotal,$li_cargos,$li_total);
break;
case "AGREGARCUENTAS":
switch(substr($ls_tipo,3,1))
{
case "B": // Bienes
$ls_titulo="Bien o Material";
uf_print_bienes($li_totalbienes);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"B");
uf_print_cierrecuentas_gasto($li_totalbienes,"B");
$io_pdf->stopObject($io_clasificacion); // Detener el objeto cabecera
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////// GASTOS DEL PERSONAL ///////////////////////////////////////////////////////////////////
$la_cuentas[1]="40101";
$la_cuentas[2]="40102";
$la_cuentas[3]="40103";
$la_cuentas[4]="40104";
$la_cuentas[5]="40105";
$la_cuentas[6]="40106";
$la_cuentas[7]="40107";
$la_cuentas[8]="40108";
$la_cuentas[9]="40109";
$la_cuentas[10]="40196";
$la_cuentas[11]="40197";
uf_load_cuentas();
$li_total_programado=0;
$li_total_real=0;
for($li_i=1;($li_i<=11)&&($lb_valido);$li_i++)
{
$ls_cuenta=$la_cuentas[$li_i];
$lb_valido=$io_report->uf_comparado0506_gasto_real($ls_rango,$ls_cuenta);
$li_totrow=$io_report->DS_detalle->getRowCount("anocur");
$li_total_cuenta=0;
$li_total_otros=0;
for($li_j=1;(($li_j<=$li_totrow)&&($lb_valido));$li_j++)
{
$ls_cueprecon=substr($io_report->DS_detalle->data["cuenta"][$li_j],0,7);
$li_real=abs($io_report->DS_detalle->data["total"][$li_j]);
$li_columna = $io_report->DS->find("codigo",$ls_cueprecon."00");
if($li_columna<>0)