We have some old Cobol programs that are being upgraded to Enterprise Cobol and the users would like to be able to link them as AMODE 31 RMODE ANY. The problem is that some of these programs call assembler modules to do the i/o via QSAM and VSAM macros (TESTCB, SHOWCB, GET, PUT, PUTX, etc) and the only way these can work is by linking everything as AMODE 24, RMODE BELOW.
Is there any way (like by using LE enabled Assembler), that the assembler macro code can run AMODE 31, RMODE ANY? I know that one way is to reset the mode dynamically via BSM and other mode setting instructions so that the data areas can be moved to 24 bit areas before the macros are issued and then moving them back to AMODE 31 areas to be passed back to the Cobol programs. But is there a simpler way to do this? ---------------------------------------------------------------------- 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
