Créer un archive .zip avec plusieurs fichiers
Bonjour,
Je travaille sur une macro qui génère des fichiers qui devront par la suite être zipper dans un archive avant qu'ils soient envoyés sur le réseau.
Ces fichiers ont des noms variabilsés qui changent à chaque exécution:
Code:
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; |
J'ai utilisé ODS package de cette façon sauf que ça marche pas.
Pourriez-vous s'il vous plaît m'aider à réaliser ceci.
Je vous remercie par avance pour votre aide
selva