"; print "close();"; print "opener.document.form1.submit();"; print ""; } ini_set('memory_limit','1024M'); ini_set('max_execution_time','0'); //-------------------------------------------------------------------------------------------------------------------------------- function uf_insert_seguridad($as_titulo,$as_titulo2,$as_desnom,$as_periodo,$ai_tipo) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_insert_seguridad // Access: private // Arguments: as_titulo // Título del reporte // as_desnom // Descripción de la nómina // as_periodo // Descripción del período // Description: función que guarda la seguridad de quien generó el reporte // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_fun_nomina; $ls_codnom=$_SESSION["la_nomina"]["codnom"]; $ls_descripcion="Generó el Reporte ".$as_titulo." ".$as_titulo2.". Para ".$as_desnom.". ".$as_periodo; if($ai_tipo==1) { $lb_valido=$io_fun_nomina->uf_load_seguridad_reporte_nomina("SNO","sigesp_sno_r_disponibilidad.php",$ls_descripcion,$ls_codnom); } return $lb_valido; } //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina_general($as_titulo,$as_titulo2,$as_desnom,$as_periodo,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_encabezadopagina // Access: private // Arguments: as_titulo // Título del Reporte // as_titulo2 // 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: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->line(50,40,555,40); $io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],50,720,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo $li_tm=$io_pdf->getTextWidth(11,$as_titulo); $tm=306-($li_tm/2); $io_pdf->addText($tm,730,11,$as_titulo); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_titulo2); $tm=306-($li_tm/2); $io_pdf->addText($tm,720,11,$as_titulo2); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_periodo); $tm=306-($li_tm/2); $io_pdf->addText($tm,710,11,$as_periodo); // Agregar el título $li_tm=$io_pdf->getTextWidth(10,$as_desnom); $tm=306-($li_tm/2); $io_pdf->addText($tm,700,10,$as_desnom); // Agregar el título $io_pdf->addText(500,750,8,date("d/m/Y")); // Agregar la Fecha $io_pdf->addText(506,743,7,date("h:i a")); // Agregar la Hora $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_encabezadopagina //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_encabezado_pagina($as_titulo,$as_titulo2,$as_titulo3,$as_titulo4,$as_desnom,$as_periodo,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_encabezadopagina // Access: private // Arguments: as_titulo // Título del Reporte // as_titulo2 // 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: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_encabezado=$io_pdf->openObject(); $io_pdf->saveState(); $io_pdf->line(50,40,555,40); $io_pdf->addJpegFromFile('../../shared/imagebank/'.$_SESSION["ls_logo"],50,720,$_SESSION["ls_width"],$_SESSION["ls_height"]); // Agregar Logo $li_tm=$io_pdf->getTextWidth(11,$as_titulo); $tm=306-($li_tm/2); $io_pdf->addText($tm,730,11,$as_titulo); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_titulo2); $tm=306-($li_tm/2); $io_pdf->addText($tm,720,11,$as_titulo2); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_titulo3); $tm=306-($li_tm/2); $io_pdf->addText($tm,710,11,$as_titulo3); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_titulo4); $tm=306-($li_tm/2); $io_pdf->addText($tm,700,11,$as_titulo4); // Agregar el título $li_tm=$io_pdf->getTextWidth(11,$as_periodo); $tm=306-($li_tm/2); $io_pdf->addText($tm,688,11,$as_periodo); // Agregar el título $li_tm=$io_pdf->getTextWidth(10,$as_desnom); $tm=306-($li_tm/2); $io_pdf->addText($tm,678,10,$as_desnom); // Agregar el título $io_pdf->addText(500,750,8,date("d/m/Y")); // Agregar la Fecha $io_pdf->addText(506,743,7,date("h:i a")); // Agregar la Hora $io_pdf->restoreState(); $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); }// end function uf_print_encabezadopagina //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_cabecera_presupuesto(&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_cabecera_presupuesto // Access: private // Arguments: io_pdf // Instancia de objeto pdf // Description: función que imprime la cabecera para el detalle presupuestario // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetY(670); $la_data=array(array('name'=>'Disponibilidad')); $la_columna=array('name'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 10, // Tamaño de Letras 'showLines'=>0, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol2'=>array(0.9,0.9,0.9), // Color de la sombra 'xOrientation'=>'center', // Orientación de la tabla 'width'=>550, // Ancho de la tabla 'maxWidth'=>550); // Ancho Máximo de la tabla $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_cabecera_presupuesto //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_presupuesto($la_data,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_presupuesto // Access: private // Arguments: la_data // arreglo de información // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle presupuestario // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-3); $la_columna=array('estructura'=>'Estrutura','cuenta'=>'Cuenta','denominacion'=>'Denominación', 'gastonomina'=>'Gasto Nómina','disponible'=>'Disponibilidad','saldo'=>'Saldo'); $la_config=array('showHeadings'=>1, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // 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 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('estructura'=>array('justification'=>'center','width'=>93), // Justificación y ancho de la columna 'cuenta'=>array('justification'=>'center','width'=>60), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>202), // Justificación y ancho de la columna 'gastonomina'=>array('justification'=>'center','width'=>65), // Justificación y ancho de la columna 'disponible'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna 'saldo'=>array('justification'=>'right','width'=>60))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_detalle_presupuesto //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalle_presupuesto_general($la_data,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalle_presupuesto // Access: private // Arguments: la_data // arreglo de información // io_pdf // Instancia de objeto pdf // Description: función que imprime el detalle presupuestario // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $io_pdf->ezSetDy(-3); $la_columna=array('estructura'=>'Estrutura','cuenta'=>'Cuenta','denominacion'=>'Denominación', 'gastonomina'=>'Gasto Nómina','disponible'=>'Disponibilidad','saldo'=>'Saldo'); $la_config=array('showHeadings'=>1, // Mostrar encabezados 'fontSize' => 8, // Tamaño de Letras 'titleFontSize' => 9, // Tamaño de Letras de los títulos 'showLines'=>1, // 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 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'cols'=>array('estructura'=>array('justification'=>'center','width'=>93), // Justificación y ancho de la columna 'cuenta'=>array('justification'=>'center','width'=>60), // Justificación y ancho de la columna 'denominacion'=>array('justification'=>'left','width'=>202), // Justificación y ancho de la columna 'gastonomina'=>array('justification'=>'center','width'=>65), // Justificación y ancho de la columna 'disponible'=>array('justification'=>'right','width'=>70), // Justificación y ancho de la columna 'saldo'=>array('justification'=>'right','width'=>60))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_detalle_presupuesto //-------------------------------------------------------------------------------------------------------------------------------- //-------------------------------------------------------------------------------------------------------------------------------- function uf_print_pie_cabecera_presupuesto($ai_total,$ai_totalpersonal,&$io_pdf) { ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_pie_cabecera_presupuesto // Access: private // Arguments: ai_total // Total del presupuesto // io_pdf // Instancia de objeto pdf // Description: función que imprime el fin de la cabecera para el detalle presupuestario // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 11/05/2006 ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_bolivares; $la_data=array(array('name'=>'Total ','total'=>$ai_total)); $la_columna=array('name'=>'','total'=>''); $la_config=array('showHeadings'=>0, // Mostrar encabezados 'fontSize' => 9, // Tamaño de Letras 'showLines'=>1, // Mostrar Líneas 'shaded'=>2, // Sombra entre líneas 'shadeCol'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'shadeCol2'=>array((249/255),(249/255),(249/255)), // Color de la sombra 'outerLineThickness'=>0.5, 'innerLineThickness' =>0.5, 'width'=>550, // Ancho Máximo de la tabla 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('name'=>array('justification'=>'right','width'=>470), // Justificación y ancho de la columna 'total'=>array('justification'=>'right','width'=>80))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_pie_cabecera_presupuesto //-------------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------- Instancia de las clases ------------------------------------------------ require_once("../../shared/ezpdf/class.ezpdf.php"); $li_tipo=0; $ls_bolivares=""; if($_SESSION["la_nomina"]["tiponomina"]=="NORMAL") { require_once("sigesp_sno_class_report_contables.php"); $io_report=new sigesp_sno_class_report_contables(); $li_tipo=1; } if($_SESSION["la_nomina"]["tiponomina"]=="HISTORICA") { require_once("sigesp_sno_class_report_historico_contables.php"); $io_report=new sigesp_sno_class_report_historico_contables(); $li_tipo=2; } $ls_bolivares ="Bs."; 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(); //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_desnom=$_SESSION["la_nomina"]["desnom"]; $ls_peractnom=$_SESSION["la_nomina"]["peractnom"]; $ls_conpronom=$_SESSION["la_nomina"]["conpronom"]; $ls_tipo=$io_fun_nomina->uf_obtenervalor_get("tipo",""); $ls_codestpro1=str_pad(trim($io_fun_nomina->uf_obtenervalor_get("codestpro1","")),25,"0",0); $ls_codestpro2=str_pad(trim($io_fun_nomina->uf_obtenervalor_get("codestpro2","")),25,"0",0); $ls_codestpro3=str_pad(trim($io_fun_nomina->uf_obtenervalor_get("codestpro3","")),25,"0",0); $ls_codestpro4=str_pad(trim($io_fun_nomina->uf_obtenervalor_get("codestpro4","")),25,"0",0); $ls_codestpro5=str_pad(trim($io_fun_nomina->uf_obtenervalor_get("codestpro5","")),25,"0",0); $ls_estcla=trim($io_fun_nomina->uf_obtenervalor_get("estcla","")); $ls_subnomdes=$io_fun_nomina->uf_obtenervalor_get("subnomdes",""); $ls_subnomhas=$io_fun_nomina->uf_obtenervalor_get("subnomhas",""); $ld_fecdesper=$io_funciones->uf_convertirfecmostrar($_SESSION["la_nomina"]["fecdesper"]); $ld_fechasper=$io_funciones->uf_convertirfecmostrar($_SESSION["la_nomina"]["fechasper"]); $li_len1=0; $li_len2=0; $li_len3=0; $li_len4=0; $li_len5=0; $ls_tituloprog=""; $ls_programatica=""; $io_fun_nomina->uf_loadmodalidad($li_len1,$li_len2,$li_len3,$li_len4,$li_len5,$ls_tituloprog); $io_fun_nomina->uf_formatoprogramatica($ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5,$ls_programatica); $ls_titulo="Resumen Contable"; $ls_titulo2="Disponibilidad Presupuestaria"; $ls_titulo3="".$ls_tituloprog.""; $ls_titulo4="".$ls_programatica.""; $ls_periodo="Período Nro ".$ls_peractnom.", ".$ld_fecdesper." - ".$ld_fechasper.""; //-------------------------------------------------------------------------------------------------------------------------------- $lb_valido=uf_insert_seguridad($ls_titulo,$ls_titulo2,$ls_desnom,$ls_periodo,$li_tipo); // Seguridad de Reporte if($lb_valido) // Buscamos la información que afecta el presupuesto { switch($ls_conpronom) { case "1": $lb_valido=$io_report->uf_contableconceptos_especifico_presupuesto_proyecto($ls_codestpro1,$ls_codestpro2,$ls_codestpro3, $ls_codestpro4,$ls_codestpro5,$ls_estcla, $ls_subnomdes,$ls_subnomhas); break; default: if ($ls_tipo==1) { $lb_valido=$io_report->uf_validar_cuentas_disponibilidad_general($ls_desnom); } else { $lb_valido=$io_report->uf_validar_cuentas_disponibilidad($ls_codestpro1,$ls_codestpro2,$ls_codestpro3, $ls_codestpro4,$ls_codestpro5,$ls_estcla, $ls_subnomdes,$ls_subnomhas); } break; } } if($lb_valido==false) // 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.5,2.5,3,3); // Configuración de los margenes en centímetros if ($ls_tipo==1) { uf_print_encabezado_pagina_general($ls_titulo,$ls_titulo2,$ls_desnom,$ls_periodo,$io_pdf); } else { uf_print_encabezado_pagina($ls_titulo,$ls_titulo2,$ls_titulo3,$ls_titulo4,$ls_desnom,$ls_periodo,$io_pdf); // Imprimimos el encabezado de la página } $io_pdf->ezStartPageNumbers(550,50,10,'','',1); // Insertar el número de página //--------------------------------------------- Imprimir el detalle Presupuestario------------------------------------------------ $li_totrow=$io_report->DS->getRowCount("cueprecon"); if($li_totrow==0) // Existe algún error ó no hay registros { print(""); } $li_totalpresupuesto=0; $li_totalpersonal=0; $ls_codemp=$_SESSION["la_empresa"]["codemp"]; require_once("../../shared/class_folder/class_fecha.php"); require_once("../../shared/class_folder/class_sigesp_int.php"); require_once("../../shared/class_folder/class_sigesp_int_scg.php"); require_once("../../shared/class_folder/class_sigesp_int_spg.php"); $io_intspg=new class_sigesp_int_spg(); $_SESSION["fechacomprobante"]=date('Y-m-d'); $li_check=0; for($li_i=1;(($li_i<=$li_totrow)&&($lb_valido));$li_i++) { $ls_programatica=$io_report->DS->data["codestpro1"][$li_i].$io_report->DS->data["codestpro2"][$li_i]. $io_report->DS->data["codestpro3"][$li_i].$io_report->DS->data["codestpro4"][$li_i]. $io_report->DS->data["codestpro5"][$li_i]; $ls_cueprecon=$io_report->DS->data["cueprecon"][$li_i]; $ls_denominacion=$io_report->DS->data["denominacion"][$li_i]; $li_total_concepto=$io_report->DS->data["total"][$li_i]; $ls_estclaconcepto=$io_report->DS->data["estcla"][$li_i]; $ls_codestpro1=substr($ls_programatica,0,25); $ls_codestpro2=substr($ls_programatica,25,25); $ls_codestpro3=substr($ls_programatica,50,25); $ls_codestpro4=substr($ls_programatica,75,25); $ls_codestpro5=substr($ls_programatica,100,25); $ls_estructura=$ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5; $estprog[0]=$ls_codestpro1; $estprog[1]=$ls_codestpro2; $estprog[2]=$ls_codestpro3; $estprog[3]=$ls_codestpro4; $estprog[4]=$ls_codestpro5; $estprog[5]=$ls_estclaconcepto; $lb_valido=$io_intspg->uf_spg_saldo_select($ls_codemp, $estprog, $ls_cueprecon, $ls_status, $adec_asignado, $adec_aumento,$adec_disminucion,$adec_precomprometido, $adec_comprometido,$adec_causado,$adec_pagado); $lb_valido=true; $li_disponibilidad=($adec_asignado-($adec_comprometido+$adec_precomprometido)+$adec_aumento-$adec_disminucion); $li_resto=$li_disponibilidad-$li_total_concepto; if (($li_resto > -0.01)&&($li_resto < 0)) { $li_resto=abs($li_resto); } if($li_total_concepto>0) { if(($li_total_concepto>$li_disponibilidad) && ($li_resto < -0.00)) { $li_check++; $ls_estmodest = $_SESSION["la_empresa"]["estmodest"]; if($ls_estmodest==1) { $ls_codestpro1 = substr($ls_codestpro1,-$_SESSION["la_empresa"]["loncodestpro1"]); $ls_codestpro2 = substr($ls_codestpro2,-$_SESSION["la_empresa"]["loncodestpro2"]); $ls_codestpro3 = substr($ls_codestpro3,-$_SESSION["la_empresa"]["loncodestpro3"]); $ls_codestpro = $ls_codestpro1.'-'.$ls_codestpro2.'-'.$ls_codestpro3; } else { $ls_codestpro=substr($ls_codestpro1,-2)."-".substr($ls_codestpro2,-2)."-".substr($ls_codestpro3,-2)."-".substr($ls_codestpro4,-2)."-".substr($ls_codestpro5,-2); } $li_total_concepto=number_format($li_total_concepto,2,",","."); $li_disponibilidad=number_format($li_disponibilidad,2,",","."); $li_resto=number_format($li_resto,2,",","."); //$ls_mensaje = $ls_mensaje.' Estructura: '.$ls_codestpro.' - '.'Cuenta:'.$ls_spg_cuenta.', Disponible:'.$li_disponibilidad.' , Monto:'.$li_monto.' NO Posee Disponibilidad'.'\n'; $la_data[$li_i]=array('estructura'=>$ls_codestpro,'cuenta'=>$ls_cueprecon,'denominacion'=>$ls_denominacion,'gastonomina'=>$li_total_concepto,'disponible'=>$li_disponibilidad,'saldo'=>$li_resto); $la_datag[$li_i]=array('estructura'=>$ls_codestpro,'cuenta'=>$ls_cueprecon,'denominacion'=>$ls_denominacion,'gastonomina'=>$li_total_concepto,'disponible'=>$li_disponibilidad,'saldo'=>$li_resto); } else { } } else { $lb_existe = true; //$this->io_mensajes->message("La cuenta ".$ls_spg_cuenta." No Existe en la Estructura ".$ls_codestpro1.$ls_codestpro2.$ls_codestpro3.$ls_codestpro4.$ls_codestpro5.""); } } $io_report->DS->resetds("cueprecon"); unset($_SESSION["fechacomprobante"]); if ($li_check>0) { if($li_totrow>0) { uf_print_cabecera_presupuesto($io_pdf); // Imprimimos la cabecera de presupuesto if ($ls_tipo==1) { uf_print_detalle_presupuesto_general($la_datag,$io_pdf); // Imprimimos el detalle presupuestario } else { uf_print_detalle_presupuesto($la_data,$io_pdf); // Imprimimos el detalle presupuestario } $li_totalpresupuesto=$io_fun_nomina->uf_formatonumerico($li_totalpresupuesto); $li_totalpersonal=number_format($li_totalpersonal,0,"",""); //uf_print_pie_cabecera_presupuesto($li_totalpresupuesto,$li_totalpersonal,$io_pdf); // imprimimos los totales presupuestario unset($la_data); } } else { print(""); } //------------------------------------------------------------------------------------------------------------------------------- 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); ?>