function uf_imprimirresultados($ai_numpre,$as_codper,$as_codtippre,$as_tipo)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_imprimirresultados
// Arguments: ai_numpre // Número de Prestamo
// as_codper // Código de Personal
// as_codtippre // Código del Tipo de Prestamo
// as_tipo // Tipo de Llamada del catálogo
// Description: Función que obtiene e imprime los resultados de la busqueda
//////////////////////////////////////////////////////////////////////////////
global $in_class_nom;
include("../shared/class_folder/sigesp_include.php");
$in=new sigesp_include();
$con=$in->uf_conectar();
require_once("../shared/class_folder/class_mensajes.php");
$msg=new class_mensajes();
require_once("../shared/class_folder/class_sql.php");
$SQL=new class_sql($con);
require_once("../shared/class_folder/class_funciones.php");
$fun=new class_funciones();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=50>Cuota</td>";
print "<td width=100>Período</td>";
print "<td width=100>Fecha Inicio</td>";
print "<td width=100>Fecha Fin</td>";
print "<td width=100>Monto</td>";
print "<td width=50>Cancelada</td>";
print "</tr>";
$ls_sql="SELECT numcuo, percob, feciniper, fecfinper, moncuo, estcuo ".
" FROM sno_prestamosperiodo ".
" WHERE codemp='".$ls_codemp."'".
" AND codnom='".$ls_codnom."' ".
" AND codper='".$as_codper."'".
" AND codtippre='".$as_codtippre."'".
" AND numpre=".$ai_numpre."".
" ORDER BY numcuo ";
$rs_pre=$SQL->select($ls_sql);
$li_i=0;
while($row=$SQL->fetch_row($rs_pre))
{
$li_i=$li_i+1;
$li_numcuo=$row["numcuo"];
$ls_percob=$row["percob"];
$ld_feciniper=$fun->uf_formatovalidofecha($row["feciniper"]);
$ld_fecfinper=$fun->uf_formatovalidofecha($row["fecfinper"]);
$ld_feciniper=$fun->uf_convertirfecmostrar($ld_feciniper);
$ld_fecfinper=$fun->uf_convertirfecmostrar($ld_fecfinper);
$li_cuopre=$in_class_nom->uf_formatonumerico($row["moncuo"]);
if($row["estcuo"]==1)
{
$ls_estpre="checked";
}
else
{
$ls_estpre="";
}
switch ($as_tipo)
{
case "":
if($li_i%2!=0)
{
$ls_color="class=celdas-blancas";
}
else
{
$ls_color="class=celdas-azules";
}
print "<tr ".$ls_color.">";
print "<td align='center'>".$li_numcuo."</td>";
print "<td align='center'>".$ls_percob."</td>";
print "<td align='center'>".$ld_feciniper."</td>";
print "<td align='center'>".$ld_fecfinper."</td>";
print "<td align='right'>".$li_cuopre."</td>";
print "<td align='center'><input name='chk".$li_numcuo."' type='checkbox' ".$ls_estpre." disabled></td>";
print "</tr>";
break;
}
}
print "</table>";
$SQL->free_result($rs_pre);
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while($row=$io_sql->fetch_row($rs_data))
{
print "<tr class=celdas-blancas>";
$ls_codban = trim($row["codban"]);
$ls_nomban = $row["nomban"];
$ls_ctaban = trim($row["ctaban"]);
$ls_dencta = $row["dencta"];
$ls_numcol = trim($row["numcol"]);
$ls_dencol = $row["dencol"];
$ls_codtipcol = trim($row["codtipcol"]);
$ld_feccol = $io_funcion->uf_formatovalidofecha($row["feccol"]);
$ld_feccol = $io_funcion->uf_convertirfecmostrar($ld_feccol);
$ld_fecvencol = $io_funcion->uf_formatovalidofecha($row["fecvencol"]);
$ld_fecvencol = $io_funcion->uf_convertirfecmostrar($ld_fecvencol);
$ld_monto = number_format($row["monto"],2,',','.');
$ld_tascol = trim($row["tascol"]);
$ls_scgcta = trim($row["sc_cuenta"]);
$li_diacol = trim($row["diacol"]);
print "<td><a href=\"javascript: aceptar('$ls_numcol','$ls_dencol','$ls_ctaban','$ls_dencta','$ls_scgcta','$ld_tascol','$ld_monto');\">".$ls_numcol."</a></td>";
print "<td>".$ls_dencol."</td>";
print "<td>".$ls_nomban."</td>";
print "<td>".$ls_codtipcol."</td>";
print "<td>".$ls_ctaban."</td>";
print "<td>".$ls_dencta."</td>";
print "<td>".$ld_feccol."</td>";
print "<td>".$ld_fecvencol."</td>";
function uf_print($as_tipo,$as_perdes)
{
//////////////////////////////////////////////////////////////////////////////
// Function : uf_print
// Access : public
// Arguments : as_tipo // Tipo de Llamada del catálogo
// as_perdes // Período desde si se quiere filtrar a partir de un período en particular
// Description : Función que obtiene e imprime los resultados de la busqueda
// Creado Por : Ing. Yesenia Moreno
// Fecha Creación : 10/02/2006 Fecha Última Modificación :
//////////////////////////////////////////////////////////////////////////////
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"];
$ld_peractnom=$_SESSION["la_nomina"]["peractnom"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=10>Período</td>";
print "<td width=200>Fecha de Inicio</td>";
print "<td width=200>Fecha de Finalización</td>";
print "</tr>";
$ls_sql="SELECT codperi, fecdesper, fechasper ".
" FROM sno_periodo ".
" WHERE codemp='".$ls_codemp."'".
" AND codnom='".$ls_codnom."'".
" AND codperi <> '000' ".
" AND cerper=0";
if($as_perdes!="")
{
$ls_sql=$ls_sql." AND codperi>='".$ld_peractnom."'".
" AND codperi>='".$as_perdes."'";
}
if($as_tipo=="prestamo")
{
$ls_sql=$ls_sql." AND codperi>='".$ld_peractnom."'";
}
$ls_sql=$ls_sql." ORDER BY codperi ";
$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))
{
$ls_codperi=$row["codperi"];
$ld_fecdesper=$io_funciones->uf_formatovalidofecha($row["fecdesper"]);
$ld_fechasper=$io_funciones->uf_formatovalidofecha($row["fechasper"]);
$ld_fecdesper=$io_funciones->uf_convertirfecmostrar($ld_fecdesper);
$ld_fechasper=$io_funciones->uf_convertirfecmostrar($ld_fechasper);
switch ($as_tipo)
{
case "":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_codperi','$ld_fecdesper','$ld_fechasper');\">".$ls_codperi."</a></td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "prestamo":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_codperi','$ld_fecdesper','$ld_fechasper');\">".$ls_codperi."</a></td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "pressusdesde":// es llamado desde sigesp_sno_p_prestamossuspender.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar_prestsus_desde('$ls_codperi','$ld_fecdesper','$ld_fechasper');\">".$ls_codperi."</a></td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "pressushasta":// es llamado desde sigesp_sno_p_prestamossuspender.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar_prestsus_hasta('$ls_codperi','$ld_fecdesper','$ld_fechasper');\">".$ls_codperi."</a></td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
unset($ls_codnom);
unset($ld_peractnom);
}
function uf_print($as_codper, $as_cedper, $as_nomper, $as_apeper, $as_tipo, $ai_subnomina, $as_codnom)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Arguments: as_codper // Código de Personal
// as_cedper // Cédula de Pesonal
// as_nomper // Nombre de Personal
// as_apeper // Apellido de Personal
// as_tipo // Tipo de Llamada del catálogo
// ai_subnomina // si tiene sub nómina=1 ó Nó =0
// Description: Función que obtiene e imprime los resultados de la busqueda
//////////////////////////////////////////////////////////////////////////////
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();
require_once("../shared/class_folder/class_fecha.php");
$io_fecha=new class_fecha();
require_once("sigesp_sno.php");
$io_sno=new sigesp_sno();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
$li_tipnom=$_SESSION["la_nomina"]["tipnom"];
$ls_from=" FROM sno_personalnomina ";
$ls_criterio="";
if($as_tipo=="encargado")
{
$ls_criterio=" AND sno_personalnomina.codnom = '".$as_codnom."' ";
$ls_criterio=$ls_criterio." AND sno_personalnomina.estencper = '0' ";
}
elseif($as_tipo=="encargaduria")
{
$ls_criterio=" AND sno_personalnomina.codnom = '".$ls_codnom."' ";
$ls_criterio=$ls_criterio." AND sno_personalnomina.estencper = '0' ";
}
elseif($as_tipo=="catencargaduria2")
{
$ls_from=" FROM sno_encargaduria, sno_personalnomina ";
$ls_criterio=" AND sno_personalnomina.codemp = sno_encargaduria.codemp";
$ls_criterio=$ls_criterio." AND sno_personalnomina.codper = sno_encargaduria.codperenc ";
$ls_criterio=$ls_criterio." AND sno_personalnomina.codnom = sno_encargaduria.codnomperenc ";
}
else
{
$ls_criterio=" AND sno_personalnomina.codnom = '".$ls_codnom."' ";
}
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=60>Código</td>";
print "<td width=40>Cédula</td>";
print "<td width=280>Nombre y Apellido</td>";
print "<td width=60>Estatus</td>";
print "<td width=60>Culminación Contrato</td>";
print "</tr>";
$ls_sql="SELECT DISTINCT (sno_personalnomina.codper), sno_personalnomina.codsubnom, sno_personalnomina.codasicar, sno_personalnomina.codtab, ".
" sno_personalnomina.codgra, sno_personalnomina.codpas, sno_personalnomina.sueper, sno_personalnomina.horper, ".
" sno_personalnomina.minorguniadm, sno_personalnomina.ofiuniadm, sno_personalnomina.uniuniadm, sno_personalnomina.depuniadm, ".
" sno_personalnomina.prouniadm, sno_personalnomina.pagbanper, sno_personalnomina.codban, sno_personalnomina.codcueban, ".
" sno_personalnomina.tipcuebanper, sno_personalnomina.codcar, sno_personalnomina.fecingper, sno_personalnomina.staper, ".
" sno_personalnomina.cueaboper, sno_personalnomina.fecculcontr, sno_personalnomina.codded, sno_personalnomina.codtipper, ".
" sno_personalnomina.quivacper, sno_personalnomina.codtabvac, sno_personalnomina.sueintper, sno_personalnomina.pagefeper, ".
" sno_personalnomina.sueproper, sno_personalnomina.codage, sno_personalnomina.fecegrper, sno_personalnomina.fecsusper, ".
" sno_personalnomina.cauegrper, sno_personalnomina.codescdoc, sno_personalnomina.codcladoc, sno_personalnomina.codubifis, ".
" sno_personalnomina.tipcestic, sno_personalnomina.conjub, sno_personalnomina.catjub, sno_personalnomina.codclavia, ".
" sno_personal.cedper, sno_personal.nomper, sno_personal.apeper, sno_personalnomina.codunirac, sno_personalnomina.pagtaqper, ".
" sno_unidadadmin.desuniadm, sno_dedicacion.desded, sno_tipopersonal.destipper, sno_subnomina.dessubnom, sno_personalnomina.grado,".
" sno_tablavacacion.dentabvac, sno_escaladocente.desescdoc, sno_clasificaciondocente.descladoc, sno_ubicacionfisica.desubifis, ".
" sno_personalnomina.fecascper, sno_personalpension.suebasper, sno_personalpension.priespper, sno_personalpension.pritraper, ".
" sno_personalpension.priproper, sno_personalpension.prianoserper, sno_personalpension.pridesper, sno_personalpension.porpenper, ".
" sno_personalnomina.descasicar, sno_personalnomina.coddep, sno_personalnomina.obsrecper, ".
" sno_personalpension.prinoascper, sno_personalpension.monpenper, sno_personalpension.subtotper, ".
" sno_personalpension.tipjub, sno_personalpension.fecvid, sno_personalpension.prirem, sno_personalpension.segrem, sno_personalnomina.salnorper, sno_personalnomina.estencper, sno_personal.codger, ".
" (SELECT srh_departamento.dendep FROM srh_departamento ".
" WHERE srh_departamento.codemp=sno_personalnomina.codemp ".
" AND srh_departamento.coddep=sno_personalnomina.coddep) AS dendep, ".
" (SELECT descar FROM sno_cargo ".
" WHERE sno_cargo.codemp = sno_personalnomina.codemp ".
" AND sno_cargo.codnom = sno_personalnomina.codnom ".
" AND sno_cargo.codcar = sno_personalnomina.codcar) as descar, ".
" (SELECT denasicar FROM sno_asignacioncargo ".
" WHERE sno_asignacioncargo.codemp = sno_personalnomina.codemp ".
" AND sno_asignacioncargo.codnom = sno_personalnomina.codnom ".
" AND sno_asignacioncargo.codasicar = sno_personalnomina.codasicar) as denasicar, ".
" (SELECT destab FROM sno_tabulador ".
" WHERE sno_tabulador.codemp = sno_personalnomina.codemp ".
" AND sno_tabulador.codnom = sno_personalnomina.codnom ".
" AND sno_tabulador.codtab = sno_personalnomina.codtab) as destab, ".
" (SELECT moncomgra FROM sno_grado ".
" WHERE sno_grado.codemp = sno_personalnomina.codemp ".
" AND sno_grado.codnom = sno_personalnomina.codnom ".
" AND sno_grado.codtab = sno_personalnomina.codtab ".
" AND sno_grado.codpas = sno_personalnomina.codpas ".
" AND sno_grado.codgra = sno_personalnomina.codgra) as compensacion, ".
" (SELECT denominacion FROM scg_cuentas ".
" WHERE scg_cuentas.codemp = sno_personalnomina.codemp ".
" AND scg_cuentas.SC_cuenta = sno_personalnomina.cueaboper ".
" AND scg_cuentas.status = 'C') as dencueaboper, ".
" (SELECT nomban FROM scb_banco ".
" WHERE scb_banco.codemp = sno_personalnomina.codemp ".
" AND scb_banco.codban = sno_personalnomina.codban) as nomban, ".
" (SELECT nomage FROM scb_agencias ".
" WHERE scb_agencias.codemp = sno_personalnomina.codemp ".
" AND scb_agencias.codban = sno_personalnomina.codban ".
" AND scb_agencias.codage = sno_personalnomina.codage) as nomage, ".
" (SELECT dencat FROM scv_categorias ".
" WHERE scv_categorias.codemp = sno_personalnomina.codemp ".
" AND scv_categorias.codcat = sno_personalnomina.codclavia) as dencat ".$ls_from.
" LEFT JOIN sno_personalpension ".
" ON sno_personalnomina.codemp = sno_personalpension.codemp ".
" AND sno_personalnomina.codnom = sno_personalpension.codnom ".
" AND sno_personalnomina.codper = sno_personalpension.codper, ".
" sno_personal, sno_subnomina, sno_unidadadmin, sno_dedicacion, sno_tipopersonal, ".
" sno_tablavacacion, sno_escaladocente, sno_clasificaciondocente, sno_ubicacionfisica ".
" WHERE sno_personalnomina.codemp = '".$ls_codemp."'".$ls_criterio.
" AND sno_personal.codper like '".$as_codper."' ".
" AND sno_personal.cedper like '".$as_cedper."' ".
" AND sno_personal.nomper like '".$as_nomper."' ".
" AND sno_personal.apeper like '".$as_apeper."' ".
" AND sno_personal.estper = '1' ".
" AND sno_personalnomina.codemp = sno_personal.codemp ".
" AND sno_personalnomina.codper = sno_personal.codper ".
" AND sno_personalnomina.codemp = sno_subnomina.codemp ".
" AND sno_personalnomina.codnom = sno_subnomina.codnom ".
" AND sno_personalnomina.codsubnom = sno_subnomina.codsubnom ".
" AND sno_personalnomina.codemp = sno_unidadadmin.codemp ".
" AND sno_personalnomina.minorguniadm = sno_unidadadmin.minorguniadm ".
" AND sno_personalnomina.ofiuniadm = sno_unidadadmin.ofiuniadm ".
" AND sno_personalnomina.uniuniadm = sno_unidadadmin.uniuniadm ".
" AND sno_personalnomina.depuniadm = sno_unidadadmin.depuniadm ".
" AND sno_personalnomina.prouniadm = sno_unidadadmin.prouniadm ".
" AND sno_personalnomina.codemp = sno_dedicacion.codemp ".
" AND sno_personalnomina.codded = sno_dedicacion.codded ".
" AND sno_personalnomina.codemp = sno_tipopersonal.codemp ".
" AND sno_personalnomina.codded = sno_tipopersonal.codded ".
" AND sno_personalnomina.codtipper = sno_tipopersonal.codtipper ".
" AND sno_personalnomina.codemp = sno_tablavacacion.codemp ".
" AND sno_personalnomina.codtabvac = sno_tablavacacion.codtabvac ".
" AND sno_personalnomina.codemp = sno_escaladocente.codemp ".
" AND sno_personalnomina.codescdoc = sno_escaladocente.codescdoc ".
" AND sno_personalnomina.codemp = sno_clasificaciondocente.codemp ".
" AND sno_personalnomina.codescdoc = sno_clasificaciondocente.codescdoc ".
" AND sno_personalnomina.codcladoc = sno_clasificaciondocente.codcladoc ".
" AND sno_personalnomina.codemp = sno_ubicacionfisica.codemp ".
" AND sno_personalnomina.codubifis = sno_ubicacionfisica.codubifis ";
if(($as_tipo=="prestamo")||($as_tipo=="movimientonominas")||($as_tipo=="vacaciondes")||
($as_tipo=="vacacionhas")||($as_tipo=="personaproyecto"))
{
// solo para el personal Activo
$ls_sql=$ls_sql." AND sno_personalnomina.staper = '1' ";
}
elseif (($as_tipo=="encargaduria")||($as_tipo=="encargado"))
{
$ls_sql=$ls_sql." AND sno_personalnomina.staper <> '3' ";
}
$ls_sql=$ls_sql." ORDER BY sno_personalnomina.codper ";
$rs_data=$io_sql->select($ls_sql);
if($rs_data===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message));
}
else
{
while(!$rs_data->EOF)
{
$ls_codper=$rs_data->fields["codper"];
$ls_cedper=$rs_data->fields["cedper"];
$ls_nomper=$rs_data->fields["nomper"]." ".$rs_data->fields["apeper"];
$ls_estper=$rs_data->fields["staper"];
$ls_codsubnom=$rs_data->fields["codsubnom"];
$ls_dessubnom=$rs_data->fields["dessubnom"];
$ls_codasicar=$rs_data->fields["codasicar"];
$ls_denasicar=$rs_data->fields["denasicar"];
$ls_codcar=$rs_data->fields["codcar"];
$ls_descar=$rs_data->fields["descar"];
$ls_codtab=$rs_data->fields["codtab"];
$ls_destab=$rs_data->fields["destab"];
$ls_codgra=$rs_data->fields["codgra"];
$ls_codpas=$rs_data->fields["codpas"];
$li_sueper=$rs_data->fields["sueper"];
$li_sueper=$io_fun_nomina->uf_formatonumerico($li_sueper);
$li_compensacion=$rs_data->fields["compensacion"];
$li_compensacion=$io_fun_nomina->uf_formatonumerico($li_compensacion);
$li_horper=$rs_data->fields["horper"];
$li_horper=$io_fun_nomina->uf_formatonumerico($li_horper);
$li_sueintper=$rs_data->fields["sueintper"];
$li_sueintper=$io_fun_nomina->uf_formatonumerico($li_sueintper);
$li_salnorper=$rs_data->fields["salnorper"];
$li_salnorper=$io_fun_nomina->uf_formatonumerico($li_salnorper);
$li_sueproper=$rs_data->fields["sueproper"];
$li_sueproper=$io_fun_nomina->uf_formatonumerico($li_sueproper);
$ld_fecingper=$io_funciones->uf_formatovalidofecha($rs_data->fields["fecingper"]);
$ld_fecculcontr=$io_funciones->uf_formatovalidofecha($rs_data->fields["fecculcontr"]);
$ld_fecascper=$io_funciones->uf_formatovalidofecha($rs_data->fields["fecascper"]);
$ld_fecingper=$io_funciones->uf_convertirfecmostrar($ld_fecingper);
$ld_fecculcontr=$io_funciones->uf_convertirfecmostrar($ld_fecculcontr);
$ld_fecascper=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecascper"]);
$ls_coduniadm=$rs_data->fields["minorguniadm"]."-".$rs_data->fields["ofiuniadm"]."-".$rs_data->fields["uniuniadm"]."-".$rs_data->fields["depuniadm"]."-".$rs_data->fields["prouniadm"];
$ls_desuniadm=$rs_data->fields["desuniadm"];
$ls_codded=$rs_data->fields["codded"];
$ls_desded=$rs_data->fields["desded"];
$ls_codtipper=$rs_data->fields["codtipper"];
$ls_destipper=$rs_data->fields["destipper"];
$ls_codtabvac=$rs_data->fields["codtabvac"];
$ls_dentabvac=$rs_data->fields["dentabvac"];
$li_pagefeper=$rs_data->fields["pagefeper"];
$li_pagbanper=$rs_data->fields["pagbanper"];
$li_pagtaqper=$rs_data->fields["pagtaqper"];
$ls_codban=$rs_data->fields["codban"];
$ls_codage=$rs_data->fields["codage"];
$ls_codcueban=$rs_data->fields["codcueban"];
$ls_tipcuebanper=$rs_data->fields["tipcuebanper"];
$ls_tipcestic=$rs_data->fields["tipcestic"];
$ls_codescdoc=$rs_data->fields["codescdoc"];
$ls_desescdoc=$rs_data->fields["desescdoc"];
$ls_codcladoc=$rs_data->fields["codcladoc"];
$ls_descladoc=$rs_data->fields["descladoc"];
$ls_codubifis=$rs_data->fields["codubifis"];
$ls_desubifis=$rs_data->fields["desubifis"];
$ls_cueaboper=$rs_data->fields["cueaboper"];
$ls_dencueaboper=$rs_data->fields["dencueaboper"];
$ls_nomban=$rs_data->fields["nomban"];
$ls_nomage=$rs_data->fields["nomage"];
$ls_conjub=$rs_data->fields["conjub"];
$ls_catjub=$rs_data->fields["catjub"];
$ls_dencat=$rs_data->fields["dencat"];
$ls_codclavia=$rs_data->fields["codclavia"];
$ls_codunirac=$rs_data->fields["codunirac"];
$ls_grado=$rs_data->fields["grado"];
$ls_descasicar=$rs_data->fields["descasicar"];
$ls_obsrecper=$rs_data->fields["obsrecper"];
$li_suebasper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["suebasper"]);
$li_priespper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["priespper"]);
$li_pritraper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["pritraper"]);
$li_priproper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["priproper"]);
$li_prianoserper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["prianoserper"]);
$li_pridesper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["pridesper"]);
$li_porpenper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["porpenper"]);
$li_prinoascper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["prinoascper"]);
$li_monpenper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["monpenper"]);
$li_subtotper=$io_fun_nomina->uf_formatonumerico($rs_data->fields["subtotper"]);
$ls_coddep=$rs_data->fields["coddep"];
$ls_dendep=$rs_data->fields["dendep"];
$ls_tippen=$rs_data->fields["tipjub"];
$ls_fecvi=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecvid"]);
$ls_prirem=$io_fun_nomina->uf_formatonumerico($rs_data->fields["prirem"]);
$ls_segrem=$io_fun_nomina->uf_formatonumerico($rs_data->fields["segrem"]);
$ls_estencper=$rs_data->fields["estencper"];
$ld_fecegrper=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecegrper"]);
$ld_fecsusper=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecsusper"]);
$ls_obsegrper=trim($rs_data->fields["cauegrper"]);
$ls_codger=trim($rs_data->fields["codger"]);
switch ($ls_estper)
{
case "0":
$ls_estper="N/A";
break;
case "1":
$ls_estper="Activo";
break;
case "2":
$ls_estper="Vacaciones";
break;
case "3":
$ls_estper="Egresado";
break;
case "4":
$ls_estper="Suspendido";
break;
}
$ls_contrato="";
$ls_clase="";
if(substr($rs_data->fields["fecculcontr"],0,10)=="1900-01-01")
{
$ls_contrato="NO APLICA";
}
else
{
$ld_feccontrato=$rs_data->fields["fecculcontr"];
$ld_fecdesper=$_SESSION["la_nomina"]["fecdesper"];
$ld_fechasper=$io_funciones->uf_convertirfecmostrar($_SESSION["la_nomina"]["fechasper"]);
$li_incremento=0;
switch($_SESSION["la_nomina"]["tippernom"])
{
case 0://Semanal
$li_incremento=7;
break;
case 1://Quincenal
$li_incremento=15;
break;
case 2://Mensual
$li_incremento=30;
break;
case 3://Anual
$li_incremento=365;
break;
}
$ld_fechafinal=$io_sno->uf_suma_fechas($ld_fechasper,$li_incremento);
if($io_fecha->uf_comparar_fecha($ld_fecdesper,$ld_feccontrato))
{
if($io_fecha->uf_comparar_fecha($ld_feccontrato,$ld_fechafinal))
{
$ls_contrato=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecculcontr"]);
$ls_clase="class=texto-rojo";
}
else
{
$ld_fechafinal=$io_funciones->uf_convertirfecmostrar($ld_fechafinal);
$ld_fechafinal=$io_sno->uf_suma_fechas($ld_fechafinal,$li_incremento);
if($io_fecha->uf_comparar_fecha($ld_feccontrato,$ld_fechafinal))
{
$ls_contrato=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecculcontr"]);
$ls_clase="class=texto-azul";
}
else
{
$ls_contrato=$io_funciones->uf_convertirfecmostrar($rs_data->fields["fecculcontr"]);
}
}
}
}
switch ($as_tipo)
{
case "": // el llamado se hace desde sigesp_sno_d_personalnomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_codper','$ls_nomper','$ls_estper','$ls_codasicar','$ls_denasicar',";
print "'$ls_codcar','$ls_descar','$ls_codtab','$ls_destab','$ls_codgra','$ls_codpas',";
print "'$li_sueper','$li_horper','$li_sueintper','$li_sueproper','$ld_fecingper','$ld_fecculcontr','$ls_coduniadm',";
print "'$ls_desuniadm','$ls_codded','$ls_desded','$ls_codtipper','$ls_destipper','$ls_codtabvac','$ls_dentabvac',";
print "'$li_pagefeper','$li_pagbanper','$ls_codsubnom','$ls_dessubnom','$ls_codban','$ls_codage','$ls_codcueban',";
print "'$ls_tipcuebanper','$ls_tipcestic','$ls_codescdoc','$ls_codcladoc','$ls_codubifis','$ls_cueaboper',";
print "'$ls_dencueaboper','$ls_nomban','$ls_nomage','$ls_desescdoc','$ls_descladoc','$ls_desubifis',";
print "'$ai_subnomina','$li_tipnom','$ls_conjub','$ls_catjub','$ls_codclavia','$ls_dencat','$ls_codunirac','$li_pagtaqper',";
print "'$li_compensacion','$ld_fecascper','$ls_grado','$li_suebasper','$li_priespper','$li_pritraper','$li_priproper',";
print "'$li_prianoserper','$li_pridesper','$li_porpenper','$li_prinoascper','$li_monpenper','$li_subtotper','$ls_descasicar',";
print "'$ls_coddep','$ls_dendep','$ls_tippen','$ls_fecvi','$ls_prirem','$ls_segrem','$li_salnorper','$ls_estencper',";
print "'$ld_fecegrper','$ld_fecsusper','$ls_obsegrper','$ls_codger','$ls_obsrecper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "nomina": // el llamado se hace desde sigesp_sno_d_personalnomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarnomina('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "prestamo": // el llamado se hace desde sigesp_sno_p_prestamo.php
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarprestamo('$ls_codper','$ls_nomper','$ld_sueper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "catprestamo": // el llamado se hace desde sigesp_sno_cat_prestamo.php
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcatprestamo('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "reppagnomdes": // el llamado se hace desde sigesp_sno_r_pagonomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreppagnomdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "reppagnomhas": // el llamado se hace desde sigesp_sno_r_pagonomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreppagnomhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "cambioestatus": // el llamado se hace desde sigesp_sno_p_personalcambioestatus.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcambioestatus('$ls_codper','$ls_nomper','$ls_estper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "prenominades": // el llamado se hace desde sigesp_sno_p_calcularprenomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarprenominades('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "prenominahas": // el llamado se hace desde sigesp_sno_p_calcularprenomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarprenominahas('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "movimientonominas": // el llamado se hace desde sigesp_sno_p_movimientonominas.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarmovimientonominas('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "vacaciondes": // el llamado se hace desde sigesp_sno_p_vacacionvencida.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarvacaciondes('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "vacacionhas": // el llamado se hace desde sigesp_sno_p_vacacionvencida.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarvacacionhas('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "catvacacion": // el llamado se hace desde sigesp_sno_cat_vacacionprogramar.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcatvacacion('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "repprenomdes": // el llamado se hace desde sigesp_sno_r_prenomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepprenomdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "repprenomhas": // el llamado se hace desde sigesp_sno_r_prenomina.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepprenomhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "reprecpagdes": // el llamado se hace desde sigesp_sno_r_recibopago.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreprecpagdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "reprecpaghas": // el llamado se hace desde sigesp_sno_r_recibopago.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreprecpaghas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisfirdes": // el llamado se hace desde sigesp_sno_r_listadofirmas.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisfirdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisfirhas": // el llamado se hace desde sigesp_sno_r_listadofirmas.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisfirhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "reppredes": // el llamado se hace desde sigesp_sno_r_listadoprestamo.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreppredes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "repprehas": // el llamado se hace desde sigesp_sno_r_listadoprestamo.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepprehas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "repdetpredes": // el llamado se hace desde sigesp_sno_r_listadoprestamo.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepdetpredes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "repdetprehas": // el llamado se hace desde sigesp_sno_r_listadoprestamo.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepdetprehas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "personaproyecto": // el llamado se hace desde sigesp_sno_d_personaproyecto.php
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarpersonaproyecto('$ls_codper','$ls_nomper','$ls_desuniadm');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "personalprima": // el llamado se hace desde sigesp_sno_d_personaproyecto.php
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarpersonalprima('$ls_codper','$ls_nomper','$ls_desuniadm');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisprodes": // el llamado se hace desde sigesp_sno_r_listadoproyectospersonal.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisprodes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisprohas": // el llamado se hace desde sigesp_sno_r_listadoproyectospersonal.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisprohas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisbendes": // el llamado se hace desde sigesp_sno_r_listadobeneficiario.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisbendes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "replisbenhas": // el llamado se hace desde sigesp_sno_r_listadobeneficiario.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisbenhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "encargaduria": // el llamado se hace desde sigesp_sno_p_registrarencargaduria.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarencargaduria('$ls_codper','$ls_nomper','$ls_estper','$ls_codasicar','$ls_denasicar',";
print "'$ls_codcar','$ls_descar','$ls_codtab','$ls_destab','$ls_codgra','$ls_codpas',";
print "'$ls_coduniadm', '$ls_desuniadm','$ls_codsubnom','$li_tipnom','$ls_codunirac', ";
print "'$ls_grado', '$ls_coddep', '$ls_dendep');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "encargado": // el llamado se hace desde sigesp_sno_p_registrarencargaduria.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarencargado('$ls_codper','$ls_nomper','$ls_estper','$ls_codasicar','$ls_denasicar',";
print "'$ls_codcar','$ls_descar','$ls_codtab','$ls_destab','$ls_codgra','$ls_codpas',";
print "'$ls_coduniadm', '$ls_desuniadm','$ls_codsubnom','$li_tipnom','$ls_codunirac', ";
print "'$ls_grado', '$ls_coddep', '$ls_dendep');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "catencargaduria1": // el llamado se hace desde sigesp_sno_cat_registroencargaduria.php
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcatencargaduria1('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
case "catencargaduria2": // el llamado se hace desde sigesp_sno_cat_registroencargaduria.php
// para el personal encargado
$ld_sueper=$rs_data->fields["sueper"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcatencargaduria2('$ls_codper','$ls_nomper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ls_estper."</td>";
print "<td ".$ls_clase.">".$ls_contrato."</td>";
print "</tr>";
break;
}
$rs_data->MoveNext();
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
unset($ls_codnom);
unset($io_fecha);
}
$ld_fechadesde = $_POST["txtfechadesde"];
$ld_fechahasta = $_POST["txtfechahasta"];
$ls_documento = $_POST["txtdocumento"];
$rs_data = $io_cheques->uf_cargar_cheques_filtrados($ls_empresa,$ls_tipo,$ld_fechadesde,$ld_fechahasta,$ls_documento,$lb_valido);
if ($lb_valido)
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
$li_i = 0;
while($row=$io_sql->fetch_row($rs_data))
{
$li_i++;
$ls_numdoc = $row["numdoc"];
$ld_monmov = $row["monto"];
$ld_fecmov = $fun->uf_formatovalidofecha($row["fecmov"]);
$ld_fecmov = $fun->uf_convertirfecmostrar($ld_fecmov);
$ls_codpro = $row["cod_pro"];
$ls_cedben = $row["ced_bene"];
$ls_nomproben = $row["nomproben"];
$ls_codban = $row["codban"];
$ls_ctaban = $row["ctaban"];
$ls_conmov = $row["conmov"];
$ls_estcon = $row["estcon"];
$ld_fecpropag = '';
$object[$li_i][1] = "<input type=checkbox name=chksel".$li_i." id=chksel".$li_i." value=1>";
$object[$li_i][2] = "<input type=text name=txtnumdoc".$li_i." id=txtnumdoc".$li_i." value='".$ls_numdoc."' class=sin-borde readonly style=text-align:center size=17 maxlength=15 ><input name=codban".$li_i." type=hidden id=codban".$li_i." value='".$ls_codban."'> <input name=ctaban".$li_i." type=hidden id=ctaban".$li_i." value='".$ls_ctaban."'>";
$object[$li_i][3] = "<input type=text name=txtconmov".$li_i." id=txtconmov".$li_i." value='".$ls_conmov."' class=sin-borde readonly style=text-align:left size=30 maxlength=22><input name=estcon".$li_i." type=hidden id=estcon".$li_i." value=".$ls_estcon.">";
$object[$li_i][4] = "<input type=text name=txtmonto".$li_i." id=txtmonto".$li_i." value='".number_format($ld_monmov,2,",",".")."' class=sin-borde readonly style=text-align:right size=18 maxlength=22>";
$object[$li_i][5] = "<input type=text name=txtfecmov".$li_i." id=txtfecmov".$li_i." value='".$ld_fecmov."' class=sin-borde readonly style=text-align:center size=10 maxlength=10>";
$li_totrow=$io_report->DS->getRowCount("codemp");
for($li_i=1;$li_i<=$li_totrow;$li_i++)
{
$ls_codigo=$io_report->DS->data["codper"][$li_i];
$ls_nroeval=$io_report->DS->data["nroeval"][$li_i];
$ls_fecha=$io_report->DS->data["fecha"][$li_i];
$ls_fechaperidesde=$io_report->DS->data["fecinie"][$li_i];
$ls_fechaperihasta=$io_report->DS->data["fecfine"][$li_i];
$ls_uniadm=$io_report->DS->data["desuniadm"][$li_i];
$ls_totalodi=$io_report->DS->data["totalodi"][$li_i];
$ls_totalcompe=$io_report->DS->data["totalcompe"][$li_i];
$ls_nombreper=$io_report->DS->data["nomper"][$li_i];
$ls_apellidoper=$io_report->DS->data["apeper"][$li_i];
$ls_puntaje=$ls_totalodi+$ls_totalcompe;
$ls_fechaperidesde=$io_funciones->uf_formatovalidofecha($ls_fechaperidesde);
$ls_fechaperidesde=$io_funciones->uf_convertirfecmostrar($ls_fechaperidesde);
$ls_fechaperihasta=$io_funciones->uf_formatovalidofecha($ls_fechaperihasta);
$ls_fechaperihasta=$io_funciones->uf_convertirfecmostrar($ls_fechaperihasta);
$ls_fecha=$io_funciones->uf_formatovalidofecha($ls_fecha);
$ls_fecha=$io_funciones->uf_convertirfecmostrar($ls_fecha);
$ls_cadena=$ls_nombreper." ".$ls_apellidoper;
$la_data[$li_i]=array('codigo'=>$ls_codigo,'nombre'=>$ls_cadena,'tipoeva'=>$ls_uniadm,
'puntaje'=>$ls_puntaje,'fechaeva'=>$ls_fecha);
}
uf_print_encabezado_pagina($ls_titulo,$io_pdf,$ls_fechaperidesde,$ls_fechaperihasta);
uf_print_detalle($la_data,$io_pdf);
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
function uf_print($ad_fecfer, $as_nomfer)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: ad_fecfer // Fecha del Feriado
// as_nomfer // Descripción del Feriado
// 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 :
//////////////////////////////////////////////////////////////////////////////
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"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=60>Fecha</td>";
print "<td width=440>Nombre</td>";
print "</tr>";
$ls_sql="SELECT fecfer, nomfer ".
" FROM sno_diaferiado ".
" WHERE codemp='".$ls_codemp."'".
" AND nomfer like '".$as_nomfer."'";
if($ad_fecfer!="")
{
$ad_fecfer = $io_funciones->uf_convertirdatetobd($ad_fecfer);
$ls_sql=$ls_sql." AND fecfer='".$ad_fecfer."'";
}
$ls_sql=$ls_sql." ORDER BY fecfer ";
$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))
{
$ld_fecfer=$io_funciones->uf_formatovalidofecha($row["fecfer"]);
$ld_fecfer=$io_funciones->uf_convertirfecmostrar($ld_fecfer);
$ls_nomfer=$row["nomfer"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ld_fecfer','$ls_nomfer');\">".$ld_fecfer."</a></td>";
print "<td>".$ls_nomfer."</td>";
print "</tr>";
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}
uf_print_cabecera($li_totrows,$io_pdf); // Imprimimos
$io_pdf->ezStartPageNumbers(720,50,10,'','',1); // Insertar el número de página
if ($li_totrows>0)
{
for ($li_i=1;$li_i<=$li_totrows;$li_i++)
{
$io_pdf->transaction('start'); // Iniciamos la transacción
$thisPageNum = $io_pdf->ezPageCount;
$ldec_mondeb = 0;
$ldec_monhab = 0;
$li_totant = 0;
$ls_numdoc = $ds_edocta->getValue("numdoc",$li_i);
$ls_nomproben = $ds_edocta->getValue("beneficiario",$li_i);
$ls_conmov = $ds_edocta->getValue("conmov",$li_i);
$ls_operacion = $ds_edocta->getValue("operacion",$li_i);
$ld_fecmov = $io_funciones->uf_formatovalidofecha($ds_edocta->getValue("fecmov",$li_i));
$ld_fecmov = $io_funciones->uf_convertirfecmostrar($ld_fecmov);
$ld_montotdeb = $ds_edocta->getValue("debitos",$li_i);
$ld_montotcre = $ds_edocta->getValue("creditos",$li_i);
$ld_saldo = ($ld_saldo+$ld_montotdeb-$ld_montotcre);
$ld_montotdeb = number_format($ld_montotdeb,2,",",".");
$ld_montotcre = number_format($ld_montotcre,2,",",".");
$la_data[$li_i] = array('fecha'=>$ld_fecmov,'operacion'=>$ls_operacion,'numdoc'=>$ls_numdoc,'descripcion'=>$ls_conmov,'beneficiario'=>$ls_nomproben,'debito'=>$ld_montotdeb,'credito'=>$ld_montotcre,'saldo'=>number_format($ld_saldo,2,",","."));
}
$la_columna=array('fecha'=>'','operacion'=>'','numdoc'=>'','beneficiario'=>'','descripcion'=>'','debito'=>'','credito'=>'','saldo'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar Líneas
'shaded'=>2, // Sombra entre líneas
'shadeCol2'=>array(0.95,0.95,0.95), // Color de la sombra
'shadeCol'=>array(1.5,1.5,1.5), // Color de la sombra
'xOrientation'=>'center', // Orientación de la tabla
function uf_print($as_codsuemin, $as_gacsuemin, $as_decsuemin, $as_tipo)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: as_codsuemin // Código del sueldo minimo
// as_gacsuemin // Gaceta
// as_decsuemin // Decreto
// as_tipo // Verifica de donde se está llamando el catálogo
// Description: Función que obtiene e imprime los resultados de la busqueda
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 25/02/2008 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"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=100>Código</td>";
print "<td width=100>Año</td>";
print "<td width=100>Gaceta</td>";
print "<td width=100>Decreto</td>";
print "<td width=100>Monto</td>";
print "</tr>";
$ls_sql="SELECT codemp, codsuemin, anosuemin, gacsuemin, decsuemin, fecvigsuemin, monsuemin, obssuemin ".
" FROM sno_sueldominimo ".
" WHERE codemp='".$ls_codemp."'".
" AND codsuemin like '".$as_codsuemin."' ".
" AND gacsuemin like '".$as_gacsuemin."'".
" AND decsuemin like '".$as_decsuemin."'".
" ORDER BY codsuemin, anosuemin ";
$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))
{
$ls_codsuemin=$row["codsuemin"];
$li_anosuemin=$row["anosuemin"];
$ls_gacsuemin=$row["gacsuemin"];
$ls_decsuemin=$row["decsuemin"];
$ld_fecvigsuemin=$io_funciones->uf_formatovalidofecha($row["fecvigsuemin"]);
$ld_fecvigsuemin=$io_funciones->uf_convertirfecmostrar($ld_fecvigsuemin);
$li_monsuemin=$io_fun_nomina->uf_formatonumerico($row["monsuemin"]);
$ls_obssuemin=$row["obssuemin"];
switch ($as_tipo)
{
case "":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_codsuemin','$li_anosuemin','$ls_gacsuemin','$ls_decsuemin','$ld_fecvigsuemin',";
print "'$li_monsuemin','$ls_obssuemin');\">".$ls_codsuemin."</a></td>";
print "<td>".$li_anosuemin."</td>";
print "<td>".$ls_gacsuemin."</td>";
print "<td>".$ls_decsuemin."</td>";
print "<td>".$li_monsuemin."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}
$io_pdf->ezSetCmMargins(7,4,3,3);
$io_pdf->ezStartPageNumbers(406,30,10,'','',1);//Insertar el número de página.
$li_total=$io_report->DS->getRowCount("nroreg");
$li_aux=0;
uf_print_encabezado_pagina('','','',&$io_pdf);
for($li_i=1;$li_i<=$li_total;$li_i++)
{
$li_aux++;
// $io_pdf->transaction('start'); // Iniciamos la transacción
$thisPageNum=$io_pdf->ezPageCount;
$ls_nroeval=$io_report->DS->getValue("nroreg",$li_i);
$ls_codper=$io_report->DS->getValue("codper",$li_i);
$ls_cedper=$io_report->DS->getValue("cedper",$li_i);
$ls_nomper=$io_report->DS->getValue("nomper",$li_i);
$ldt_revini1=$io_report->DS->getValue("fecinirev1",$li_i);
$ldt_revini1=$io_funciones->uf_formatovalidofecha($ldt_revini1);
$ldt_revini1=$io_funciones->uf_convertirfecmostrar($ldt_revini1);
$ldt_revfin1=$io_report->DS->getValue("fecfinrev1",$li_i);
$ldt_revfin1=$io_funciones->uf_formatovalidofecha($ldt_revfin1);
$ldt_revfin1=$io_funciones->uf_convertirfecmostrar($ldt_revfin1);
$ldt_revini2=$io_report->DS->getValue("fecinirev2",$li_i);
$ldt_revini2=$io_funciones->uf_formatovalidofecha($ldt_revini2);
$ldt_revini2=$io_funciones->uf_convertirfecmostrar($ldt_revini2);
$ldt_revfin2=$io_report->DS->getValue("fecfinrev2",$li_i);
$ldt_revfin2=$io_funciones->uf_formatovalidofecha($ldt_revfin2);
$ldt_revfin2=$io_funciones->uf_convertirfecmostrar($ldt_revfin2);
$ls_objetivo=$io_report->DS->getValue("objetivo",$li_i);
$lb_valido=$io_report->uf_select_odi_persona($ls_nroeval,'E');
$ls_evaluador=$io_report->ds_detalle2->getValue("evaluador",$li_i);
if($ls_estrec==0)
{
$ls_checkedparc="checked";
$ls_checkedcomp="";
$ls_readonlyrad="";
}
else
{
$ls_checkedparc="";
$ls_checkedcomp="checked";
$ls_readonlyrad="onClick='return false'";
}
$ls_readonly="readonly";
$ls_numordcom=$io_func->uf_cerosizquierda($ls_numordcom,15);
$ld_fecrecbd=$io_func->uf_formatovalidofecha($ld_fecrec);
$ld_fecrecbd=$io_func->uf_convertirdatetobd($ld_fecrec);
$lb_valido=$io_fec->uf_valida_fecha_mes($ls_codemp,$ld_fecrecbd);
if($lb_valido)
{
if ($ls_status!="C")
{
$lb_encontrado=false;
if ($lb_encontrado)
{
$io_msg->message("Registro ya existe");
uf_pintardetalle($li_totrows+1,$ls_estpro);
}
else
{
$ls_numconrec="";
function uf_print_orden_compra()
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_orden_compra
// Access: private
// Arguments:
// Description: Función que obtiene e imprime los resultados de la busqueda de las Ordenes de Compra
// Creado Por: Ing. Yozelin Barragan.
// Fecha Creación: 09/05/2007 Fecha Última Modificación :
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
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_numordcom="%".$_POST["numordcom"]."%";
$ls_codpro="%".$_POST["codpro"]."%";
$ls_tipordcom=$_POST["tipordcom"];
$ld_fecregdes=$io_funciones->uf_convertirdatetobd($_POST["fecregdes"]);
$ld_fecreghas=$io_funciones->uf_convertirdatetobd($_POST["fecreghas"]);
$ls_orden=$_POST['orden'];
$ls_campoorden=$_POST['campoorden'];
$ls_tipo=$_POST['tipo'];
print "<table width=600 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=120 style='cursor:pointer' title='Ordenar por Numero de Orden de Compra' align='center' onClick=ue_orden('soc_ordencompra.numordcom')>Número</td>";
print "<td width=150 style='cursor:pointer' title='Ordenar por Proveedor' align='center' onClick=ue_orden('nompro')>Proveedor</td>";
print "<td width=70 style='cursor:pointer' title='Ordenar por Tipo de Orden de Compra' align='center' onClick=ue_orden('soc_ordencompra.estcondat')>Tipo</td>";
print "<td width=90 style='cursor:pointer' title='Ordenar por Estatus' align='center' onClick=ue_orden('soc_ordencompra.estcom')>Estatus</td>";
print "<td width=70 style='cursor:pointer' title='Ordenar por Fecha de Registro' align='center' onClick=ue_orden('soc_ordencompra.fecordcom')>Fecha de Registro</td>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Monto' align='center' onClick=ue_orden('soc_ordencompra.montot')>Monto</td>";
print "</tr>";
if($ls_tipordcom=='-')
{
$ls_cadena="";
}
else
{
$ls_cadena="soc_ordencompra.estcondat='".$ls_tipordcom."' AND";
}
/*$ls_sql=" SELECT soc_ordencompra.codemp, soc_ordencompra.numordcom, soc_ordencompra.estcondat, ".
" soc_ordencompra.fecordcom, soc_ordencompra.estsegcom, soc_ordencompra.porsegcom, ".
" soc_ordencompra.monsegcom, soc_ordencompra.forpagcom, soc_ordencompra.estcom, ".
" soc_ordencompra.diaplacom, soc_ordencompra.concom, soc_ordencompra.obscom, ".
" soc_ordencompra.monsubtot, soc_ordencompra.monbasimp, soc_ordencompra.monimp, ".
" soc_ordencompra.mondes, soc_ordencompra.montot, soc_ordencompra.lugentnomdep, ".
" soc_ordencompra.lugentdir, soc_ordencompra.monant, soc_ordencompra.estlugcom, ".
" soc_ordencompra.tascamordcom, soc_ordencompra.montotdiv, soc_ordencompra.estapro, ".
" soc_ordencompra.fecaprord, soc_ordencompra.coduniadm, soc_ordencompra.obsordcom, ".
" soc_ordencompra.cod_pro, soc_ordencompra.codfuefin, spg_unidadadministrativa.denuniadm, ".
" soc_ordencompra.codestpro1, soc_ordencompra.codestpro2, soc_ordencompra.tipbieordcom,".
" soc_ordencompra.codestpro3, soc_ordencompra.codestpro4, ".
" soc_ordencompra.codestpro5,soc_ordencompra.estcla , sigesp_fuentefinanciamiento.denfuefin, ".
" soc_ordencompra.codmon, sigesp_moneda.denmon, soc_ordencompra.codtipmod, ".
" soc_modalidadclausulas.denmodcla, soc_ordencompra.codpai, sigesp_pais.despai, ".
" soc_ordencompra.codest, sigesp_estados.desest, soc_ordencompra.codmun, ".
" sigesp_municipio.denmun, soc_ordencompra.codpar, sigesp_parroquia.denpar, ".
" soc_ordencompra.numanacot, soc_ordencompra.uniejeaso, ".
" soc_ordencompra.fechentdesde, soc_ordencompra.fechenthasta, ".
" (SELECT rpc_proveedor.nompro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS nompro, ".
" (SELECT rpc_proveedor.rifpro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS rifpro, ".
" (SELECT rpc_proveedor.tipconpro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS tipconpro ".
" FROM soc_ordencompra,spg_unidadadministrativa,spg_dt_unidadadministrativa,sigesp_fuentefinanciamiento,sigesp_moneda, ".
" soc_modalidadclausulas, sigesp_pais,sigesp_estados,sigesp_municipio,sigesp_parroquia ".
" WHERE soc_ordencompra.codemp = '".$ls_codemp."' AND ".
" soc_ordencompra.numordcom like '".$ls_numordcom."' AND ".
" ".$ls_cadena." soc_ordencompra.cod_pro like '".$ls_codpro."' AND ".
" soc_ordencompra.fecordcom BETWEEN '".$ld_fecregdes."' AND '".$ld_fecreghas."' AND ".
" soc_ordencompra.numordcom<>'000000000000000' AND ".
" soc_ordencompra.codemp=spg_unidadadministrativa.codemp AND ".
" soc_ordencompra.coduniadm=spg_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codemp=spg_dt_unidadadministrativa.codemp AND ".
" soc_ordencompra.coduniadm=spg_dt_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codestpro1=spg_dt_unidadadministrativa.codestpro1 AND ".
" soc_ordencompra.codestpro2=spg_dt_unidadadministrativa.codestpro2 AND ".
" soc_ordencompra.codestpro3=spg_dt_unidadadministrativa.codestpro3 AND ".
" soc_ordencompra.codestpro4=spg_dt_unidadadministrativa.codestpro4 AND ".
" soc_ordencompra.codestpro5=spg_dt_unidadadministrativa.codestpro5 AND ".
" soc_ordencompra.estcla=spg_dt_unidadadministrativa.estcla AND ".
" spg_dt_unidadadministrativa.codemp=spg_unidadadministrativa.codemp AND ".
" spg_dt_unidadadministrativa.coduniadm=spg_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codfuefin=sigesp_fuentefinanciamiento.codfuefin AND ".
" soc_ordencompra.codemp=sigesp_fuentefinanciamiento.codemp AND ".
" soc_ordencompra.codmon=sigesp_moneda.codmon AND ".
" soc_ordencompra.codemp=soc_modalidadclausulas.codemp AND ".
" soc_ordencompra.codtipmod=soc_modalidadclausulas.codtipmod AND ".
" soc_ordencompra.codpai=sigesp_pais.codpai AND soc_ordencompra.codest=sigesp_estados.codest AND ".
" soc_ordencompra.codmun=sigesp_municipio.codmun AND soc_ordencompra.codpar=sigesp_parroquia.codpar AND ".
" soc_ordencompra.codpai=sigesp_estados.codpai AND soc_ordencompra.codpai=sigesp_municipio.codpai AND ".
" soc_ordencompra.codest=sigesp_municipio.codest AND soc_ordencompra.codpai=sigesp_parroquia.codpai AND ".
" soc_ordencompra.codest=sigesp_parroquia.codest AND soc_ordencompra.codmun=sigesp_parroquia.codmun ".
" ORDER BY ".$ls_campoorden." ".$ls_orden;*/
$ls_sql=" SELECT soc_ordencompra.codemp, soc_ordencompra.numordcom, soc_ordencompra.estcondat, ".
" soc_ordencompra.fecordcom, soc_ordencompra.estsegcom, soc_ordencompra.porsegcom, ".
" soc_ordencompra.monsegcom, soc_ordencompra.forpagcom, soc_ordencompra.estcom, ".
" soc_ordencompra.diaplacom, soc_ordencompra.concom, soc_ordencompra.obscom, ".
" soc_ordencompra.monsubtot, soc_ordencompra.monbasimp, soc_ordencompra.monimp, ".
" soc_ordencompra.mondes, soc_ordencompra.montot, soc_ordencompra.lugentnomdep, ".
" soc_ordencompra.lugentdir, soc_ordencompra.monant, soc_ordencompra.estlugcom, ".
" soc_ordencompra.tascamordcom, soc_ordencompra.montotdiv, soc_ordencompra.estapro, ".
" soc_ordencompra.fecaprord, soc_ordencompra.coduniadm, soc_ordencompra.obsordcom, ".
" soc_ordencompra.cod_pro, soc_ordencompra.codfuefin, spg_unidadadministrativa.denuniadm, ".
" soc_ordencompra.codestpro1, soc_ordencompra.codestpro2, soc_ordencompra.tipbieordcom,".
" soc_ordencompra.codestpro3, soc_ordencompra.codestpro4, ".
" soc_ordencompra.codestpro5,soc_ordencompra.estcla , sigesp_fuentefinanciamiento.denfuefin, ".
" soc_ordencompra.codmon, soc_ordencompra.codtipmod, ".
" soc_ordencompra.codpai,soc_ordencompra.codest,soc_ordencompra.codmun,soc_ordencompra.codpar,".
" (SELECT despai FROM sigesp_pais".
" WHERE soc_ordencompra.codpai=sigesp_pais.codpai)AS despai, ".
" (SELECT desest FROM sigesp_estados ".
" WHERE soc_ordencompra.codpai=sigesp_estados.codpai".
" AND soc_ordencompra.codest=sigesp_estados.codest)AS desest, ".
" (SELECT denmun FROM sigesp_municipio ".
" WHERE soc_ordencompra.codpai=sigesp_municipio.codpai".
" AND soc_ordencompra.codest=sigesp_municipio.codest".
" AND soc_ordencompra.codmun=sigesp_municipio.codmun) AS denmun,".
" (SELECT denpar FROM sigesp_parroquia".
" WHERE soc_ordencompra.codpai=sigesp_parroquia.codpai".
" AND soc_ordencompra.codest=sigesp_parroquia.codest".
" AND soc_ordencompra.codmun=sigesp_parroquia.codmun".
" AND soc_ordencompra.codpar=sigesp_parroquia.codpar) AS denpar, ".
" (SELECT denmon FROM sigesp_moneda".
" WHERE soc_ordencompra.codmon=sigesp_moneda.codmon)AS denmon, ".
" soc_ordencompra.numanacot, soc_ordencompra.uniejeaso, ".
" soc_ordencompra.fechentdesde, soc_ordencompra.fechenthasta, ".
" (SELECT rpc_proveedor.nompro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS nompro, ".
" (SELECT rpc_proveedor.rifpro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS rifpro, ".
" (SELECT rpc_proveedor.tipconpro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=soc_ordencompra.codemp AND ".
" rpc_proveedor.cod_pro=soc_ordencompra.cod_pro) AS tipconpro, ".
" (SELECT denmodcla FROM soc_modalidadclausulas ".
" WHERE soc_ordencompra.codemp=soc_modalidadclausulas.codemp".
" AND soc_ordencompra.codtipmod=soc_modalidadclausulas.codtipmod)AS denmodcla ".
" FROM soc_ordencompra,spg_unidadadministrativa,spg_dt_unidadadministrativa,sigesp_fuentefinanciamiento ".
" WHERE soc_ordencompra.codemp = '".$ls_codemp."' AND ".
" soc_ordencompra.numordcom like '".$ls_numordcom."' AND ".
" ".$ls_cadena." soc_ordencompra.cod_pro like '".$ls_codpro."' AND ".
" soc_ordencompra.fecordcom BETWEEN '".$ld_fecregdes."' AND '".$ld_fecreghas."' AND ".
" soc_ordencompra.numordcom<>'000000000000000' AND ".
" soc_ordencompra.codemp=spg_unidadadministrativa.codemp AND ".
" soc_ordencompra.coduniadm=spg_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codemp=spg_dt_unidadadministrativa.codemp AND ".
" soc_ordencompra.coduniadm=spg_dt_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codestpro1=spg_dt_unidadadministrativa.codestpro1 AND ".
" soc_ordencompra.codestpro2=spg_dt_unidadadministrativa.codestpro2 AND ".
" soc_ordencompra.codestpro3=spg_dt_unidadadministrativa.codestpro3 AND ".
" soc_ordencompra.codestpro4=spg_dt_unidadadministrativa.codestpro4 AND ".
" soc_ordencompra.codestpro5=spg_dt_unidadadministrativa.codestpro5 AND ".
" soc_ordencompra.estcla=spg_dt_unidadadministrativa.estcla AND ".
" spg_dt_unidadadministrativa.codemp=spg_unidadadministrativa.codemp AND ".
" spg_dt_unidadadministrativa.coduniadm=spg_unidadadministrativa.coduniadm AND ".
" soc_ordencompra.codfuefin=sigesp_fuentefinanciamiento.codfuefin AND ".
" soc_ordencompra.codemp=sigesp_fuentefinanciamiento.codemp ".
" ORDER BY ".$ls_campoorden." ".$ls_orden;
$rs_data=$io_sql->select($ls_sql);//echo $ls_sql.'<br>';
if($rs_data===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message));
}
else
{
$li_i=0;
while($row=$io_sql->fetch_row($rs_data))
{
$ls_numordcom=$row["numordcom"];
$ls_estcondat=$row["estcondat"];
switch ($ls_estcondat)
{
case "B":
$ls_tipo_orden="BIENES";
break ;
case "S":
$ls_tipo_orden="SERVICIOS";
break ;
}
$ld_fecordcom = $io_funciones->uf_formatovalidofecha($row["fecordcom"]);
$ld_fecordcom = $io_funciones->uf_convertirfecmostrar($ld_fecordcom);
$ls_estsegcom = $row["estsegcom"];
$ls_tipconpro = $row["tipconpro"];
$ls_tipbieordcom = $row["tipbieordcom"];
$ls_porsegcom=number_format($row["porsegcom"],2,",",".");
$ld_monsegcom=number_format($row["monsegcom"],2,",",".");
$ls_forpagcom=$row["forpagcom"];
$ls_diaplacom=$row["diaplacom"];
$ls_concom=caracteres_especiales($row["concom"]);
$ls_obscom=caracteres_especiales($row["obscom"]);
$ld_monsubtot=number_format($row["monsubtot"],2,",",".");
$ld_monbasimp=number_format($row["monbasimp"],2,",",".");
$ld_monimp=number_format($row["monimp"],2,",",".");
$ld_mondes=number_format($row["mondes"],2,",",".");
$ld_montot=number_format($row["montot"],2,",",".");
$ls_lugentnomdep=$row["lugentnomdep"];
$ls_lugentdir=$row["lugentdir"];
$ld_monant=number_format($row["monant"],2,",",".");
$ls_estlugcom=$row["estlugcom"];
$ld_tascamordcom=number_format($row["tascamordcom"],2,",",".");
$ld_montotdiv=number_format($row["montotdiv"],2,",",".");
$ld_fecaprord=$row["fecaprord"];
$ls_coduniadm=$row["coduniadm"];
$ls_denuniadm=$row["denuniadm"];
$ls_obsordcom=$row["obsordcom"];
$ls_cod_pro=$row["cod_pro"];
$ls_nompro=$row["nompro"];
$ls_codfuefin=$row["codfuefin"];
$ls_denfuefin=$row["denfuefin"];
$ls_codestpro1 = trim($row["codestpro1"]);
$ls_codestpro2 = trim($row["codestpro2"]);
$ls_codestpro3 = trim($row["codestpro3"]);
$ls_codestpro4 = trim($row["codestpro4"]);
$ls_codestpro5 = trim($row["codestpro5"]);
$ls_estcla = $row["estcla"];
$ls_codmon=$row["codmon"];
$ls_denmon=$row["denmon"];
$ls_codtipmod=$row["codtipmod"];
$ls_denmodcla=$row["denmodcla"];
$ls_codpai=$row["codpai"];
$ls_despai=$row["despai"];
$ls_codest=$row["codest"];
$ls_desest=$row["desest"];
$ls_codmun=$row["codmun"];
$ls_denmun=$row["denmun"];
$ls_codpar=$row["codpar"];
$ls_denpar=$row["denpar"];
$ls_estcom=$row["estcom"];
$ls_estapro=$row["estapro"];
$ls_numanacot=$row["numanacot"];
$ls_uniejeaso=$row["uniejeaso"];
$ls_rifpro=$row["rifpro"];
$ls_estatus="";
$ld_prentdesde= $io_funciones->uf_convertirfecmostrar($row["fechentdesde"]);
$ld_prenthasta= $io_funciones->uf_convertirfecmostrar($row["fechenthasta"]);
switch ($ls_estcom)
{
case "0": // Deberian ir en letras(R) como estan en la sep y en cxp
$ls_estatus="REGISTRO";
break;
case "1": // Deberia ir E
if($ls_estapro==1)
{
$ls_estatus="EMITIDA (APROBADA)";
}
else
{
$ls_estatus="EMITIDA";
}
break;
case "2": // DEBERIA IR P
$ls_estatus="COMPROMETIDA(PROCESADA)";
break;
case "3": //DEBERIA IR A
$ls_estatus="ANULADA";
break;
case "4": //DEBERIA IR ????
$ls_estatus="ENTRADA COMPRA";
break;
case "5": //DEBERIA IR ????
$ls_estatus="PRE-COMPROMETIDA";
break;
case "6": //DEBERIA IR ????
$ls_estatus="PRE-COMPROMETIDA ANULADA";
break;
case "7": //DEBERIA IR ????
$ls_estatus="SERVICIO RECIBIDO";
break;
}
print "<tr class=celdas-blancas>";
$li_i++;
switch ($ls_tipo)
{
case "":
print "<td align='center'><a href=\"javascript: ue_aceptar('$ls_numordcom','$ls_estcondat','$ld_fecordcom',".
"'$ls_estsegcom','$ls_porsegcom','$ld_monsegcom','$ls_forpagcom','$ls_diaplacom',".
"'$ls_concom','$ld_monsubtot','$ld_monbasimp','$ld_mondes','$ld_monimp',".
"'$ld_montot','$ls_lugentnomdep','$ls_lugentdir','$ld_monant','$ls_estlugcom',".
"'$ld_tascamordcom','$ld_montotdiv','$ls_coduniadm','$ls_denuniadm',".
"'$ls_cod_pro','$ls_nompro','$ls_codfuefin','$ls_denfuefin','$ls_codestpro1',".
"'$ls_codestpro2','$ls_codestpro3','$ls_codestpro4','$ls_codestpro5','$ls_estcla','$ls_codmon',".
"'$ls_denmon','$ls_codtipmod','$ls_denmodcla','$ls_codpai','$ls_despai','$ls_codest',".
"'$ls_desest','$ls_codmun','$ls_denmun','$ls_codpar','$ls_denpar','$ls_estcom',".
"'$ls_estapro','$ls_estatus','$ls_numanacot','$ls_tipconpro','$ls_uniejeaso',
'$ld_prentdesde','$ld_prenthasta','$ls_tipbieordcom','$ls_rifpro','$li_i');\">".$ls_numordcom."</a></td>";
break;
case "REPORTE-DESDE":
print "<td align='center'><a href=\"javascript: ue_aceptar_reporte_desde('$ls_numordcom');\">".$ls_numordcom."</a></td>";
break;
case "REPORTE-HASTA":
print "<td align='center'><a href=\"javascript: ue_aceptar_reporte_hasta('$ls_numordcom');\">".$ls_numordcom."</a></td>";
break;
}
print "<td><input name='txtobscom".$li_i."' type='hidden' id='txtobscom".$li_i."' value='$ls_concom'><input name='txtconordcom".$li_i."' type='hidden' id='txtconordcom".$li_i."' value='$ls_obscom'>".$ls_nompro."</td>";
print "<td align='center'>".$ls_tipo_orden."</td>";
print "<td align='center'>".$ls_estatus."</td>";
print "<td align='left'>".$ld_fecordcom."</td>";
print "<td align='right'>".$ld_montot."</td>";
print "</tr>";
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}// end function uf_print_orden_compra
function uf_cargar_docs($object_bancos,$li_row,$ls_codban,$ls_ctaban,$ld_fecdesde,$ld_fechasta,$ls_codope)
{
//////////////////////////////////////////////////////////////////////////////
//
// Metodo: uf_cargar_bancos
//
// Access: public
//
//
// Returns:
// $object_bancos= Arreglo de los bancos para enviarlo a la clase grid_param
//
// Description: Función que se encarga de seleccionar los bancos y retornarlos en un arreglo de object
//
//////////////////////////////////////////////////////////////////////////////
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
$li_row=0;
global $con;
require_once("../shared/class_folder/class_sql.php");
require_once("../shared/class_folder/class_funciones.php");
$io_sql=new class_sql($con);
$io_fun=new class_funciones();
$ld_fecdesde=$io_fun->uf_convertirdatetobd($ld_fecdesde);
$ld_fechasta=$io_fun->uf_convertirdatetobd($ld_fechasta);
if($ls_codope!='T')
{
$ls_aux="AND codope='".$ls_codope."' ";
}
else
{
$ls_aux="";
}
$ls_sql="SELECT codban,numdoc,codope,ctaban,fecmov,conmov,(monto-monret) as total, numcarord
FROM scb_movbco
WHERE codemp='".$ls_codemp."' AND codope!='CH' ".$ls_aux." AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND fecmov between '".$ld_fecdesde."' AND '".$ld_fechasta."'
ORDER BY codban ASC";
$rs_bancos=$io_sql->select($ls_sql);
if (($rs_bancos===false))
{
$lb_valido=false;
}
else
{
while($row=$io_sql->fetch_row($rs_bancos))
{
$li_row++;
$ls_numdoc = $row["numdoc"];
$ld_fecmov = $io_fun->uf_formatovalidofecha($row["fecmov"]);
$ld_fecmov = $io_fun->uf_convertirfecmostrar($ld_fecmov);
$ls_conmov = $row["conmov"];
$ldec_total= $row["total"];
$ls_operacion = $row["codope"];
$ls_numcarord = $row["numcarord"];
if(trim($ls_numcarord)=="")
$ls_numcarord="------";
$object_bancos[$li_row][1]="<input type=checkbox name=chksel".$li_row." id=chksel".$li_row." value=1 style=width:15px;height:15px>";
$object_bancos[$li_row][2]="<input type=text name=txtnumdoc".$li_row." value='".$ls_numdoc."' class=sin-borde readonly style=text-align:center size=16 maxlength=15>";
$object_bancos[$li_row][3]="<input type=text name=txtnumcarord".$li_row." value='".$ls_numcarord."' class=sin-borde readonly style=text-align:center size=16 maxlength=15>";
$object_bancos[$li_row][4]="<input type=text name=txtconmov".$li_row." value='".$ls_conmov."' title='".$ls_conmov."' class=sin-borde readonly style=text-align:left size=35 maxlength=255>";
$object_bancos[$li_row][5]="<input type=text name=txtfecmov".$li_row." value='".$ld_fecmov."' class=sin-borde readonly style=text-align:center size=12 maxlength=10>";
$object_bancos[$li_row][6]="<input type=text name=txtmonto".$li_row." value='".number_format($ldec_total,2,",",".")."' class=sin-borde readonly style=text-align:right size=22 maxlength=22>";
$object_bancos[$li_row][7]="<input type=text name=txtcodope".$li_row." value='".$ls_operacion."' class=sin-borde readonly style=text-align:center size=10 maxlength=2>";
}
if($li_row==0)
{
$li_row=1;
$ls_numdoc = "";
$ld_fecmov = "";
$ls_conmov = "";
$ldec_total= "";
$ls_operacion = "";
$ls_numcarord="";
$object_bancos[$li_row][1]="<input type=checkbox name=chksel".$li_row." id=chksel".$li_row." value=1 style=width:15px;height:15px>";
$object_bancos[$li_row][2]="<input type=text name=txtnumdoc".$li_row." value='".$ls_numdoc."' class=sin-borde readonly style=text-align:center size=16 maxlength=15>";
$object_bancos[$li_row][3]="<input type=text name=txtnumcarord".$li_row." value='".$ls_numcarord."' class=sin-borde readonly style=text-align:center size=16 maxlength=15>";
$object_bancos[$li_row][4]="<input type=text name=txtconmov".$li_row." value='".$ls_conmov."' title='".$ls_conmov."' class=sin-borde readonly style=text-align:left size=35 maxlength=255>";
$object_bancos[$li_row][5]="<input type=text name=txtfecmov".$li_row." value='".$ld_fecmov."' class=sin-borde readonly style=text-align:center size=12 maxlength=10>";
$object_bancos[$li_row][6]="<input type=text name=txtmonto".$li_row." value='".number_format($ldec_total,2,",",".")."' class=sin-borde readonly style=text-align:right size=22 maxlength=22>";
$object_bancos[$li_row][7]="<input type=text name=txtcodope".$li_row." value='".$ls_operacion."' class=sin-borde readonly style=text-align:right size=10 maxlength=2>";
}
$io_sql->free_result($rs_bancos);
}
//return $rs_proveedor;
}//fin de uf_cargar_bancos
function uf_print_solicitud()
{
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: private
// Arguments:
// Description: Función que obtiene e imprime los resultados de la busqueda de la Solicitud de ejecuciòn presupuestaria
// Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang
// Modificado Por: Ing. Yozelin Barragan
// Fecha Creación: 17/03/2007 Fecha Última Modificación : 12/07/2007
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
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"];
global $ls_loncodestpro1,$li_longestpro1,$ls_loncodestpro2,$li_longestpro2,$ls_loncodestpro3,$li_longestpro3;
global $ls_loncodestpro4,$li_longestpro4,$ls_loncodestpro5,$li_longestpro5;
$ls_numsol="%".$_POST["numsol"]."%";
$ls_codtipsol=substr($_POST["codtipsol"],0,2);
$ls_coduniadm=$_POST["coduniadm"];
if (trim($ls_coduniadm)!="")
{
$ls_coduniadm="'".$ls_coduniadm."'";
}
else
{
$ls_logusr = $_SESSION["la_logusr"];
$ls_gestor = $_SESSION["ls_gestor"];
$ls_sql_seguridad = "";
if (strtoupper($ls_gestor) == "MYSQLT")
{
$ls_sql_seguridad = " AND CONCAT('".$ls_codemp."','SEP','".$ls_logusr."',spg_unidadadministrativa.coduniadm) IN (SELECT CONCAT(codemp,codsis,codusu,codintper)
FROM sss_permisos_internos WHERE codusu = '".$ls_logusr."' AND codsis = 'SEP')";
}
else
{
$ls_sql_seguridad = " AND '".$ls_codemp."'||'SEP'||'".$ls_logusr."'||spg_unidadadministrativa.coduniadm IN (SELECT codemp||codsis||codusu||codintper
FROM sss_permisos_internos WHERE codusu = '".$ls_logusr."' AND codsis = 'SEP')";
}
$ls_sql_unidad="SELECT spg_unidadadministrativa.coduniadm".
" FROM spg_unidadadministrativa, spg_dt_unidadadministrativa, spg_ep5 ".
" WHERE spg_unidadadministrativa.codemp='".$ls_codemp."' ".$ls_sql_seguridad.
" AND spg_unidadadministrativa.codemp=spg_dt_unidadadministrativa.codemp ".
" AND spg_unidadadministrativa.coduniadm=spg_dt_unidadadministrativa.coduniadm ".
" AND spg_dt_unidadadministrativa.codemp=spg_ep5.codemp ".
" AND spg_dt_unidadadministrativa.estcla=spg_ep5.estcla ".
" AND spg_dt_unidadadministrativa.codestpro1=spg_ep5.codestpro1 ".
" AND spg_dt_unidadadministrativa.codestpro2=spg_ep5.codestpro2 ".
" AND spg_dt_unidadadministrativa.codestpro3=spg_ep5.codestpro3 ".
" AND spg_dt_unidadadministrativa.codestpro4=spg_ep5.codestpro4 ".
" AND spg_dt_unidadadministrativa.codestpro5=spg_ep5.codestpro5 ".
" GROUP BY spg_unidadadministrativa.codemp, spg_unidadadministrativa.coduniadm";
$rs_data_unidad=$io_sql->select($ls_sql_unidad);
if ($rs_data_unidad===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message));
}
else
{
while($row=$io_sql->fetch_row($rs_data_unidad))
{
$ls_coduniadm=$ls_coduniadm."'".$row["coduniadm"]."',";
}
$largo=strlen($ls_coduniadm);
$ls_coduniadm=substr($ls_coduniadm, 0, $largo-1);
}
}
if($ls_codtipsol=="-") // no selecciono ninguna
{
/////////////////////////////////////////////////////////////////////////////
// CREADO POR ANAIS SARABIA PARA PODER CARGAR LOS TIPOS DE SOLICITUDES
// PRESUPUESTARIAS SIN AFECTACION (CASO REQUISICION DE MATERIALES Y SUMINISTROS
/////////////////////////////////////////////////////////////////////////////
$ls_sql= " SELECT * FROM SSS_USUARIOS_EN_GRUPOS WHERE CODEMP='".$ls_codemp."'".
" AND NOMGRU='ASISTENTE' AND CODUSU='".$_SESSION["la_logusr"]."'";
$rs_data=$io_sql->select($ls_sql);
if ($io_sql->num_rows($rs_data)==0) //EL USUARIO NO ESTA EN EL GRUPO DE ASISTENTE
{
$ls_codtipsol="";
}
else // SI SE ENCUENTRA
{
$ls_sql="SELECT codtipsol".
" FROM sep_tiposolicitud ".
" WHERE estope='S'".
" ORDER BY modsep, estope ASC "; //QUERY QUE BUSCA EL CODIGO DEL TIPO SOLICITUD PARA LA ASISTENTE
$rs_data=$io_sql->select($ls_sql);
while($row=$io_sql->fetch_row($rs_data))
{
$ls_codtipsol=$row["codtipsol"];
}
}
}
$ls_codtipsol="%".$ls_codtipsol."%";
$ld_fecregdes=$io_funciones->uf_convertirdatetobd($_POST["fecregdes"]);
$ld_fecreghas=$io_funciones->uf_convertirdatetobd($_POST["fecreghas"]);
$ls_orden=$_POST['orden'];
$ls_campoorden=$_POST['campoorden'];
$ls_tipo=$_POST['tipo'];
$ls_codigo=$_POST['codigo'];
$ls_tipdes=$_POST['tipdes'];
switch ($ls_tipdes)
{
case "P":
$ls_tabla=", rpc_proveedor";
$ls_cadena_provbene="AND sep_solicitud.cod_pro=rpc_proveedor.cod_pro AND rpc_proveedor.cod_pro='".$ls_codigo."' ";
break;
case "B":
$ls_tabla=", rpc_beneficiario";
$ls_cadena_provbene="AND sep_solicitud.ced_bene=rpc_beneficiario.ced_bene AND rpc_beneficiario.ced_bene='".$ls_codigo."' ";
break;
case "-":
$ls_tabla="";
$ls_cadena_provbene="";
break;
}
switch ($_SESSION["ls_gestor"])
{
case "MYSQLT":
$ls_cadena="CONCAT(rpc_beneficiario.nombene,' ',rpc_beneficiario.apebene)";
break;
case "POSTGRES":
$ls_cadena="rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene";
break;
case "INFORMIX":
$ls_cadena="rpc_beneficiario.nombene||' '||rpc_beneficiario.apebene";
}
print "<table width=630 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Numero de Solicitud' align='center' onClick=ue_orden('sep_solicitud.numsol')>Numero de Solicitud</td>";
print "<td width=120 style='cursor:pointer' title='Ordenar por Unidad Ejecutora' align='center' onClick=ue_orden('spg_unidadadministrativa.denuniadm')>Unidad Ejecutora</td>";
print "<td width=70 style='cursor:pointer' title='Ordenar por Fecha de Registro' align='center' onClick=ue_orden('sep_solicitud.fecregsol')>Fecha de Registro</td>";
print "<td width=120 style='cursor:pointer' title='Ordenar por Proveedor/Beneficiario' align='center' onClick=ue_orden('nombre')>Proveedor / Beneficiario</td>";
print "<td width=90 style='cursor:pointer' title='Ordenar por Estatus' align='center' onClick=ue_orden('sep_solicitud.estsol')>Estatus</td>";
print "<td width=100 style='cursor:pointer' title='Ordenar por Monto' align='center' onClick=ue_orden('monto')>Monto</td>";
print "</tr>";
$ls_sql="SELECT sep_solicitud.numsol, sep_solicitud.codtipsol, sep_solicitud.coduniadm, sep_solicitud.codfuefin, ".
" sep_solicitud.fecregsol, sep_solicitud.estsol, sep_solicitud.consol, sep_solicitud.monto, sep_solicitud.tipsepbie,".
" sep_solicitud.monbasinm, sep_solicitud.montotcar, sep_solicitud.tipo_destino, sep_solicitud.cod_pro, ".
" sep_solicitud.ced_bene, spg_unidadadministrativa.denuniadm, sigesp_fuentefinanciamiento.denfuefin,".
" sep_solicitud.estapro, sep_tiposolicitud.estope, sep_tiposolicitud.modsep,sep_tiposolicitud.estayueco,sep_solicitud.nombenalt,".
" sep_solicitud.codestpro1,sep_solicitud.codestpro2,sep_solicitud.codestpro3,sep_solicitud.codestpro4,sep_solicitud.codestpro5,sep_solicitud.estcla,".
" (CASE tipo_destino WHEN 'P' THEN (SELECT rpc_proveedor.nompro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=sep_solicitud.codemp ".
" AND rpc_proveedor.cod_pro=sep_solicitud.cod_pro) ".
" WHEN 'B' THEN (SELECT ".$ls_cadena." ".
" FROM rpc_beneficiario ".
" WHERE rpc_beneficiario.codemp=sep_solicitud.codemp ".
" AND rpc_beneficiario.ced_bene=sep_solicitud.ced_bene) ".
" ELSE 'NINGUNO' END ) AS nombre, ".
" (CASE tipo_destino WHEN 'P' THEN (SELECT rpc_proveedor.rifpro ".
" FROM rpc_proveedor ".
" WHERE rpc_proveedor.codemp=sep_solicitud.codemp ".
" AND rpc_proveedor.cod_pro=sep_solicitud.cod_pro) ".
" WHEN 'B' THEN (SELECT rpc_beneficiario.rifben ".
" FROM rpc_beneficiario ".
" WHERE rpc_beneficiario.codemp=sep_solicitud.codemp ".
" AND rpc_beneficiario.ced_bene=sep_solicitud.ced_bene) ".
" ELSE 'NINGUNO' END ) AS rif ".
" FROM sep_solicitud, spg_unidadadministrativa,spg_dt_unidadadministrativa, sigesp_fuentefinanciamiento, sep_tiposolicitud ".$ls_tabla." ".
" WHERE sep_solicitud.codemp='".$ls_codemp."' ".
" AND sep_solicitud.numsol like '".$ls_numsol."' ".
" AND sep_solicitud.coduniadm in (".$ls_coduniadm.") ".
" AND sep_solicitud.codtipsol like '".$ls_codtipsol."' ".
" AND sep_solicitud.fecregsol between '".$ld_fecregdes."' AND '".$ld_fecreghas."' ".
" ".$ls_cadena_provbene." ".
" AND sep_solicitud.codemp=spg_unidadadministrativa.codemp ".
//" AND sep_solicitud.coduniadm=spg_unidadadministrativa.coduniadm ".
" AND sep_solicitud.coduniadm=spg_unidadadministrativa.coduniadm ".
" AND spg_dt_unidadadministrativa.coduniadm=spg_unidadadministrativa.coduniadm ".
" AND sep_solicitud.codestpro1=spg_dt_unidadadministrativa.codestpro1 ".
" AND sep_solicitud.codestpro2=spg_dt_unidadadministrativa.codestpro2 ".
" AND sep_solicitud.codestpro3=spg_dt_unidadadministrativa.codestpro3 ".
" AND sep_solicitud.codestpro4=spg_dt_unidadadministrativa.codestpro4 ".
" AND sep_solicitud.codestpro5=spg_dt_unidadadministrativa.codestpro5 ".
" AND sep_solicitud.estcla=spg_dt_unidadadministrativa.estcla ".
" AND sep_solicitud.codemp=sigesp_fuentefinanciamiento.codemp ".
" AND sep_solicitud.codfuefin=sigesp_fuentefinanciamiento.codfuefin ".
" AND sep_solicitud.codtipsol=sep_tiposolicitud.codtipsol ".
" ORDER BY ".$ls_campoorden." ".$ls_orden."";
$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))
{
$ls_numsol=$row["numsol"];
$ls_codtipsol=$row["codtipsol"];
$ls_coduniadm=$row["coduniadm"];
$ls_codfuefin=$row["codfuefin"];
$ls_estsol=$row["estsol"];
$ls_consol=$row["consol"];
$ls_tipo_destino=$row["tipo_destino"];
switch ($ls_tipo_destino)
{
case "P":// proveedor
$ls_codigo=$row["cod_pro"];
break;
case "B":// beneficiario
$ls_codigo=$row["ced_bene"];
break;
case "-":// Ninguno
$ls_codigo="----------";
break;
}
$ls_rif=$row["rif"];
$ls_nombre=$row["nombre"];
$ls_denuniadm=$row["denuniadm"];
$ls_denfuefin=$row["denfuefin"];
$ls_estapro=$row["estapro"];
$ld_fecregsol=$io_funciones->uf_formatovalidofecha($row["fecregsol"]);
$ld_fecregsol=$io_funciones->uf_convertirfecmostrar($ld_fecregsol);
$li_monto=number_format($row["monto"],2,",",".");
$li_monbasinm=number_format($row["monbasinm"],2,",",".");
$li_montotcar=number_format($row["montotcar"],2,",",".");
$ls_estope=$row["estope"];
$ls_modsep=$row["modsep"];
$ls_codestpro1=$row["codestpro1"];
$ls_codestpro2=$row["codestpro2"];
$ls_codestpro3=$row["codestpro3"];
$ls_codestpro4=$row["codestpro4"];
$ls_codestpro5=$row["codestpro5"];
$ls_estcla=$row["estcla"];
$ls_nombenalt=$row["nombenalt"];
$ls_estayueco = $row["estayueco"];
$ls_tipsepbie = $row["tipsepbie"];
$ls_estatus="";
switch ($ls_estsol)
{
case "R":
$ls_estatus="REGISTRO";
break;
case "E":
if($ls_estapro==0)
{
$ls_estatus="EMITIDA";
}
else
{
$ls_estatus="EMITIDA (APROBADA)";
}
break;
case "A":
$ls_estatus="ANULADA";
break;
case "C":
$ls_estatus="CONTABILIZADA";
break;
case "P":
$ls_estatus="PROCESADA";
break;
case "D":
$ls_estatus="DESPACHADA";
break;
case "L":
$ls_estatus="DESPACHADA PARCIALMENTE";
break;
}
switch ($ls_tipo)
{
case "":
print "<tr class=celdas-blancas>";
print "<td align='center'><a href=\"javascript: ue_aceptar('$ls_numsol','$ls_codtipsol','$ls_coduniadm','$ls_codfuefin',".
"'$ls_estsol','$ls_tipo_destino','$ls_codigo','$ls_denuniadm',".
"'$ls_denfuefin','".$ls_nombre."','$ls_estapro','$ld_fecregsol','$li_monto','$li_monbasinm',".
"'$li_montotcar','$ls_estatus','$ls_estope','$ls_modsep','$ls_codestpro1','$ls_codestpro2',".
"'$ls_codestpro3','$ls_codestpro4','$ls_codestpro5','$ls_estcla','$ls_consol','$ls_nombenalt','$ls_estayueco','$ls_tipsepbie','$ls_rif');\">".$ls_numsol."</a></td>";
print "<td align='left'>".$ls_denuniadm."</td>";
print "<td align='center'>".$ld_fecregsol."</td>";
print "<td align='left'>".$ls_nombre."</td>";
print "<td align='center'>".$ls_estatus."</td>";
print "<td align='right'>".$li_monto."</td>";
print "</tr>";
break;
case "REPDES":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: ue_aceptar_reportedesde('$ls_numsol');\">".$ls_numsol."</a></td>";
print "<td>".$ls_denuniadm."</td>";
print "<td align='center'>".$ld_fecregsol."</td>";
print "<td>".$ls_nombre."</td>";
print "<td align='center'>".$ls_estatus."</td>";
print "<td align='right'>".$li_monto."</td>";
print "</tr>";
break;
case "REPHAS":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: ue_aceptar_reportehasta('$ls_numsol');\">".$ls_numsol."</a></td>";
print "<td>".$ls_denuniadm."</td>";
print "<td align='center'>".$ld_fecregsol."</td>";
print "<td>".$ls_nombre."</td>";
print "<td align='center'>".$ls_estatus."</td>";
print "<td align='right'>".$li_monto."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}// end function uf_print_solicitud
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.6,5,3,3); // Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(570,47,8,'','',1); // Insertar el número de página
uf_print_encabezado_pagina(&$io_pdf);
uf_print_detalle_concurso ($ls_titulo,$ls_descon,$ls_codcon,$ls_codcar,$io_pdf);
$ls_apeper=$io_report->DS->data["apeper"][1];
$ls_nomper=$io_report->DS->data["nomper"][1];
$ls_cedper=$io_report->DS->data["codper"][1];
$ls_fecnacper=$io_report->DS->data["fecnacper"][1];
$ls_fecnacper=$io_funciones->uf_formatovalidofecha($ls_fecnacper);
$ls_fecnacper=$io_funciones->uf_convertirfecmostrar($ls_fecnacper);
$ls_desest=$io_report->DS->data["desest"][1];
$ls_despais=$io_report->DS->data["despai"][1];
$ls_lugarnac= $ls_desest." - ".$ls_despais;
$ls_nacper=$io_report->DS->data["nacper"][1];
if ($ls_nacper=='V')
{
$ls_nacper='VENEZOLANO';
}
elseif ($ls_nacper=='E')
{
$ls_nacper='EXTRANJERO';
}
$ls_sexper=$io_report->DS->data["sexper"][1];
if ($ls_sexper=='F')
function uf_print($as_codper,$as_stavac)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: as_codper // Código de Personal
// as_stavac // Estatus de Vacaciones
// Description: Función que obtiene e imprime los resultados de la busqueda
// Creado Por: Ing. Yesenia Moreno
// Fecha Creación: 20/03/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"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=40>Código</td>";
print "<td width=60>Cédula</td>";
print "<td width=210>Nombre y Apellido</td>";
print "<td width=60>Fecha Vencimiento</td>";
print "<td width=60>Fecha Disfrute</td>";
print "<td width=70>Estatus</td>";
print "</tr>";
$ls_sql="SELECT sno_vacacpersonal.codper, sno_vacacpersonal.codvac, sno_vacacpersonal.fecvenvac, sno_vacacpersonal.fecdisvac, ".
" sno_vacacpersonal.fecreivac, sno_vacacpersonal.diavac, sno_vacacpersonal.stavac, sno_vacacpersonal.sueintbonvac, ".
" sno_vacacpersonal.sueintvac, sno_vacacpersonal.diabonvac, sno_vacacpersonal.obsvac, sno_vacacpersonal.diapenvac, ".
" sno_vacacpersonal.persalvac, sno_vacacpersonal.peringvac, sno_vacacpersonal.dianorvac, sno_vacacpersonal.quisalvac, ".
" sno_vacacpersonal.quireivac, sno_vacacpersonal.diaadivac, sno_vacacpersonal.diaadibon, sno_vacacpersonal.diafer, ".
" sno_vacacpersonal.sabdom, sno_vacacpersonal.diapag, sno_vacacpersonal.pagcan, sno_vacacpersonal.periodo_1, ".
" sno_vacacpersonal.cod_1, sno_vacacpersonal.nro_dias_1, sno_vacacpersonal.Monto_1, sno_vacacpersonal.periodo_2, ".
" sno_vacacpersonal.cod_2, sno_vacacpersonal.nro_dias_2, sno_vacacpersonal.Monto_2, sno_vacacpersonal.periodo_3, ".
" sno_vacacpersonal.cod_3, sno_vacacpersonal.nro_dias_3, sno_vacacpersonal.Monto_3, sno_vacacpersonal.periodo_4, ".
" sno_vacacpersonal.cod_4, sno_vacacpersonal.nro_dias_4, sno_vacacpersonal.Monto_4, sno_vacacpersonal.periodo_5, ".
" sno_vacacpersonal.cod_5, sno_vacacpersonal.nro_dias_5, sno_vacacpersonal.Monto_5, ".
" sno_vacacpersonal.diapervac, sno_vacacpersonal.pagpersal,sno_vacacpersonal.profueper,".
" sno_personal.cedper, sno_personal.nomper, sno_personal.apeper ".
" FROM sno_vacacpersonal, sno_personal ".
" WHERE sno_vacacpersonal.codemp='".$ls_codemp."' ".
" AND sno_vacacpersonal.codper like '".$as_codper."' ".
" AND sno_vacacpersonal.codemp=sno_personal.codemp ".
" AND sno_vacacpersonal.codper=sno_personal.codper ";
if(!empty($as_stavac))
{
$ls_sql=$ls_sql." AND sno_vacacpersonal.stavac=".$as_stavac." ";
}
else
{
$ls_sql=$ls_sql." AND (sno_vacacpersonal.stavac=1 OR sno_vacacpersonal.stavac=2)";
}
$ls_sql=$ls_sql." ORDER BY sno_personal.codper, sno_vacacpersonal.codvac ";
$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))
{
$ls_codper=$row["codper"];
$ls_cedper=$row["cedper"];
$ls_nomper=$row["apeper"].", ".$row["nomper"];
$li_codvac=$row["codvac"];
$ld_fecvenvac=$io_funciones->uf_formatovalidofecha($row["fecvenvac"]);
$ld_fecdisvac=$io_funciones->uf_formatovalidofecha($row["fecdisvac"]);
$ld_fecreivac=$io_funciones->uf_formatovalidofecha($row["fecreivac"]);
$ld_fecvenvac=$io_funciones->uf_convertirfecmostrar($ld_fecvenvac);
$ld_fecdisvac=$io_funciones->uf_convertirfecmostrar($ld_fecdisvac);
$ld_fecreivac=$io_funciones->uf_convertirfecmostrar($ld_fecreivac);
$li_diavac=$row["diavac"];
$li_stavac=$row["stavac"];
$li_sueintbonvac=$io_fun_nomina->uf_formatonumerico($row["sueintbonvac"]);
$li_sueintvac=$io_fun_nomina->uf_formatonumerico($row["sueintvac"]);
$li_diabonvac=$row["diabonvac"];
$ls_obsvac=$row["obsvac"];
$li_diapenvac=$row["diapenvac"];
$ls_persalvac=$row["persalvac"];
$ls_peringvac=$row["peringvac"];
$li_dianorvac=$row["dianorvac"];
$li_quisalvac=$row["quisalvac"];
$li_quireivac=$row["quireivac"];
$li_diaadivac=$row["diaadivac"];
$li_diaadibon=$row["diaadibon"];
$li_diafer=$row["diafer"];
$li_sabdom=$row["sabdom"];
$li_diapag=$row["diapag"];
$li_pagcan=$row["pagcan"];
$li_diapervac=$row["diapervac"];
$ls_pagpersal=$row["pagpersal"];
$ls_profueper=$row["profueper"];
switch($li_stavac)
{
case 1:// Vacaciones Vencidas
$ls_estatus="Vencidas";
break;
case 2:// Vacaciones Programadas
$ls_estatus="Programadas";
break;
case 3:// En Vacaciones
$ls_estatus="En Vacaciones";
break;
case 4:// Vacaciones Disfrutadas
$ls_estatus="Disfrutadas";
break;
}
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$li_codvac','$ld_fecvenvac','$ld_fecdisvac','$ld_fecreivac','$li_diavac',";
print "'$li_stavac','$li_sueintbonvac','$li_sueintvac','$li_diabonvac','$ls_obsvac','$li_diapenvac','$ls_persalvac',";
print "'$ls_peringvac','$li_dianorvac','$li_quisalvac','$li_quireivac','$li_diaadivac','$li_diaadibon','$li_diafer',";
print "'$li_sabdom','$li_diapag','$li_pagcan','$ls_codper','$ls_nomper','$li_diapervac','$ls_pagpersal','$ls_profueper');\">".$li_codvac."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper."</td>";
print "<td>".$ld_fecvenvac."</td>";
print "<td>".$ld_fecdisvac."</td>";
print "<td>".$ls_estatus."</td>";
print "</tr>";
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}
$ls_cargo2=trim ($row["descar"]);
if ($ls_cargo1!="Sin Asignación de Cargo")
{
$ls_cargo=$ls_cargo1;
}
if ($ls_cargo2!="Sin Cargo")
{
$ls_cargo=$ls_cargo2;
}
$ls_motivo=trim ($row["descripcion"]);
$ls_nombreper=$row["nomper"];
$ls_apellidoper=$row["apeper"];
$ls_desuniadm= trim ($row["desuniadm"]);
$ls_fecha=$io_funciones->uf_formatovalidofecha($ls_fecha);
$ls_fecha=$io_funciones->uf_convertirfecmostrar($ls_fecha);
$ls_cadena=$ls_nombreper." ".$ls_apellidoper;
$lb_valido=$io_report->uf_select_causa_llamada_atencion($ls_numllam, $rs_data2);
if ($lb_valido)
{
while ($row=$io_sql->fetch_row($rs_data2))
{
if ($ls_causas=="")
{
$ls_causas = trim ($row["dencaullam_aten"]);
}
else
function uf_print($as_codper, $as_cedper, $as_nomper, $as_apeper, $as_codnom, $as_tipo)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: as_codper // Código de Personal
// as_cedper // Cédula de Pesonal
// as_nomper // Nombre de Personal
// as_apeper // Apellido de Personal
// as_codnom // código de nómina a la que pertenece
// 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();
require_once("sigesp_sno.php");
$io_sno=new sigesp_sno();
$ls_codemp=$_SESSION["la_empresa"]["codemp"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=60>Código</td>";
print "<td width=40>Cédula</td>";
print "<td width=340>Nombre y Apellido</td>";
print "<td width=40>Rif</td>";
print "<td width=60>Estatus</td>";
print "</tr>";
$ls_sql_1="SELECT sno_personal.codper, sno_personal.cedper, sno_personal.nomper, sno_personal.apeper, sno_personal.dirper, ".
" sno_personal.fecnacper, sno_personal.edocivper, sno_personal.telhabper, sno_personal.telmovper, ".
" sno_personal.sexper, sno_personal.estaper, sno_personal.pesper, sno_personal.codpro, sno_personal.nivacaper, ".
" sno_personal.catper, sno_personal.cajahoper, sno_personal.numhijper, sno_personal.contraper, sno_personal.tipvivper, ".
" sno_personal.tenvivper, sno_personal.monpagvivper, sno_personal.ingbrumen, sno_personal.cuecajahoper, ".
" sno_personal.cuelphper, sno_personal.cuefidper, sno_personal.fecingadmpubper, sno_personal.vacper, sno_personal.porisrper, ".
" sno_personal.fecingper, sno_personal.anoservpreper, sno_personal.cedbenper, sno_personal.fecegrper, sno_personal.estper, ".
" sno_personal.fotper, sno_personal.codpai, sno_personal.codest, sno_personal.codmun, sno_personal.codpar, ".
" sno_personal.obsper, sno_personal.cauegrper, sno_personal.obsegrper, sno_personal.nacper, sno_personal.coreleper, ".
" sno_personal.cenmedper, sno_profesion.despro, sigesp_pais.despai, sno_personal.horper, sno_personal.turper, ".
" sigesp_estados.desest, sigesp_municipio.denmun, sigesp_parroquia.denpar, sno_personal.hcmper, sno_personal.tipsanper, ".
" sno_personal.codcom, sno_personal.codran, sno_personal.numexpper, sno_personal.codpainac, sno_personal.codestnac,sno_personal.codtippersss , sno_personal.enviorec, sno_personal.fecleypen, sno_personal.codcausa, ".
" sno_personal.fecreingper, sno_personal.fecjubper, sno_personal.codunivipladin, ".
" sno_personal.situacion, sno_personal.fecsitu, sno_personal.talcamper, sno_personal.talzapper, ".
" sno_personal.talpanper, sno_personal.anoservprecont, sno_personal.anoservprefijo, sno_personal.codorg, ".
" sno_personal.porcajahoper, sno_personal.codger, sno_personal.anoperobr,sno_personal.carantper,sno_personal.rifper, ".
" (SELECT denger FROM srh_gerencia ".
" WHERE srh_gerencia.codemp = sno_personal.codemp ".
" AND srh_gerencia.codger = sno_personal.codger ) AS denger, ".
" (SELECT desorg FROM srh_organigrama ".
" WHERE srh_organigrama.codemp = sno_personal.codemp ".
" AND srh_organigrama.codorg = sno_personal.codorg ) AS desorg, ".
" (SELECT denunivipladin FROM srh_unidadvipladin ".
" WHERE srh_unidadvipladin.codemp = sno_personal.codemp ".
" AND srh_unidadvipladin.codunivipladin = sno_personal.codunivipladin ) AS denunivipladin, ".
" (SELECT dentippersss FROM sno_tipopersonalsss WHERE sno_tipopersonalsss.codemp= sno_personal.codemp AND sno_tipopersonalsss.codtippersss = sno_personal.codtippersss) as dentippersss,".
" (SELECT descom FROM sno_componente WHERE sno_componente.codemp = sno_personal.codemp AND sno_componente.codcom = sno_personal.codcom ) AS descom, ".
" (SELECT desran FROM sno_rango WHERE sno_rango.codemp = sno_personal.codemp AND sno_rango.codcom = sno_personal.codcom AND sno_rango.codran = sno_personal.codran) AS desran, ".
" (SELECT despai FROM sigesp_pais WHERE sigesp_pais.codpai = sno_personal.codpainac ) AS despainac, ".
" (SELECT desest FROM sigesp_estados WHERE sigesp_estados.codpai = sno_personal.codpainac AND sigesp_estados.codest = sno_personal.codestnac ) AS desestnac ".
" FROM sno_personal, sno_profesion, sigesp_pais, sigesp_estados, sigesp_municipio, sigesp_parroquia ".
" WHERE sno_personal.codemp='".$ls_codemp."'".
" AND sno_profesion.codemp = sno_personal.codemp ".
" AND sno_profesion.codpro = sno_personal.codpro ".
" AND sigesp_pais.codpai = sno_personal.codpai ".
" AND sigesp_estados.codpai = sno_personal.codpai ".
" AND sigesp_estados.codest = sno_personal.codest ".
" AND sigesp_municipio.codpai = sno_personal.codpai ".
" AND sigesp_municipio.codest = sno_personal.codest ".
" AND sigesp_municipio.codmun = sno_personal.codmun ".
" AND sigesp_parroquia.codpai = sno_personal.codpai ".
" AND sigesp_parroquia.codest = sno_personal.codest ".
" AND sigesp_parroquia.codmun = sno_personal.codmun ".
" AND sigesp_parroquia.codpar = sno_personal.codpar ".
" AND sno_personal.codper like '".$as_codper."' ".
" AND sno_personal.cedper like '".$as_cedper."'".
" AND sno_personal.nomper like '".$as_nomper."' ".
" AND sno_personal.apeper like '".$as_apeper."'".
" AND sno_personal.codper IN (SELECT sno_personal.codper".
" FROM sss_permisos_internos,sno_personal".
" WHERE sss_permisos_internos.codsis='SNO' AND sss_permisos_internos.codusu='".$_SESSION["la_logusr"]."' ".
" AND sno_personal.codtippersss=sss_permisos_internos.codintper )";
$ls_sql = "select * from sno_personal where codper like '".$as_codper."' and cedper like '".$as_cedper."' and nomper like '".$as_nomper."' and apeper like '".$as_apeper."'";
//echo "sql=".$ls_sql;
if($as_tipo=="asignacion")
{
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
$ls_repetidos=$io_sno->uf_select_config("SNO","CONFIG","NOPERMITIR_REPETIDOS","1","C");
$ls_sql=$ls_sql." AND sno_personal.estper = '1' ";
$ls_espnom=trim($_SESSION["la_nomina"]["espnom"]);
switch($ls_espnom)
{
case "0": //Nómina Normal
if($ls_repetidos=="1")
{
$ls_sql=$ls_sql." AND (NOT sno_personal.codper IN (SELECT codper ".
" FROM sno_personalnomina, sno_nomina ".
" WHERE sno_personalnomina.codemp='".$ls_codemp."'".
" AND sno_nomina.espnom='0' ".
" AND sno_personalnomina.staper<>'3' ".
" AND sno_personalnomina.codemp=sno_nomina.codemp ".
" AND sno_personalnomina.codnom=sno_nomina.codnom ))";
}
else
{
$ls_sql=$ls_sql." AND (NOT sno_personal.codper IN (SELECT codper ".
" FROM sno_personalnomina, sno_nomina ".
" WHERE sno_personalnomina.codemp='".$ls_codemp."'".
" AND sno_personalnomina.codnom='".$ls_codnom."'".
" AND sno_nomina.espnom='0' ".
" AND sno_personalnomina.codemp=sno_nomina.codemp ".
" AND sno_personalnomina.codnom=sno_nomina.codnom ))";
}
break;
case "1": //Nómina Especial
$ls_sql=$ls_sql." AND (NOT sno_personal.codper IN (SELECT codper ".
" FROM sno_personalnomina, sno_nomina ".
" WHERE sno_personalnomina.codemp='".$ls_codemp."'".
" AND sno_personalnomina.codnom='".$ls_codnom."'".
" AND sno_personalnomina.codemp=sno_nomina.codemp ".
" AND sno_personalnomina.codnom=sno_nomina.codnom ))";
break;
}
}
if(($as_tipo=="repconttrabdes")||($as_tipo=="repconttrabhas"))
{
$ls_sql=$ls_sql." AND (sno_personal.codper IN (SELECT codper FROM sno_personalnomina".
" WHERE (sno_personalnomina.codemp='".$ls_codemp."')".
" AND (sno_personalnomina.codnom='".$as_codnom."')))";
}
if($as_tipo=="ipasme")
{
$ls_sql=$ls_sql." AND (NOT sno_personal.codper IN (SELECT codper FROM sno_ipasme_afiliado ".
" WHERE (sno_ipasme_afiliado.codemp='".$ls_codemp."')))";
}
$ls_sql=$ls_sql." ORDER BY sno_personal.codper ";
$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))
{
$ls_codper=$row["codper"];
$ls_cedper=$row["cedper"];
$ls_nomper=$row["nomper"];
$ls_apeper=$row["apeper"];
$ls_dirper=$row["dirper"];
$ld_fecnacper=$io_funciones->uf_formatovalidofecha($row["fecnacper"]);
$ld_fecnacper=$io_funciones->uf_convertirfecmostrar($ld_fecnacper);
$ls_edocivper=$row["edocivper"];
$ls_telhabper=$row["telhabper"];
$ls_telmovper=$row["telmovper"];
$ls_sexper=$row["sexper"];
$li_estaper=$row["estaper"];
$li_estaper=$io_fun_nomina->uf_formatonumerico($li_estaper);
$li_pesper=$row["pesper"];
$li_pesper=$io_fun_nomina->uf_formatonumerico($li_pesper);
$ls_codpro=$row["codpro"];
$ls_nivacaper=$row["nivacaper"];
$ls_codpai=$row["codpai"];
$ls_codest=$row["codest"];
$ls_codpainac=$row["codpainac"];
$ls_codestnac=$row["codestnac"];
$ls_codmun=$row["codmun"];
$ls_codpar=$row["codpar"];
$ls_catper=$row["catper"];
$ls_cedbenper=$row["cedbenper"];
$ls_numhijper=$row["numhijper"];
$ls_obsper=preg_replace("/\s+/"," ",$row["obsper"]);
$ls_contraper=$row["contraper"];
$ls_tipvivper=$row["tipvivper"];
$ls_tenvivper=$row["tenvivper"];
$li_monpagvivper=$row["monpagvivper"];
$li_monpagvivper=$io_fun_nomina->uf_formatonumerico($li_monpagvivper);
$ls_cuecajahoper=$row["cuecajahoper"];
$ls_cuelphper=$row["cuelphper"];
$ls_cuefidper=$row["cuefidper"];
$ls_cajahoper=$row["cajahoper"];
$ld_fecingadmpubper=$io_funciones->uf_formatovalidofecha($row["fecingadmpubper"]);
$ld_fecingadmpubper=$io_funciones->uf_convertirfecmostrar($ld_fecingadmpubper);
$li_anoservpreper=$row["anoservpreper"];
$ld_fecingper=$io_funciones->uf_formatovalidofecha($row["fecingper"]);
$ld_fecingper=$io_funciones->uf_convertirfecmostrar($ld_fecingper);
$ld_fecegrper=$io_funciones->uf_formatovalidofecha($row["fecegrper"]);
$ld_fecegrper=$io_funciones->uf_convertirfecmostrar($ld_fecegrper);
$ls_cauegrper=$row["cauegrper"];
$ls_obsegrper=preg_replace("/\s+/"," ",$row["obsegrper"]); // para reemplazar los \n o ENTER
$ls_estper=$row["estper"];
$ls_nacper=$row["nacper"];
$ls_hcmper=$row["hcmper"];
$ls_tipsanper=$row["tipsanper"];
$ls_rifper=$row["rifper"];
$ls_tipperrif = substr($ls_rifper,0,1);//Tipo Persona RIF.(J=Juridico,G=Gubernamental,V=Natural Venezolano,E=Natural Extranjero).
$ls_numpririf = substr($ls_rifper,2,8);//Número Principal del RIF, 8 Dígitos (0-9).
$ls_numterrif = substr($ls_rifper,11,1);//Número Terminal del RIF, 1 Dígitos (0-9).
$ls_situacion=$row["situacion"];
switch ($ls_estper)
{
case "0":
$ls_estper="Pre-Ingreso";
$ls_estatus=0;
break;
case "1":
$ls_estper="Activo";
$ls_estatus=1;
break;
case "2":
$ls_estper="N/A";
$ls_estatus=2;
break;
case "3":
$ls_estper="Egresado";
$ls_estatus=3;
break;
}
$ls_despro=$row["despro"];
$ls_despai=$row["despai"];
$ls_desest=$row["desest"];
$ls_desmun=$row["denmun"];
$ls_despar=$row["denpar"];
$ls_nomfot=$row["fotper"];
$ls_coreleper=$row["coreleper"];
$ls_cenmedper=$row["cenmedper"];
$ls_turper=$row["turper"];
$ls_horper=$row["horper"];
$ls_codcom=$row["codcom"];
$ls_codran=$row["codran"];
$ls_descom=$row["descom"];
$ls_desran=$row["desran"];
$ls_numexpper=$row["numexpper"];
$ls_despainac=$row["despainac"];
$ls_desestnac=$row["desestnac"];
$ls_codtippersss=$row["codtippersss"];
$ls_dentippersss=$row["dentippersss"];
$ld_fecreingper=$io_funciones->uf_formatovalidofecha($row["fecreingper"]);
$ld_fecreingper=$io_funciones->uf_convertirfecmostrar($ld_fecreingper);
$ld_fecjubper=$io_funciones->uf_formatovalidofecha($row["fecjubper"]);
$ld_fecjubper=$io_funciones->uf_convertirfecmostrar($ld_fecjubper);
$ls_codunivipladin=$row["codunivipladin"];
$ls_denunivipladin=$row["denunivipladin"];
$ls_enviorec=$row["enviorec"];
$ls_fecleypen=$io_funciones->uf_formatovalidofecha($row["fecleypen"]);
$ls_fecleypen=$io_funciones->uf_convertirfecmostrar($ls_fecleypen);
$ls_codcausa=$row["codcausa"];
$ls_fecsitu=$io_funciones->uf_formatovalidofecha($row["fecsitu"]);
$ls_fecsitu=$io_funciones->uf_convertirfecmostrar($ls_fecsitu);
$ls_talcamper=$row["talcamper"];
$ls_talpanper=$row["talpanper"];
$ls_talzapper=$row["talzapper"];
$ls_anoprevcont=$row["anoservprecont"];
$ls_anoprevfijo=$row["anoservprefijo"];
$ls_codorg=$row["codorg"];
$ls_desorg=$row["desorg"];
$ls_codger=$row["codger"];
$ls_denger=$row["denger"];
$li_porcajahoper=$row["porcajahoper"];
$li_porcajahoper=$io_fun_nomina->uf_formatonumerico($li_porcajahoper);
$li_anoperobr=$row["anoperobr"];
$ls_carantper=$row["carantper"];
switch ($as_tipo)
{
case "":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_codper','$ls_cedper','$ls_nomper','$ls_apeper','$ls_dirper','$ld_fecnacper',";
print "'$ls_edocivper','$ls_telhabper','$ls_telmovper','$ls_sexper','$li_estaper','$li_pesper','$ls_codpro','$ls_nivacaper',";
print "'$ls_codpai','$ls_codest','$ls_codmun','$ls_codpar','$ls_catper','$ls_cedbenper','$ls_numhijper','$ls_obsper',";
print "'$ls_contraper','$ls_tipvivper','$ls_tenvivper','$li_monpagvivper','$ls_cuecajahoper','$ls_cuelphper','$ls_cuefidper',";
print "'$ls_cajahoper','$ld_fecingadmpubper','$li_anoservpreper','$ld_fecingper','$ld_fecegrper','$ls_cauegrper', ";
print "'$ls_obsegrper','$ls_despro','$ls_despai','$ls_desest','$ls_desmun','$ls_despar','$ls_estper','$ls_nomfot','$ls_nacper',";
print "'$ls_coreleper','$ls_cenmedper','$ls_turper','$ls_horper','$ls_hcmper','$ls_tipsanper','$ls_codcom','$ls_codran',";
print "'$ls_descom','$ls_desran','$ls_numexpper','$ls_codpainac','$ls_codestnac','$ls_despainac','$ls_desestnac',";
print "'$ls_codtippersss','$ls_dentippersss','$ld_fecreingper','$ld_fecjubper','$ls_codunivipladin','$ls_denunivipladin','$ls_enviorec','$ls_fecleypen','$ls_codcausa','$ls_situacion','$ls_fecsitu','$ls_talcamper','$ls_talpanper','$ls_talzapper','$ls_anoprevcont','$ls_anoprevfijo','$ls_codorg','$ls_desorg','$li_porcajahoper','$ls_codger', '$ls_denger','$li_anoperobr','$ls_carantper','$ls_tipperrif','$ls_numpririf','$ls_numterrif');\">";
print "".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_tipperrif."-".$ls_numpririf."-".$ls_numterrif."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "egreso":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptaregreso('$ls_codper','$ls_nomper','$ls_apeper','$ld_fecegrper','$ls_cauegrper',";
print "'$ls_obsegrper','$ls_estper','$ld_fecingper','$ld_fecnacper','$ls_codcausa');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "asignacion":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarasignacion('$ls_codper','$ls_nomper','$ls_apeper','$ls_estper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "cambio":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarcambio('$ls_codper','$ls_nomper','$ls_apeper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "buscar":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarbuscar('$ls_codper','$ls_nomper','$ls_apeper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisperdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisperhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisperracrecdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperracrecdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisperracrechas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperracrechas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repconttrabdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconttrabdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repconttrabhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconttrabhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "ipasme":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptaripasme('$ls_codper','$ls_nomper','$ls_apeper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssingdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssingdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssinghas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssinghas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssretdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssretdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssrethas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssrethas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivsssaldes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivsssaldes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivsssalhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivsssalhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivsscendes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivsscendes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivsscenhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivsscenhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssmoddes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssmoddes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssmodhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssmodhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssrepdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssrepdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssrephas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssrephas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssperdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssperdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repivssperhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepivssperhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repvacperdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepvacperdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repvacperhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepvacperhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisfamdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisfamdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisfamhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisfamhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repconcdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconcdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repconchas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconchas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repliscumdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepliscumdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repliscumhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepliscumhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repficperdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepficperdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repficperhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepficperhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisantdes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisantdes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "replisanthas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisanthas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "recpagcondes":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrecpagcondes('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "recpagconhas":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrecpagconhas('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "retencionarc":
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar_retencion_arc('$ls_codper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
case "repconttrabivssdes":
$ls_nombre=$ls_nomper." ".$ls_apeper;
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconttrabivssdes('$ls_codper','$ls_nombre','$ls_estatus','$ld_fecegrper');\">".$ls_codper."</a></td>";
print "<td>".$ls_cedper."</td>";
print "<td>".$ls_nomper." ".$ls_apeper."</td>";
print "<td>".$ls_estper."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($io_sno);
unset($ls_codemp);
}
if ($li_totrows>0)
{
while ($row=$io_sql->fetch_row($rs_data))
{
$li_fila++;
$ls_codemp = trim($row["codemp"]);
$ls_numdoc = trim($row["numdoc"]);
$ls_codope = $row["codope"];
$ls_estdoc = $row["estmov"];
$ls_codpro = $row["cod_pro"];
$ls_cedben = $row["ced_bene"];
$ls_tipdes = $row["tipo_destino"];
$ls_nombre = $row["nombre"];
$ls_conmov = $row["conmov"];
$ld_monmov = $row["monto"];
$ls_fecmov = $io_funcion->uf_formatovalidofecha($row["fecmov"]);
$ls_fecmov = $io_funcion->uf_convertirfecmostrar($ls_fecmov);
$object[$li_fila][1]="<input type=text id=txtnumdoc".$li_fila." name=txtnumdoc".$li_fila." value='".$ls_numdoc."' class=sin-borde size=15 style=text-align:center readonly>";
$object[$li_fila][2]="<input type=text id=txttipope".$li_fila." name=txttipope".$li_fila." value='".$ls_codope."' class=sin-borde size=5 style=text-align:center readonly>";
$object[$li_fila][3]="<input type=text id=txtnombre".$li_fila." name=txtnombre".$li_fila." value='".$ls_nombre."' class=sin-borde size=40 style=text-align:left readonly>";
$object[$li_fila][4]="<input type=text id=txtfecha".$li_fila." name=txtfecha".$li_fila." value='".$ls_fecmov."' class=sin-borde size=8 style=text-align:center readonly>";
$object[$li_fila][5]="<input type=text id=txtmonto".$li_fila." name=txtmonto".$li_fila." value='".number_format($ld_monmov,2,',','.')."' class=sin-borde size=20 style=text-align:right readonly>";
}
$io_grid->make_gridScroll($li_fila,$title,$object,570,'Listado de Documentos',$ls_grid,200);
}
else
{
$io_msg->message("No se han encontrado Documentos para este Criterio de Búsqueda !!!");
}
}
}
$io_funciones=new class_funciones();
require_once("../shared/class_folder/class_fecha.php");
$io_fecha=new class_fecha();
uf_limpiarvariables();
switch ($ls_operacion)
{
case "PROCESAR":
uf_load_variables();
$lb_valido=false;
for($li_i=0;$li_i<=$li_totrow;$li_i++)
{
if (array_key_exists("chkaprobacion".$li_i,$_POST))
{
$ls_numsol=$io_fun_sep->uf_obtenervalor("txtnumsol".$li_i,"");
$ld_fecregsol=$io_fun_sep->uf_obtenervalor("txtfecregsol".$li_i,"");
$ld_fecregsol=$io_funciones->uf_formatovalidofecha($ld_fecregsol);
switch ($ls_tipope)
{
case 0:
$lb_valido=$io_fecha->uf_comparar_fecha($ld_fecregsol,$ld_fecaprsep);
if($lb_valido)
{
$lb_existe=$io_sep->uf_validar_estatus_solicitud($ls_numsol,"1");
if(!$lb_existe)
{
$lb_valido=$io_sep->uf_validar_cuentas($ls_numsol);
if($lb_valido)
{
$lb_valido=$io_sep->uf_update_estatus_solicitud($ls_numsol,1,$ld_fecaprsep,$la_seguridad);
}
}
$li_preartc= str_replace(".","",$li_preartc);
$li_preartc= str_replace(",",".",$li_preartc);
$li_preartd= str_replace(".","",$li_preartd);
$li_preartd= str_replace(",",".",$li_preartd);
$li_pesart= str_replace(".","",$li_pesart);
$li_pesart= str_replace(",",".",$li_pesart);
$li_altart= str_replace(".","",$li_altart);
$li_altart= str_replace(",",".",$li_altart);
$li_ancart= str_replace(".","",$li_ancart);
$li_ancart= str_replace(",",".",$li_ancart);
$li_proart= str_replace(".","",$li_proart);
$li_proart= str_replace(",",".",$li_proart);
$li_reoart= str_replace(".","",$li_reoart);
$li_reoart= str_replace(",",".",$li_reoart);
/////////////////////////////////////////////////////////////////
$ld_feccreart=$io_func-> uf_formatovalidofecha($ld_feccreart);
$ld_fecvenart=$io_func-> uf_formatovalidofecha($ld_fecvenart);
/////////////////////////////////////////////////////////////////
$ld_feccreart=$io_func->uf_convertirdatetobd($ld_feccreart);
$ld_fecvenart=$io_func->uf_convertirdatetobd($ld_fecvenart);
if ($ls_status=="C")
{
$lb_valido=$io_siv->uf_siv_update_articulo($ls_codemp, $ls_codart, $ls_denart, $ls_codtipart, $ls_codunimed,
$ld_feccreart, $ls_obsart, $li_exiart, $li_exiiniart, $li_eximinart,
$li_eximaxart, $li_prearta, $li_preartb, $li_preartc, $li_preartd,
$ld_fecvenart, $ls_spg_cuenta, $li_pesart, $li_altart, $li_ancart,
$li_proart, $ls_nomfot, $ls_codcatsig, $ls_sccuenta, $la_seguridad,
$ls_codprod,$ls_serart,$ls_fabart,$ls_ubiart,$ls_docart,$li_reoart);
if($lb_valido)
{
$lb_valido=$io_siv->uf_upload($ls_nomfot,$ls_tipfot,$ls_tamfot,$ls_nomtemfot);
function uf_print($as_tipo,$as_codnom,$as_codnomhas,$as_mesdesde,$as_meshasta)
{
//////////////////////////////////////////////////////////////////////////////
// Function : uf_print
// Access : public
// Arguments : as_tipo // Tipo de Llamada del catálogo
// as_codnom // Código de Nómina
// as_codnomhas // Código de Nómina hasta
// as_mesdesde // Mes Desde donde se quiere filtrar
// as_meshasta // Mes Hasta donde se quiere filtrar
// Description : Función que obtiene e imprime los resultados de la busqueda
// Creado Por : Ing. Yesenia Moreno
// Fecha Creación : 07/04/2006 Fecha Última Modificación :
//////////////////////////////////////////////////////////////////////////////
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"];
print "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=50>Año</td>";
print "<td width=50>Período</td>";
print "<td width=200>Fecha de Inicio</td>";
print "<td width=200>Fecha de Finalización</td>";
print "</tr>";
$ls_sql="SELECT sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ".
" FROM sno_hperiodo, sno_periodo ".
" WHERE sno_periodo.cerper = 1 ".
" AND sno_hperiodo.codemp = '".$ls_codemp."' ".
" AND sno_hperiodo.codnom = '".$as_codnom."' ".
" AND sno_hperiodo.codperi <> '000' ".
" AND sno_hperiodo.codemp = sno_periodo.codemp ".
" AND sno_hperiodo.codnom = sno_periodo.codnom ".
" AND sno_hperiodo.codperi = sno_periodo.codperi ";
if(($as_tipo=="repapopatdes")||($as_tipo=="repapopathas")||($as_tipo=="replisperracrecdes")||($as_tipo=="replisperracrechas"))
{
$ls_criterio="";
if (($as_mesdesde=='01'))
{
$ls_criterio=" AND ((substr(sno_hperiodo.fecdesper::varchar,6,2) = '12' OR substr(sno_hperiodo.fecdesper::varchar,6,2) = '01') ";
$ls_criterio=$ls_criterio." OR (substr(sno_hperiodo.fecdesper::varchar,6,2) <= '".$as_meshasta."') )";
}
else
{
$ls_criterio=" AND substr(sno_hperiodo.fecdesper::varchar,6,2) <= '".$as_meshasta."' ";
}
$ls_sql="SELECT sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ".
" FROM sno_hperiodo, sno_periodo ".
" WHERE sno_periodo.cerper = 1 ".
" AND sno_hperiodo.codemp = '".$ls_codemp."' ".
" AND sno_hperiodo.codperi <> '000' ".
" AND sno_hperiodo.codnom >= '".$as_codnom."' ".
" AND sno_hperiodo.codnom <= '".$as_codnomhas."' ".
" AND substr(sno_hperiodo.fecdesper::varchar,6,2) >= '".$as_mesdesde."' ".$ls_criterio.
" AND sno_hperiodo.codemp = sno_periodo.codemp ".
" AND sno_hperiodo.codnom = sno_periodo.codnom ".
" AND sno_hperiodo.codperi = sno_periodo.codperi ".
" GROUP BY sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ";
}
if(($as_tipo=="repcondes")||($as_tipo=="repconhas")||($as_tipo=="replisbandes")||($as_tipo=="replisbanhas")||($as_tipo=="mintrades")||($as_tipo=="mintrahas"))
{
$ls_sql="SELECT sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ".
" FROM sno_hperiodo, sno_periodo ".
" WHERE sno_periodo.cerper = 1 ".
" AND sno_hperiodo.codemp = '".$ls_codemp."' ".
" AND sno_hperiodo.codperi <> '000' ".
" AND sno_hperiodo.codnom >= '".$as_codnom."' ".
" AND sno_hperiodo.codnom <= '".$as_codnomhas."' ".
" AND sno_hperiodo.codemp = sno_periodo.codemp ".
" AND sno_hperiodo.codnom = sno_periodo.codnom ".
" AND sno_hperiodo.codperi = sno_periodo.codperi ".
" GROUP BY sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ";
}
if ($as_tipo=="transferir")
{
$ls_sql="SELECT sno_hperiodo.anocur, sno_hperiodo.codperi, sno_hperiodo.fecdesper, sno_hperiodo.fechasper ".
" FROM sno_hperiodo, sno_periodo ".
" WHERE sno_periodo.cerper = 1 ".
" AND sno_hperiodo.codemp = '".$ls_codemp."' ".
" AND sno_hperiodo.codnom = '".$as_codnom."' ".
" AND sno_hperiodo.codperi <> '000' ".
" AND sno_hperiodo.codemp = sno_periodo.codemp ".
" AND sno_hperiodo.codnom = sno_periodo.codnom ".
" AND sno_hperiodo.codperi = sno_periodo.codperi ";
}
$ls_sql=$ls_sql." ORDER BY sno_hperiodo.anocur, sno_hperiodo.codperi ";
$rs_data=$io_sql->select($ls_sql);
//echo $ls_sql; die(); //CAMB
if($rs_data===false)
{
$io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message));
}
else
{
while($row=$io_sql->fetch_row($rs_data))
{
$ls_anocur=$row["anocur"];
$ls_codperi=$row["codperi"];
$ld_fecdesper=$io_funciones->uf_formatovalidofecha($row["fecdesper"]);
$ld_fechasper=$io_funciones->uf_formatovalidofecha($row["fechasper"]);
$ld_fecdesper=$io_funciones->uf_convertirfecmostrar($ld_fecdesper);
$ld_fechasper=$io_funciones->uf_convertirfecmostrar($ld_fechasper);
switch ($as_tipo)
{
case "": // sigesp_snorh_p_seleccionarhnomina
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptar('$ls_anocur','$ls_codperi','$ld_fecdesper','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "mintrades": // sigesp_snorh_p_seleccionarhnomina
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepcondes('$ls_codperi');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "mintrahas": // sigesp_snorh_p_seleccionarhnomina
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconhas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "repapopatdes": // sigesp_snorh_r_aportepatronal
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepapopatdes('$ls_codperi');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "repapopathas": // sigesp_snorh_r_aportepatronal
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepapopathas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisperracrecdes": // sigesp_snorh_r_aportepatronal
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperracrecdes('$ls_codperi');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisperracrechas": // sigesp_snorh_r_aportepatronal
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperracrechas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "repcondes": // sigesp_snorh_r_conceptos
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepcondes('$ls_codperi');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "repconhas": // sigesp_snorh_r_conceptos
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarrepconhas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisbandes": // sigesp_snorh_r_listadobanco
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisbandes('$ls_codperi','$ld_fecdesper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisbanhas": // sigesp_snorh_r_listadobanco
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisbanhas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "reprecpagcondes": // sigesp_snorh_r_recibopago
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreprecpagcondes('$ls_codperi','$ld_fecdesper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "reprecpagconhas": // sigesp_snorh_r_recibopago
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreprecpagconhas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisperrarecdes": // sigesp_snorh_r_personal_rac_rec
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperrarecdes('$ls_codperi','$ld_fecdesper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "replisperrarechas": // sigesp_snorh_r_personal_rac_rec
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptarreplisperrarechas('$ls_codperi','$ld_fechasper');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
case "transferir": // sigesp_sno_p_transferirpersonal.php
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: aceptartransferir('$ls_codperi', '$ld_fecdesper','$ld_fechasper', '$ls_anocur');\">".$ls_anocur."</a></td>";
print "<td>".$ls_codperi."</td>";
print "<td>".$ld_fecdesper."</td>";
print "<td>".$ld_fechasper."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
unset($ls_codnom);
unset($ld_peractnom);
}
$io_pdf->ezSetCmMargins(4, 3, 3, 3);
// Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(570, 47, 8, '', '', 1);
// Insertar el número de página
$li_totrow = $io_report->dts_reporte->getRowCount("codunitri");
for ($li_i = 1; $li_i <= $li_totrow; $li_i++) {
$ls_codigo = $io_report->dts_reporte->data["codunitri"][$li_i];
$ls_anno = $io_report->dts_reporte->data["anno"][$li_i];
$ls_fecentvig = $io_report->dts_reporte->data["fecentvig"][$li_i];
$ls_gacofi = $io_report->dts_reporte->data["gacofi"][$li_i];
$ls_fecpubgac = $io_report->dts_reporte->data["fecpubgac"][$li_i];
$ls_decnro = $io_report->dts_reporte->data["decnro"][$li_i];
$ls_fecdec = $io_report->dts_reporte->data["fecdec"][$li_i];
$ls_valunitri = $io_report->dts_reporte->data["valunitri"][$li_i];
$ls_valunitri = number_format($ls_valunitri, 3, ",", ".");
$ls_fecentvig = $io_funciones->uf_formatovalidofecha($ls_fecentvig);
$ls_fecentvig = $io_funciones->uf_convertirfecmostrar($ls_fecentvig);
$ls_fecpubgac = $io_funciones->uf_formatovalidofecha($ls_fecpubgac);
$ls_fecpubgac = $io_funciones->uf_convertirfecmostrar($ls_fecpubgac);
$ls_fecdec = $io_funciones->uf_formatovalidofecha($ls_fecdec);
$ls_fecdec = $io_funciones->uf_convertirfecmostrar($ls_fecdec);
$la_data[$li_i] = array('codigo' => $ls_codigo, 'anno' => $ls_anno, 'fecentvig' => $ls_fecentvig, 'gacofi' => $ls_gacofi, 'fecpubgac' => $ls_fecpubgac, 'decnro' => $ls_decnro, 'fecdec' => $ls_fecdec, 'valunitri' => $ls_valunitri);
}
uf_print_encabezado_pagina($ls_titulo, $io_pdf);
uf_print_detalle($la_data, $io_pdf);
if ($lb_valido) {
$io_pdf->ezStopPageNumbers(1, 1);
// Detenemos la impresión de los números de página
$io_pdf->ezStream();
// Mostramos el reporte
} else {
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra
$io_pdf->ezSetCmMargins(4,3,3,3); // Configuración de los margenes en centímetros
$io_pdf->ezStartPageNumbers(570,47,8,'','',1); // Insertar el número de página
uf_print_encabezado_pagina($ls_titulo,$io_pdf);
$li_totrow=$io_report->DS->getRowCount("nroreg");
$li_aux=0;
for($li_i=1;$li_i<=$li_totrow;$li_i++)
{
$li_aux++;
$ls_nroreg=$io_report->DS->data["nroreg"][$li_i];
$ls_codigo=$io_report->DS->data["codper"][$li_i];
$ls_fechaini=$io_report->DS->data["fecini"][$li_i];
$ls_fechafin=$io_report->DS->data["fecfin"][$li_i];
$ls_nombreper=$io_report->DS->data["nomper"][$li_i];
$ls_apellidoper=$io_report->DS->data["apeper"][$li_i];
$ls_fechaini=$io_funciones->uf_formatovalidofecha($ls_fechaini);
$ls_fechaini=$io_funciones->uf_convertirfecmostrar($ls_fechaini);
$ls_fechafin=$io_funciones->uf_formatovalidofecha($ls_fechafin);
$ls_fechafin=$io_funciones->uf_convertirfecmostrar($ls_fechafin);
$ls_cadena=$ls_nombreper." ".$ls_apellidoper;
$la_dataper[$li_i]=array('codigo'=>$ls_codigo,'nombre'=>$ls_cadena,
'fechaini'=>$ls_fechaini,'fechafin'=>$ls_fechafin);
uf_print_cabecera_detalle($la_dataper,$li_totrow,$io_pdf);
unset($la_dataper);
$io_report->uf_print_detalle_metas_x_personal($ls_nroreg,$ld_fechades,$ld_fechahas,$ls_codperdes,$ls_codperhas);// Cargar el DS con los datos del reporte
$li_totrow1=$io_report->ds_detalle->getRowCount("codmeta");
for($li_p=1;$li_p<=$li_totrow1;$li_p++)
{
$ls_codigo=$io_report->ds_detalle->data["codmeta"][$li_p];
$ls_meta=$io_report->ds_detalle->data["meta"][$li_p];
$ls_valor=$io_report->ds_detalle->data["valor"][$li_p];
function uf_print_pie_detalle($as_estpro,$as_numordcom,$as_nombre,$as_montotart,$as_ciuemp,$adt_fecrec,&$io_pdf)
{
//////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print_pie_detalle
// Acess: private
// Arguments: la_data // arreglo de informaci�n
// io_pdf // Objeto PDF
// Description: funci�n que imprime el detalle
// Creado Por: Ing. Yesenia Moreno
// Modificado Por: Ing. Yozelin Barrag�n
// Fecha Creaci�n: 05/02/2007
//////////////////////////////////////////////////////////////////////////////////////////
/*require_once("../../shared/class_folder/cnumero_letra.php");
$io_letra = new cnumero_letra();*/
//Instancio a la clase de conversi�n de numeros a letras.
global $ls_tipoformato;
include("../../shared/class_folder/class_numero_a_letra.php");
$numalet= new class_numero_a_letra();
//imprime numero con los valore por defecto
//cambia a minusculas
$numalet->setMayusculas(1);
//cambia a femenino
$numalet->setGenero(1);
//cambia moneda
if($ls_tipoformato==1)
{
$numalet->setMoneda("Bolivares Fuerte");
$ls_moneda="EN Bs.F.";
$ls_titulo="Bs.F:";
}
else
{
$numalet->setMoneda("Bolivares");
$ls_moneda="EN Bs.";
$ls_titulo="Bs:";
}
//cambia prefijo
$numalet->setPrefijo("***");
//cambia sufijo
$numalet->setSufijo("***");
require_once("../../shared/class_folder/class_fecha.php");
$io_fecha = new class_fecha();
if($as_estpro==0)
{
$ls_tipo_orden=" Orden de Compra ";
}
else
{
$ls_tipo_orden=" Factura ";
}
$ls_prefijo="";
$ls_sufijo="";
//$ls_monto_letras=$io_letra->uf_convertir_letra($as_montotart,$ls_prefijo,$ls_sufijo);
$numalet->setNumero($as_montotart);
$ls_monto_letras= $numalet->letra();
require_once("../../shared/class_folder/class_funciones.php");
$funciones=new class_funciones();
$gestor=$_SESSION["ls_gestor"];
if ($gestor=="INFORMIX")
{
$adt_fecrec=$funciones->uf_formatovalidofecha($adt_fecrec);
$adt_fecrec=$funciones->uf_convertirfecmostrar($adt_fecrec);
}
$li_dia=substr($adt_fecrec,0,2);
$li_mes=substr($adt_fecrec,3,2);
$li_agno=substr($adt_fecrec,6,4);
$ls_mes=$io_fecha->uf_load_nombre_mes($li_mes);
$io_pdf->ezSetY(350);
$io_encabezado=$io_pdf->openObject();
$io_pdf->saveState();
$la_data=array(array('name'=>'los cuales fueron recibidos '.$adt_fecrec.' segun <b>'.$ls_tipo_orden.' No. '.$as_numordcom.'</b> Acta levantada '),
array('name'=>'al efecto, en la forma siguiente: El represenante del <b>"'.trim($as_nombre).'"</b> '),
array('name'=>'luego de haber constatado que <b>"LA EMPRESA"</b> ejecuto el suministro señalado en la referida '.$ls_tipo_orden.', declarada <b>ACEPTADA</b> la compra .'),
array('name'=>'El monto correspondiente a este suministro es de ('.$ls_titulo.' '.number_format($as_montotart,2,",",".").' )'),
array('name'=>'<b>'.$ls_monto_letras.'</b>'),
array('name'=>'En prueba de conformidad se firma, en la ciudad de '.trim($as_ciuemp).', a los '.$li_dia.' dias del mes de '.$ls_mes.' de '.$li_agno.'. '));
$la_columnas=array('name'=>'','name'=>'','name'=>'','name'=>'');
$la_config=array('showHeadings'=>0, // Mostrar encabezados
'showLines'=>0, // Mostrar L�neas
'fontSize' => 12, // Tama�o de Letras
'shaded'=>0, // Sombra entre l�neas
'shadeCol'=>array(0.5,0.5,0.5),//array($r,$g,$b), // 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
'xPos'=>306, // Orientaci�n de la tabla
/*'cols'=>array('codart'=>array('justification'=>'center','width'=>100), // Justificaci�n y ancho de la
'denart'=>array('justification'=>'center','width'=>230), // Justificaci�n y
'canart'=>array('justification'=>'center','width'=>100), // Justificaci�n y
'preuniart'=>array('justification'=>'center','width'=>100))*/); // Justificaci�n y ancho de la
$io_pdf->ezTable($la_data,$la_columnas,'',$la_config);
$io_pdf->restoreState();
$io_pdf->closeObject();
$io_pdf->addObject($io_encabezado,'all');
}// end function uf_print_pie_detalle
$rs_data = $io_sql->select($ls_sql);
if ($rs_data===false)
{
$lb_valido = false;
}
else
{
$li_numrows = $io_sql->num_rows($rs_data);
if ($li_numrows>0)
{
while($row=$io_sql->fetch_row($rs_data))
{
$ls_numdoc = $row["numdoc"];
$ls_numcol = $row["numcol"];
$ls_codope = $row["codope"];
$ld_fecmovcol = $io_funcion->uf_formatovalidofecha($row["fecmovcol"]);
$ld_fecmovcol = $io_funcion->uf_convertirfecmostrar($ld_fecmovcol);
$ls_conmov = $row["conmov"];
$ld_monmovcol = number_format($row["monmovcol"],2,',','.');
$ld_tasmovcol = $row["tasmovcol"];
$ls_codban = $row["codban"];
$ls_nomban = $row["nomban"];
$ls_ctaban = $row["ctaban"];
$ls_dencta = $row["dencta"];
$ls_estmov = $row["estcol"];
$ls_scgcta = $row["sc_cuenta"];
$ls_dencol = $row["dencol"];
print "<tr class=celdas-blancas>";
print "<td><a href=\"javascript: uf_aceptar('$ls_numdoc','$ls_numcol','$ls_dencol','$ls_codope','$ld_fecmovcol','$ls_conmov','$ld_monmovcol','$ls_codban','$ls_nomban','$ls_ctaban','$ls_dencta','$ls_estmov','$ls_scgcta','$ld_tasmovcol');\">".$ls_numdoc."</a></td>";
print "<td>".$ls_numcol."</td>";
print "<td>".$ls_codope."</td>";
//$data=$rs_cta;
$li_num = $row = $io_sql->num_rows($rs_cta);
if ($li_num > 0) {
/*$data=$io_sql->obtener_datos($rs_cta);
$arrcols=array_keys($data);
$totcol=count($arrcols);
$ds->data=$data;
$totrow=$ds->getRowCount("cmpmov");
for($z=1;$z<=$totrow;$z++)*/
while ($row = $io_sql->fetch_row($rs_cta)) {
print "<tr class=celdas-blancas>";
$ls_cmpmov = $row["cmpmov"];
$ls_numcmp = $row["numcmp"];
$ls_codcau = $row["codcau"];
$ls_dencau = $row["dencau"];
$ld_feccmp = $io_fun->uf_formatovalidofecha($row["feccmp"]);
$ls_descmp = $row["descmp"];
$ls_estpromov = $row["estpromov"];
$ld_feccmp = $io_fun->uf_convertirfecmostrar($ld_feccmp);
$ls_codrespri = $row["codrespri"];
$ls_denrespri = $row["nomrespri"];
$ls_codresuso = $row["codresuso"];
$ls_denresuso = $row["nomresuso"];
$ls_coduniadm = $row["coduniadm"];
$ls_denuniadm = $row["denuniadm"];
$ls_ubigeo = $row["ubigeoact"];
$ls_tiprespri = $row["tiprespri"];
$ls_tipresuso = $row["tipresuso"];
$ld_fecent = $row["fecentact"];
print "<td><a href=\"javascript: aceptar('{$ls_cmpmov}','{$ls_codcau}','{$ls_dencau}','{$ld_feccmp}'," . "'{$ls_descmp}','{$ls_estpromov}','{$ls_coddestino}','{$ls_codrespri}','{$ls_codresuso}','{$ls_coduniadm}'," . "'{$ls_denuniadm}','{$ls_ubigeo}','{$ls_denrespri}','{$ls_denresuso}','{$ls_tiprespri}','{$ls_tipresuso}','{$ld_fecent}','{$ls_numcmp}');\">" . $ls_numcmp . "</a></td>";
print "<td>" . $ls_dencau . "</td>";
//Cargo los datos de las programaciones.
$ld_fechadesde=$_POST["txtfechadesde"];
$ld_fechahasta=$_POST["txtfechahasta"];
$ls_documento=$_POST["txtdocumento"];
$ls_numcarta=$_POST["txtnumcarta"];
$data=$io_carta->uf_cargar_cartas_filtradas($ls_empresa,$ls_tipo,$ld_fechadesde,$ld_fechahasta,$ls_documento,$ls_numcarta);
$ldec_total_prog=0;
if($data!="")
{
$ds_carta->data=$data;
$li_total=$ds_carta->getRowCount("numdoc");
for($i=1;$i<=$li_total;$i++)
{
$ls_numdoc = $ds_carta->getValue("numdoc",$i);
$ldec_monto = $ds_carta->getValue("monto",$i);
$ld_fecmov = $fun->uf_formatovalidofecha($ds_carta->getValue("fecmov",$i));
$ld_fecmov = $fun->uf_convertirfecmostrar($ld_fecmov);
$ls_prov = $ds_carta->getValue("cod_pro",$i);
if($ls_prov=="----------")
{
$ls_prov=$ds_carta->getValue("ced_bene",$i);
}
$ls_nomproben = $ds_carta->getValue("nomproben",$i);
$ls_codban = $ds_carta->getValue("codban",$i);
$ls_ctaban = $ds_carta->getValue("ctaban",$i);
$ls_conmov = $ds_carta->getValue("conmov",$i);
$ls_carta = $ds_carta->getValue("numcarord",$i);
$ls_estcon = $ds_carta->getValue("estcon",$i);
$ld_fecpropag='';
$object[$i][1] = "<input type=checkbox name=chksel".$i." id=chksel".$i." value=1 >";
$object[$i][2] = "<input type=text name=txtnumdoc".$i." value='".$ls_numdoc."' class=sin-borde readonly style=text-align:center size=17 maxlength=15 ><input name=codban".$i." type=hidden id=codban".$i." value='".$ls_codban."'> <input name=ctaban".$i." type=hidden id=ctaban".$i." value='".$ls_ctaban."'>";
$ls_feccie=$row["fechacie"];
$ls_codcar1=$row["codasicar"];
$ls_codcar2=$row["codcar"];
if ($ls_codcar1=="")
{
$ls_cargo=$row["codcar"];
$ls_descar=trim ($row["descar"]);
}
else
{
$ls_cargo=$row["codasicar"];
$ls_descar=trim ($row["denasicar"]);
}
$ls_cantcar=$row["cantcar"];
$ls_estatus=$row["estatus"];
$ls_fecaper=$io_funciones->uf_formatovalidofecha($ls_fecaper);
$ls_fecaper=$io_funciones->uf_convertirfecmostrar($ls_fecaper);
$ls_feccie=$io_funciones->uf_formatovalidofecha($ls_feccie);
$ls_feccie=$io_funciones->uf_convertirfecmostrar($ls_feccie);
$ls_tipo=strtoupper($row["tipo"]);
}
$ls_auxcodigo=$ls_codigo;
$rs_datcon->MoveNext();
}
uf_print_datos_concurso($ls_auxcodigo,$ls_descrip,$ls_cargo,$ls_descar,$ls_fecaper,$ls_feccie,
$ls_cantcar,$ls_tipo,$ls_estatus,$io_pdf);
uf_print_datos_concursantes($la_data,$io_pdf);
unset($la_data);
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 "<table width=500 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width=40>Código</td>";
print "<td width=180>Personal</td>";
print "<td width=180>Tipo</td>";
print "<td width=50>Estatus</td>";
print "<td width=50>Monto</td>";
print "</tr>";
$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 "<tr class=celdas-blancas >";
print "<td align='center'><a href=\"javascript: aceptar('$li_numpre','$ls_codper','$ls_nomapeper','$ls_codtippre',";
print "'$ls_destippre','$ls_codconc','$ls_nomcon','$ls_perinipre','$ld_feciniper','$ld_fecfinper','$li_stapre',";
print "'$li_monpre','$li_numcuopre','$li_monamopre','$li_saldo','$li_cuota','$li_cuofal','$li_sueper','$ls_tipcuopre');\">".$li_numpre."</a></td>";
print "<td align='center'>".$ls_nomapeper."</td>";
print "<td align='center'>".$ls_destippre."</td>";
print "<td align='center'>".$ls_status."</td>";
print "<td align='right'>".$li_monpre."</td>";
print "</tr>";
break;
}
}
$io_sql->free_result($rs_data);
}
print "</table>";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
unset($ls_codnom);
}