|
View previous topic :: View next topic
|
| Author |
Message |
santhunaveen
New User
Joined: 22 Sep 2006
Posts: 33
|
|
|
|
Hi,
I'm definig cluster with the model as some other cluster then it is working fine...but when I'm trying to define a vsam cluster with the parameters ..it's giving OPEN FAILED
BELOW PIECE OF CODE WORKING FINE:
DELETE SCPE.VPGE.CMS.XXXX.YYY.S1.KE PURGE CLUSTER
SET MAXCC = 0
DEFINE CLUSTER (NAME(SCPE.VPGE.CMS.XXXX.YYYS1.KE) -
MODEL(SCPE.VPGE.CMS.XXXX.S1.KE))
AND MODEL CLUSTER PARAMETERS ARE LIKE THIS:
DEFINE CLUSTER -
(NAME(SCPP.VPGE.CMS.AMBS.S1.KE) -
DATACLASS(MGXNEASB) -
FREESPACE(0 0) -
INDEXED -
KEYS(22,0) -
REUSE -
RECORDSIZE(6500,6500) -
SHAREOPTIONS(2,3) -
SPEED -
VOLUME(*)) -
DATA -
(NAME(SCPP.VPGE.CMS.AMBS.S1.KE.D) -
CYLINDERS(500 500)) -
INDEX -
(NAME(SCPP.VPGE.CMS.AMBS.S1.KE.I) -
CYLINDERS(2 2))
BELOW PIECE OF CODE CAUSING OPEN FAILED PROB:
DELETE SCPT.VPGE.CMS.AMBS.DIV.S1.KE PURGE CLUSTER
SET MAXCC = 0
DEFINE CLUSTER -
(NAME(SCPT.VPGE.CMS.AMBS.DIV.S1.KE) -
DATACLASS(MGXNEASB) -
FREESPACE(0 0) -
INDEXED -
KEYS(22,0) -
REUSE -
RECORDSIZE(6500,6500) -
SHAREOPTIONS(2,3) -
SPEED -
VOLUME(*)) -
DATA -
(NAME(SCPT.VPGE.CMS.AMBS.DIV.S1.KE.D) -
CYLINDERS(25,25)) -
INDEX -
(NAME(SCPT.VPGE.CMS.AMBS.DIV.S1.KE.I) -
CYLINDERS(2 2))
I have given same parameters as model cluster except I don't want that many cylinders tht's why I changed only cylinders filed above...
Can any one tell me..what to do to solve this problem? I'm not getting why model is working not parameters?... |
|
| Back to top |
|
 |
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
the piece of code that is working has a different cluster name than the piece of code causing open failed prob.
Gerry |
|
| Back to top |
|
|
santhunaveen
New User
Joined: 22 Sep 2006
Posts: 33
|
|
|
|
Hi,
BY MISTAKE I HAVE GIVEN DIFF NAMES IN THE POST..BUT IN PROG I HAVE GIVEN CORRECT NAMES ONLY
I'm definig cluster with the model as some other cluster then it is working fine...but when I'm trying to define a vsam cluster with the parameters ..it's giving OPEN FAILED
BELOW PIECE OF CODE WORKING FINE:
DELETE SCPE.VPGE.CMS.XXXX.YYY.S1.KE PURGE CLUSTER
SET MAXCC = 0
DEFINE CLUSTER (NAME(SCPE.VPGE.CMS.XXXX.YYYS1.KE) -
MODEL(SCPP.VPGE.CMS.XXXX.S1.KE))
AND MODEL CLUSTER PARAMETERS ARE LIKE THIS:
DEFINE CLUSTER -
(NAME(SCPP.VPGE.CMS.XXXX.S1.KE) -
DATACLASS(MGXNEASB) -
FREESPACE(0 0) -
INDEXED -
KEYS(22,0) -
REUSE -
RECORDSIZE(6500,6500) -
SHAREOPTIONS(2,3) -
SPEED -
VOLUME(*)) -
DATA -
(NAME(SCPP.VPGE.CMS.XXXX.S1.KE.D) -
CYLINDERS(500 500)) -
INDEX -
(NAME(SCPP.VPGE.CMS.XXXX.S1.KE.I) -
CYLINDERS(2 2))
BELOW PIECE OF CODE CAUSING OPEN FAILED PROB:
DELETE SCPT.VPGE.CMS.XXXX.YYY.S1.KE PURGE CLUSTER
SET MAXCC = 0
DEFINE CLUSTER -
(NAME(SCPT.VPGE.CMS.XXXX.YYY.S1.KE) -
DATACLASS(MGXNEASB) -
FREESPACE(0 0) -
INDEXED -
KEYS(22,0) -
REUSE -
RECORDSIZE(6500,6500) -
SHAREOPTIONS(2,3) -
SPEED -
VOLUME(*)) -
DATA -
(NAME(SCPT.VPGE.CMS.XXXX.YYY.S1.KE.D) -
CYLINDERS(25,25)) -
INDEX -
(NAME(SCPT.VPGE.CMS.XXXX.YYY.S1.KE.I) -
CYLINDERS(2 2))
I have given same parameters as model cluster except I don't want that many cylinders tht's why I changed only cylinders filed above...
Can any one tell me..what to do to solve this problem? I'm not getting why model is working not parameters?... |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
It would help if you post the diagnostic info presented by the idcams execution. Use copy/paste rather than re-typing. Make sure you get all of the diagnostic info.
Is this possibly the first attempt for the new file? The very first time, the delete will fail because there is nothing to delete. |
|
| Back to top |
|
|
santhunaveen
New User
Joined: 22 Sep 2006
Posts: 33
|
|
|
|
Hi,
IDCAMS step was executed sucessfully...below step i'm using new cluster in my program for output...in program i opened in output mode..i'm getting below open error...
******************************************************************************
************************************************************
00000 STA=30 RC=000000 LOC=BD1 MSG=GCDVXXX --- OPEN ERROR - XXXX FILE
PERMANENT ERROR
***********************************************************
***********************************************************
***********************************************************
***********************************************************
***********************************************************
CEE3250C The system or user abend U 999 R=NULL was issued.
From compile unit SSSABEND at entry point SSSABEND at compile unit offs
at address 1BEDA108.
ya..we can..bcz whn next it trying to create with the sam name..thn it gives error hence we delete and set maxcc to 0...and then creating....the probelm is not with delete...it's prob with defn with parameters instead of model. |
|
| Back to top |
|
|
|
|
