Problem:
When executing jobs (BURLFIL, BTESBMR) to process GDG files that are stored on z/OS TAPE type devices (3480, 3490) these devices are not recognized. The following messages appear:
KURFIO - errno 61
KURFIO - EDC5061I An error occurred when attempting to define a file to the syst.
000093 KURFIO - R15 value = 0
000094 KURFIO - Reason code = 24
000095 KURFIO - RBA = 0
000096 KURFIO - Last op = 50
000097 KURFIO - lastop=50 syscode=0 rc=536
000098 KURFIO - svc99_info=0 svc99_error=536
Resolution:
Often this is due to the fact the user running the job is not authorized to RACF class TSOAUTH MOUNT (allowing to execute dynamic mount). The first thing is to verify the RACF level of authorization. If the necessary authorization is ok the following workaround can help.
Add the problematic dataset name using the DD name: //INPUTDSN in the step below:
Example:
//STEP0100 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=0M
//SYSTSIN DD *
DSN SYSTEM(XXXX)
RUN PROGRAM(BTESBMR) PLAN(PUR41SV)
//READER DD SYSOUT=(A,INTRDR)
//FABEND DD DISP=(NEW,CATLG),DSN=&&FABEND,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600),
// UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE)
//NEWJCL DD DISP=(NEW,PASS),DSN=&&NEWJCL,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920,EROPT=ACC),
// UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE)
//DIZFILE DD DISP=(NEW,PASS),DSN=&&DIZFILE,
// DCB=(RECFM=FB,LRECL=4033,BLKSIZE=24198),
// UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE)
//INPUTDSN DD DSN=XXX.XX.XXXXX.G0001V00,DISP=SHR
where
XXXX is the DB2 system
XXX.XX.XXXXX.G0001V00 is the problematic data set name
#EnterpriseDeveloper
#MFDS
#DataExpressSEQGDGBURLFILBTESBMRKURFIORACFTSOAUTHMOUNT
