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

カウンター・レコード

各カウンター・レコードは、後続のレコード・タイプについて、ファイルに入っている そのタイプのレコードの数と、それらのレコードが占有するバイト数を指定します。

図 108. カウンター・レコードの宣言
Dcl
  1 xin_Ctr     Based( null() ),   /* counter/size record           */
                                   /*                               */
    2 xin_Ctr_Hdr                  /* standard header               */
           like xin_Hdr,           /*                               */
                                   /*                               */
    2 xin_Ctr_Rect                 /* record type                   */
        unal ordinal xin_Rect,     /*                               */
                                   /*                               */
    2 *                            /*                               */
           fixed bin(16) unsigned, /*                               */
                                   /*                               */
    2 xin_Ctr_Count                /* count of that record type     */
           fixed bin(31) unsigned, /*                               */
                                   /*                               */
    2 xin_Ctr_Size                 /* size used                     */
           fixed bin(31) unsigned; /*                               */

Terms of use | Feedback

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