/********************************************************************
*                                                                   *
*  TEC98_02.SAS  Ver.1.0 by K.T.  1998/07/09（木）13:21:53          *
*                                                                   *
*  目的：反復数が一定ではないデータの読み取り                       *
*                                                                   *
*    一人あたり最大５つの回答のあるデータの分析を例とする。         *
*                                                                   *
*   ORG. HIZO9402.SAS  BY K.T. 1994/04/01                           *
********************************************************************/

DATA d1 ;
  INFILE CARDS EOF=stop;
  ARRAY v(5) v1-v5;
  DO i=1 to 5 WHILE(id=nextid);
    INPUT id 1-3 @5 v(i);
    INPUT nextid 1-3 @@;
  END;
  DROP i nextid;
  stop: OUTPUT;
  CARDS;
001 11
001 12
001 13
002 21
002 22
003 31
004 41
004 42
;
PROC PRINT;