In <[email protected]>,
on 06/24/2011
at 08:50 AM, "Haynes, Stan" <[email protected]> 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 [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
