Re: RPG Free Syntax for Externally Described Data Structure

Peter,

The Fixed Form here compiles successfully.

* D DS_WMS0104 E DS EXTNAME(LMBJDS104W) D
prefix('W_')*

But compilation is not successful with *Free *Format you mentioned.

010100 *DCL-DS DS_WMS0104 EXTNAME(LMBJDS104W) PREFIX('W_') END-DS;
*
======> bbbbbbbbbb aaaaaaaaaa

======> cccccccccc

*RNF0202 20 a 010100 THE PARAMETER FOR EXTNAME OR EXTFLD MUST BE A
DEFINED NAMED
CONSTANT OR LITERAL.

*RNF3523 40 b 010100 External description DS_WMS0104 for data
structure is not
found; data structure is ignored.

*RNF3530 00 c 010100 Data structure DS_WMS0104 has no valid
subfields.

[image: image.png]
----
Regards,
Mohan Eashver



On Fri, Apr 26, 2024 at 2:30 PM Peter Dow <petercdow@xxxxxxxxx> wrote:

Something like

DCL-DS DS_WMS0104 EXTNAME(LMBJDS104W) PREFIX('W_') END-DS;

or

DCL-DS DS_WMS0104
EXTNAME(LMBJDS104W)
PREFIX('W_')
END-DS;

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx
pdow@xxxxxxxxxxxxxx /

On 4/26/2024 11:13 AM, Mohan Eashver wrote:

Happy Friday to you, how are you?

Will you please recommend a Free RPG syntax for the below ?



* D DS_WMS0104 E DS EXTNAME(LMBJDS104W) D
prefix('W_')*

----
Regards,
Mohan Eashver

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.