OPTION PS=88 LS=132;

          /********************************************************/
          /**  LAYOUT OF THE MICRODATA EPISODE FILE              **/
          /********************************************************/


DATA EPISODE;
 INFILE 'T:\MICRODAT\EPISODE.DAT' LRECL=43;

INPUT
  @00001 SEQNUM           $CHAR5.
  @00006 DDAY             $CHAR1.
  @00007 NO_EPISO              2.
  @00009 ACT_CODE         $CHAR3.
  @00012 STA_TIME         $CHAR4.
  @00016 END_TIME         $CHAR4.
  @00020 DURATION         $CHAR4.
  @00024 PLACE            $CHAR2.
  @00026 ALONE            $CHAR1.
  @00027 SPOUSE           $CHAR1.
  @00028 CHILD            $CHAR1.
  @00029 OTH_FAM          $CHAR1.
  @00030 FRIENDS          $CHAR1.
  @00031 OTHERS           $CHAR1.
  @00032 ENJOY_AC         $CHAR1.
  @00033 REF_FLAG         $CHAR1.
  @00034 TIMEWGT              10.4
     ;
RUN;