OPTIONS LINESIZE=88 PAGESIZE=53 NOCENTER NODATE NONUMBER NOFMTERR;
*******************************************************************;
* PROJECT NAME: Learning to Use SAS                                ;
*             PROGRAM NAME     LOCATION     DATE     PROGRAMMER    ;
TITLE1 "Source:LEC21P2.SAS    Disk 1998#1 11/18/98       EJS "     ;
* Description:  Example Womans Health Initiative Data at Baseline  ;
*    1 month, and 2 months                                         ;
*******************************************************************;
LIBNAME new "C:\temp";

   **********************************************;
   *** Read data                                *;
   **********************************************;
DATA base;
  SET new.lec21d1;
DATA mth1;
  SET new.lec21d2;
DATA mth2;
  SET new.lec21d3;

  ***********************************************;
  *** Concatenate a single data file and list   *;
  ***********************************************;
DATA d1;
  SET base mth1 mth2;

PROC PRINT SPLIT="*";
  ID id;
  TITLE2 "Table 2.1.  List of Concatenated Fat Intake Data";

RUN;