AnsweredAssumed Answered

Question on the unload utility

Question asked by Gary_Cherlet on Aug 18, 2012
Latest reply on Aug 20, 2012 by Gary_Cherlet
I am executing an unload procedure in a test environment.
I am running into the following problem

[color=#230db5][font=Courier New]IDMS DB347019 TNEWDMCL module not found - R15 return code X'14'
IDMS DC208001 IDMS job abending with abend code 5004
IDMS DC208001 #ABEND from Module IDMSBLDR at Location 0D07F050 Offset 008810
IDMS DC208001 SYSTEM mode registers at entry to #ABEND[font][color]

I realize that TNEWDMCL is not defined but I was attempting to use it as a dummy entry. Anyway I can get around this? Or do I have to specify TESTCV?

[color=#230db5][font=Courier New]//SYSJRNL DD DUMMY
//SYSIDMS DD *
DMCL=TESTCV
/*
//SYSIPT DD *
UNLOAD SEGMENT PGASSEGM
USING PGAS063
AREA
"SATINQ-REGION"
RELOAD INTO PGASSEGM
USING PGAS063
DMCL TNEWDMCL ;
/* [font][color]

Thanks

Bob Knight

Outcomes