I have the following code for which I get an error that htere are no data lines or infile statement. options symbolgen mtrace notes source MPRINT; %macro datm1; %do i=1% to 2; data NEW&i; libname OLD "/folders/myfolders/bootprocess/"; /*Input D*/ /*datafile="/folders/myfolders/bootprocess/FIT&i..smr/";*/ infile ="/folders/myfolders/bootprocess/FIT&i..smr/"; INPUT @ 1 CHECK $CHAR200.@; /*DATA NAME IS CHECK WHICH IS INDEXED W/'THETA =' THIS MUST BE EXACT*/ S=INDEX(CHECK,'THETA ='); /*DO LOOP TO PICK OUT CORRECT LINE OF CODE LINE W/STRING WILL BE NUMBERED WITH 1 OTHERS=0*/ /*SCAN FUNCTION ALLOWS VARIABLES TO BE OUTPUT FROM THAT POSITION WITH THE DESIRED NAME*/ IF S>0 THEN DO; THETA_=SUBSTR(CHECK,S+0,110); KAF=SCAN(THETA_,3,' '); KAS=SCAN(THETA_,4,' '); CL=SCAN(THETA_,5,' '); V3=SCAN(THETA_,6,' '); D1=SCAN(THETA_,7,' '); ALAG =SCAN(THETA_,8,' '); LOGIT= SCAN(THETA_,9,' '); OUTPUT; END; KEEP KAF KAS CL V3 D1 ALAG LOGIT; *PROC PRINT; RUN; %end; %mend datm1; %datm1; run; The files fit1.smr and fit2.smr are identical and the program was written to capture the theta values. : THETA: 1)K0 2)KAS 3)CL 4)V3 5)D1 6)LAG2 7)LOGIT ETA: ERR: ABRIKA1.lst 14.307 eval=631 sig=4.1 sub=18 obs=18 CCIL=NNNN NVI2.0 PV2.0 THETA = 4.96 4.96 470 2210 1.11 4.2 0.151 ETASD = 0.278568 0.00316228 ERRSD =
... View more