Bottom line: No.
Further bottom line: You cannot do what you want to do using any standard IBM 
service (RACF) or exit.

What might you be able to do to accomplish your goal. First, restrict the use 
of IDCAMS. I.e. don't let these people use it at all. "But they need it!". I 
realize that. Write your own program which invokes IDCAMS (likely need to make 
it statically linked). In this program, pass the address of an INPUT subroutine 
to IDCAMS. IDCAMS would then invoke this subroutine instead of reading SYSIN. 
The subroutine would OPEN, READ, and CLOSE the actual SYSIN DD statement. You 
could then validate the command yourself. But this is going to be labor 
intensive since you'd really need to read a parse each input record to really 
find the LIMIT() for a DEF GDG.

I don't remember why you want to do this. If it were me, I have a batch job 
which would run periodically (end of day?). This job would simply do a LISTC 
LVL(...) ALL on each of the user's HLQ. I would feed this into a REXX program 
which would parse it (I've done this a lot). If it discovered a GDG BASE with 
LIMIT > 3, it would simply do an ALTER ... LIMIT(3). This would scratch and 
uncatalog all the "extra" generations. The next day, I review the reports and 
talk to the offender. I assume you have management support for this 
restriction. Depending on the offender's response (and recidivism), I would 
either: forgive & forget; report him to his manager; evict him from the class; 
give him a failing grade; have my friend "Guido" meet him after work (not 
really).

-- 
John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
[email protected] * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM


> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]]
> On Behalf Of Jake anderson
> Sent: Thursday, September 27, 2012 6:38 AM
> To: [email protected]
> Subject: Command EXIT - IDCAMS
> 
> Hi,
> 
> Is there a command EXIT which Restricts the user Specifying not more
> than
> LIMIT(3) during GDG base Creation ?
> 
> Any Pointer or Suggestions Would be highly appreciated.
> 
> Jake
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to