Rational Developer for System z
Enterprise PL/I for z/OS, Version 3.8, プログラミング・ガイド

ソース・レコード

各ソース・レコードでは、ソース ID と呼ばれる 1 つの番号が割り当てられます。後のレコードでこのレコードに記述されたソース行を参照するときは、この番号が使用されます。 行は、PL/I 1 次ソース・ファイルまたは INCLUDE されたファイルの行の場合があります。行は、このレコードのソース・ファイル ID と行番号のフィールドで示されます。 このレコードの残りの部分は、ソース行の実データを保持します。

図 118. ソース・レコードの宣言
Dcl
  1 Xin_Src     Based( null() ),   /* source record                 */
                                   /*                               */
    2 Xin_Src_Hdr                  /* standard header               */
           like Xin_Hdr,           /*                               */
                                   /*                               */
    2 Xin_Src_File_Id              /* file id                       */
           fixed bin(32) unsigned, /*                               */
                                   /*                               */
    2 Xin_Src_Line_No              /* line no within file           */
           fixed bin(32) unsigned, /*                               */
                                   /*                               */
    2 Xin_Src_Id                   /* id for this source record     */
           fixed bin(32) unsigned, /*                               */
                                   /*                               */
    2 Xin_Src_Length               /* length of text                */
           fixed bin(16) unsigned, /*                               */
                                   /*                               */
    2 Xin_Src_Text                 /* actual text                   */
        char( 137 refer(xin_Src_Length) );

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)