Does that snippet of STORCLAS code actually execute? Could some earlier code in the routine bypass it (e.g., if a volser is specified, set &STORCLAS to null and exit)?
:>: -----Original Message----- :>: From: IBM Mainframe Discussion List [mailto:[email protected]] On :>: Behalf Of willie bunter :>: Sent: Wednesday, February 19, 2014 4: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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
