%MACRO testDriver (listeDrivers) ; %LET i = 1 ; %DO %WHILE (%SCAN(&listeDrivers, &i) NE ) ; GOPTIONS DEVICE = %SCAN(&listeDrivers, &i) KEYMAP = WINANSI FTEXT = SWISS ; TITLE "Test du driver %SCAN(&listeDrivers, &i)" ; %LET i = %EVAL(&i+1) ; PROC GCHART DATA = livre.voitures ; VBAR transmission / DISCRETE ; RUN ; QUIT ; %END ; %MEND testDriver ; ODS HTML FILE = "c:\temp\drivers.htm" GPATH = "c:\temp" (URL=NONE) GTITLE ; %testDriver (GIF JPEG SASWMF SASEMF ACTIVEX JAVA ACTXIMG JAVAIMG) ; ODS HTML CLOSE ;