There are LOTS of things to say on this topic and you should check out the
manuals. Most importantly,

1) Make certain you know the differences (and interaction) between the
Linker/Binder AMODE/RMODE settings and the compiler options for this (DATA
and RMODE compiler options)

2) Are you talking about dynamic CALLs or static calls?  With static calls,
you need to use the "lowest" setting for everything (in general - at least)

However, the bottom-line answer to what I think (hope?) you are asking is,

Yes,  
  An RMODE(ANY),DATA(31) COBOL program can call either an RMODE(ANY) or (24)
subprogram if the subprogram is called dynamically.  The subprogram,
however, must be compiled (if COBOL) with DATA(31) - or be AMDOE31 if
Assembler.

P.S.  In general, it is a VERY bad idea to override link-edit/binder
settings explicitly for current COBOL programs.  The compiler options will
create "default" values that are what you should (normally) use.  Change the
compiler options if you want different load module/program object settings
to result.

<[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> We have this COBOL program, let's call him 'BLAH',
> AMODE=ANY,RMODE=24,DATA31.
> It is the first program to be executed, IE   in the JCL  EXEC PGM=BLAH
> Since that is the case, then it's AMODE will be 31.
> 
> BLAH may be calling other COBOL or Assembler modules.
> 
> My thought is this:
> If BLAH is DATA31, then allocated working storage is above the line.
> Since it is above the line, all called subroutines, have to be AMODE
> 31
> since the parm area used, which is in the working storage of BLAH, is
> above the line,
> (DATA31).
> 
> Ergo, there is no reason that the RMODE be 24, it can be easily 31.
> As such, the AMODE can also be 31.
> 
> 
> 
> Can anyone see a flaw in my reasoning?
> 
> Thanks

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to