$ls_subcompromiso=abs($ld_totspg_compromiso-$ls_antcom);
$ls_subcausado=abs($ld_totspg_causado-$ls_antcau);
$ls_subpagar=abs($ld_totspg_por_pagar-$ls_antpagar);
$ls_subpagado=abs($ld_totspg_pagado-$ls_antpagado);
$la_data_subtot2[1]=array('SUB TOTAL CUENTA '.$ls_spg_cuenta,number_format($ls_sub_asignado,2,",","."),
number_format($ls_subaumento ,2,",","."),
number_format($ls_subdisminucion,2,",","."),
number_format($ls_submonto_actual,2,",","."),
number_format($ls_subprecompromiso,2,",","."),
number_format($ls_subcompromiso,2,",","."),
number_format($ls_subcausado,2,",","."),
number_format($ls_subpagado,2,",","."),
number_format($ls_subpagar,2,",","."));
$io_tcpdf->uf_print_total($la_data_subtot2,'0',$y,$ls_mostrar);
$ls_sub_asignado =0;
$ls_subaumento =0;
$ls_subdisminucion =0;
$ls_submonto_actual =0;
$ls_subcompromiso =0;
$ls_subprecompromiso =0;
$ls_subcausado =0;
$ls_subpagar =0;
$ls_subpagado =0;
//-------------------------------------------------------------------------------------------------------
$la_data_subtot[1]=array("TOTAL CUENTA ".$ls_spg_cuenta,number_format($ld_totspg_asignado,2,",","."),
number_format($ld_totspg_aumento ,2,",","."),
number_format($ld_totspg_disminucion,2,",","."),
number_format($ld_totspg_monto_actualizado,2,",","."),
