> ------------------------------------<snip>------------------------------
> In respect of your query about EXCP with DEB: > "Hello: Does anyone have any sample code that does I/O (read only) by > manually building a DEB? (Bypassing OPEN and CLOSE.) ...... > > I want to be able to read the directory blocks of a PDS via EXCP in this > manner." > > I cannot answer your question specifically as I haven't played in this > area since the 1970s when I found that DEBE would not run in MVS because > DEBs were built in a different SUBPOOL. > > I know you have indicated that you wish to bypass OPEN/CLOSE, but if you > didn't the directory is easily readable with BSAM. This link contains an > article and sample on doing this. > (http://www.kmsitltd.co.uk/docs/bpamdir.pdf) ----------------------------<unsnip>-------------------------------- You can also use QSAM GETs to read the directory. And if you specify a KEYLEN=8, you can see the key of each block, so you can stop before hitting the actual end of the directory. The block with a key of X'FFFFFFFFFFFFFFFF' is the last block used. --- [This E-mail has been scanned for viruses by the YourNet Connection Virus system] [For more information, please go to http://www.ync.net/YourMAIL] ---------------------------------------------------------------------- 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
