Re: Question on PI

["David Morris" <dmorris@xxxxxxxxxxxxx>]

Paul,

If you want to pass a data structure and it will be modified in your 
procedure that looks OK.  You could achieve the same result by 
passing the data structures address.  If the DS cannot be modified, 
I would add CONST and move the parameter to the DS.  I would 
only use these techniques if I had no control over the DS definition.  
My preference would be to send the subfields as individual parms.  
This allows more flexibility, better documents, and validates the 
procedure's parameters.

David Morris

>>> Paul Tuohy <tuohyp@ibm.net> 03/22/99 03:34PM >>>
Hope someone can help me. I am working on a V4R2 machine and I am
defining a Procedure Interface for a main procedure in a called program.

Does anyone know of a way of defining a data structure as a parameter in
the PI? the following is the best I could come up with ( excuse the
spacing etc.)

D                                 PI
D DataPrm
Like(DataDs)

D DataPtr                     S                                 *

D DataDs                     DS
Based(DataPtr)

                      ( definition of subfields)

C                                         Eval    DataPtr =
%Addr(DataPrm)

Anyone got a better solution?

TIA

Paul Tuohy


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *