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 ]

  Additional Information (explode) :

  Close     Help