This is a sample of our code to allow "special people" or certain overrides to
be honored by SMS. Do you have any checking for VOLSER? Like when a VOLSER
is specified to quit doing SMS assignments?
/*********************************************************************/
/* ALLOW SPECIAL USERS TO PLACE SELECTED DATA SETS OUTSIDE OF SMS */
/* BY USING STORCLAS=SCNOSMS AT ALLOCATION */
/*********************************************************************/
WHEN ((&JOB EQ &OKAY_SYSTEM_TASK)
AND (&STORCLAS EQ 'SCNOSMS'))
/* HONOR NO SMS FOR TDMF */
DO
SET &STORCLAS = ''
EXIT
END /* DO */
WHEN ((&USER EQ &OKAY_SYSTEM_USER)
AND (&STORCLAS EQ 'SCNOSMS'))
/* HONOR NO SMS FOR SPECIAL PEOPLE */
DO
SET &STORCLAS = ''
EXIT
END /* DO */
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of willie bunter
Sent: Wednesday, February 19, 2014 7:43 AM
To: [email protected]
Subject: Re: IDC3009I ** VSAM CATALOG RETURN CODE IS 48 - REASON CODE IS
IGG0CLAT-80
I checked to see if there is the GUARANTEED SPACE for this DSN and my user
however there is none.
--------------------------------------------
On Wed, 2/19/14, Jousma, David <[email protected]> wrote:
Subject: Re: IDC3009I ** VSAM CATALOG RETURN CODE IS 48 - REASON CODE IS
IGG0CLAT-80
To: [email protected]
Received: Wednesday, February 19, 2014, 4:23 AM
I think Tom is onto
something. Seems like there is something in your ACS routines that if you
code VOLSER, then it "doesn't"
do the rest. Check the ACS routines again for what occurs with VOLSER, or by
chance are there certain privileges granted when your ID does thing? I know
in ours there is the magic list of ID's that can override things.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of willie bunter
Sent: Wednesday, February 19, 2014 7:17 AM
To: [email protected]
Subject: Re: IDC3009I ** VSAM CATALOG RETURN CODE IS 48 - REASON CODE IS
IGG0CLAT-80
Tom,
I checked the STORCLASS ROUTINE and it doesn't. Below are excerpts of the
ACS routine:
FILTLIST CICSALL INCLUDE(CICSALL.**)
WHEN (&DSN EQ &CICSALL) DO
SET &STORCLAS =
'CICSALL'
EXIT CODE(0)
END
DATACLAS:
FILTLIST CICSALL INCLUDE(CICSALL.**)
WHEN (&DSN EQ &CICSALL) DO
SET
&DATACLAS='CICSALL'
END
STORGRP :
FILTLIST CICSALL INCLUDE(CICSALL.**)
WHEN (&DSN EQ &CICSALL ) DO
SET &STORGRP = 'SGCICSALL'
EXIT CODE(0)
END
--------------------------------------------
On Tue, 2/18/14, Tom Marchant <[email protected]>
wrote:
Subject: Re: IDC3009I ** VSAM CATALOG RETURN CODE IS 48 - REASON CODE IS
IGG0CLAT-80
To: [email protected]
Received: Tuesday, February 18, 2014, 10:50 AM
On Tue, 18 Feb 2014 08:52:24 -0800,
willie bunter wrote:
>I cannot understand why the job was failing when I coded the vol parm.
Does your STORCLAS ACS routine make the data set non-managed when VOL is
specified?
--
Tom Marchant
----------------------------------------------------------------------
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
This e-mail transmission contains information that is
confidential and may be privileged. It is
intended only for the addressee(s) named above. If you
receive this e-mail in error, please do not read, copy or
disseminate it in any manner. If you are not the intended
recipient, any disclosure, copying, distribution or use of
the contents of this information is prohibited. Please reply
to the message immediately by informing the sender that the
message was misdirected. After replying, please erase it
from your computer system. Your assistance in correcting
this error is appreciated.
----------------------------------------------------------------------
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
This e-mail transmission contains information that is confidential and may be
privileged. It is intended only for the addressee(s) named above. If you
receive this e-mail in error, please do not read, copy or disseminate it in any
manner. If you are not the intended recipient, any disclosure, copying,
distribution or use of the contents of this information is prohibited. Please
reply to the message immediately by informing the sender that the message was
misdirected. After replying, please erase it from your computer system. Your
assistance in correcting this error is appreciated.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
