|
Empresa Malagueña de Transportes.
');
if nvl(act,0)=0 then
begin
htp.print('
Buscar: Pulsa en el icono empleado para iniciar la búsqueda.
Introduce el dato pot el que deseas buscar, y vuelve a pulsar el icono.
Utiliza las flechas adelante y atrás para navegar por la selección.
Para la sección de tráfico,el número de sección es el de inspector o agente.
|
|
');
end;
end if;
if nvl(act,0)=1 then
declare
cursor c1 is select NUM_IDENT,NOMBRE,APELLIDO_1,APELLIDO_2,TARJETA,DNI,ESTRUC,CATEGORIA,ESCALAFON,AÑOS
from empleadosportal where num_ident=seq;
reg c1%rowtype;
controlcursor number;
seqw number;
seqw2 number;
begin
select nvl(min(NUM_IDENT),0) into seqw from empleadosportal where num_ident>seq;
select nvl(max(NUM_IDENT),0) into seqw2 from empleadosportal where num_ident < seq;
if seqw=0 then
seqw:=seq;
end if;
if seqw2=0 then
seqw2:=seq;
end if;
controlcursor:=0;
open c1;
fetch c1 into reg;
htp.print('
Empresa Malagueña de Transportes.
Buscar: Pulsa en el icono empleado para iniciar la búsqueda.
Introduce el dato por el que deseas buscar, y vuelve a pulsar el icono.
Utiliza las flechas adelante y atrás para navegar por la selección.
Para la sección de tráfico,el número de sección es el de inspector o agente.
|
|
');
select nvl(count(*),0) into controlexis from wwsec_person$ where user_name=to_char(reg.num_ident);
if controlexis=1 then
select nvl(OTROSDATOS,null),nvl(AFP,null),nvl(INT,null) into datosw,afpw,intw from wwsec_person$ where user_name=to_char(reg.num_ident);
end if;
htp.print('
Otros datos |
');
if controlexis=1 then
htp.print(''||datosw||' | ');
else
htp.print(' '||chr(38)||'nbsp; | ');
end if;
htp.print('
Aficiones Principales: |
');
if controlexis=1 then
htp.print(''||afpw||' | ');
else
htp.print(' '||chr(38)||'nbsp; | ');
end if;
htp.print('
Estoy interesado en comunicarme con otros compañeros: |
');
if controlexis=1 then
htp.print(''||intw||' | ');
else
htp.print(' '||chr(38)||'nbsp; | ');
end if;
htp.print('
');
end;
end if;
htp.print('
|
|
|
|