"; print "close();"; print "opener.document.form1.submit();"; print ""; } //-------------------------------------------------------------- function uf_print($as_codtippre, $as_codper, $as_stapre, $as_tipo) { ////////////////////////////////////////////////////////////////////////////// // Function: uf_print // Access: public // Arguments: as_codtippre // Código del tipo de Prestamo // as_codper // Código del personal // as_stapre // Estatus del Prestamo // as_tipo // Tipo de Llamada del catálogo // Description: Función que obtiene e imprime los resultados de la busqueda // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 01/01/2006 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////// global $io_fun_nomina; require_once("../shared/class_folder/sigesp_include.php"); $io_include=new sigesp_include(); $io_conexion=$io_include->uf_conectar(); require_once("../shared/class_folder/class_sql.php"); $io_sql=new class_sql($io_conexion); require_once("../shared/class_folder/class_mensajes.php"); $io_mensajes=new class_mensajes(); require_once("../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_codnom=$_SESSION["la_nomina"]["codnom"]; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; $ls_sql="SELECT sno_prestamos.codper, sno_prestamos.numpre, sno_prestamos.codtippre, sno_prestamos.codconc, sno_prestamos.monpre, ". " sno_prestamos.numcuopre, sno_prestamos.perinipre, sno_prestamos.monamopre, sno_prestamos.stapre, sno_prestamos.fecpre, ". " sno_prestamos.obsrecpre, sno_prestamos.obssuspre, sno_personal.nomper, sno_personal.apeper, sno_tipoprestamo.destippre, ". " sno_concepto.nomcon, sno_prestamosperiodo.feciniper, sno_prestamosperiodo.fecfinper, sno_personalnomina.sueper, sno_prestamos.tipcuopre,". " (SELECT count(numcuo) ". " FROM sno_prestamosperiodo ". " WHERE sno_prestamosperiodo.estcuo=0 ". " AND sno_prestamos.codemp = sno_prestamosperiodo.codemp ". " AND sno_prestamos.codnom = sno_prestamosperiodo.codnom ". " AND sno_prestamos.codper = sno_prestamosperiodo.codper ". " AND sno_prestamos.numpre = sno_prestamosperiodo.numpre ". " AND sno_prestamos.codtippre = sno_prestamosperiodo.codtippre) as cuofal, ". " (SELECT MAX(moncuo) ". " FROM sno_prestamosperiodo ". " WHERE sno_prestamosperiodo.estcuo = 0". " AND sno_prestamos.codemp = sno_prestamosperiodo.codemp ". " AND sno_prestamos.codnom = sno_prestamosperiodo.codnom ". " AND sno_prestamos.codper = sno_prestamosperiodo.codper ". " AND sno_prestamos.numpre = sno_prestamosperiodo.numpre ". " AND sno_prestamos.codtippre = sno_prestamosperiodo.codtippre ". " GROUP BY sno_prestamosperiodo.codemp, sno_prestamosperiodo.codnom, sno_prestamosperiodo.numpre, ". " sno_prestamosperiodo.codper, sno_prestamosperiodo.codtippre ) as cuopre ". " FROM sno_prestamos, sno_personal, sno_personalnomina, sno_tipoprestamo, sno_concepto, sno_prestamosperiodo ". " WHERE sno_prestamosperiodo.numcuo=1 ". " AND sno_prestamos.codemp='".$ls_codemp."' ". " AND sno_prestamos.codnom='".$ls_codnom."' ". " AND sno_prestamos.codtippre like '".$as_codtippre."' ". " AND sno_prestamos.codper like '".$as_codper."' ". " AND sno_prestamos.stapre = ".$as_stapre." ". " AND sno_prestamos.codemp = sno_personal.codemp ". " AND sno_prestamos.codper = sno_personal.codper ". " AND sno_prestamos.codemp = sno_personalnomina.codemp ". " AND sno_prestamos.codnom = sno_personalnomina.codnom ". " AND sno_prestamos.codper = sno_personalnomina.codper ". " AND sno_prestamos.codemp = sno_tipoprestamo.codemp ". " AND sno_prestamos.codnom = sno_tipoprestamo.codnom ". " AND sno_prestamos.codtippre = sno_tipoprestamo.codtippre ". " AND sno_prestamos.codemp = sno_concepto.codemp ". " AND sno_prestamos.codnom = sno_concepto.codnom ". " AND sno_prestamos.codconc = sno_concepto.codconc ". " AND sno_prestamos.codemp = sno_prestamosperiodo.codemp ". " AND sno_prestamos.codnom = sno_prestamosperiodo.codnom ". " AND sno_prestamos.codper = sno_prestamosperiodo.codper ". " AND sno_prestamos.codtippre = sno_prestamosperiodo.codtippre ". " AND sno_prestamos.numpre = sno_prestamosperiodo.numpre ". " ORDER BY sno_prestamos.numpre "; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { while($row=$io_sql->fetch_row($rs_data)) { $li_sueper=$row["sueper"]; $li_numpre=$row["numpre"]; $ls_codper=$row["codper"]; $ls_nomapeper=$row["nomper"]." ".$row["apeper"]; $ls_codtippre=$row["codtippre"]; $ls_destippre=$row["destippre"]; $ls_codconc=$row["codconc"]; $ls_nomcon=$row["nomcon"]; $ls_perinipre=$row["perinipre"]; $ld_feciniper=$io_funciones->uf_formatovalidofecha($row["feciniper"]); $ld_fecfinper=$io_funciones->uf_formatovalidofecha($row["fecfinper"]); $ld_feciniper=$io_funciones->uf_convertirfecmostrar($ld_feciniper); $ld_fecfinper=$io_funciones->uf_convertirfecmostrar($ld_fecfinper); $li_stapre=$row["stapre"]; $li_monpre=$row["monpre"]; $li_numcuopre=$row["numcuopre"]; $li_monamopre=$row["monamopre"]; $li_cuofal=$row["cuofal"]; $li_saldo=($li_monpre-$li_monamopre); $li_cuota=$row["cuopre"]; $ls_tipcuopre=$row["tipcuopre"]; $li_monpre=$io_fun_nomina->uf_formatonumerico($li_monpre); $li_monamopre=$io_fun_nomina->uf_formatonumerico($li_monamopre); $li_saldo=$io_fun_nomina->uf_formatonumerico($li_saldo); $li_cuota=$io_fun_nomina->uf_formatonumerico($li_cuota); $ls_status=""; switch ($li_stapre) { case 1: $ls_status="ACTIVO"; break; case 2: $ls_status="SUSPENDIDO"; break; case 3: $ls_status="CANCELADO"; break; } switch ($as_tipo) { case "": print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; break; } } $io_sql->free_result($rs_data); } print "
CódigoCodperPersonalTipoEstatusMonto
".$li_numpre."".$ls_codper."".$ls_nomapeper."".$ls_destippre."".$ls_status."".$li_monpre."
"; unset($io_include); unset($io_conexion); unset($io_sql); unset($io_mensajes); unset($io_funciones); unset($ls_codemp); unset($ls_codnom); } //-------------------------------------------------------------- ?> Catálogo de Prestamo

Catálogo de Prestamo

Tipo de Prestamo
Buscar
Personal
Buscar
Estatus
 

uf_obteneroperacion(); $ls_tipo=$io_fun_nomina->uf_obtenertipo(); if($ls_operacion=="BUSCAR") { $ls_codtippre="%".$_POST["txtcodtippre"]."%"; $ls_codper="%".$_POST["txtcodper"]."%"; $ls_stapre=$_POST["cmbstapre"]; uf_print($ls_codtippre, $ls_codper, $ls_stapre, $ls_tipo); } /* else { $ls_codtippre="%%"; $ls_codper="%%"; $ls_stapre=1; uf_print($ls_codtippre, $ls_codper, $ls_stapre, $ls_tipo); } */ unset($io_fun_nomina); ?>