分割キー

プログラムに下記の定義が含まれているとする。

 01 rec. 
     03 forename     pic X(10). 
     03 personnel-no pic X(4). 
     03 surname      pic X(15).

構文は次のとおり。

     record key is fullname = 
  surname forename

この場合、COBOL システムは下記のデータ項目から構成される明示的に定義された集団項目であるかのように fullname を扱う。

     03 surname      pic X(15).
     03 forename     pic X(10).