Refinanciar Prestamo

"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; $ls_codnom=$_SESSION["la_nomina"]["codnom"]; require_once("class_folder/class_funciones_nomina.php"); $io_fun_nomina=new class_funciones_nomina(); $io_fun_nomina->uf_load_seguridad_nomina("SNO","sigesp_sno_p_prestamorefinanciar.php",$ls_codnom,$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_codper,$ls_nomper,$ls_codtippre,$ls_destippre,$ls_codconc,$ls_nomcon,$li_stapre,$la_stapre,$li_monpre,$li_amoprepre; global $li_numcuopre,$ls_perinipre,$li_salactpre,$li_moncuopre,$li_monamopre,$ld_fecdesper,$ld_fechasper,$li_numpre,$ls_desper; global $li_nuemoncuopre,$li_numcuofalpre,$li_cuopag,$li_sueper,$ls_obsrecpre,$ls_existe,$ls_operacion, $ls_desnom,$io_fun_nomina; global $ls_configuracion,$ls_tipocuota,$la_tipcuopre,$ls_tipcuopre,$li_valporpre; require_once("sigesp_sno.php"); $io_sno=new sigesp_sno(); $lb_valido=$io_sno->uf_crear_sessionnomina(); $ls_desnom=""; $ls_peractnom=""; $ls_desper=""; if($lb_valido==false) { print ""; } else { $ls_desnom=$_SESSION["la_nomina"]["desnom"]; $ls_peractnom=$_SESSION["la_nomina"]["peractnom"]; $ls_desper=$_SESSION["la_nomina"]["descripcionperiodo"]; } $ls_codper=""; $ls_nomper=""; $ls_codtippre=""; $ls_destippre=""; $ls_codconc=""; $ls_nomcon=""; $li_stapre=""; $la_stapre[0]=""; $la_stapre[1]=""; $la_stapre[2]=""; $ls_tipocuota=" disabled"; $la_tipcuopre[0]=""; $la_tipcuopre[1]=""; $ls_tipcuopre="0"; $li_monpre=0; $li_numcuopre=1; $li_amoprepre=0; $li_numpre=""; $ls_perinipre=""; $li_salactpre=0; $li_moncuopre=0; $li_monamopre=0; $li_numpre=0; $ld_fecdesper="dd/mm/aaaa"; $ld_fechasper="dd/mm/aaaa"; $li_numcuofalpre=1; $li_nuemoncuopre=0; $li_cuopag=0; $li_sueper=0; $ls_obsrecpre=""; $ls_existe=$io_fun_nomina->uf_obtenerexiste(); $ls_operacion=$io_fun_nomina->uf_obteneroperacion(); $ls_configuracion=$io_sno->uf_select_config("SNO","CONFIG","CONFIGURACION_PRESTAMO","CUOTAS","C"); $li_valporpre=trim($io_sno->uf_select_config("SNO","CONFIG","VAL_PORCENTAJE_PRESTAMO","1","I")); unset($io_sno); } //-------------------------------------------------------------- //-------------------------------------------------------------- function uf_load_variables() { ////////////////////////////////////////////////////////////////////////////// // Function: uf_load_variables // Access: private // Description: Función que carga todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 30/03/2006 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////// global $ls_codper, $ls_nomper, $ls_codtippre, $ls_destippre, $ls_codconc, $ls_nomcon, $li_stapre, $li_monpre, $li_numcuopre; global $ls_perinipre, $li_salactpre, $li_moncuopre, $li_monamopre, $ld_fecdesper, $ld_fechasper, $li_numpre, $li_sueper; global $io_fun_nomina,$ls_tipcuopre; $ls_codper=$_POST["txtcodper"]; $ls_nomper=$_POST["txtnomper"]; $ls_codtippre=$_POST["txtcodtippre"]; $ls_destippre=$_POST["txtdestippre"]; $ls_codconc=$_POST["txtcodconc"]; $ls_nomcon=$_POST["txtnomcon"]; $li_stapre=$_GET["cmbstapre"]; $li_monpre=$_POST["txtmonpre"]; $li_numcuopre=$_POST["txtnumcuopre"]; $ls_perinipre=$_POST["txtperinipre"]; $li_salactpre=$_POST["txtsalactpre"]; $li_moncuopre=$_POST["txtmoncuopre"]; $li_monamopre=$_POST["txtmonamopre"]; $ld_fecdesper=$_POST["txtfecdesper"]; $ld_fechasper=$_POST["txtfechasper"]; $li_numpre=$_POST["txtnumpre"]; $li_sueper=$_POST["txtsueper"]; $ls_tipcuopre=$io_fun_nomina->uf_obtenervalor("cmbtipcuopre",$_POST["txttipcuopre"]); } //-------------------------------------------------------------- ?> Refinanciar Prestamo uf_seleccionarcombo("1-2-3",$li_stapre,$la_stapre,3); $io_fun_nomina->uf_seleccionarcombo("0-1",$ls_tipcuopre,$la_tipcuopre,2); $lb_valido=$io_prestamo->uf_select_resumen($ls_codper,$ls_codconc); if($lb_valido) { $io_prestamo->io_mensajes->message("Existen salidas para este personal y concepto. reverse la Nómina y vuelva a calcular"); } break; case "PROCESAR": uf_load_variables(); $li_cuopag=$_POST["txtcuopag"]; $li_numcuofalpre=$_POST["txtnumcuofalpre"]; $li_nuemoncuopre=$_POST["txtnuemoncuopre"]; $ls_obsrecpre=$_POST["txtobsrecpre"]; $li_nuemonpre=$_POST["txtnuemonpre"]; $li_nuesalpre=$_POST["txtnuesalpre"]; $lb_valido=$io_prestamo->uf_refinanciarprestamo($ls_codper,$ls_codtippre,$li_numpre,$li_numcuofalpre,$li_nuemoncuopre, $li_sueper,$li_cuopag,$li_nuesalpre,$ls_obsrecpre,$li_numcuopre, $ls_configuracion,$ls_tipcuopre,$li_nuemonpre,$la_seguridad); if(!$lb_valido) { $io_fun_nomina->uf_seleccionarcombo("1-2-3",$li_stapre,$la_stapre,3); $io_fun_nomina->uf_seleccionarcombo("0-1",$ls_tipcuopre,$la_tipcuopre,2); } break; } $io_prestamo->uf_destructor(); unset($io_prestamo); ?>

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

Información del Prestamo

Personal
Tipo de Prestamo
Concepto
Período de Inicio	-
Tipo de Cuota	(Solo para nóminas quincenales)
Estado Actual
Monto Prestamo
Nro Cuotas
Monto Cuotas
Amortizado
Saldo
Información para Refinanciar el prestamo
Monto Refinanciar
Nuevo Monto del Prestamo
Nuevo Saldo del Prestamo
Nro Cuotas Faltantes	>
Nuevo Monto Cuota	>
Observación	<?php print $ls_obsrecpre;?>

"; print " ue_volver();"; print ""; } ?>