見出し部

見出し部は、あらゆる COBOL ソース・プログラムの最初の部分として必要です。 この部分にはプログラムの名前、プログラム作成日、コンパイルの日付、その他プログラムについての記述を入れることができます。

構文図を読む構文図をスキップする
見出し部 - 形式

>>-+-IDENTIFICATION-+--DIVISION.--PROGRAM-ID.--+-プログラム名---+----->
   |    (1)         |                          |      (1) |   
   '-ID-------------'                          '-リテラル-----'   

>--+--------------------------------------------------------+--->
   |                  (2)                                   |   
   '-+----+--+-COMMON------+-----------+-----+--+---------+-'   
     '-IS-'  |             +-INITIAL---+     |  '-PROGRAM-'     
             |             '-RECURSIVE-'     |                  
             '-+-INITIAL---+--+------------+-'                  
               '-RECURSIVE-'  |        (2) |                    
                              '-COMMON-----'                    

>--.--+---------------------------+----------------------------->
      '-AUTHOR.--+--------------+-'   
                 | .----------. |     
                 | V          | |     
                 '---コメント記入項目-+-'     

>--+---------------------------------+-------------------------->
   '-INSTALLATION.--+--------------+-'   
                    | .----------. |     
                    | V          | |     
                    '---コメント記入項目-+-'     

>--+---------------------------------+-------------------------->
   '-DATE-WRITTEN.--+--------------+-'   
                    | .----------. |     
                    | V          | |     
                    '---コメント記入項目-+-'     

>--+----------------------------------+------------------------->
   '-DATE-COMPILED.--+--------------+-'   
                     | .----------. |     
                     | V          | |     
                     '---コメント記入項目-+-'     

>--+-----------------------------+-----------------------------><
   '-SECURITY.--+--------------+-'   
                | .----------. |     
                | V          | |     
                '---コメント記入項目-+-'     

注:
  1. IBM® 拡張
  2. ネストされた COBOL プログラムでのみ使用できます。

見出し部の最初の段落は、PROGRAM-ID 段落でなければなりません。 他の段落はオプショナルですが、書く場合には、形式に示されている順序でなければなりません。

IBM Extension
標準的な部のヘッダーの代わりに省略形 ID DIVISION を使用でき、オプショナルの段落は任意の順序とすることができます。
注: SEU 構文検査プログラムでは、次に示す段落ヘッダーの最初の文が段落ヘッダーと同じ行から始まる必要があります。
  • PROGRAM-ID
  • AUTHOR
  • INSTALLATION
  • DATE-WRITTEN
  • DATE-COMPILED
  • SECURITY
図 1 に、見出し部のコーディングの例を示します。
End of IBM Extension
図 1. 文が段落と同じ行で始まることを示すための見出し部のコーディング例
IDENTIFICATION DIVISION.
PROGRAM-ID. IDSAMPLE.
AUTHOR. PROGRAMMER NAME.
INSTALLATION. COBOL DEVELOPMENT CENTER.
DATE-WRITTEN. 12/02/94.
DATE-COMPILED. 12/09/94 12:57:53.
SECURITY. NON-CONFIDENTIAL.