I've got a paper I wrote on how to convert a QSAM or BSAM assembler module to 31-bit. I offered it here some years ago and I still get requests. Let me renew the offer at this time. Write me off-list.
It's not a magic solution. It is basically your "the data areas can be moved to 24 bit areas before the macros are issued." It's basically a cookbook for doing that. charlesm at mcn dot org Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Barkow, Eileen Sent: Tuesday, July 12, 2011 11:06 AM To: [email protected] Subject: running Assembler I/O macro code as AMODE 31, RMODE ANY 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
