Increases a  disk  file's  allocation  by  a  specified  number  of
  512-byte disk blocks.

  CALL EXTEND (file-reference,integer-expression) ;