>> I have a program with an ESTAE that gets control and issues a >> SDUMP. This works fine when submitted as a batch job, as the >> program is in an authorized library. >> >> When invoking the same program from a TSO REXX EXEC, the SDUMP in the >> ESTAE fails with a S133 abend indicating 'An unauthorized >> program requested an SVC dump.' >> >> Is there a way to determine from the SDWA if authorization exists to >> issue a SDUMP macro?
The most mindlessly simple way is to check the key of the SDWA. If you are running in an authorized environment the SDWA will always be in key zero. Otherwise it will be in the key that was current when the ESTAE was set - usually the same as the task key. No muss, no fuss. CC ---------------------------------------------------------------------- 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
