1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
|
DATA _NULL_;
LENGTH Out_name $ 800;
SET TLE_EMPLOYES;
Out_name=".EMP.D%sysfunc(today(),JULIAN7.).H%sysfunc(strip(%sysfunc(time(),B8601TM8.))).A";
FILE writeout filevar=Out_name MOD DLM='#' DSD;
if _n_=1 then put "Lig#CODE#ANNEE #MOIS #Nom EMPLOYE#EXP#DEPLACEM";
LIG=_n_;
PUT LIG CODE ANNEE MOIS Nom_EMPLOYE EXP DEPLACEM;
ods package(ProdOutput) open nopf;
ods package(ProdOutput)
add file=Out_name;
ods package(ProdOutput)
publish archive
properties
(archive_name='D%sysfunc(today(),JULIAN7.).H%sysfunc(strip(%sysfunc(time(),B8601TM8.))).zip' archive_path='c:\temp');
ods package(ProdOutput) close;
RUN; |
Partager