0

我有一个未编译的 rpg 程序。奇怪的是：它缺少输出中所述的一些字段。7030. 但我没有在它应该驻留的文件中看到这些字段。我知道这一点，因为我可以在生产机器上编译程序。这些字段之一是 CAMPAIGN。我正在显示输出：那么这个 CAMPAiGN 字段来自哪里？我认为它是 CAMP_CODE 的别名，但这在哪里显示？

 Find  . . . . . .   CAMPAIGN                                                   
 *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+... 
   1443=O                       PROC_CODE          322A CHAR        8           
   1444=O                       CAMPAIGN           330A CHAR        8           
   1445=O                       IRPTCAT01          333A CHAR        3           
   1446=O                       IRPTCAT02          336A CHAR        3           
   1447=O                       IRPTCAT03          339A CHAR        3           
   1448=O                       IRPTCAT04          342A CHAR        3           

But it's not in the source:

CUSTOMER# CHAR ( 8),                      
NAME CHAR (40 ),                          
CITY CHAR (30 ),                          
STATE CHAR (3 ),                          
COUNTRY CHAR (3 ),                        
ZIP_CODE char (10 ),                      
ITEM# CHAR (15 ),                         
ITEM_TEXT CHAR (40 ),                     
ORDER# CHAR (8 ),                         
ORD_STATUS CHAR (2 ),                     
INVOICE# CHAR (8 ),                       
ORD_DATE NUMERIC (8 , 0),                 
INV_DATE numeric (8 , 0),                 
ORD_TYPE CHAR (3 ),                       
CUST_TYPE CHAR (3 ),                      
PROD_LINE CHAR (3 ),                      
SALES_REP CHAR (3 ),                      
WAREHOUSE CHAR (3 ),                        
SHIP_VIA CHAR (3 ),                         
TERRITORY CHAR (3 ),                        
HOLD_CODE CHAR (3 ),                        
HNDL_CODE CHAR (3 ),                        
EXTENDED$ numeric (11 , 4),                 
QUANTITY NUMERIC (7 , 0),                   
ZONE CHAR (1 ),                             
ITEM_PRC$ NUMERIC (11 , 4),                 
ITEM_COST$ NUMERIC (11 , 4),                
ORD_SHIP$ NUMERIC (7 , 2),                  
ORD_WT NUMERIC (7 , 4),                     
TRANS_DAYS CHAR (1 ),                       
KEYCODE CHAR (8 ),                          
PROC_CODE CHAR (8 ),                        
CAMP_CODE CHAR (8 ),                        
ORD_HLDC CHAR (3 ),                         
Irptcat01 char (3 ),                                                 
Irptcat02 char (3 ),                                                 
Irptcat03 char (3 ),                                                 
Irptcat04 char (3 ),                                                 
Irptcat05 char (3 ),                                                 
Irptcat06 char (3 ),                                                 
Irptcat07 char (3 ),                                                 
Irptcat08 char (3 ),                                                 
Irptcat09 char (3 ),                                                 
Irptcat10 char (3 ),                                                 
Irptcat11 char (3 ),                                                 
Irptcat12 char (3 ),                                                 
Irptcat13 char (3 ),                                                 
Irptcat14 char (3 ),                                                 
Irptcat15 char (3 )                                                  
NOT NULL WITH DEFAULT)                                               
Table DTAWHS in PROJ_N1 created but was not journaled.
4

2 回答 2

4

查看表（文件）的源代码对您没有帮助，因为表可能在创建后已更改。您应该检查实际的表/文件对象。

CL 命令：

DSPFFD：有关字段的信息，当前在表/文件中。是否在 Dev 上定义了 CAMPAIGN？

DSPFD：要确认“Live”表的结构与“Dev”相同，表的文件级别标识符（Level ID）需要相同。

于 2014-05-13T11:56:14.720 回答
3

这些错误的另一个非常常见的原因是库列表。如果您的编译使用与生产库列表不同的库列表，则您可能引用了错误的文件。检查编译器列表以确切了解文件定义使用了哪个库。

于 2014-05-13T13:43:30.630 回答