Re: Using a D-spec to define an action in the eval

hi Booth,

It doesn't compile because the code is wrong. Here's what you'll have to do if you want to implement this (though, I can't think of any reason why someone would want to!)

a) Copy/Paste the prototype for XMLRtnAttr, so that you have two copies of it.

b) Change the name of the prototype in the 2nd copy to be f (or whatever name you want to use)

c) Add EXTPROC('XMLRTNATTR') to the 2nd prototype. Notice that the name is in ALL CAPS. This is because RPG (by default) translates procedure names to all caps when it compiles your program. The procedure name given in quotes in EXTPROC() is case-sensitive.

d) The original procedure may also need to have EXPORT specified on the P-spec, I don't remember... Try it without EXPORT, and if it complains about the symbol not being found, add EXPORT to the P-spec.

Good luck




Booth Martin wrote:

This looks like what I want to do but it won't compile.

Brian Johnson wrote:

d RawReading c '''RawReading'''
d f pr extproc('XMLRtnAttr')
c eval wRawReading = f (RawReading)