On Wed, 9 Jun 2010 15:11:47 -0500, Ruegsegger, Jeff
<jeff.ruegseg...@avnet.com> 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:mzel...@flash.net                                          
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to