The client created a new DADS Plus CICS control file FCT DADS01 by moleling it after an existing DADS01 control file which was allocated with 10 cylinders. The client is receiving error message "DADS01 WRITE ERR= NOSPACE" after adding about twenty file definitions to the new DADS control file. The client was using the DADM CICS online transaction to add the files to the DADS Plus control file. After the DADS01 file filled up the client ran the DADBLIST utility which shows the free space available on the DADS01 file. The DADBLIST shows plenty of space is available on the file but the DADM transaction reports the file is full when adding resources to the DADS01 control file.
Z/OS
CICS
The cause of the problem is modeling it after an existing DADS01 control file. The client should use IDCAMS JCL to define a new DADS1 cluster as shipped with the base product install located in the DADS Plus PDS HLQ.SAMPLIB.
The solution is not to model the New DADS01 Control file after an exiting DADS01 control file. Please define a new DADS01 control file using IDCAMS. Define the new DADS01 cluster using the JCL located in HLQ.SAMPLIB(DADS01).
//DADS01 EXEC PGM=IDCAMS,REGION=1024K
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEFINE CLUSTER (NAME(*DADS01*) -
VOLUMES(*VOLSER*) -
KEYS(24 0) -
RECSZ(0180 8185) -
SHR(2 3)) -
DATA (NAME(*DADS01*.DATA) -
CISZ(8192) -
CYL(2 1)) -
INDEX (NAME(*DADS01*.INDEX) -
CISZ(1024) -
CYL(1 1))
/*
//
Then use the JCL below to initialize the new DADS Plus control file with the desired cpntrol file parameters.
HLQ.SAMPLIB(DADBCNTL)