In <ac1ec69331ff27468be326e1db521758059ef67...@sd01cfmv0003.prod.net>, on 06/24/2011 at 08:50 AM, "Haynes, Stan" <stan.hay...@cra-arc.gc.ca> said:
>The COBOL program has a static mapping of TCB and TIOT in the LINKAGE >section. It gets the TIOT address from the TCB, then scans the TIOT, >looking for a specific DDNAME. It then calls an assembler program to >do the RDJFCB for that DDNAME. I have the same question as Walt: why not just do the RDJFCB? >>>> LA 4,36(4) INC PTR TO EXIT LIST AREA Why? That just makes the code harder to read. SAVEXIT EQU * L 4,DCBADDR LA 9,EXLIST LIST ADDRESS IN R9 IN DCBEXLST STCM 9,7,37(4) >The instruction "LA 4,36(4)" concerns me (hard-coded offset). Indeed. The DCBD macro has been available for lo these many decades. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see <http://patriot.net/~shmuel/resume/brief.html> We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html