Darth,

Great point! 

However, I only used WRITE for debugging purposes and not all the time for all 
allocations. As you wrote, it is a personal preference. But it is an excellent 
suggestion for Tommy to take advantage of either way.

Bob Richards 



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of 
Darth Keller
Sent: Wednesday, August 23, 2006 8:31 AM
To: [email protected]
Subject: Re: How can the ACS routine to bypass checking the storage volume 
datasets?

A personal choice here, but I've also found it very helpful over the years 
to include a WRITE statement for every exit:

/*--------------------------------------------------------------------*
/* ALLOW STORAGE ADMINISTRATORS AND SYSTEM PROGRAMMERS TO             *
/* SELECT THE STORAGE CLASS OF CHOICE.                                *
/*                                                                    *
/* LOGIC SEQUENCE - 17                                                *
/*--------------------------------------------------------------------*
 
    WHEN (&USER = &SPECUSR && &STORCLAS ¬= '' && &DSN ¬= &PROD_DSN) 
      DO 
        SET &STORCLAS = &STORCLAS 
        WRITE 'SC00010 ' &DSN                    
        EXIT 
      END 

It can be very helpful in debugging an issue when applications and 
managment are breathing down your neck. As long as you use some unique 
hook identifying the exit point, the text isn't so critical.  The 
variables available are many & should be chosen with some thought as to 
what you'll need to debug. 
  
  
  
LEGAL DISCLAIMER 
The information transmitted is intended solely for the individual or entity to 
which it is addressed and may contain confidential and/or privileged material. 
Any review, retransmission, dissemination or other use of or taking action in 
reliance upon this information by persons or entities other than the intended 
recipient is prohibited. If you have received this email in error please 
contact the sender and delete the material from any computer. 
  
Seeing Beyond Money is a service mark of SunTrust Banks, Inc. 
[ST:XCL] 
 
 
 
 

----------------------------------------------------------------------
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

Reply via email to