FILE-CONTROL.

  Format 1 - Sequential File

   SELECT [OPTIONAL] file-name

      { ASSIGN TO  [ EXTERNAL ] file-spec     }
      {            [ DYNAMIC  ]               }
      {                                       }
      { ASSIGN TO  [ EXTERNAL ] { data-name } }
      {            [ DYNAMIC  ] { literal   } }
      {                         { DISK      } }
      {                         { PRINTER   } }

      [ RESERVE reserve-num [ AREA  ] ]
      [                     [ AREAS ] ]

      [ [ ORGANIZATION IS ] SEQUENTIAL ]

      [ BLOCK CONTAINS [smallest-block TO] blocksize { RECORDS    } ]
      [                                              { CHARACTERS } ]

      [CODE-SET IS alphabet-name]
      [PADDING CHARACTER IS pad-char]
      [RECORD DELIMITER IS STANDARD-1]
      [ACCESS MODE IS SEQUENTIAL]

      [LOCK MODE IS { AUTOMATIC [WITH LOCK ON RECORD] } ]
      [             { EXCLUSIVE                       } ]

      [FILE STATUS IS file-stat] .