我有一个没有编译的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.
答案 0 :(得分:4)
查看表(文件)的源代码对您没有帮助,因为表可能在创建后已更改。您应该检查实际的表/文件对象。
CL命令:
DSPFFD :有关当前在表/文件中的字段的信息。是否在开发中定义了CAMPAIGN
DSPFD :确认"直播" table的结构与" Dev"相同,表的文件级别标识符(Level ID)必须相同。
答案 1 :(得分:3)
这些错误的另一个常见原因是库列表。如果您的编译使用不同的库列表到生产库列表,则可能是指错误的文件。检查编译器列表以确切地查看用于文件定义的库。