CAPACITY
The CAPACITY function returns the current capacity of a dynamic capacity table.
Syntax 1
function capacity (arg-1)
Syntax 2
$capacity (arg-1)
Arguments
arg-1 must be an item of type OCCURS DYNAMIC.
Result
The function returns capacity of arg-1.
Examples
Example - Display the capacity of a table that stores 2 elements.
working-storage section.
77 var pic x(10) occurs dynamic.
...
procedure division.
...
move "xxx" to var(1).
move "yyy" to var(2).
display function capacity(var).