Re: MODS confusion

David,

Your program does not get a MODS from an RPG III program. Program SP1
defines the MODS; it 'owns' the storage, so to speak. SP1 passes a pointer
to the storage to SP2; SP2 just passes the pointer on to the RPG III
program to do whatever it is supposed to do. Because SP2 just passes the
pointer, the definition of the parameter in SP2 does not really matter in
this case (assuming SP2 does not do anything else with the parameter).

Joep Beckeringh

David FOXWELL

My program is supposed to get a MODS from an RPGIII. I can't see how
this is supposed to work.

Pgm RPGIV
Module1
D globalDS E DS EXTNAME(myFile) OCCURS(20)

SP1 B

CALL SP2 ( globalDS );

Module2
D globalDS E DS EXTNAME(myFile) OCCURS(20)

D SP2 PI
D ADs LIKE(globalDS)

C CALL RPGIII
C PARM ADs


Pgm RPGIII
IODS E DSMYFILE 20
C *ENTRY PLIST
C PARM ODS


ADs in Module2 SP2 is not a MODS or even a DS. How is it that I get
back 20 occurrences of the DS? Is it by accident?

Thanks