Date:         Wed, 12 Jan 2000 11:55:27 -0500
Reply-To:     Dennis Diskin <Dennis.Diskin.B@BAYER.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
Comments:     To: "- *jibrahim@IR.UMSMED.EDU" <jibrahim@IR.UMSMED.EDU>
From:         Dennis Diskin <Dennis.Diskin.B@BAYER.COM>
Subject:      Re: write var to file
Comments: To: SAS-L@LISTSERV.VT.EDU
Content-Type: text/plain

What's the question ?
Did you want to know thet you should put quotes around your literals ?
ie.:
474  PUT @1   "**"
475      @3   "&C18"
476      @21  "&D6"
477      @27  "&QS"
478      @30  RECNUM
479      @32  "1"
480      @33  "05"
481      @35   "&PS"
482      @37   "100000030" ; RUN;





"DDA.RFC-822=SAS-L@VM.MARIST.EDU/P=Internet/A= /C=us" on 01/12/2000 11:42:25 AM
Please respond to "DDA.RFC-822=jibrahim@IR.UMSMED.EDU/P=Internet/A= /C=us" @
X400
To: "DDA.RFC-822=SAS-L@VM.MARIST.EDU/P=Internet/A= /C=us"@X400
cc:

Subject: write var to file

453  options nodate nonumber yearcutoff=1950;
454  dm 'log;Clear;out;clear;'
454                            ;
455  %let c18=pharmacology  ;                  ****course name 18 c long or
less;
456  %let d6= 010600   ;                     ****date mmddyy;
457  %let QS= 151      ;                    ****number of questions, 3 c long;
458  %let PS= 1   ;                 *** #of parts,if none,leave it one;
459  %let WS= 1  ;      *** if there is a weight sheet type 1, else type 0;
460
461  ****  %inc xf(parm00);
462
463  DATA tempp1;
464  numq=int(&QS/32);
465  remain=mod(&QS,32); if remain GT 0 THEN REMAIN =1 ;
466  REC=NUMQ+REMAIN;
467  IF REC LT 10 THEN RECNUM ="0" || PUT(REC,$1.);
WARNING: Variable REC has already been defined as numeric.
468  ELSE IF REC GT 9 THEN RECNUM =PUT(REC,$2.);
WARNING: Variable REC has already been defined as numeric.
469
470  LINES=int(&QS/50);
471  remain2=mod(&QS,50); if remain2 GT 0 THEN REMAIN2 =1 ;
472  LINES=LINES+REMAIN2;
473  FILE 'D:\SASDATA\FLINE.DAT';
474  PUT @1   "**"
475      @3   &C18
476      @21  &D6
ERROR: The variable named PHARMACOLOGY contains more than 8 characters.
477      @27  &QS
NOTE: Line generated by the macro variable "D6".
477    010600
       ------
       80
478      @30  RECNUM
NOTE: Line generated by the macro variable "QS".
478      151
         ---
         80
479      @32  "1"
480      @33  "05"
481      @35   &PS
482      @37   "100000030" ; RUN;

ERROR 80-322: Expecting a variable name.

NOTE: The SAS System stopped processing this step because of errors.
WARNING: The data set WORK.TEMPP1 may be incomplete.  When this step was
stopped there were 0 observations and 6 variables.
WARNING: Data set WORK.TEMPP1 was not replaced because this step was stopped.
NOTE: The DATA statement used 0.17 seconds.



482                               QUIT;
NOTE: Line generated by the macro variable "PS".
482     1
        -
        80
ERROR 80-322: Expecting a variable name.



Dr. Jamil Ibrahim, Ph.D.
Institutional Research Associate
Assistant Professor , SHRP
Univ. Of Miss. Med. CTR.
2500 N state St
Jackson, MS  39216
Tel. 601-984-1197
Fax 601-984-1205