|
The following code is a snippet from the Browsed Compile Listing of VARPG. I am attmpting to recompile an existing, fully debugged application from VARPG to JAVA. I know the compiler doesn't support the OVERLAY keyword in the "D" specifications but can anyone assist with solving these compiler diagnostics about INFDS and Ssystem DS? This compiles and runs fine with regular VARPG but compile failes in Java. Thanks. RF ---------------------------------------------------------------------- Rick Flagler Manager, Information Systems Timken Super Precision (MPB) Keene, NH 03431-0547 p: (603) 352-0310 x207 f: (603) 355-4534 -------------------begin compile excerpt -------------------------------------- 48 D SDS 49 D PGMNAM *PROC 50 D MSGID 40 46 ======> aaaaaaaaaaaaaaa *RNV3938 30 a The subfield definition is not valid; subfield is ignored. 51 D PGMLIB 81 90 ======> aaaaaaaaaaaaaa *RNV3939 30 a The subfield start position is not valid; subfield is ignored. 52 D WRKSTN 244 253 53 D USRPRF 254 263 54 D JOBNBR 264 269 ======> aaaaaaaaaaaaaaa *RNV3938 30 a The subfield definition is not valid; subfield is ignored. 55 DFILEFBK DS 56 D FILE *FILE * File name 57 D OPEN_IND 9 9N * File open? 58 D EOF_IND 10 10N * File at eof? 59 D STATUS *STATUS * Status code 60 D OPCODE *OPCODE * Last opcode 61 D ROUTINE *ROUTINE * RPG Routine 5769CL3 V3R2M2 IBM VISUALAGE RPG QCS3 12/09/1999 08:58:38 Line <---------------------- Source Specifications ----------------------------><---- Comments ----> Do Page Change Src Seq Number ....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+...10 Num Line Date Id Number 62 D LIST_NUM 30 37 * Listing line 63 D SPCL_STAT 38 42S 0 * SPECIAL status ======> aaaaaaaaaaaaaaa *RNV3938 30 a The subfield definition is not valid; subfield is ignored. 64 D RECORD *RECORD * Record name 65 D MSGIDFB 46 52 * Error MSGID ------------------------- end compile excerpt ----------------------------------------------- +--- | This is the CODE/400 Mailing List! | To submit a new message, send your mail to CODE400-L@midrange.com. | To subscribe to this list send email to CODE400-L-SUB@midrange.com. | To unsubscribe from this list send email to CODE400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: larry@scjins.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.