RE: Call by reference

[Jim Essinger <esinger@xxxxxxxx>]

Jon,

Thanks for that clarification.  I have stated to others "same activation
group" and they have taken it to mean;   JobA and JobB are running programs
with an activation group named "RUBBERGOAT", and they have understood that
external data and files can be shared between programs from the different
jobs.  Thus the wording I used helps keep things from getting out of hand.

Can RPG share the data from a COBOL program when a structure is defined as
"external"?  I'm NOT an RPG programmer, and have not coded RPG for over 12
years, so I'm behind the times on the new functionality of RPG.

At 07:46 PM 8/23/2002 -0400, you wrote:
> >> IF you are using ILE COBOL (RPG does not have external sharing of files
>and data structures) and IF they are both called from the same job, and IF
>they are in the same activation group, then anything that ProgramB changes,
>ProgramA will see.
>
>One correction and one simplification.
>
>"RPG does not have external sharing of files and data structures" is only
>partly true.  RPG cannot share files but most certainly can share Data
>Structures (check out the IMPORT and EXPORT keywords for confirmation.
>
>The part of the statement "IF they are both called from the same job" is
>superfluous.  If they are in the same AG they are by definition in the same
>Job since the AG is a subdivision of the Job.
>
>Since files are not involved in the scenario in question, that means that we
>can say: IF they are in the same activation group, then anything that
>ProgramB changes, ProgramA will see.
>
>Just a bit simpler.
>
>Jon Paris
>Partner400
>
>_______________________________________________
>This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list
>To post a message email: COBOL400-L@midrange.com
>To subscribe, unsubscribe, or change list options,
>visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l
>or email: COBOL400-L-request@midrange.com
>Before posting, please take a moment to review the archives
>at http://archive.midrange.com/cobol400-l.