Jake, depending on how you want to set this up, another way of coding it is to
only set the dataclass in your ACS routine if it's not already specified.
Something like this:
IF &DATACLAS EQ '' THEN /* HONORING SPECIFIED STORAGE CLASSES*/
SELECT
WHEN (&DSN EQ &WHATEVER)
DO
SET &DATACLAS EQ 'DCSOMEDC'
WRITE 'DATACLASS IS SET TO ('&DATACLAS')'
EXIT
END
WHEN (&DSN EQ &SOMETHING)
DO
SET &DATACLAS EQ 'DCOTHER'
WRITE 'DATACLASS IS SET TO ('&DATACLAS')'
EXIT
END
(repeat as needed)
OTHERWISE
SET &DATACLAS EQ ''
END /* END SELECT */
The above will bypass your DATACLASS assignment logic if one is already
assigned, honoring any dataclass your hard code on your allocation. Example:
DEFINE CLUSTER (NAME('YOUR.ZFS.NAME') -
DATACLASS(DCEXTEND) -
LINEAR CYL(8000 0) SHAREOPTIONS(3))
HTH,
Bart
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Lizette Koehler
Sent: Thursday, April 23, 2015 7:30 AM
To: [email protected]
Subject: Re: Extended SMS routine
Jake,
You will need to add WRITE statements to your DATACLAS routine.
You may wish to use something like the following
WHEN (&DSN = OMVSPRD.SMPE.**)
Do
SET &DATACLAS = 'EXTENDED'
Write 'Data class Extended for &DSN'
EXIT
END
When you use in line code like you have then it is possible for the dataclas
you want to not occur
The better coding technique in ACS Code is to exit when you get what you want.
Next, try running the IDCAMS DEF statement with the DATACLAS in it. See if
will use that data class when it is specified. If it does, then it is your ACS
routine that is not working. You will then need to add more WRITE statements
to find out why.
Lizette
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]]
> On Behalf Of Jake Anderson
> Sent: Thursday, April 23, 2015 3:15 AM
> To: [email protected]
> Subject: Re: Extended SMS routine
>
> Hello Liz,
>
> I did add the below lines in DATACLAS:
>
> WHEN (&DATACLAS = 'EXTENDED') SET &DATACLAS = &DATACLAS
>
> WHEN (&DSN = OMVSPRD.SMPE.**) SET &DATACLAS = 'EXTENDED'
>
> After the above change I did the TRANSLATE/VALIDATE and ACTIVATED the
> SCDS using ISMF.
>
> Even after the above Change I get the same error message.
>
> Jake
>
> On Wed, Apr 22, 2015 at 7:24 PM, Lizette Koehler
> <[email protected]>
> wrote:
>
> > Jake,
> > Along these lines.
> >
> > To make this work you need to do the following steps
> > 1) Create a Dataclas with EA/EF
> > 2) Update the Dataclas ACS Code for your VSAM datasets that are to get
> > the Dataclas
> > 3) TRANSLATE/VALIDATE/ACTIVATE the SCDS dataset for this Dataclas ACS
> > code
> > 4) Create the VSAM dataset and do a LISTC and verify the EA/EF is on
> > the file.
> >
> > Lizette
> >
> >
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List
> > > [mailto:[email protected]] On Behalf Of van der Grijn, Bart
> > > (B)
> > > Sent: Wednesday, April 22, 2015 6:32 AM
> > > To: [email protected]
> > > Subject: Re: Extended SMS routine
> > >
> > > How do you believe you're coding the EXTENDED DC? Are you coding
> > > DATACLASS on your DEFINE CLUSTER? If so, is your ACS routine coded
> > > to honor the hardcoded DATACLASS or is it ignoring what you specify
> > > and
> > using
> > > what it believes is correct?
> > >
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List
> > > [mailto:[email protected]] On Behalf Of Jake Anderson
> > > Sent: Wednesday, April 22, 2015 9:21 AM
> > > To: [email protected]
> > > Subject: Re: Extended SMS routine
> > >
> > > Hello Van,
> > >
> > > I tried creating with the smaller size with the dataclas: extended,
> > > but
> > it takes
> > > another dataclas. Not sure why it is not taking up the the EXTENDED
> > dataclas.
> > >
> > >
> > >
> > > On Wed, Apr 22, 2015 at 6:37 PM, van der Grijn, Bart (B) <
> > > [email protected]> wrote:
> > >
> > > > Jake, the message indicates you're not defining the VSAM as extended.
> > > > How sure are you it is picking up the correct dataclass? Try
> > > > defining the dataset with just a couple of cylinders and then run
> > > > a listc to check it's using the dataclass you're expecting.
> > > >
> > > > Bart
> > > >
> > > > -----Original Message-----
> > > > From: IBM Mainframe Discussion List [mailto:IBM-
> > > [email protected]]
> > > > On Behalf Of Jake Anderson
> > > > Sent: Wednesday, April 22, 2015 5:12 AM
> > > > To: [email protected]
> > > > Subject: Re: Extended SMS routine
> > > >
> > > > Hi Elardus/All,
> > > >
> > > > I do see the DATACLAS under the CDS 'ACTIVE'
> > > >
> > > > EXTENDED 20:22 EXTENDED REQUIRED YES
> > > >
> > > > The Storage Group has a mod-27 volume and with just 20% used. Not
> > > > sure why it is still not honouring the allocation of more than 4G
> > > >
> > > >
> > > >
> > > > On Wed, Apr 22, 2015 at 2:36 PM, Elardus Engelbrecht <
> > > > [email protected]> wrote:
> > > >
> > > > > Jake Anderson wrote:
> > > > >
> > > > > >Sorry, It was in cylinders :)
> > > > >
> > > > > It is all right. Many thanks.
> > > > >
> > > > > >The dataclas: extended had the extended address ability to 'YES'.
> > > > > >Is
> > > > > there a way to check if a particular DATACLAS is active ?
> > > > >
> > > > > If you have activated your ACDS, do you see that DATACLAS when
> > > > > you use ISMF with CDS as 'ACTIVE' when selecting the Data Class
> screen?
> > > > >
> > > > > I will look in the meantime for your error message. I believe I
> > > > > have seen this type of allocation error before...
> > > > >
> > > > > Groete / Greetings
> > > > > Elardus Engelbrecht
> > > > >
> >
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
