Definición de Archivos TXT para Préstamos

"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_folder/class_funciones_nomina.php"); $io_fun_nomina=new class_funciones_nomina(); $io_fun_nomina->uf_load_seguridad("SNR","sigesp_snorh_d_archivostxtprestamos.php",$ls_permisos,$la_seguridad,$la_permisos); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// //-------------------------------------------------------------- function uf_limpiarvariables() { /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiarvariables // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 01/01/2006 Fecha Última Modificación : /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_codarch,$ls_denarch,$ls_tiparch, $la_tiparch, $ls_acumon, $ls_activarcodigo,$ls_activo, $ls_operacion,$ls_mostrar,$ls_existe,$io_fun_nomina; global $li_totrows,$ls_titletable,$li_widthtable,$ls_nametable,$lo_title,$ls_anoserpre; $ls_codarch=""; $ls_denarch=""; $ls_tiparch=""; $la_tiparch[0]=""; $la_tiparch[1]=""; $ls_acumon=""; $ls_mostrar="display:none"; $ls_activarcodigo=""; $ls_activo=""; $ls_titletable="Campos TXT"; $li_widthtable=500; $ls_nametable="grid"; $lo_title[1]="Código"; $lo_title[2]="Descripcion"; $lo_title[3]="Inicio"; $lo_title[4]="Longitud"; $lo_title[5]="Tipo"; $lo_title[6]="Tabla"; $lo_title[7]="Item"; $lo_title[8]=" "; $lo_title[9]=" "; $li_totrows=$io_fun_nomina->uf_obtenervalor("totalfilas",1); $ls_existe=$io_fun_nomina->uf_obtenerexiste(); $ls_operacion=$io_fun_nomina->uf_obteneroperacion(); } //-------------------------------------------------------------- //-------------------------------------------------------------- function uf_agregarlineablanca(&$aa_object,$ai_totrows) { ////////////////////////////////////////////////////////////////////////////// // Function: uf_agregarlineablanca // Arguments: aa_object // arreglo de Objetos // ai_totrows // total de Filas // Description: Función que agrega una linea mas en el grid ////////////////////////////////////////////////////////////////////////////// $aa_object[$ai_totrows][1]=""; $aa_object[$ai_totrows][2]=""; $aa_object[$ai_totrows][3]=""; $aa_object[$ai_totrows][4]=""; $aa_object[$ai_totrows][5]=""; $aa_object[$ai_totrows][6]=""; $aa_object[$ai_totrows][7]=""; $aa_object[$ai_totrows][8]="

"; $aa_object[$ai_totrows][9]="

"; } //-------------------------------------------------------------- //-------------------------------------------------------------- function uf_cargar_dt($li_i) { /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiarvariables // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 01/01/2006 Fecha Última Modificación : /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $li_codcam,$ls_descam,$li_inicam,$li_loncam,$ls_edicam,$la_edicam,$ls_clacam,$la_clacam, $ls_actcam,$la_actcam; global $ls_tabrelcam,$ls_iterelcam,$la_iterelcam,$ls_cricam,$ls_tipcam,$la_tipcam; $li_codcam=$_POST["txtcodcam".$li_i]; $ls_descam=$_POST["txtdescam".$li_i]; $li_inicam=$_POST["txtinicam".$li_i]; $li_loncam=$_POST["txtloncam".$li_i]; $ls_edicam="0"; $ls_clacam="0"; $ls_actcam="N"; $ls_cricam=""; $ls_tabrelcam=$_POST["cmbtabrelcam".$li_i]; $ls_iterelcam=$_POST["cmbiterelcam".$li_i]; $la_iterelcam[0]=""; $la_iterelcam[1]=""; $la_iterelcam[2]=""; $la_iterelcam[3]=""; $la_iterelcam[4]=""; $la_iterelcam[5]=""; $la_iterelcam[6]=""; $la_iterelcam[7]=""; $la_tipcam[0]=""; $la_tipcam[1]=""; $la_tipcam[2]=""; $ls_tipcam=$_POST["cmbtipcam".$li_i]; switch($ls_tipcam) { case "C": $la_tipcam[0]="selected"; break; case "N": $la_tipcam[1]="selected"; break; case "E": $la_tipcam[2]="selected"; break; } switch($ls_iterelcam) { case "codper": $la_iterelcam[0]="selected"; break; case "codtippre": $la_iterelcam[1]="selected"; break; case "codconc": $la_iterelcam[2]="selected"; break; case "monpre": $la_iterelcam[3]="selected"; break; case "numcuopre": $la_iterelcam[4]="selected"; break; case "fecpre": $la_iterelcam[5]="selected"; break; case "obsrecpre": $la_iterelcam[6]="selected"; break; case "stapre": $la_iterelcam[7]="selected"; break; case "eliminar": $la_iterelcam[8]="selected"; break; } } //-------------------------------------------------------------- ?> Definición de Archivos TXT para Préstamos uf_nuevo_codigo(); switch ($ls_operacion) { case "NUEVO": $li_totrows=1; uf_agregarlineablanca($lo_object,1); break; case "GUARDAR": $ls_codarch=$_POST["txtcodarch"]; $ls_denarch=$_POST["txtdenarch"]; $io_archivo->io_sql->begin_transaction(); $lb_valido=$io_archivo->uf_guardar($ls_existe,$ls_codarch,$ls_denarch,$la_seguridad); if($lb_valido) { $lb_valido=$io_archivo->uf_delete_campos($ls_codarch,$la_seguridad); for($li_i=1;($li_i<$li_totrows)&&($lb_valido);$li_i++) { uf_cargar_dt($li_i); $lb_valido=$io_archivo->uf_insert_archivotxt_campos($ls_codarch,$li_codcam,$ls_descam,$li_inicam,$li_loncam,$ls_edicam,$ls_clacam,$ls_actcam, $ls_tabrelcam,$ls_iterelcam,$ls_cricam,$ls_tipcam,$la_seguridad); } } if($lb_valido) { $io_archivo->io_sql->commit(); if($ls_existe=="TRUE") { $io_archivo->io_mensajes->message("El archivo txt fue Actualizado."); } else { $io_archivo->io_mensajes->message("El archivo txt fue Registrado."); } } else { $io_archivo->io_sql->rollback(); $io_archivo->io_mensajes->message("Ocurrio un error al guardar el archivo txt."); } uf_limpiarvariables(); $ls_codarch=$io_archivo->uf_nuevo_codigo(); $li_totrows=1; uf_agregarlineablanca($lo_object,1); $ls_existe="FALSE"; break; case "ELIMINAR": $ls_codarch=$_POST["txtcodarch"]; $lb_valido=$io_archivo->uf_delete_archivotxt($ls_codarch,$la_seguridad); uf_limpiarvariables(); $ls_existe="FALSE"; $li_totrows=1; uf_agregarlineablanca($lo_object,1); $ls_codarch=$io_archivo->uf_nuevo_codigo(); break; case "AGREGARDETALLE": $ls_codarch=$_POST["txtcodarch"]; $ls_denarch=$_POST["txtdenarch"]; $li_totrows=$li_totrows+1; for($li_i=1;$li_i<$li_totrows;$li_i++) { uf_cargar_dt($li_i); $lo_object[$li_i][1]=""; $lo_object[$li_i][2]=""; $lo_object[$li_i][3]=""; $lo_object[$li_i][4]=""; $lo_object[$li_i][5]=""; $lo_object[$li_i][6]=""; $lo_object[$li_i][7]=""; $lo_object[$li_i][8]="

"; $lo_object[$li_i][9]="

"; } uf_agregarlineablanca($lo_object,$li_totrows); break; case "ELIMINARDETALLE": $ls_codarch=$_POST["txtcodarch"]; $ls_denarch=$_POST["txtdenarch"]; $li_totrows=$li_totrows-1; $li_rowdelete=$_POST["filadelete"]; $li_temp=0; for($li_i=1;$li_i<=$li_totrows;$li_i++) { if($li_i!=$li_rowdelete) { $li_temp++; uf_cargar_dt($li_i); $lo_object[$li_temp][1]=""; $lo_object[$li_temp][2]=""; $lo_object[$li_temp][3]=""; $lo_object[$li_temp][4]=""; $lo_object[$li_temp][5]=""; $lo_object[$li_temp][6]=""; $lo_object[$li_temp][7]=""; $lo_object[$li_temp][8]="

"; $lo_object[$li_temp][9]="

"; } } uf_agregarlineablanca($lo_object,$li_totrows); break; case "BUSCARDETALLE": $ls_codarch=$_POST["txtcodarch"]; $ls_denarch=$_POST["txtdenarch"]; $lb_valido=$io_archivo->uf_load_archivotxt_campos($ls_codarch,$li_totrows,$lo_object); $li_totrows++; uf_agregarlineablanca($lo_object,$li_totrows); break; } $io_archivo->uf_destructor(); unset($io_archivo); ?>

Sistema de Nómina

uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_nomina); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>

Definición de Archivos TXT para Préstamos

Código
Denominación

makegrid($li_totrows,$lo_title,$lo_object,$li_widthtable,$ls_titletable,$ls_nametable); unset($io_grid); ?>