COBCH1664 PERFORM 範囲: <プロシージャ名 1> から <プロシージャ名 2>

エラー メッセージでは、COBCH1663 で示された、重複するいずれかの PERFORM 範囲の開始および終了プロシージャが示されます。

手続き部の開始地点にセクション名がない場合、<プロシージャ名 1> が{procedure division entry}として表示されます。PERFORM 範囲がプログラムの最後まで続いている場合、<プロシージャ名 1> が{end procedure division}として表示されます。PERFORM 範囲が ENTRY 文で開始している場合、<プロシージャ名 1> が{entry ""}として表示されます。

$set ilshowperformoverlap
 ...
 perform a thru c.
 perform c thru f.
 perform f.
 goback.
                               *> errors are displayed as follows:
 a section.
 display "Running section a.". *> COBCH1663E Overlapping perform range: 3 entries
                               *> COBCH1664E    perform range: a thru c
 b section.
 display "Running section b.".
 c section.                    *> COBCH1664E    perform range: c thru f
 display "Running section c.".
 d section.
 display "Running section d.".
 e section.
 display "Running section e.".
 f section.                    *> COBCH1664E    perform range: f thru f
 display "Running section f.".