case "S": // Servicios
$ls_titulo="Servicios";
uf_print_servicios($li_totalservicios);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"S");
uf_print_cierrecuentas_gasto($li_totalservicios,"S");
if ($ls_tipafeiva=='P')
{
uf_print_cierrecuentas_cargo($li_totalcargos,$ls_cargarcargos,"S");
}
uf_print_total($li_totalservicios,"S");
break;
case "O": // Conceptos
$ls_titulo="Conceptos";
uf_print_conceptos($li_totalconceptos);
uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"O");
uf_print_cierrecuentas_gasto($li_totalconceptos,"O");
if ($ls_tipafeiva=='P')
{
uf_print_cierrecuentas_cargo($li_totalcargos,$ls_cargarcargos,"O");
}
uf_print_total($li_totalconceptos,"O");
break;
}
break;
break;
}
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_print_bienes($ai_total)
$io_xml=new class_funciones_xml();
require_once("class_funciones_sep.php");
$io_funciones_sep=new class_funciones_sep();
$ruta = '../../';
require_once("../../shared/class_folder/sigesp_conexiones.php");
$io_conexiones=new conexiones();
$io_conexiones->decodificar_post();
// tipo de SEP si es de BIENES ó de SERVICIOS
$ls_rutaarchivo=$io_funciones_sep->uf_obtenervalor("rutaarchivo","");
// proceso a ejecutar
$ls_proceso=$io_funciones_sep->uf_obtenervalor("proceso","");
switch($ls_proceso)
{
case "BUSCAR":
uf_print_creditos($ls_rutaarchivo);
break;
}
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_print_creditos($as_rutaarchivo)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_creditos
// Access: private
// Arguments: as_rutaarchivo // Ruta donde se van a leer los archivos xml
// Description: Método que busca los archivos xml y los lee
// Creado Por: Ing. Yesenia Moreno de Lang
// Fecha Creación: 23/07/2008 Fecha Última Modificación :
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_grid, $io_funciones_sep, $io_xml;
{
$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);
uf_print_cierrecuentas_gasto($li_totalbienes,"B");
if ($ls_tipafeiva=='P')
{
uf_print_cierrecuentas_cargo($li_totalcargos,$ls_cargarcargos,"B",$ls_tipconpro);
}
uf_print_total($li_totalbienes,$li_totalcargos,"B");
}
else
{
$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);
uf_print_cierrecuentas_gasto($li_totalservicios,"S");
if ($ls_tipafeiva=='P')
{
uf_print_cierrecuentas_cargo($li_totalcargos,$ls_cargarcargos,"S",$ls_tipconpro);
}
uf_print_total($li_totalservicios,$li_totalcargos,"S");
}
break;
}
//-----------------------------------------------------------------------------------------------------------------------------------
function uf_print_bienes($ai_totalbienes,$as_tipconpro,$as_tipsol)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_bienes
// Access: private
