У меня есть программа RPG, которая не компилируется. странная вещь: в нем отсутствуют некоторые поля, как указано в выводе. 7030. Но я не вижу этих полей в файле, в котором он должен находиться. Я знаю это, потому что могу скомпилировать программу на производственной машине. Одним из таких полей является КАМПАНИЯ. Я показываю вывод: Итак, откуда взялось это поле 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.