B37-04 on a DFDSS backup to 3 empty MOD9's



Get solution for your ABEND Codes & System Error Messages, SQL Codes, File Status etc...

B37-04 on a DFDSS backup to 3 empty MOD9's

Postby jab0129 » Sat Jan 09, 2010 3:20 am

Full text of error:

13.36.25 JOB04355 IEC030I B37-04,IFG0554A,CAPUNLD3,DOIT,TAPE,B01C,$9B01C,04210010,TSH.CAPUNLD3

The following JCL produced the error. Attempting to backup 25,000 CYLS of data to 3 - empty MOD9's. When I checked the volumes after the abend I noted that the file (TSH.CAPUNLD3) allocated 3300 CYLS on each of the volumes indicated in the TAPE DD statement. There are approx. 6708 cyl left on each of the volumes.

None of the situations indicated as a potential cause of this abend in the system messages manual seem to apply.

The PRODxx volumes are a mix of MOD3 and MOD9. The volumes indicated in the TAPE DD are not SMS controlled.

I'm not sure if this is a JCL or DFDSS issue (or a combination of both).

Any suggestions would be appreciated.
Thanks in advance....Joe

//DOIT EXEC PGM=ADRDSSU,REGION=4M PARM='TYPRUN=NORUN'
//PRODB1 DD UNIT=3390,VOL=SER=PRODB1,DISP=SHR
//PRODB2 DD UNIT=3390,VOL=SER=PRODB2,DISP=SHR
//PRODB3 DD UNIT=3390,VOL=SER=PRODB3,DISP=SHR
//PRODB4 DD UNIT=3390,VOL=SER=PRODB4,DISP=SHR
//PRODB5 DD UNIT=3390,VOL=SER=PRODB5,DISP=SHR
//PRODB6 DD UNIT=3390,VOL=SER=PRODB6,DISP=SHR
//SYSPRINT DD SYSOUT=*
//TAPE DD DSN=TSH.CAPUNLD3,
// SPACE=(CYL,(3300,3300),RLSE),
// UNIT=(3390,3),
// VOL=SER=($9B01A,$9B01B,$9B01C),
// DISP=(NEW,CATLG,DELETE)
//SYSIN DD *
DUMP DS(INCLUDE(CAP.PROD.CU*.**) EXCLUDE(CAP.PROD.CUDOICH.**)) -
ALLMULTI SPHERE ALLDATA(*) ALLX ADMIN -
TOL(ENQF) -
LOGINDD(PRODB1, -
PRODB2, -
PRODB3, -
PRODB4, -
PRODB5, -
PRODB6, -
) -
OUTDD(TAPE)
//
jab0129
 
Posts: 1
Joined: Tue Dec 15, 2009 12:24 am
Has thanked: 0 time
Been thanked: 0 time

Re: B37-04 on a DFDSS backup to 3 empty MOD9's

Postby dick scherrer » Sat Jan 09, 2010 3:37 am

Hello,

Do not post the same question in multiple forums. . . :(

d
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times


Return to ABENDS & SQL Codes