";
print "close();";
print "opener.document.form1.submit();";
print "";
}
//--------------------------------------------------------------
function uf_print($as_spg_cuenta, $as_tipo)
{
//////////////////////////////////////////////////////////////////////////////
// Function: uf_print
// Access: public
// Arguments: as_spg_cuenta // Código de cuenta
// 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;
$io_fun_nomina->uf_loadmodalidad($li_len1,$li_len2,$li_len3,$li_len4,$li_len5,$ls_titulo);
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 "";
print "";
print "| Código | ";
print "Denominación | ";
print "".$ls_titulo." | ";
print "
";
$ls_sql="SELECT spg_cuenta, denominacion, codestpro1, codestpro2, codestpro3, codestpro4, codestpro5 ".
" FROM spg_cuentas ".
" WHERE codemp='".$ls_codemp."'".
" AND status='C' ";
$la_spg_cuenta=split(",",$as_spg_cuenta);
$li_total=count($la_spg_cuenta);
for($li_i=0;$li_i<$li_total;$li_i++)
{
if($li_i==0)
{
$ls_sql=$ls_sql." AND spg_cuenta like '".$la_spg_cuenta[$li_i]."%'";
}
else
{
$ls_sql=$ls_sql." OR spg_cuenta like '".$la_spg_cuenta[$li_i]."%'";
}
}
$ls_sql=$ls_sql." ORDER BY spg_cuenta";
$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_spg_cuenta=$row["spg_cuenta"];
$ls_denominacion=$row["denominacion"];
$ls_codest1=$row["codestpro1"];
$ls_codest2=$row["codestpro2"];
$ls_codest3=$row["codestpro3"];
$ls_codest4=$row["codestpro4"];
$ls_codest5=$row["codestpro5"];
$ls_programatica=$ls_codest1.$ls_codest2.$ls_codest3.$ls_codest4.$ls_codest5;
$io_fun_nomina->uf_formatoprogramatica($ls_programatica,$ls_programatica);
switch ($as_tipo)
{
case "":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "PATRONAL":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "FIDEICOMISO":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "per":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "obr":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "percon":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
case "obrcon":
print "";
print "| ".$ls_spg_cuenta." | ";
print "".$ls_denominacion." | ";
print "".$ls_programatica." | ";
print "
";
break;
}
}
$io_sql->free_result($rs_data);
}
print "
";
unset($io_include);
unset($io_conexion);
unset($io_sql);
unset($io_mensajes);
unset($io_funciones);
unset($ls_codemp);
}
//--------------------------------------------------------------
?>
Catálogo de Cuentas