$ls_conceptocero=$io_fun_nomina->uf_obtenervalor_get("conceptocero","");
$ls_tituloconcepto=$io_fun_nomina->uf_obtenervalor_get("tituloconcepto","");
$ls_conceptoreporte=$io_fun_nomina->uf_obtenervalor_get("conceptoreporte","");
$ls_conceptop2=$io_fun_nomina->uf_obtenervalor_get("conceptop2","");
$ls_codubifis=$io_fun_nomina->uf_obtenervalor_get("codubifis","");
$ls_codpai=$io_fun_nomina->uf_obtenervalor_get("codpai","");
$ls_codest=$io_fun_nomina->uf_obtenervalor_get("codest","");
$ls_codmun=$io_fun_nomina->uf_obtenervalor_get("codmun","");
$ls_codpar=$io_fun_nomina->uf_obtenervalor_get("codpar","");
$ls_subnomdes=$io_fun_nomina->uf_obtenervalor_get("subnomdes","");
$ls_subnomhas=$io_fun_nomina->uf_obtenervalor_get("subnomhas","");
//--------------------------------------------------------------------------------------------------------------------------------
$lb_valido=uf_insert_seguridad($ls_titulo,$ls_desnom,$ls_periodo,$li_tipo); // Seguridad de Reporte
if($lb_valido)
{
$lb_valido=$io_report->uf_pagonomina_personal_pensionado($ls_codperdes,$ls_codperhas,$ls_conceptocero,$ls_conceptoreporte,$ls_conceptop2,
$ls_codubifis,$ls_codpai,$ls_codest,$ls_codmun,$ls_codpar,$ls_subnomdes,$ls_subnomhas,$ls_orden); // Cargar el DS con los datos de la cabecera del reporte
}
if(($lb_valido==false)||($io_report->rs_data->RecordCount()==0)) // Existe algún error ó no hay registros
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
print("</script>");
}
else // Imprimimos el reporte
{
$io_fun_nomina->uf_loadmodalidad(&$li_len1,&$li_len2,&$li_len3,&$li_len4,&$li_len5,&$ls_titulo);
$lo_encabezado= &$lo_libro->addformat();
$lo_encabezado->set_bold();
$lo_encabezado->set_font("Verdana");
$lo_encabezado->set_align('center');
