1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
create or replace
PROCEDURE "USP_EXPORT_EMPLOYE" (RCT1 in out globalpkg.rct1)
as
n integer;
begin
-----------------------Employés--------------------------
open rct1 for
select mat "Matricule",Nompre "Nom\Prénom",Forminit "Formation Initiale",case Auditinter when 1 then 'OUI' else 'NON' end "Auditeur Interne"
,case Super when 1 then 'OUI' else 'NON' end "Superviseur"
,case Site.Site when 'NonAffecte' then '' else Site.Site end "Site",Adresse_mail "Mail" ,Tel "Téléphone"
,case to_char(Date_rec) when '01/01/1900' then '' else to_char(Date_rec) end "Date de recrutement"
,case to_char(Date_N) when '01/01/1900' then '' else to_char(Date_N) end "Date de Naissance"
,Cin "CIN",case Sexe when 1 then 'Masculin' else 'Féminin' end "Sexe",
case Diff when '1' then 'Electronique' else 'Papier' end "Type de diffusion"
into tab_export_employe("Matricule" ,"Nom\Prénom", "Formation Initiale","Auditeur Interne", "Superviseur", "Site", "Mail","Téléphone", "Date de recrutement", "Date de Naissance", "CIN" ,"Sexe", "Type de diffusion" )
from employe left outer join
Site on Site.CodeSite=Employe.CodeSite
where Supp<>0 ;
end ; |
Partager