8.5 主文件的格式

下面显示的是主文件的记录格式，我们规定每个账号在主文件中只能有一个记录。记录格式描述中的（:BKMAST:）也是伪文本，同样是供程序使用COPY…REPLACING短语时使用的。

记录中的每个栏位简单明了，我们就不做详细解释了。需要提醒大家一点的是，余额栏位使用的是压缩十进制数（COMP-3）格式类型，这是通用的做法，除了节省存储空间外，还能加快计算速度。不好的一点是，当你想知道它的具体金额时，必须使用十六制进代码才能看到它的庐山真面目。

        000001  ***************************************************************
        000002  *  COPY BOOK : BKMAST                                    *
        000003  *  BANK MASTER LAYOUT LN=100                              *
        000004  *  MODIFIED DATE :                                      *
        000005  ***************************************************************
        000006  *
        000007   01 :BKMAST:-RECORD.
        000008     03 :BKMAST:-AC-NO.→                        账号，参考交易文件格式
        000009        05 :BKMAST:-BK-NO          PIC 9(03).
        000010        05 :BKMAST:-BR-NO          PIC 9(03).
        000011        05 :BKMAST:-AC-TYPE        PIC 9(01).
        000012        05 :BKMAST:-SEQ-NO         PIC 9(06).
        000013        05 :BKMAST:-CHK-DIGIT      PIC 9(01).
        000014     03 :BKMAST:-LNAME            PIC X(10).→     客户姓
        000015     03 :BKMAST:-FNAME            PIC X(10).→     客户名
        000016     03 :BKMAST:-ID               PIC X(14).→     身份证号
        000017     03 :BKMAST:-ADDR             PIC X(15).→     客户地址
        000018     03 :BKMAST:-VALUE-DATE        PIC 9(8).→      起息日
        000019     03 :BKMAST:-TRAN-DATE         PIC 9(8).→      交易日期
        000020     03 :BKMAST:-BAL              PIC S9(13)V99 COMP-3.→    余额
        000021     03 FILLER                   PIC X(13).
        000022  **************************************************************
        000023  *  END OF BANK MASTER FILE LAYOUT                        *
        000024  **************************************************************