";
print "close();";
print "opener.document.form1.submit();";
print "";
}
$ls_loncodestpro1=$_SESSION["la_empresa"]["loncodestpro1"];
$li_longestpro1= (25-$ls_loncodestpro1);
$ls_loncodestpro2=$_SESSION["la_empresa"]["loncodestpro2"];
$li_longestpro2= (25-$ls_loncodestpro2);
$ls_loncodestpro3=$_SESSION["la_empresa"]["loncodestpro3"];
$li_longestpro3= (25-$ls_loncodestpro3);
$ls_loncodestpro4=$_SESSION["la_empresa"]["loncodestpro4"];
$li_longestpro4= (25-$ls_loncodestpro4);
$ls_loncodestpro5=$_SESSION["la_empresa"]["loncodestpro5"];
$li_longestpro5= (25-$ls_loncodestpro5);
$ls_modalidad=$_SESSION["la_empresa"]["estmodest"];
//--------------------------------------------------------------
function uf_print($as_codconc, $as_nomcon, $as_codnomdes, $as_codnomhas, $as_tipo)
{
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: as_codconc // Código del concepto
// as_nomcon // nombre del concepto
// 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 $ls_campo;
global $ls_loncodestpro1,$li_longestpro1,$ls_loncodestpro2,$li_longestpro2,$ls_loncodestpro3,$li_longestpro3;
global $ls_loncodestpro4,$li_longestpro4,$ls_loncodestpro5,$li_longestpro5,$ls_modalidad;
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"];
if(array_key_exists("la_nomina",$_SESSION))
{
$ls_codnom=$_SESSION["la_nomina"]["codnom"];
}
else
{
$ls_codnom="0000";
}
print "
";
print "
";
print "
Código
";
print "
Nombre
";
print "
Signo
";
print "
Fórmula
";
print "
";
$ls_sql="SELECT codconc,nomcon,sigcon,forcon,forpatcon,intprocon ".
" FROM sno_concepto ".
" WHERE codemp='".$ls_codemp."'".
" AND codnom='".$ls_codnom."'";
if($as_tipo=="VACACION")
{
$ls_sql=$ls_sql." AND (NOT codconc IN (SELECT codconc ".
" FROM sno_conceptovacacion ".
" WHERE (codemp='".$ls_codemp."') ".
" AND (codnom='".$ls_codnom."')))";
}
if(($as_tipo=="reppredes") or ($as_tipo=="repprehas") or
($as_tipo=="repdetpredes") or ($as_tipo=="repdetprehas") or ($as_tipo=="PRESTAMO"))
{
$ls_sql=$ls_sql." AND (sigcon='D' OR sigcon='E') ";
}
if(($as_tipo=="AJUSTARAPORTE")||($as_tipo=="repapopat"))
{
$ls_sql=$ls_sql." AND sigcon ='P' ";
}
if(($as_tipo=="repcuanomdes")||($as_tipo=="repcuanomhas"))
{
$ls_sql=$ls_sql." AND sigcon ='A' ";
}
if($as_tipo=="repapopatcon")
{
$ls_sql="SELECT codconc,nomcon,sigcon,forcon,forpatcon,intprocon ".
" FROM sno_concepto ".
" WHERE codemp='".$ls_codemp."'".
" AND codnom>='".$as_codnomdes."' ".
" AND codnom<='".$as_codnomhas."' ".
" AND sigcon ='P' ";
}
if(($as_tipo=="repcesticdes")||($as_tipo=="repcestichas")||($as_tipo=="repcondes")||($as_tipo=="repconhas")||($as_tipo=="archtxt")||($as_tipo=="archtxt2")||($as_tipo=="mintra"))
{
$ls_sql="SELECT codconc,nomcon,sigcon,forcon,forpatcon,intprocon ".
" FROM sno_concepto ".
" WHERE codemp='".$ls_codemp."'".
" AND codnom>='".$as_codnomdes."'".
" AND codnom<='".$as_codnomhas."'";
}
if (($as_tipo=="archtxt")||($as_tipo=="archtxt2"))
{
$ls_sql=$ls_sql." AND codconc IN ('0000020003','0000020005','0000020007','0000020008','0000020014') ";
}
$ls_sql=$ls_sql." AND codconc like '".$as_codconc."' AND nomcon like '".$as_nomcon."'".
" GROUP BY codconc,nomcon,sigcon,forcon,forpatcon,intprocon ".
" ORDER BY codconc ";
//---------------------Agregado el 26/08/200/---------------------------------------------
if(($as_tipo=="cajaahorro")||($as_tipo=="servasi")||($as_tipo=="conhipes")||($as_tipo=="conhipamp")||($as_tipo=="conhipcon")||($as_tipo=="conhiphip")||($as_tipo=="conhiplph")||($as_tipo=="conhipvivi")||($as_tipo=="conper")||($as_tipo=="conturi")||($as_tipo=="conpro")||($as_tipo=="conasi")||($as_tipo=="convehi")||($as_tipo=="concomi")||($as_tipo=="concfpj")||($as_tipo=="conclph")||($as_tipo=="concfpa")||($as_tipo=="concsuelant"))
{
$ls_sql=" SELECT codconc, MAX(nomcon) as nomcon, ".
" MAX(sigcon) as sigcon, MAX(forcon) as forcon, ".
" MAX(forpatcon) as forpatcon,MAX(intprocon) as intprocon ".
" FROM sno_concepto ".
" WHERE codemp='".$ls_codemp."' ".
" GROUP BY codconc ".
" ORDER BY codconc ";
}
//---------------------------------------------------------------------------------------
$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_codconc=$row["codconc"];
$ls_nomcon=$row["nomcon"];
$ls_sigcon=$row["sigcon"];
$ls_intprocon=$row["intprocon"];
$ls_forcon=$row["forcon"];
$ls_forpatcon=$row["forpatcon"];
switch ($ls_sigcon)
{
case "A":
$ls_sigcon="Asignación";
break;
case "D":
$ls_sigcon="Deducción";
break;
case "P":
$ls_sigcon="Aporte Patronal";
break;
case "R":
$ls_sigcon="Reporte";
break;
case "B":
$ls_sigcon="Reintegro Deducción";
break;
case "E":
$ls_sigcon="Reintegro Asignación";
break;
case "X":
$ls_sigcon="Prestación Antiguedad";
break;
case "I":
$ls_sigcon="Intereses Prestación";
break;
}
switch ($as_tipo)
{
case "": // el llamado se hace desde sigesp_sno_d_concepto.php
print "