I WORKING WITH VSAM AND CICS WHEN I AM DEFINING MY FILE
IN THE FCT .I GOT ERROR LIKE "CDS IS FULL". WHAT ITS MEAN
Answer Posted / rudolf m. aquino
Good day, I'm also encountered error same with u, the first
thing that i do is, I deletes and recreates cics csd, and
increase the recordsize.
see sample jcl
//TSDRMACA JOB (ACCTNUM,JELLOPEE),'RUDOLF.',
// NOTIFY=TSDRMA,
// CLASS=4,MSGCLASS=X,MSGLEVEL=(1,1)
//*
//*********************************
//* *
//* THE JOB DELETES AND RECREATES *
//* CICS CSD *
//*********************************
//*
//DELCSD EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE CICS410D.DFHCSD.DEVTDB2.CLEAN
SET MAXCC=0
/*
//DEFCSD EXEC PGM=IDCAMS,REGION=1M
//SYSPRINT DDSYSOUT=*
//SYSIN DD *
DEF CLUSTER(NAME(CICS410D.DFHCSD.DEVTDB2.CLEAN) -
IXD -
REC(400000) -
RECORDSIZE(100 500)-
FREESPACE(5 5)-
SHR(2)-
VOLUMES(UCP337)) -
DATA(NAME(CICS410D.DFHCSD.DEVTDB2.CLEAN.DATA) -
UNIQUE -
KEYS(22 0))-
INDEX(NAME(CICS410D.DFHCSD.DEVTDB2.CLEAN.INDEX) -
UNIQUE)
/* THE CSD IS NOW READY TO BE INITIALIZED BY PGM=DFHCSDUP
*/
/*
//*
//INITCSD EXEC PGM=DFHCSDUP,REGION=1M,COND(0,LT,DEFCSD)
//*
//* INITIALIZE THE CSD
//*
//STEPLIB DD DSN=CICS410D.SDFHLOAD,DISP=SHR
//DFHCSD DD DSN=CICS410D.DFHCSD.DEVTDB2.CLEAN,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(100,100))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
INITIALIZE
* *----------------------------------------*
* * RETURN CODE 0 IS EXPECTED HERE *
* *----------------------------------------*
/*
//*
//
********** after recreates go to ceda and define file
again in the fct(file control table).
e mail me again.
thanks
Rudolf m. Aquino
UNITED COCONUT PLANTERS BANK
PHILIPPINES
(SYSTEMS MAINFRAME PROGRAMMER)
| Is This Answer Correct ? | 2 Yes | 0 No |
Post New Answer View All Answers
Code the related portions of cics/cobol-i programs to gain addressability to twa area assigned to a particular task. Assme that the size of twa area is 300bytes. What are the advantages if cobol-ii is used in the place of cobol?
What is the meaning of the eibaid field?
If we say that bms length of field = 0, then what does that mean?
In a CICS program, how will you read a VSAM file?
What are the types of important programs that are used in the cics?
mention the option (along with argument type) used in a cics command to retrieve the response code after execution of the command?
Explain the usage of language in the ppt entry?
Explain how do you establish a starting position in a browse operation?
How ENQ and DEQ used in CICS?
What is eib?
What is CICS ?
Explain the difference between a package and a plan.
What are the some important fields in the eib block?
Explain the difference between a symbolic map and physical map?
how do you execute a background cics txn ?