ILSMARTNEST

ILSMARTLINKAGE とともに使用し、連絡節項目とエントリ・ポイントを、これらが定義されるプログラム・クラスのネストされたクラスとしてマネージ・コードに公開します。
制限事項:この指令はマネージ COBOL のみでサポートされます。

構文:

>>-.---.-.----.-ILSMARTNEST------><
   +-\-+ +-NO-+

プロパティ:

省略値: NOILSMARTNEST
段階: 構文チェック
$SET: 任意

コメント:

ネストされたクラスを作成することで、同じコンパイル・ユニット内のプログラムが同じ名前のリンケージ・レコードを持つことができます。

例:

次の COBOL プログラムは、ILSMARTLINKAGE、ILSMARTNEST、ILCUTPREFIX(lnk-b-)、および ILCUTPREFIX(lnk-) でコンパイルされます。

       program-id. BookLegacy.
						 ...
       linkage section.
       01 lnk-function            pic x.
       01 lnk-b-details.
          03 lnk-b-text-details.
             05 lnk-b-title       pic x(50).
             05 lnk-b-type        pic x(20).
             05 lnk-b-author      pic x(50).
          03 lnk-b-stockno        pic x(4).
          03 lnk-b-retail         pic 99v99.
          03 lnk-b-onhand         pic 9(5).
       procedure division using by value lnk-function
                                by reference lnk-b-details.

Java では、次のように JVM COBOL で BookLegacy プログラムのデータにアクセスできます。

    BookLegacy myBook = new BookLegacy();
       //creates an object corresponding to the BookLegacy program
    BookLegacy.Details myDetails = new BookLegacy.Details();
       //creates an instance corresponding to the group lnk-bdetails
    . . .
       myDetails.setStockno("6666");
       myDetails.setTitle("Managed COBOL");
       myDetails.setAuthor("Mike Focus");
       myDetails.setType("Reference");
       myDetails.setRetail(new ScaledInteger(155, 5));
       myDetails.setOnhand(20);