Re: COBOL 101

From: Jon Paris

>> I note though that there's really no good way to pass a parameter to a
PERFORMed paragraph.

You don't do it that way Joe - you either simply use the Global variable
represented in Linkage and test in the performed paragraph (which you'd
have
to do anyway even if you passed it as a parm). Moving it to WS doesn't
really help other than in cases where an optional parm simply means to use
a
default value in the calc instead.

The alternative is to do it the ANSI '85 way and use a nested program
instead of a performed paragraph. Nested programs are as close as COBOL
gets to RPG subprocedures. They support local and global storage and if I
recall correctly you can tier the variables so that a variable is local to
the nested program but can be seen by programs nested within it.