Returns a fixed-point binary integer that is the number of existing generations of a controlled variable.
ALLOCATION (x)
Abbreviation(s): ALLOCN for ALLOCATION.
x is a controlled variable.
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); 
               	 None.
Description
The ALLOCATION function returns a fixed binary (31,0) value that is the number of existing generations of a specified controlled variable. If x is not currently allocated, the result is zero.