dcl-ds ds_mEmployee LikeRec(RMEMPLOYEE) end-ds;
^ this generates a compile error RNF3547 (severity 20):
"The keyword is not allowed following keyword LIKEREC; keyword is ignored."
"Cause: When keyword LIKEREC has already been specified, the only keywords
which may follow are BASED, CONST, DIM, DTAARA, EXPORT, EXTPROC, IMPORT,
INZ, NOOPT, OCCURS, OPDESC, OPTIONS, OVERLAY, STATIC, and VALUE."
The "keyword" flagged in the compile listing is "end-ds". I am defining
this data structure because I've defined the mEmployee file inside a
procedure, and this requires the CHAIN opcode to dump the record contents
into a data structure.
What am I missing?
This is v7r1 with recent PTFs & TRs. The source is **FREE (code starts in
This mailing list archive is Copyright 1997-2020 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