Rational Developer for System z
Enterprise COBOL for z/OS バージョン 4.1 プログラミング・ガイド


図の説明: ネストされたプログラムの構造

この図には、直接的および間接的に含まれたネストされたプログラムを持つプログラムを示しています。 組み込まれたコメントでネストについて説明されていますが、このコメントは厳密なソース・コード形式ではありません。

 Id Division.
 Program-Id. X.
* Begin comment. X is the outermost program and directly contains X1 and X2, and indirectly contains X11 and X12. End comment.
 Procedure Division.
    Display "I'm in X"
    Call "X1"
    Call "X2"
    Stop Run.
 Id Division.
 Program-Id. X1.
* Begin comment. X1 is directly contained in X and directly contains X11 and X12. End comment.
 Procedure Division.
    Display "I'm in X1"
    Call "X11"
    Call "X12"
    Exit Program.
 Id Division.
 Program-Id. X11.
* Begin comment. X11 is directly contained in X1 and indirectly contained in X. End comment.
 Procedure Division.
    Display "I'm in X11"
    Exit Program.
 End Program X11.
 Id Division.
 Program-Id. X12.
* Begin comment. X12 is directly contained in X1 and indirectly contained in X. End comment.
 Procedure Division.
    Display "I'm in X12"
    Exit Program.
 End Program X12.
 End Program X1.
 Id Division.
 Program-Id. X2.
* Begin comment. X2 is directly contained in X. End comment.
 Procedure Division.
    Display "I'm in X2"
    Exit Program.
 End Program X2.
 End Program X.

図の説明の終わり。


ご利用条件 | フィードバック

このインフォメーション・センターでは Eclipse テクノロジーが採用されています。(http://www.eclipse.org)