On Fri, Mar 7, 2014 at 3:22 AM, Bernd Oppolzer <bernd.oppol...@t-online.de>wrote:
> For your TIOT loop, I think it is correct, although the more interesting > part for me would be how to get to the TIOT pointer at the beginning ... > > I used this to get the TIOT address, larl r2,extractArea extract (r2),fields=(tiot) Get tiot address lrl r2,@tiot using tiot1,r2 ... extractArea ds 0a @tiot ds a Note extract can return several different addresses, that's why I defined the "area", then followed that with the individual fields I actually "extract"ed. But Christopher Blaicher can "find that address in two load instructions" :-) To get to the TIOT use: PSATOLD->TCBTIO Donald Russell ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN