> Depending on how often you want to do this (every record?) Couldn't you just save off DCBTIOT and compare it before (after?) every GET? If DCBTIOT changed then go through the whole drill below, else not?
Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Art Celestini Sent: Wednesday, September 16, 2015 6:16 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Concatenated datasets read information. 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 <mad4...@gmail.com> 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. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN