There are a number of options in assembler. 1 - On the DCB add an EXLST with option X'07' which contains the address of a 176 byte field. Then use the RDJFCB macro which will cause the contents of the JFCB (Job File Control Block) to be returned into the above field. Note that the EXLST must reside BELOW the 16meg line. This is documented in DFSMS Macro Instructions for datasets (for the DCB parameter) and DFSMS Using Datasets (the EXLST details) and DFSMSdfp Advanced Services (the RDJFCB macro). 2 - Use dynamic allocation (SVC 99) information retrieval to return information about the DD statement. This can be used to either retrieve the information about a single DD statement, or about all DD statements (by using the DIRELNO text unit). Dynamic Allocation is documented in the Authorized Assembler Programming Services Guide, despite the fact that unauthorized programs can use these services.
=============================================== Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com =============================================== From: Frank Swarbrick <[email protected]> To: [email protected] Date: 09/16/2009 10:11 AM Subject: Reading DD card information Sent by: IBM Mainframe Discussion List <[email protected]> I believe I have seen something like the following: //FJSTEST JOB NOTIFY=&SYSUID //STEP01 EXEC PGM=MYPGM //DUMMME DD DUMMY,DSN='THIS.IS.A.TEST' What does MYPGM need to do in order to retrieve the DSN value of the DD named DUMMME? A general pointer in the right direction would be nice. Specific examples would be great! :-) Thanks, Frank >>> The information contained in this electronic communication and any document attached hereto or transmitted herewith is confidential and intended for the exclusive use of the individual or entity named above. If the reader of this message is not the intended recipient or the employee or agent responsible for delivering it to the intended recipient, you are hereby notified that any examination, use, dissemination, distribution or copying of this communication or any part thereof is strictly prohibited. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy this communication. Thank you. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 ---------------------------------------------------------------------- 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 ---------------------------------------------------------------------- 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
