Date:         Fri, 22 Sep 2000 17:35:00 -0400
Reply-To:     HERMANS1 <HERMANS1@WESTAT.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         HERMANS1 <HERMANS1@WESTAT.COM>
Subject:      Re: little joke for the weekend
Comments: To: Andreas Grueninger <grueninger@IBGRUENINGER.DE>
Content-Type: text/plain; charset=US-ASCII

Works nicely under MS Windows '95 SAS V8.  Thanks!  Humorous and instructive.

-----Original Message-----
From: Andreas Grueninger <grueninger@IBGRUENINGER.DE> at Internet-E-Mail

Sent: Friday, September 22, 2000 7:51 PM
To: SAS-L@LISTSERV.UGA.EDU at Internet-E-Mail
Subject: little joke for the weekend


Check this out:

%LET terminal=;
DATA _null_;
   SET sashelp.vextfl (WHERE=(xpath='TERMINAL'));
   CALL SYMPUT( 'terminal',fileref );
RUN;
%PUT terminal=&terminal;
DATA _null_;
   FILE &terminal;
   PUT 'Hallo Welt, this is your SAS program';
RUN;
Ingenieurbuero Grueninger
Uhlbergstr. 15
72631 Aichtal (Germany)
email: grueninger@ibgrueninger.de