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");
if ($ls_tipafeiva=='P')
{
uf_print_cierrecuentas_cargo($li_totalcargos,$ls_cargarcargos,"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_print_servicios($li_totalservicios,$ls_tipconpro,$ls_tipsol);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"S",$ls_tipconpro,$ls_tipsol);
break;