$ls_hasta = "dd/mm/aaaa";
}
print "<table width=550 border=0 cellpadding=1 cellspacing=1 class=fondo-tabla align=center>";
print "<tr class=titulo-celda>";
print "<td width='50'>Codigo </td>";
print "<td width='270'>Denominacion</td>";
print "<td width='60'>Marca</td>";
print "<td width='60'>Modelo</td>";
print "<td>Registro</td>";
print "</tr>";
if ($ls_operacion == "BUSCAR") {
if (array_key_exists("txtdesde", $_POST)) {
$ls_desde = $_POST["txtdesde"];
if (array_key_exists("txthasta", $_POST)) {
$ls_hasta = $_POST["txthasta"];
$lb_fechavalida = $io_fec->uf_comparar_fecha($ls_desde, $ls_hasta);
if ($lb_fechavalida) {
$ls_desde = $io_fun->uf_convertirdatetobd($ls_desde);
$ls_hasta = $io_fun->uf_convertirdatetobd($ls_hasta);
//$ls_cadena=" AND saf_activo.fecregact >= '".$ls_desde."' AND saf_activo.fecregact <= '".$ls_hasta."' ";
$ls_sql = "SELECT saf_activo.*, " . " \t\t(SELECT denfuefin FROM sigesp_fuentefinanciamiento " . " WHERE sigesp_fuentefinanciamiento.codfuefin = saf_activo.codfuefin) as denfuefin, " . " \t\t(SELECT fecordcom FROM soc_ordencompra " . " WHERE soc_ordencompra.numordcom = saf_activo.numordcom " . " AND (estcondat='B' OR estcondat='-')) as fecordcom, " . " \t\t(SELECT densitcon FROM saf_situacioncontable " . " WHERE saf_situacioncontable.codsitcon = saf_activo.codsitcon) as densitcon, " . " \t\t(SELECT denconcom FROM saf_condicioncompra " . " WHERE saf_condicioncompra.codconcom = saf_activo.codconcom) as denconcom, " . " \t\t(SELECT denconbie FROM saf_conservacionbien " . " WHERE saf_conservacionbien.codconbie = saf_activo.codconbie) as denconbie, " . " \t\t(SELECT dencat FROM saf_catalogo " . " WHERE saf_catalogo.catalogo = saf_activo.catalogo) as dencat, " . " \t\t(SELECT despai FROM sigesp_pais " . " WHERE sigesp_pais.codpai = saf_activo.codpai) as despai, " . " \t\t(SELECT desest FROM sigesp_estados " . " WHERE sigesp_estados.codest = saf_activo.codest " . " AND sigesp_estados.codpai = saf_activo.codpai) as desest, " . " \t\t(SELECT denmun FROM sigesp_municipio " . " WHERE sigesp_municipio.codmun = saf_activo.codmun " . " AND sigesp_municipio.codest = saf_activo.codest " . " AND sigesp_municipio.codpai = saf_activo.codpai) as desmun, " . " \t\t(SELECT fecemisol FROM cxp_solicitudes" . " WHERE cxp_solicitudes.numsol = saf_activo.numsolpag) as fecemisol , " . " (SELECT dengru " . "\t\t FROM saf_grupo " . "\t\t WHERE saf_grupo.codgru=saf_activo.codgru) as dengru, " . "\t\t (SELECT densubgru " . "\t\t FROM saf_subgrupo " . "\t\t WHERE saf_subgrupo.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_subgrupo.codsubgru=saf_activo.codsubgru) as densubgru, " . "\t\t (SELECT densec " . " \t\t FROM saf_seccion " . "\t\t WHERE saf_seccion.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_seccion.codsubgru=saf_activo.codsubgru AND " . "\t\t\t\t saf_seccion.codsec=saf_activo.codsec) as densec, " . "\t\t (SELECT denite " . " \t\t FROM saf_item " . "\t\t WHERE saf_item.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_item.codsubgru=saf_activo.codsubgru AND " . "\t\t\t\t saf_item.codsec=saf_activo.codsec AND " . " saf_item.codite=saf_activo.codite ) as denite, " . " (SELECT max(denominacion) " . " FROM spg_cuentas " . "\t\t WHERE spg_cuentas.spg_cuenta = saf_activo.spg_cuenta_act) as denspg " . " FROM saf_activo" . " WHERE saf_activo.codemp= '" . $ls_codemp . "'" . " AND saf_activo.codact like '" . $ls_codact . "'" . " AND saf_activo.denact like '" . $ls_denact . "'" . " AND saf_activo.maract like '" . $ls_maract . "'" . " AND saf_activo.modact like '" . $ls_modact . "'" . " AND saf_activo.fecregact >= '" . $ls_desde . "' " . " AND saf_activo.fecregact <= '" . $ls_hasta . "'" . " ORDER BY codact";
$rs_cta = $io_sql->select($ls_sql);
} else {
$ls_sql = "SELECT saf_activo.*, " . " (SELECT denfuefin FROM sigesp_fuentefinanciamiento " . " \t\t WHERE sigesp_fuentefinanciamiento.codfuefin = saf_activo.codfuefin) as denfuefin, " . " (SELECT fecordcom FROM soc_ordencompra " . " WHERE soc_ordencompra.numordcom = saf_activo.numordcom " . " AND (estcondat='B' OR estcondat='-')) as fecordcom, " . " \t\t(SELECT densitcon FROM saf_situacioncontable " . " WHERE saf_situacioncontable.codsitcon = saf_activo.codsitcon) as densitcon, " . " \t\t(SELECT denconcom FROM saf_condicioncompra " . " WHERE saf_condicioncompra.codconcom = saf_activo.codconcom) as denconcom, " . " \t\t(SELECT denconbie FROM saf_conservacionbien " . " WHERE saf_conservacionbien.codconbie = saf_activo.codconbie) as denconbie, " . " \t\t(SELECT spg_cuenta FROM saf_catalogo " . " WHERE saf_catalogo.catalogo = saf_activo.catalogo) as ctaspg, " . " \t\t(SELECT dencat FROM saf_catalogo " . " WHERE saf_catalogo.catalogo = saf_activo.catalogo) as dencat, " . " \t\t(SELECT despai FROM sigesp_pais " . " WHERE sigesp_pais.codpai = saf_activo.codpai) as despai, " . " \t\t(SELECT desest FROM sigesp_estados " . " WHERE sigesp_estados.codest = saf_activo.codest " . " \t AND sigesp_estados.codpai = saf_activo.codpai) as desest, " . " \t\t(SELECT denmun FROM sigesp_municipio " . " WHERE sigesp_municipio.codmun = saf_activo.codmun " . " \t AND sigesp_municipio.codest = saf_activo.codest " . " \t AND sigesp_municipio.codpai = saf_activo.codpai) as desmun, " . " \t\t(SELECT fecemisol FROM cxp_solicitudes " . " WHERE cxp_solicitudes.numsol = saf_activo.numsolpag) as fecemisol, " . " (SELECT dengru " . "\t\t FROM saf_grupo " . "\t\t WHERE saf_grupo.codgru=saf_activo.codgru) as dengru, " . "\t\t (SELECT densubgru " . "\t\t FROM saf_subgrupo " . "\t\t WHERE saf_subgrupo.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_subgrupo.codsubgru=saf_activo.codsubgru) as densubgru, " . "\t\t (SELECT densec " . " \t\t FROM saf_seccion " . "\t\t WHERE saf_seccion.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_seccion.codsubgru=saf_activo.codsubgru AND " . "\t\t\t\t saf_seccion.codsec=saf_activo.codsec) as densec, " . "\t\t (SELECT denite " . " \t\t FROM saf_item " . "\t\t WHERE saf_item.codgru=saf_activo.codgru AND " . "\t\t\t\t saf_item.codsubgru=saf_activo.codsubgru AND " . "\t\t\t\t saf_item.codsec=saf_activo.codsec AND " . " saf_item.codite=saf_activo.codite ) as denite, " . " (SELECT max(denominacion) " . " FROM spg_cuentas " . "\t\t WHERE spg_cuentas.spg_cuenta = saf_activo.spg_cuenta_act) as denspg " . " FROM saf_activo " . " WHERE saf_activo.codemp= '" . $ls_codemp . "' " . " AND saf_activo.codact like '" . $ls_codact . "' " . " AND saf_activo.denact like '" . $ls_denact . "' " . " AND saf_activo.maract like '" . $ls_maract . "' " . " AND saf_activo.modact like '" . $ls_modact . "' " . " ORDER BY codact";
$rs_cta = $io_sql->select($ls_sql);
}
}
}
$li_numrows = $io_sql->num_rows($rs_cta);
if ($li_numrows > 0) {
while ($row = $io_sql->fetch_row($rs_cta)) {
require_once "../shared/class_folder/class_mensajes.php";
$io_mensajes = new class_mensajes();
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_cxp->uf_obtenervalor("txtnumsol" . $li_i, "");
$ld_fecemisol = $io_fun_cxp->uf_obtenervalor("txtfecemisol" . $li_i, "");
switch ($ls_tipope) {
case 0:
$lb_valido = $io_fecha->uf_comparar_fecha($ld_fecemisol, $ld_fecaprosol);
if ($lb_valido) {
$lb_existe = $io_cxp->uf_validar_estatus_solicitud($ls_numsol, "N");
if (!$lb_existe) {
$lb_valido = $io_cxp->uf_update_estatus_solicitud($ls_numsol, "N", $ld_fecaprosol, $la_seguridad);
} else {
$io_mensajes->message("La solicitud " . $ls_numsol . " ya esta anulada");
}
} else {
$io_mensajes->message("La Fecha de Registro de la Solicitud " . $ls_numsol . " debe ser menor a la fecha de Anulacion");
}
break;
case 1:
$lb_existe = $io_cxp->uf_validar_solicitudes($ls_numsol);
if ($lb_existe) {
$lb_valido = $io_cxp->uf_update_estatus_solicitud($ls_numsol, "E", $ld_fecaprosol, $la_seguridad);
$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_numrecdoc = $io_fun_cxp->uf_obtenervalor("txtnumrecdoc" . $li_i, "");
$ld_fecregdoc = $io_fun_cxp->uf_obtenervalor("txtfecregdoc" . $li_i, "");
$ls_codpro = $io_fun_cxp->uf_obtenervalor("txtcodpro" . $li_i, "");
$ls_cedben = $io_fun_cxp->uf_obtenervalor("txtcedben" . $li_i, "");
$ls_codtipdoc = $io_fun_cxp->uf_obtenervalor("txtcodtipdoc" . $li_i, "");
switch ($ls_tipope) {
case 0:
$lb_valido = $io_fecha->uf_comparar_fecha($ld_fecregdoc, $ld_fecaprord);
if ($lb_valido) {
$lb_existe = $io_cxp->uf_validar_estatus_recepcion($ls_numrecdoc, "1", $ls_codpro, $ls_cedben, $ls_codtipdoc);
if (!$lb_existe) {
$lb_valido = $io_cxp->uf_update_estatus_recepciones($ls_numrecdoc, 1, $ls_codpro, $ls_cedben, $ls_codtipdoc, $ld_fecregdoc, $la_seguridad);
} else {
$io_mensajes->message("La Recepcion de Documentos " . $ls_numrecdoc . " ya esta aprobada");
}
} else {
$io_mensajes->message("La Fecha de Registro de la Solicitud " . $ls_numrecdoc . " debe ser menor a la fecha de Aprobacion");
}
break;
case 1:
$lb_existe = $io_cxp->uf_validar_recepciones($ls_numrecdoc, $ls_codpro, $ls_cedben, $ls_codtipdoc);
if ($lb_existe) {
$lb_valido = $io_cxp->uf_update_estatus_recepciones($ls_numrecdoc, 0, $ls_codpro, $ls_cedben, $ls_codtipdoc, $ld_fecregdoc, $la_seguridad);
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);
}
$object[1][6]="<input type=text name=txtmonto".$z." value='' style=text-align:right class=sin-borde readonly>";
}//2
$totrow=1;
$io_msg->message('No Hay Datos que Mostrar !!!');
}
}
if ($ls_operacion=="VALFECHA")
{
$arre=$_SESSION["la_empresa"];
$ls_empresa=$arre["codemp"];
$li_rdapro =$_POST["rdapro"];
$ls_fechat =$_POST["txtfechas"];
$lb_valido=true;
$lb_valido=$io_fecha->uf_comparar_fecha($ls_fechat,$ls_fecapro);
if ($lb_valido)
{
$io_msg->message('La Fecha de Búsqueda no Puede se Mayor a la Fecha de Aprobación !!!');
$ls_fechat=$ls_fecapro;
for ($z=1;$z<=5;$z++)
{
$object[1][1]="";
$object[1][2]="<input type=text name=txtnumrecdoc".$z." value='' style=text-align:center class=sin-borde readonly>";
$object[1][3]="<input type=text name=txtnompro".$z." value='' style=text-align:center class=sin-borde readonly>";
$object[1][4]="<input type=text name=txtestapro".$z." value='' style=text-align:center class=sin-borde readonly>";
$object[1][5]="<input type=text name=txtfecapro".$z." value='' style=text-align:center class=sin-borde readonly>";
$object[1][6]="<input type=text name=txtmonto".$z." value='' style=text-align:right class=sin-borde readonly>";
}
$totrow=1;
}
}
$ls_sql = " SELECT cod_pro, nompro, fecvenrnc\n FROM rpc_proveedor\n WHERE cod_pro like '" . $ls_codigo . "' \n\t\t\t\t AND cod_pro <> '----------'\n\t\t\t\t\t AND nompro like '" . $ls_nombre . "'\n\t\t\t\t\t AND dirpro like '" . $ls_direccion . "'\n\t\t\t\t\t AND codban like '" . $ls_codban . "' {$ls_estatus}\n ORDER BY cod_pro ASC";
$rs_data = $io_sql->select($ls_sql);
//echo $ls_sql.'<br>';
if ($rs_data === false) {
$io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!");
} else {
$li_totrows = $io_sql->num_rows($rs_data);
if ($li_totrows > 0) {
while (!$rs_data->EOF) {
echo "<tr class=celdas-blancas>";
$ls_codpro = trim($rs_data->fields["cod_pro"]);
$ls_nompro = ltrim($rs_data->fields["nompro"]);
$ls_fecvenrnc = $rs_data->fields["fecvenrnc"];
$ld_fecact = date('Y') . "-" . date('m') . "-" . date('d');
if ($io_fecha->uf_comparar_fecha($ld_fecact, $ls_fecvenrnc)) {
$ls_estrnc = "VIGENTE";
} else {
$ls_estrnc = "VENCIDO";
}
echo "<td width=100 style=text-align:center><a href=\"javascript: aceptar('{$ls_codpro}');\">" . $ls_codpro . "</a></td>";
echo "<td width=300 style=text-align:left title='" . ltrim($ls_nompro) . "'>" . $ls_nompro . "</td>";
echo "<td width=100 style=text-align:center>" . $ls_estrnc . "</td>";
echo "</tr>";
$rs_data->MoveNext();
}
} else {
$io_msg->message("No se han definido Proveedores !!!");
}
}
}
$ls_sql = " SELECT cod_pro, nompro, sc_cuenta, rifpro, fecvenrnc\n\t\t FROM rpc_proveedor\n WHERE codemp='" . $ls_codemp . "' \n\t\t\t\t AND cod_pro like '%" . $ls_codpro . "%'\n\t\t\t\t AND nompro like '%" . $ls_nompro . "%'\n\t\t\t\t AND rifpro like '%" . $ls_rifpro . "%'\n\t\t\t\t AND dirpro like '%" . $ls_dirpro . "%'\n\t\t\t\t AND codban like '%" . $ls_banpro . "%'\n\t\t\t\t AND cod_pro<>'----------' \n\t\t\t\t AND estprov=0\n ORDER BY cod_pro ASC";
$rs_data = $io_sql->select($ls_sql);
if ($rs_data === false) {
$io_msg->message("Error en Consulta, Contacte al Administrador del Sistema !!!");
} else {
$li_totrows = $io_sql->num_rows($rs_data);
if ($li_totrows > 0) {
while ($row = $io_sql->fetch_row($rs_data)) {
$lb_existe = true;
$ls_codpro = $row["cod_pro"];
$ls_nompro = $row["nompro"];
$ls_sccuenta = $row["sc_cuenta"];
$ls_rifpro = $row["rifpro"];
$ls_fechavenRNC = $row["fecvenrnc"];
$ld_fechoy = date('Y') . "-" . date('m') . "-" . date('d');
if ($io_fecha->uf_comparar_fecha($ld_fechoy, $ls_fechavenRNC)) {
$lb_registronacional = "VIGENTE";
} else {
$lb_registronacional = "VENCIDO";
}
echo "<tr class=celdas-blancas>";
echo "<td width=100 style=text-align:center><a href=\"javascript:aceptar('{$ls_codpro}','{$ls_nompro}','{$ls_sccuenta}','{$ls_rifpro}');\">" . $ls_codpro . "</a></td>";
echo "<td width=300 style=text-align:left>" . $row["nompro"] . "</td>";
echo "<td width=100 style=text-align:center>" . $lb_registronacional . "</td>";
echo "</tr>";
}
$io_sql->free_result($rs_data);
} else {
$io_msg->message("No se han definido Proveedores !!!");
}
}
$ls_email = $_POST["txtemail"];
$lr_datos["email"] = $ls_email;
} else {
$ls_email = "";
}
if (array_key_exists("estprov", $_POST)) {
$ls_estprov = $_POST["estprov"];
$lr_datos["estatus"] = $ls_estprov;
} else {
$ls_estprov = "";
}
if (array_key_exists("txtfecvenRNC", $_POST)) {
$ls_fecvenRNC = $_POST["txtfecvenRNC"];
$ls_fecvencimiento = $io_funcion->uf_convertirdatetobd($ls_fecvenRNC);
$ld_hoy = date('Y') . "-" . date('m') . "-" . date('d');
if ($io_fecha->uf_comparar_fecha($ld_hoy, $ls_fecvencimiento)) {
$ls_registronacional = "VIGENTE";
} else {
$ls_registronacional = "VENCIDO";
}
$lr_datos["fecvenrnc"] = $ls_fecvencimiento;
} else {
$ls_fecvenRNC = "";
$ls_registronacional = "";
}
if (array_key_exists("txtregSSO", $_POST)) {
$ls_regSSO = $_POST["txtregSSO"];
$lr_datos["regsso"] = $ls_regSSO;
} else {
$ls_regSSO = "";
}
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);
}
}
else
{
$io_mensajes->message("La solicitud ".$ls_numsol." ya esta aprobada");
}
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("chkanulacion".$li_i,$_POST))
{
$ls_codsolvia=$io_fun_scv->uf_obtenervalor("txtcodsolvia".$li_i,"");
$ld_fecsolvia=$io_fun_scv->uf_obtenervalor("txtfecsolvia".$li_i,"");
switch ($ls_tipope)
{
case 0:
$lb_valido=$io_fecha->uf_comparar_fecha($ld_fecsolvia,$ld_fecanu);
if($lb_valido)
{
$lb_existe=$io_scv->uf_validar_estatus_solicitud($ls_codsolvia);
if(!$lb_existe)
{
$lb_valido=$io_scv->uf_update_estatus_solicitud($ls_codsolvia,$la_seguridad);
}
else
{
$io_mensajes->message("La Solicitud de Viaticos ".$ls_codsolvia." ya esta anulada");
}
}
else
{
$io_mensajes->message("La Fecha de Registro de la Solicitud ".$ls_codsolvia." debe ser menor a la fecha de Anulacion");
$ls_ano3=$ls_anomim-$ls_anot;
$ls_ano4=$ls_ano2+$ls_ano3;
$ls_fechaaprox=$ls_ano4.substr($ls_fechaadminpub,4,10);
}
elseif ((trim($ls_sexo)=="M") && ($ls_edad_jub>=$ls_edadm) && ($ls_anot<$ls_anomim))
{
$ls_ano3=$ls_anomim-$ls_anot;
$ls_ano4=$ls_ano2+$ls_ano3;
$ls_fechaaprox=$ls_ano4.substr($ls_fechaadminpub,4,10);
}
$ls_fechaaprox=$io_funciones->uf_convertirfecmostrar($ls_fechaaprox);
$valido1=$io_fecha->uf_comparar_fecha($ls_fecdes,$ls_fechaaprox);
$valido2=$io_fecha->uf_comparar_fecha($ls_fechaaprox,$ls_fechas);
if(trim($ls_sexo)=="F")
{
if ($ls_edad>=$ls_edadf)
{
if ($ls_anot>=$ls_anomim)
{
if (($ls_fechajub=='1900-01-01')&&($valido1)&&($valido2))
{
$li_i++;
$ls_anodif = intval(substr($ls_fechas,6,4)) - intval(substr($ls_fechaaprox,6,4));
$ls_anoserinst = $ls_anoserinst - $ls_anodif;
//$ls_edad=$ls_edad- $ls_anodif;
$ls_data[$li_i]=array('nro'=>$li_i,'codigo'=>$ls_codper,'nombre'=>$ls_apellido.", ".$ls_nomber,
'edad'=>$ls_edad,
{
}
$control=0;
for($li_d=1;$li_d<=$li_total2;$li_d++)
{
if ($ls_rev=="PRIMERA REVISION") {
$ldt_fecrev=$io_report->ds_detalle->getValue("fecrev",$li_d);
$ldt_fecrev1=$io_funciones->uf_formatovalidofecha($ldt_fecrev);
$ldt_fecrev1=$io_funciones->uf_convertirfecmostrar($ldt_fecrev1);
$ls_odi=$io_report->ds_detalle->getValue("odi",$li_d);
$li_peso=$io_report->ds_detalle->getValue("valor",$li_d);
if (($io_fecha->uf_comparar_fecha($ldt_revini1,$ldt_fecrev1)) && ($io_fecha->uf_comparar_fecha($ldt_fecrev1,$ldt_revfin1)))
{
$ls_observacion1=$io_report->ds_detalle->getValue("observacion",$li_d);
switch($ls_observacion1)
{
case "1":
$ls_observacion1="En Proceso";
break;
case "2":
$ls_observacion1="Alcanzado";
break;
case "3":
$ls_observacion1="No Alcanzado";
break;
}
$ls_observacion2='';
$ls_nomfot=$HTTP_POST_FILES['txtfotper']['name'];
if ($ls_nomfot!="")
{
$ls_nomfot=$ls_cedper.substr($ls_nomfot,strrpos($ls_nomfot,"."));
}
$ls_tipfot=$HTTP_POST_FILES['txtfotper']['type'];
$ls_tamfot=$HTTP_POST_FILES['txtfotper']['size'];
$ls_nomtemfot=$HTTP_POST_FILES['txtfotper']['tmp_name'];
$ls_nomfot=$io_personal->uf_upload($ls_nomfot,$ls_tipfot,$ls_tamfot,$ls_nomtemfot);
if (($ld_fecegrper!='1900-01-01')&&($ld_fecegrper!='1900/01/01'))
{
$ls_fecperi=$io_personal->uf_buscar_fecha_periodo($ls_codper);
if ($ls_fecperi!="")
{
$valido1=$io_fecha->uf_comparar_fecha($ls_fecperi,$ld_fecegrper);
if (!$valido1)
{
$lb_valido=false;
$ls_fecperi=$io_funciones->uf_convertirfecmostrar($ls_fecperi);
$io_personal->io_mensajes->message("La Fecha de Egreso no puede ser menor al $ls_fecperi que es el utlimo Calculo de Nómina para el Personal con Código $ls_codper.");
}
}
}
if ($lb_valido)
{
$lb_valido=$io_personal->uf_guardar($ls_existe,$ls_codper,$ls_cedper,$ls_nomper,$ls_apeper,$ls_dirper,
$ld_fecnacper,$ls_edocivper, $ls_telhabper,$ls_telmovper,$ls_sexper,
$li_estaper,$li_pesper,$ls_codpro,$ls_nivacaper,$ls_catper,
$ls_cajahoper,$li_numhijper,$ls_contraper,$li_tipvivper,$ls_tenvivper,
