VMS Help  —  COBOL  PROCEDURE_DIVISION, FREE
  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 ]
Additional Information: explode extract

record-name
set-name
realm-name
integer-exp
keeplist-name
stment
Close Help