On 04/01/2015 01:40 PM, Larre Shiller wrote:
Hello -
Please excuse the lack of detail in this post... I'm not a COBOL programmer and quite a
bit of what is happening here is either outside of my scope of understanding and
experience or I have no way to directly test some of this. There are quite a few
"moving parts" involved and I'm not sure which one may be the culprit.
We have a production batch job that executes DB2 and a COBOL program using TSO in batch
(IKJEFT1A). The COBOL program dynamically allocates DASD data sets as input using PUTENV
and standard COBOL SELECT and OPEN statements. The COBOL program uses the CATALOG to get
the data set names it is interested in uses the DSN to do the OPEN. This has been
working for years. Unfortunately, some of the input data sets chaned from DASD data sets
to TAPE data sets and the job is now getting "failure to allocate" messages:
IKJ56221I DATA SET FOO.BAR NOT ALLOCATED, VOLUME NOT AVAILABLE+
IKJ56221I VOLUME NECESSARY TO SATISFY YOUR REQUEST NOT ON SYSTEM, AND CANNOT
BE MOUNTED
...and since we are a JES3 shop, this one gets thrown in as well:
IEF295I FOO.BAR - VOLUME MOUNTING NOT ALLOWED BUT IS NEEDED BY JES3
INITIALIZATION
<SNIPPAGE>
I think you will have to check your JES3 initialization
parameters. Not having done anything with a JES3 environment for
about 15 years, you may have to go so far as to make changes to
your INISH deck (I can't remember where these things are defined).
In theory, a batch job in JES3 should be able to do an ALLOC
(SVC99) for a data set that gets assigned to a tape device....
But, if you are restricted in the LOCAL (I'm assuming you are not
running a GLOBAL only environment) from tape mounts...
In the case that the LOCAL in question can't do a mount, you may
need to do something like this to get the JOB scheduled on a
correct LOCAL:
//DUMYTAPE EXEC PGM=IEFBR14,COND=ONLY
//T1 DD UNIT=CART,DSN=DUMMY.NOTREAL.TAPE,
// DISP=(MOD,DELETE,DELETE)
The above would need to be the first executable step in the JOB.
Like I said, it has been a long time since I worked on JES3 and I
have NO JES3 manuals to reference for this right now.
Regards,
Steve Thompson
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
