DM 'CLEAR LOG';
DM 'CLEAR OUTPUT';
OPTIONS LINESIZE=72 NODATE NONUMBER;
DATA   file1;                          /*read in first data set*/
       INFILE 'a:\concat1.txt';
       INPUT w x y $ z;
DATA   file2;                         /*read in second data set*/
       INFILE 'a:\concat2.txt';
       INPUT w x y $ z;
DATA   file3;                         /*combine data into one*/
       SET file1 file2;
       j= w/x;                        /*calculate a new variable*/
PROC PLOT   DATA=file3;               
     PLOT j*z;                       /*construct a plot for all data*/
DATA   _NULL_;
       SET file3;               /*write out a new data set to floppy */
       FILE 'a:\newdat';
       PUT X 1-5  Y $ 8 Z 10 - 15 .2 J 17-25 .2;
RUN;