The idea is to start at address 16H (CVT) and use variables defines as USAGE POINTER to travel on the control blocks chain to the TCB. The is a good sample here, as they already mapped the DSECTs to Cobol for you. See below: http://coding.derkeiler.com/Archive/Cobol/comp.lang.cobol/2003-10/0077.html
Regards, ITschak ---------------------------------------------------------------------- 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