目的
制御変数の既存の世代の数を示す固定小数点 2 進数の整数を返します。
 
構文
ALLOCATION (x)
省略形:ALLOCATION は ALLOCN。
 
例
DECLARE INPUT CHAR(10) CONTROLLED, 
   A CHAR(3) VARYING;
      .
      .
      .
      DO UNTIL (INPUT = 'STOP');
            ALLOCATE INPUT;
            GET LIST (INPUT);
               .
               .
               .
            END;
   A = ALLOCATION(INPUT);
   PUT SKIP LIST('Generations = ', A);
 
 
説明
ALLOCATION 関数は、指定した制御変数の既存の世代の数を示す固定小数点 2 進数の整数を返します。x が現在割り当てられていない場合、結果はゼロになります。