At 08:44 PM 9/15/2015, Shmuel Metz (Seymour J.) wrote: >In ><CAHcsYBSFoQgfPqLqeu0xjdTRh-y7=kaeedzrtgdfz1oq7xq...@mail.gmail.com>, >on 09/14/2015 > at 01:14 PM, Massimo Biancucci <[email protected]> said: > >>is there any way to know which concatenated dataset I've read the >>current record from ? > >Yes, but OCO makes it more difficult than it should be. Basically you >must pull it out of a control block related to an IOB. > >-- As Chris Blaicher indicated, find the TIOT entry using DCBTIOT and TIOEJFCB will contain an SVA for the JFCB. Then use SWAREQ to convert the SVA to a real address and you can get the data set name from the JFCB (presuming that is what you are looking for). Depending on how often you want to do this (every record?), you may want to setup an OPEN exit and set the "unlike attributes" bit in the DCB. This will cause your exit to be driven during the initial OPEN and at the beginning of each new concatenation. Your exit can then perform the process described above and just save the current DSN somewhere in your storage. No OCO structures need be interrogated.
Art Celestini Technology Architect Mainframe Development Syncsort Inc. Note that mail sent to the "From" address used in this post will be rejected by my server. Please send off-list email to ibmmain<at-sign>celestini(dot>com. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
