Discussion :

[VinceChalon]

Bonjour à tous,

Je suis en train d'automatiser un reporting sous SAS.
L'ensemble de mon programme s'exécute sur un serveur (psasp).
Lorsque le pgm s'exécute, j'utilise les balises RSUBMIT et ENDRSUBMIT.
Le problème se produit lorsque j'arrive à ce bout de programme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
 
OPTIONS noxwait noxsync;
 
* NOM DU FICHIER EN SORTIE *;
%let name = Reporting_Email.xls;
 
* OUVERTURE EXCEL *;
SYSTASK COMMAND "Start Excel";
DATA _NULL_; x = sleep(5); run;
FILENAME classeur DDE 'EXCEL|SYSTEM';
 
DATA _NULL_;
	FILE classeur;
	PUT	"[open(""C:\Documents\maquette.xls"")]";
RUN;
 
* ONGLET "Resultats" *;
FILENAME chiffre DDE "Excel|Resultats!L4C2:L31C32" LRECL=500 NOTAB; 
DATA  _NULL_; 
         SET RWORK.RESULTATS;
         FILE chiffre; 
         PUT 
			var1 "09"x 
			var2 "09"x 
			var3;
RUN;
 
* On enregistre et on ferme le classeur *;
DATA _NULL_;
	FILE classeur ;
	PUT	"[SAVE.AS(""C:\Documents\&name."")]";
	PUT "[QUIT()]" ;
RUN ;

Les

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 OPTIONS noxwait noxsync;

et les liens

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 DDE

n'ont pas l'air de passer avec les RSUBMIT.

NB : Ma table RESULTAT se trouve dans une RWORK (work sur serveur)

Merci de votre aide.

C'est assez urgent.

VinceChalon

[Géraldine_Cade_SAS]

Bonjour,

ce n'est pas possible car la session batch est non fenêtrée, elle ne peut donc pas lancer elle-même des fenêtres.

cf. Usage Note 20767: Use of DDE in SAS® Enterprise Guide® or SAS\CONNECT® software is not supported

[VinceChalon]

Il y a donc aucune alternative ?

Pour ma part, j'ai essayé de faire tous mes calculs d'indicateurs en rsubmit. Et ensuite je descendu la table à exporter en local avant d'exporter sous Excel.

J'ai jouté à la fin de mon programme :

/*Descente en local de la table */

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Proc Download Data = RESULTATS Out = RESULTATS;Run;

Puis un "ENDRSUBMIT;" pour fermer mon programme serveur.

Ça marche mais mon problème est que l'ensemble des pgms qui s’enchaînent sont lancés en rsubmit. Donc même avec mon alternative ça ne va pas