On Tue, 7 Feb 2017 13:18:53 -0600, Peter Ten Eyck <[email protected]> wrote:
>Yes, that is what I thought initial also, but I compiled and linked the >program so that the load module is the same in that respect and confirmed with >an AMBLIST on each module. The thing that got the program running was that >coding change to bypass the header record on the file (not pass it to the >assembler program on the call). Does not make sense to me… Are you saying that the COBOL program is linked RMODE 24? Is the program compiled with RENT or NORENT? If RENT then the DATA Compiler option controls where Working Storage is allocated, not the programs Rmode. Is the header record that is passed to the Assembler program in the COBOL program's Working Storage or is it from a record defined in the FD for the file? If it's in the file FD, then it is an external buffer and could very well be allocated above the line with Enterprise COBOL. THe record would have to be moved to an area in Working Storage and passed to the Assembler program from that area instead. Making the Assembler program work in Amode 31 would be the best choice, but it could involve more work! -- Dale R. Smith ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
