VMS Help
COBOL, PROCEDURE_DIVISION, FREE
*Conan The Librarian
|
The FREE statement empties selected keeplists or removes a database key
value from a keeplist or currency indicator.
Format -
{ [ { record-name } ] }
{ CURRENT [ WITHIN { set-name } ] }
{ [ { realm-name } ] }
FREE { { OFFSET integer-exp } }
{ { FIRST } WITHIN keeplist-name }
{ { LAST } }
{ ALL [ { FROM { keeplist-name } ... } ] }
{ [ { CURRENT } ] }
[ ON ERROR stment ] [ NOT ON ERROR stment ]
[ END-FREE ]
is a subschema record name.
is a subschema set name.
is a subschema realm name.
is an arithmetic expression or integer. It refers to a position in
keeplist-name. Integer-exp cannot be zero.
names a keeplist in the Sub-Schema Section.
is an imperative statement.