likerec by extname from copybook

Hello,

I like to define a record based datastructure for use through a
copybook, the way Tim Kredlo explained in the posting
http://archive.midrange.com/rpg400-l/200501/msg00252.html

It won't compile in my system. I am on V5R2.

Here's a summary of what I want to code:

 

      // Datastructure in copybook

     d myProto       e ds                  extname(ALGPCN)

     d                                     qualified

     d                                     inz

 

      // Strucure to use in procs

     d myNewDS         ds                  likerec(myProto)

 

      /free

        *inlr = *on;

      /end-free       

When I compile this I get: *RNF3546 20      1 The parameter for keyword
LIKEREC is not valid.
The structure myProto is created correctly.

Thanks, Arco Simonse


DISCLAIMER:
This message contains information that may be privileged or
confidential and is the property of C.Meijer B.V. It is intended only for the 
person to whom it is addressed. If you are not the intended recipient, you are 
not authorized to read, print, retain, copy,disseminate, distribute, or use 
this message or any part thereof. If you
receive this message in error, please notify the sender immediately and delete 
all copies of this message. 

This footnote also confirms that this email message has been swept by the 
presence of computer viruses