OPTIONS LINESIZE=88 PAGESIZE=53 NOCENTER NODATE NONUMBER NOFMTERR;
*******************************************************************;
* PROJECT NAME: Learning to Use SAS                                ;
*             PROGRAM NAME     LOCATION     DATE     PROGRAMMER    ;
TITLE1 "Source:LEC21P7.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;
  ***************************************************;
  *** Merge data into a single data file and list   *;
  ***************************************************;

PROC SORT DATA=base;  BY id;
PROC SORT DATA=mth1;  BY id;
PROC SORT DATA=mth2;  BY id;

DATA d4 ;
  MERGE base mth1 mth2;
  BY ID;


PROC PRINT DATA=d4 SPLIT="*";
  ID id;
  TITLE2 "Table 7.1. Subject Follow-up Data on Fat Intake using MATCH MERGE";

RUN;