";
print "close();";
print "opener.document.form1.submit();";
print "";
}
ini_set('memory_limit','256M');
ini_set('max_execution_time','0');
//--------------------------------------------------------------------------------------------------------------------------------
function uf_insert_seguridad($as_titulo,$as_desnom,$as_periodo,$ai_tipo)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_insert_seguridad
// Access: private
// Arguments: as_titulo // Arreglo de las variables de seguridad
// as_desnom // Arreglo de las variables de seguridad
// Description: función que guarda la seguridad de quien generó el reporte
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 05/05/2006
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $io_fun_nomina;
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
$ls_descripcion="Generó el Reporte ".$as_titulo.". Para ".$as_desnom.". ".$as_periodo;
if($ai_tipo==1)
{
$lb_valido=$io_fun_nomina->uf_load_seguridad_reporte_nomina("SNO","sigesp_sno_r_recibopago.php",$ls_descripcion,$ls_codnom);
}
else
{
$lb_valido=$io_fun_nomina->uf_load_seguridad_reporte_nomina("SNO","sigesp_sno_r_hrecibopago.php",$ls_descripcion,$ls_codnom);
}
return $lb_valido;
}
//--------------------------------------------------------------------------------------------------------------------------------
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_encabezado_pagina1($as_desnom,$as_periodo,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_encabezado_pagina1
// Access: private
// Arguments: as_titulo // Título del Reporte
// as_desnom // Descripción de la nómina
// as_periodo // Descripción del período
// io_pdf // Instancia de objeto pdf
// Description: función que imprime los encabezados por página
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 05/05/2006
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_encabezado=$io_pdf->openObject();
$io_pdf->saveState();
$io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],50,710,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo
$as_titulo1="INSTITUCION DE PREVISION SOCIAL";
$li_tm=$io_pdf->getTextWidth(8,$as_titulo1);
$io_pdf->addText(150,750,8,$as_titulo1); // Agregar el título
$as_titulo2="DE LAS";
$li_tm=$io_pdf->getTextWidth(8,$as_titulo2);
$io_pdf->addText(200,740,8,$as_titulo2); // Agregar el título
$as_titulo3="FUERZAS ARMADAS";
$li_tm=$io_pdf->getTextWidth(8,$as_titulo3);
$io_pdf->addText(170,730,8,$as_titulo3); // Agregar el título
$li_tm=$io_pdf->getTextWidth(9,$as_periodo);
$tm=306-($li_tm/2);
$io_pdf->addText($tm,710,9,$as_periodo); // Agregar el título
$li_tm=$io_pdf->getTextWidth(9,$as_desnom);
$tm=306-($li_tm/2);
$io_pdf->addText($tm,695,9,"".$as_desnom.""); // Agregar el título
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_encabezado_pagina1
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_cabecera1($as_cedper,$as_nomper,&$io_cabecera,$as_cuenta,$as_banco,$as_ano,$as_categoria,$as_forma,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_cabecera1
// Access: private
// Arguments: as_cedper // Cédula del personal
// as_nomper // Nombre del personal
// as_descar // Decripción del cargo
// io_cabecera // objeto cabecera
// io_pdf // Objeto PDF
// Description: función que imprime la cabecera por personal
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 05/05/2006
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->saveState();
$io_pdf->ezSetDy(-35);
$as_cedper=number_format($as_cedper,0,",",".");
$la_data[1]=array('nombre'=>'DATOS PERSONALES: ','cedula'=>'');
$la_data[2]=array('nombre'=>'PENSIONADO: '.$as_nomper,'cedula'=>'CI. '.$as_cedper);
$la_columna=array('nombre'=>'','cedula'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'xPos'=>315,
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>550, // Ancho de la tabla
'maxWidth'=>550, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('nombre'=>array('justification'=>'left','width'=>320),
'cedula'=>array('justification'=>'left','width'=>240))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
$la_data_c[1]=array('servicio'=>'TIEMPO DE SERVICIO: '.$as_ano.' AÑOS');
$la_columna=array('servicio'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'xPos'=>315,
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>550, // Ancho de la tabla
'maxWidth'=>550, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('servicio'=>array('justification'=>'left','width'=>560))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data_c,$la_columna,'',$la_config);
///--------------------------------------------------------------------------------------------------------------
$la_data_banco[1]=array('banco1'=>'FORMA DE PAGO: ','banco2'=>$as_forma);
$la_data_banco[2]=array('banco1'=>'BANCO: ','banco2'=>$as_banco);
$la_data_banco[3]=array('banco1'=>'CUENTA NRO.','banco2'=>$as_cuenta);
$la_columna=array('banco1'=>'','banco2'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'xPos'=>315,
'fontSize' => 8, // Tamaño de Letras
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>550, // Ancho de la tabla
'maxWidth'=>550, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('banco1'=>array('justification'=>'right','width'=>350),
'banco2'=>array('justification'=>'left','width'=>210))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data_banco,$la_columna,'',$la_config);
//----------------------------------------------------------------------------------------------------------------
$io_pdf->setColor(0,0,0);
$la_data_titulo[1]=array('titulo'=>'NOMINA DE '.strtoupper($as_categoria).': ');
$la_columna=array('titulo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'left','width'=>560))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data_titulo,$la_columna,'',$la_config);
//--------------------------------------------------------------------------------------------------------------------
$io_pdf->addText(40,500,'10','______________________________________________________________________________________________');
$io_pdf->ezSetY(500);
$la_data=array(array('codcon'=>'CODIGO','denomasig'=>'DESCRIPCION DEL CONCEPTO','cuota'=>'CUOTA / PLAZO', 'valorasig'=>'ASIGNACIONES','valordedu'=>'DEDUCCIONES'));
$la_columna=array('codcon'=>'CODIGO',
'denomasig'=>'DESCRIPCION DEL CONCEPTO',
'cuota'=>'CUOTA / PLAZO',
'valorasig'=>'ASIGNACIÓN',
'valordedu'=>'DEDUCCIÓN');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('codcon'=>array('justification'=>'center','width'=>70), // Justificación y ancho de la columna
'denomasig'=>array('justification'=>'center','width'=>140), // Justificación y ancho de la columna
'cuota'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la columna
'valorasig'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna
'valordedu'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
$io_pdf->addText(40,488,'10','______________________________________________________________________________________________');
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_cabecera,'all');
}// end function uf_print_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_detalle($la_data_a,$la_data_d,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_detalle
// Access: private
// Arguments: la_data // arreglo de información
// io_pdf // Objeto PDF
// Description: función que imprime el detalle por personal
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 05/05/2006
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
$io_pdf->ezSety(485);
$la_columna=array('codcon'=>'',
'denomasig'=>'',
'cuota'=>'',
'valorasig'=>'',
'valor'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('codcon'=>array('justification'=>'left','width'=>70), // Justificación y ancho de la columna
'denomasig'=>array('justification'=>'left','width'=>140), // Justificación y ancho de la columna
'cuota'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la columna
'valorasig'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna
'valor'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data_a,$la_columna,'',$la_config);
$la_columna=array('codcon'=>'',
'denomdedu'=>'',
'cuota'=>'',
'valor'=>'',
'valordedu'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 8, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('codcon'=>array('justification'=>'left','width'=>70),
'denomdedu'=>array('justification'=>'left','width'=>140), // Justificación y ancho de la columna
'cuota'=>array('justification'=>'center','width'=>80), // Justificación y ancho de la columna
'valor'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna
'valordedu'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data_d,$la_columna,'',$la_config);
}// end function uf_print_detalle
//--------------------------------------------------------------------------------------------------------------------------------
function uf_print_pie_cabecera1($ai_toting,$ai_totded,$ai_totnet,$as_codcueban,$as_informa,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_pie_cabecera1
// Access: private
// Arguments: ai_toting // Total Ingresos
// ai_totded // Total Deducciones
// ai_totnet // Total Neto
// as_codcueban // Codigo cuenta bancaria
// io_pdf // Instancia de objeto pdf
// Description: función que imprime el fin de la cabecera por personal
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 05/05/2006
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
global $ls_bolivares, $io_monedabsf, $ls_tiporeporte;
$io_piepagina=$io_pdf->openObject(); // Creamos el objeto pie de página
$io_pdf->saveState();
$io_pdf->ezSety(300);
$la_data=array(array('valor'=>'TOTALES: ','valorasig'=>$ai_toting,'valordedu'=>$ai_totded));
$la_columna=array('valor'=>'Columna',
'valorasig'=>'ASIGNACIÓN',
'valordedu'=>'DEDUCCIÓN');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('valor'=>array('justification'=>'right','width'=>290),
'valorasig'=>array('justification'=>'right','width'=>90), // Justificación y ancho de la columna
'valordedu'=>array('justification'=>'right','width'=>90))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
$la_data=array(array('cuenta'=>'', 'neto'=>'Neto a Cobrar '.$ls_bolivares.' '.$ai_totnet));
$la_columna=array('cuenta'=>'',
'neto'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('cuenta'=>array('justification'=>'left','width'=>220), // Justificación y ancho de la columna
'neto'=>array('justification'=>'right','width'=>250))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data,$la_columna,'',$la_config);
$io_pdf->addText(40,300,'10','------------------------------------------------------------------------------------------------------------------------------------------------------------');
$io_pdf->addText(40,302,'10','------------------------------------------------------------------------------------------------------------------------------------------------------------');
$io_pdf->ezSety(250);
$la_informa[1]=array('informa'=>' EL IPSFA INFORMA ');
$la_informa[2]=array('informa'=>'');
$la_informa[3]=array('informa'=>strtoupper($as_informa));
$la_columna=array('informa'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>315,
'cols'=>array('informa'=>array('justification'=>'left','width'=>540))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_informa,$la_columna,'',$la_config);
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_piepagina,'all');
$io_pdf->stopObject($io_piepagina); // Detener el objeto pie de página
}// end function uf_print_pie_cabecera
//--------------------------------------------------------------------------------------------------------------------------------
function uf_detalle_nomina_oficial($sueldo,$prima1,$prima2,$prima3,$prima4,$prima5,$prima6,$porcentaje,$subtotal,
$as_feleypen, $io_pdf)
{
$io_pdf->ezSety(577);
$ls_subtotal2=0;
$ls_subtotal3=0;
$ls_totalbene=0;
$ls_subtotal2= $sueldo + $prima1 + $prima2 + $prima3 + $prima4 + $prima5 + $prima6;
$ls_subtotal3= $ls_subtotal2*($porcentaje/100);
$la_data1[1]=array('sueldo'=>'S. BASICO: '.number_format($sueldo,2,",","."),
'prima1'=>'P. CHOF/T: '.number_format($prima1,2,",","."));
$la_columna=array('sueldo'=>'','prima1'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array( 'sueldo'=>array('justification'=>'left','width'=>300.3),
'prima1'=>array('justification'=>'left','width'=>180.3))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data1,$la_columna,'',$la_config);
$la_data2[1]=array('prima2'=>' P. AÑOS SVC: '.number_format($prima2,2,",","."),
'prima3'=>' P. DESCEND.: '.number_format($prima3,2,",","."));
$la_columna=array('prima2'=>'','prima3'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>'281',
'cols'=>array( 'prima2'=>array('justification'=>'left','width'=>300.3),
'prima3'=>array('justification'=>'left','width'=>180.3))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data2,$la_columna,'',$la_config);
$la_data3[1]=array('prima4'=>'P. NO ASCENSO: '.number_format($prima4,2,",","."),
'prima5'=>'P. ESPECIAL :'.number_format($prima5,2,",","."));
$la_columna=array('prima4'=>'','prima5'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('prima4'=>array('justification'=>'left','width'=>300.3),
'prima5'=>array('justification'=>'left','width'=>180.3))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data3,$la_columna,'',$la_config);
$la_data6[1]=array('prima6'=>'P. PROFESION.: '.number_format($prima6,2,",","."),
'prima7'=>'PENS. RET: '.number_format($ls_subtotal2,2,",",".").' X ('.number_format($porcentaje,2,",",".").' % + 0%)');
$la_columna=array('prima6'=>'','prima7'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('prima6'=>array('justification'=>'left','width'=>300.3),
'prima7'=>array('justification'=>'left','width'=>180.3))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data6,$la_columna,'',$la_config);
$la_data5[1]=array('subtotal'=>'',
'total'=>' TOTAL: '.number_format($ls_subtotal3,2,",","."));
$la_columna=array('subtotal'=>'','total'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'xPos'=>'300',
'cols'=>array('subtotal'=>array('justification'=>'left','width'=>300.3)),
'total'=>array('justification'=>'left','width'=>180.3)); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data5,$la_columna,'',$la_config);
$io_pdf->ezSety(633);
$la_data4[1]=array('porcentaje'=>'PORCEN. PENS :'.$porcentaje.' %');
$la_columna=array('porcentaje'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array( 'porcentaje'=>array('justification'=>'left','width'=>514))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data4,$la_columna,'',$la_config);
$la_data5[1]=array('ley'=>'PENSION. LSSFAN ('.$as_feleypen.')');
$la_columna=array('ley'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'fontSize' => 9, // Tamaño de Letras
'titleFontSize' => 7, // Tamaño de Letras de los títulos
'showLines'=>0, // Mostrar Líneas
'shaded'=>0, // Sombra entre líneas
'width'=>500, // Ancho de la tabla
'maxWidth'=>500, // Ancho Máximo de la tabla
'xOrientation'=>'center', // Orientación de la tabla
'cols'=>array('ley'=>array('justification'=>'left','width'=>514))); // Justificación y ancho de la columna
$io_pdf->ezTable($la_data5,$la_columna,'',$la_config);
}
//--------------------------------------------------------------------------------------------------------------------------
function calcular_anos_servicioas($fecha_ingreso,$fecha_egreso)
{
$c = date("Y",$fecha_ingreso);
$b = date("m",$fecha_ingreso);
$a = date("d",$fecha_ingreso);
$anos = date("Y",$fecha_egreso)-$c;
if(date("m",$fecha_egreso)-$b > 0){
}elseif(date("m",$fecha_egreso)-$b == 0){
if(date("d",$fecha_egreso)-$a <= 0)
{
$anos = $anos-1;
}
}else{
$anos = $anos-1;
}
return $anos;
}
//-------------------------------------------------------------------------------------------------------------------------
//----------------------------------------------------- Instancia de las clases ------------------------------------------------
require_once("../../shared/ezpdf/class.ezpdf.php");
$ls_tiporeporte="0";
$ls_bolivares ="Bs.";
if($_SESSION["la_nomina"]["tiponomina"]=="NORMAL")
{
require_once("sigesp_sno_class_report.php");
$io_report=new sigesp_sno_class_report();
$li_tipo=1;
}
if($_SESSION["la_nomina"]["tiponomina"]=="HISTORICA")
{
require_once("sigesp_sno_class_report_historico.php");
$io_report=new sigesp_sno_class_report_historico();
$li_tipo=2;
}
require_once("../../shared/class_folder/sigesp_c_reconvertir_monedabsf.php");
$io_monedabsf=new sigesp_c_reconvertir_monedabsf();
require_once("../../shared/class_folder/class_funciones.php");
$io_funciones=new class_funciones();
require_once("../class_folder/class_funciones_nomina.php");
$io_fun_nomina=new class_funciones_nomina();
require_once("../../shared/class_folder/class_fecha.php");
$io_fecha=new class_fecha();
//---------------------------------------------------- Parámetros del encabezado -----------------------------------------------
$ls_desnom=$_SESSION["la_nomina"]["desnom"];
$ls_peractnom=$_SESSION["la_nomina"]["peractnom"];
$li_adelanto=$_SESSION["la_nomina"]["adenom"];
$ld_informa=$_SESSION["la_nomina"]["informa"];
$ld_fecdesper=$io_funciones->uf_convertirfecmostrar($_SESSION["la_nomina"]["fecdesper"]);
$ld_fechasper=$io_funciones->uf_convertirfecmostrar($_SESSION["la_nomina"]["fechasper"]);
$ls_titulo="RECIBO DE PAGO";
$ls_periodo="MES: ".$io_fecha->uf_load_nombre_mes(substr($ld_fecdesper,3,2))." / ".substr($ld_fecdesper,6,4)."";
//-------------------------------------------------- Parámetros para Filtar el Reporte -----------------------------------------
$ls_codperdes=$io_fun_nomina->uf_obtenervalor_get("codperdes","");
$ls_codperhas=$io_fun_nomina->uf_obtenervalor_get("codperhas","");
$ls_coduniadm=$io_fun_nomina->uf_obtenervalor_get("coduniadm","");
$ls_conceptocero=$io_fun_nomina->uf_obtenervalor_get("conceptocero","");
$ls_conceptop2=$io_fun_nomina->uf_obtenervalor_get("conceptop2","");
$ls_conceptoreporte=$io_fun_nomina->uf_obtenervalor_get("conceptoreporte","");
$ls_tituloconcepto=$io_fun_nomina->uf_obtenervalor_get("tituloconcepto","");
$ls_quincena=$io_fun_nomina->uf_obtenervalor_get("quincena","-");
$ls_orden=$io_fun_nomina->uf_obtenervalor_get("orden","1");
$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_recibopago_personal($ls_codperdes,$ls_codperhas,$ls_coduniadm,$ls_conceptocero,$ls_conceptop2,
$ls_conceptoreporte,$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("");
}
else // Imprimimos el reporte
{
//error_reporting(E_ALL);
//set_time_limit(1800);
$io_pdf=new Cezpdf('LETTER','portrait'); // Instancia de la clase PDF
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(3,1,1,2); // Configuración de los margenes en centímetros
uf_print_encabezado_pagina1($ls_desnom,$ls_periodo,$io_pdf); // Imprimimos el encabezado de la página
$li_totrow=$io_report->rs_data->RecordCount();
$li_reg=1;
$li_i=1;
while((!$io_report->rs_data->EOF)&&($lb_valido))
{
$la_data_a[1]=array('codcon'=>'',
'denomasig'=>'',
'cuota'=>'',
'valorasig'=>'',
'valor'=>'');
$la_data_d[1]=array('codcon'=>'',
'denomdedu'=>'',
'cuota'=>'',
'valor'=>'',
'valordedu'=>'');
$li_toting=0;
$li_totded=0;
$ls_codper=$io_report->rs_data->fields["codper"];
$ls_cedper=$io_report->rs_data->fields["cedper"];
$ls_nomper=$io_report->rs_data->fields["apeper"].", ".$io_report->rs_data->fields["nomper"];
$ls_descar=$io_report->rs_data->fields["descar"];
$ls_codcueban=$io_report->rs_data->fields["codcueban"];
$li_total=$io_report->rs_data->fields["total"];
$ls_unidad=$io_report->rs_data->fields["desuniadm"];
$ls_banco=$io_report->rs_data->fields["banco"];
$ls_fecha_ingreso=$io_report->rs_data->fields["fecingper"];
$ls_fecha_egreso=$io_report->rs_data->fields["fecegrper"];
$ls_fecingnom=$io_report->rs_data->fields["fecingnom"];
$ls_ano=calcular_anos_servicioas(strtotime($ls_fecha_ingreso),strtotime($ls_fecingnom));
if ($ls_ano<0)
{
$ls_ano=0;
}
$ls_categoria=$io_report->rs_data->fields["descat"];
$ls_tipopago=$io_report->rs_data->fields["tipcuebanper"];
$ls_fecleypen=$io_funciones->uf_convertirfecmostrar($io_report->rs_data->fields["fecleypen"]);
$ls_forma="";
switch($ls_tipopago)
{
case "A":
$ls_forma="CUENTA DE AHORRO";
break;
case "C":
$ls_forma="CUENTA CORRIENTE";
break;
case " ":
break;
}
$io_cabecera=$io_pdf->openObject(); // Creamos el objeto cabecera
if($li_reg==1)
{
uf_print_cabecera1($ls_cedper,$ls_nomper,$io_cabecera,$ls_codcueban,$ls_banco,$ls_ano,$ls_categoria,$ls_forma,$io_pdf); // Imprimimos la cabecera del registro
}
$lb_valido=$io_report->uf_recibopago_conceptopersonal($ls_codper,$ls_conceptocero,$ls_conceptop2,
$ls_conceptoreporte,$ls_tituloconcepto,$ls_quincena); // Obtenemos el detalle del reporte
if($lb_valido)
{
$li_totrow_det=$io_report->rs_data_detalle->RecordCount();
$li_asig=0;
$li_dedu=0;
$ls_cuota="";
if($li_adelanto==1)// Utiliza el adelanto de quincena
{
switch($ls_quincena)
{
case "1": // primera quincena;
$li_asig=$li_asig+1;
$ls_codconc="----------";
$ls_nomcon="ADELANTO 1ra QUINCENA";
$li_valsal=round($li_total/2,2);
$li_toting=$li_toting+$li_valsal;
$li_valsal=$io_fun_nomina->uf_formatonumerico($li_valsal);
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_a[$li_asig]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
break;
case "2": // segunda quincena;
while(!$io_report->rs_data_detalle->EOF)
{
$ls_tipsal=rtrim($io_report->rs_data_detalle->fields["tipsal"]);
if(($ls_tipsal=="A") || ($ls_tipsal=="V1") || ($ls_tipsal=="V2") || ($ls_tipsal=="R")) // Buscamos las asignaciones
{
$li_asig=$li_asig+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
if ($ls_tipsal!="R")
{
$li_toting=$li_toting+abs($io_report->rs_data_detalle->fields["valsal"]);
}
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->DS_detalle->data["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_a[$li_asig]=array('denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
else // Buscamos las deducciones y aportes
{
$li_dedu=$li_dedu+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
$li_totded=$li_totded+abs($io_report->rs_data_detalle->fields["valsal"]);
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_d[$li_dedu]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
$io_report->rs_data_detalle->MoveNext();
}
$li_dedu=$li_dedu+1;
$ls_codconc="----------";
$ls_nomcon="ADELANTO 1ra QUINCENA";
$li_valsal=round($li_total/2,2);
$li_totded=$li_totded+$li_valsal;
$li_valsal=$io_fun_nomina->uf_formatonumerico($li_valsal);
$la_data_d[$li_dedu]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
break;
case "3": // Mes Completo;
while(!$io_report->rs_data_detalle->EOF)
{
$ls_tipsal=rtrim($io_report->rs_data_detalle->fields["tipsal"]);
if(($ls_tipsal=="A") || ($ls_tipsal=="V1") || ($ls_tipsal=="V2") || ($ls_tipsal=="R")) // Buscamos las asignaciones
{
$li_asig=$li_asig+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
if ($ls_tipsal!="R")
{
$li_toting=$li_toting+abs($io_report->rs_data_detalle->fields["valsal"]);
}
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_a[$li_asig]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
else // Buscamos las deducciones y aportes
{
$li_dedu=$li_dedu+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
$li_totded=$li_totded+abs($io_report->rs_data_detalle->fields["valsal"]);
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_d[$li_dedu]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
$io_report->rs_data_detalle->MoveNext();
}
break;
}
}
else// No utiliza adelanto de quincena
{
while(!$io_report->rs_data_detalle->EOF)
{
$ls_tipsal=rtrim($io_report->rs_data_detalle->fields["tipsal"]);
if(($ls_tipsal=="A") || ($ls_tipsal=="V1") || ($ls_tipsal=="V2") || ($ls_tipsal=="R")) // Buscamos las asignaciones
{
$li_asig=$li_asig+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
if ($ls_tipsal!="R")
{
$li_toting=$li_toting+abs($io_report->rs_data_detalle->fields["valsal"]);
}
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_a[$li_asig]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
else // Buscamos las deducciones y aportes
{
$li_dedu=$li_dedu+1;
$ls_codconc=$io_report->rs_data_detalle->fields["codconc"];
$ls_nomcon=$io_report->rs_data_detalle->fields["nomcon"];
$li_totded=$li_totded+abs($io_report->rs_data_detalle->fields["valsal"]);
$li_valsal=$io_fun_nomina->uf_formatonumerico(abs($io_report->rs_data_detalle->fields["valsal"]));
$ls_repconsunicon=$io_report->rs_data_detalle->fields["repconsunicon"];
$ls_consunicon=$io_report->rs_data_detalle->fields["consunicon"];
$ls_cuota="";
if (($ls_repconsunicon=='1')&&($ls_consunicon!=""))
{
$io_report->uf_buscar_cuotas($ls_consunicon,$ls_codper,$ls_cuota);
}
$la_data_d[$li_dedu]=array('codcon'=>$ls_codconc,'denominacion'=>$ls_nomcon,'valor'=>$li_valsal,'cuota'=>$ls_cuota);
}
$io_report->rs_data_detalle->MoveNext();
}
}
if($li_asig<=$li_dedu)
{
$li_total=$li_dedu;
}
else
{
$li_total=$li_asig;
}
for($li_s=1;$li_s<=$li_total;$li_s++)
{
$la_valores_a["codcon"]="";
$la_valores_a["denomasig"]="";
$la_valores_a["valorasig"]="";
$la_valores_a["valor"]="";
$la_valores_a["cuota"]="";
$la_valores_d["codcon"]="";
$la_valores_d["denomdedu"]="";
$la_valores_d["valordedu"]="";
$la_valores_d["valor"]="";
$la_valores_d["cuota"]="";
if($li_s<=$li_asig)
{
$la_valores_a["codcon"]=$la_data_a[$li_s]["codcon"];
$la_valores_a["denomasig"]=$la_data_a[$li_s]["denominacion"];
$la_valores_a["valorasig"]=$la_data_a[$li_s]["valor"];
$la_valores_a["valor"]="";
$la_valores_a["cuota"]=$la_data_a[$li_s]["cuota"];
$la_data_a[$li_s]=$la_valores_a;
}
if($li_s<=$li_dedu)
{
$la_valores_d["codcon"]=$la_data_d[$li_s]["codcon"];
$la_valores_d["denomdedu"]=$la_data_d[$li_s]["denominacion"];
$la_valores_d["valordedu"]=$la_data_d[$li_s]["valor"];
$la_valores_d["valor"]="";
$la_valores_d["cuota"]=$la_data_d[$li_s]["cuota"];
$la_data_d[$li_s]=$la_valores_d;
}
else
{
$la_valores_a["codcon"]="";
$la_valores_a["denomasig"]="";
$la_valores_a["valorasig"]="";
$la_valores_a["valor"]="";
$la_valores_a["cuota"]="";
$la_valores_d["codcon"]="";
$la_valores_d["denomdedu"]="";
$la_valores_d["valordedu"]="";
$la_valores_d["valor"]="";
$la_valores_d["cuota"]="";
$la_data_d[$li_s]=$la_valores_d;
}
}
$lb_valido1=$io_report->uf_recibo_nomina_oficiales($ls_codper);
if ($lb_valido1)
{
$li_nom=$io_report->rs_data_detalle->RecordCount();
while((!$io_report->rs_data_detalle->EOF)&&($lb_valido))
{
$ls_sueldob=$io_report->rs_data_detalle->fields["suebasper"];
$ls_prichof=$io_report->rs_data_detalle->fields["pritraper"];
$ls_prianoserv=$io_report->rs_data_detalle->fields["prianoserper"];
$ls_prides=$io_report->rs_data_detalle->fields["pridesper"];
$ls_noasc=$io_report->rs_data_detalle->fields["prinoascper"];
$ls_priesp=$io_report->rs_data_detalle->fields["priespper"];
$ls_priprof=$io_report->rs_data_detalle->fields["priproper"];
$ls_subtotal=$io_report->rs_data_detalle->fields["subtotper"];
$ls_porcentaje=$io_report->rs_data_detalle->fields["porpenper"];
$io_report->rs_data_detalle->MoveNext();
}
if ($li_nom>0)
{
uf_detalle_nomina_oficial($ls_sueldob,
$ls_prichof,
$ls_prianoserv,
$ls_prides,
$ls_noasc,
$ls_priesp,
$ls_priprof,
$ls_porcentaje,
$ls_subtotal,
$ls_fecleypen,
$io_pdf);
}
else
{
uf_detalle_nomina_oficial(0,0,0,0,0,0,0,0,0,0,$io_pdf);
}
}
else
{
uf_detalle_nomina_oficial(0,0,0,0,0,0,0,0,0,0,$io_pdf);
}
uf_print_detalle($la_data_a,$la_data_d,$io_pdf); // Imprimimos el detalle
$li_totnet=$li_toting-$li_totded;
$li_toting=$io_fun_nomina->uf_formatonumerico($li_toting);
$li_totded=$io_fun_nomina->uf_formatonumerico($li_totded);
$li_totnet=$io_fun_nomina->uf_formatonumerico($li_totnet);
if($li_reg==1)
{
uf_print_pie_cabecera1($li_toting,$li_totded,$li_totnet,$ls_codcueban,$ld_informa,$io_pdf); // Imprimimos pie de la cabecera
}
unset($la_data_a);
unset($la_data_d);
unset($la_data);
$io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera
if(($li_i<$li_totrow))
{
$io_pdf->ezNewPage(); // Insertar una nueva página
$li_reg=1;
}
else
{
$li_reg=2;
}
}
$li_i++;
$io_report->rs_data->MoveNext();
}
if($lb_valido) // Si no ocurrio ningún error
{
$io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página
$io_pdf->ezStream(); // Mostramos el reporte
}
else // Si hubo algún error
{
print("");
}
unset($io_pdf);
}
unset($io_report);
unset($io_funciones);
unset($io_fun_nomina);
?>