Re: Array DS as return variable

David,

The MyArray-defintion is not a declaration of a variable (well, strictly
speaking you are defining pointer variable TEMPLATE); no storage is
allocated for MyArray. With wArray you define a variable. To me a template
data structure is a lot like a prototype; you might think of it as a
prototype for a data structure. Whenever I use complex parameters in
prototypes I include the templates in the same include member.

Joep Beckeringh

David FOXWELL

Hi,

I've coded my first array DS as a return variable as below. I'm
wondering if I've made a meal of it. I've added a definition of the
array immediately after the prototype so that callers will have this
definition. However I don't much like mixing the declaration of
variables and prototype.

Any suggestions?




D MyProc PR LIKE ( MyArray )
D DIM ( %ELEM ( MyArray ))

D MyArray S LIKE ( MyDefinition ) DIM ( 10 )
D BASED ( TEMPLATE )


P MyProc B
D PI LIKE ( MyArray )
D DIM ( %ELEM ( MyArray ))

D wArray S LIKE ( MyArray )
D DIM ( %ELEM ( MyArray ))

/FREE

RETURN wArray;

/END-FREE