On Wed, 9 Jun 2010 15:11:47 -0500, Ruegsegger, Jeff
<[email protected]> wrote:
>We were forced into the logical dump mode as
>the physical dumps were causing elongated RESERVE's (converted to global
>ENQUEUES by CA-MIM) and would spend hours thrashing due to the synchronous
>batch that runs.
I've always used this sample exit, which pretty much makes DFDSS
operate the way FDR full volume dumps work by default.
*THIS EXIT PREVENTS DFSMSDSS FROM ENQUEUING THE VTOC
*BY NOT ENQUEUING THE VTOC PERFORMANCE WILL BE INCREASED... BUT
* THERE WILL BE DECREASED DATA INTEGRITY.
*
* SETTING THE EXIT RETURN CODE TO 4
* CAUSES DFSMSDSS TO ENQUEUE ONLY ON THE VOLUME BEING
* DUMPED/COPIED AND ONLY FOR THE DURATION OF THE VTOC ACCESS
*
ADRUENQ CSECT
ADRUENQ AMODE 31
ADRUENQ RMODE 24
STM 14,12,12(13) SAVE REGS IN PREVIOUS SAVEAREA
USING ADRUENQ,15 SET ADDRESSABILITY TO THE EXIT
LM 14,12,12(13) RESTORE OTHER REGISTERS
LA 15,4 SET RETURN CODE TO 4
BR 14 RETURN
END
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
mailto:[email protected]
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
Systems Programming expert at http://expertanswercenter.techtarget.com/
----------------------------------------------------------------------
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
