1

我有一个输入文件，其中包含前 40 个字节中的名称和编号，然后是该名称的四个不同的基金和基金编号。我想知道如何在我的 FILE SECTION 中创建一个 Cobol 表来读取这些数据。我有这个，但显然它大于或小于 80 字节？或者也许我的桌子错了？

FD  SALES-FILE                               
RECORDING MODE IS F.                     

01  SALES-RECORD.                            
    05  BROKER-REGION         PIC 9.         
    05  BROKER-CITY           PIC X(19).     
    05  BROKER-NAME           PIC X(20).     

01  SALES-BROKER-TBL.                        
    05 BROKER-TBL-DATA        OCCURS 4 TIMES.
       10  FUND-NUMBER        PIC 9(2).      
       10  PRICE-FLAG         PIC 9.         
       10  DEPOSIT-AMT        PIC 9(5)V99.

SALES-RECORD 有 40 个字节，那么该表每个条目有 10 个字节并且出现 4 次，所以加起来是 80 对吗？有人知道我在做什么错吗？

4

1 回答 1

1

尝试以下... 

01  SALES-RECORD.                            
    05  BROKER-REGION         PIC 9.         
    05  BROKER-CITY           PIC X(19).     
    05  BROKER-NAME           PIC X(20).                                    
    05 SALES-BROKER-TBL.                        
       10 BROKER-TBL-DATA        OCCURS 4 TIMES.
          15  FUND-NUMBER        PIC 9(2).      
          15  PRICE-FLAG         PIC 9.         
          15  DEPOSIT-AMT        PIC 9(5)V99.

如果我理解正确，经纪人和 4 笔资金都出现在同一记录中。因此，您在这里要做的就是将两个记录布局合并到一个记录中。

Broker Region、City 和 Name 需要 40 个字节，然后每个 Broker Table 行需要 10 个字节。其中四个构成了销售代理表并需要另外 40 个字节。加起来，每条记录总共有 80 个字节。

于 2012-10-23T01:12:26.810 回答