The second LOAD does not somehow "abolish" the first, it just ups the usage count and returns the same address. You are simply trying to name the same address (the address in LPA of PROGRAM1) the same thing twice. (The ATTACH part is irrelevant to the story.)
I'm surprised the STEPLIB scenario you describe works, but it may be because the second LOAD does somehow undo the first, and Contents Supervision is smart enough to get rid of your IDENTIFY also. Charles -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Ira Broussard Sent: Tuesday, January 24, 2006 10:40 PM To: [email protected] Subject: IDENTIFY macro question Here is the scenario... PROGRAM1 is in LPA (actually, dynamically added to the MLPA in this case during testing, but it the sequence also fails if it is in LPA) and is marked as "RF RN RU", amode31, rmode any. The following sequence is executed by an unauthorized, key 8 program... 1. LOAD EP=PROGRAM1 This works correctly. 2. IDENTIFY EP=PROGRAMA,ENTRY=(entry point returned from LOAD) This works. 3. ATTACH EP=PROGRAMA This works. A subtask is attached and PROGRAM1 runs. If I use XDC at this point to display the TCB's (L TASKS), it shows a subtask named PROGRAMA, which is what I expected. 4. PROGRAMA is subsequently detached correctly. XDC says the subtask is gone. 5. LOAD EP=PROGRAM1 Again, this works correctly. Same entry point returned. 6. IDENTIFY EP=PROGRAMA,ENTRY=(entry point returned from LOAD) This fails with R15=8. In the above steps, the results of both LOADs (step 1 and step 5) return the identical entry point, and that entry point is used for both IDENTIFY macros. There are no intervening DELETEs. I don't understand why the IDENTIFY macro in step 6 fails. Also, if after the IDENTIFY fails, I try to attach PROGRAM1 (instead of PROGRAMA) which is in PLPA, it fails with a S806-C. Last oddity...All of this works correctly, i.e., second IDENTIFY works and I can subsequently do another ATTACH of PROGRAMA, if I take PROGRAM1 out of PLPA and move it into the STEPLIB concatenation. FYI...PROGRAM1 is actually the CICS program DFHSKTSK, and PROGRAMA is just another name I want to be able to "call" it. This is all running in a "controlled" CICS region, so the task doing the above sequence is not the job step task. ---------------------------------------------------------------------- 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
