Sorry I haven't had a chance to respond you your assistance and replies,
but there was more pressing business that required my attention. I'm
presently rounding up all the pieces that I can find that make up the load
module. I have secured the Enterprise COBOL manuals. I checked linklst
and it contains no COBOL2 load libraries. I am including a portion of the
ABEND-AID dump that was produced. I hope to have more information and
questions in the near future.
Thank you for your assistance,
David
Abend-Aid piece:
The IBM message that corresponds to the condition is:
0CEE3204S The system detected a protection exception (System
Completion Code=0C4).
*******************************************
* Error Location *
*******************************************
0The next sequential instruction to be executed in program OFDBINIT was
at displacement 00001C74.
0The program was compiled on 22 MAR 2006 and is 00006AC8 bytes long.
0It is part of load module DBINIT.
0The module was loaded from JOBLIB library
TDM692.PRIVATE.CORE.R122005.LOADLIBB.
0The module was link edited on 24 MAR 2006 and is 00021668 bytes long.
0The last known I/O request or call in the program above was issued with
a return address at displacement 00001C62.
*******************************************
* Call Trace Summary *
1 A B E N D - A I D PAGE 3
0*******************************************
*******Calling******* ****Return**** *******Called********
Load-Mod Program Type Value Program Load-Mod
*SYSTEM Links to BLB3050 BLB3050
BLB3050 BLB3050 Calls CEEBTOR CEEBINIT
CEEBINIT CEEBTOR Calls BLB3050 BLB3050
BLB3050 BLB3050 DISP 0000083E Calls INITOFFL BLB3050
BLB3050 INITOFFL DISP 00001916 Calls DBIO BLB3050
BLB3050 DBIO DISP 00000BFE Calls IGZCFCC IGZCPAC
IGZCPAC IGZCFCC DISP 00000320 Calls IGZCD24 IGZCD24
IGZCD24 IGZCD24 DISP 0000006A Calls DBINIT DBINIT
DBINIT DBINIT DISP 000000C4 Calls OFDBINIT DBINIT *
DBINIT OFDBINIT DISP 00001C62 Calls DBFILEIO DBINIT
DBINIT DBFILEIO Calls CEEPLPKA
CEEPLPKA DISP 048300B6 Calls LEAID LEAID
LEAID LEAID DISP 00000ADC Calls SNAPAID LEAID
Program Causing Error *
0One or more modules loaded from the LINKLIST.
Current LINKLIST library set is LNKLST00
-----------------------------------------------------------------------
Load-Mod Amode Rmode Resides in
DBINIT 24 24 TDM692.PRIVATE.CORE.R122005.LOADLIBB
BLB3050 24 24 TEC414.TLR.COBOL.LOAD
CEEBINIT 24 24 CEE.SCEERUN
IGZCPAC 31 ANY CEE.SCEERUN
IGZCD24 31 24 CEE.SCEERUN
CEEPLPKA 31 ANY EPLPA
LEAID 31 ANY SYS3.AA.R090500.SPAALOAD
-----------------------------------------------------------------------
*******************************************
* Application Program Attributes *
*******************************************
1 A B E N D - A I D PAGE 4
0
Load-Mod Program Compile Date Length Language
BLB3050 BLB3050 06 APR 2006 00008F9F COBOL Z/OS V3R3M1
BLB3050 INITOFFL 24 MAR 2006 000039FC COBOL Z/OS V3R3M1
BLB3050 DBIO 24 MAR 2006 00001074 COBOL Z/OS V3R3M1
DBINIT DBINIT 22 MAR 2006 00001ADE HLASM
DBINIT OFDBINIT 22 MAR 2006 00006AC8 COBOL Z/OS V3R3M1
DBINIT DBFILEIO 22 MAR 2006 00002001 HLASM
*******************************************
* Supporting Environmental Data *
*******************************************
Abend PSW - 078D0000 000920EC A(OFDBINIT) + 00001C74
Prog PSW - 078D0000 000920EC A(OFDBINIT) + 00001C74
Load Module - DBINIT Entry Point Address - 0008E998
ILC - 06, INTC - 04 Load Point Address - 0008E998
Registers at time of error (Descriptions based on 24 bit addresses)
0REG HEX Decimal Description
R0 0005E528 386,344 A(0003C000) + 00022528, PVT SP=001 ALLOC
R1 0003E2F8 254,712 A(0003C000) + 000022F8, PVT SP=001 ALLOC
R2 000B50B8 741,560 A(000B0000) + 000050B8, PVT SP=002 ALLOC
R3 00E34040 14,893,120 A(ISPSUBX ) + 00001040
R4 000B0038 720,952 A(000B0000) + 00000038, PVT SP=002 ALLOC
R5 0000F738 63,288 A(BLB3050 ) + 000079A8
R6 00000000 0
R7 00063200 406,016 A(00063000) + 00000200, PVT SP=002 ALLOC
R8 000905C8 591,304 A(OFDBINIT) + 00000150
R9 0005E360 385,888 A(0003C000) + 00022360, PVT SP=001 ALLOC
R10 000B00B8 721,080 A(000B0000) + 000000B8, PVT SP=002 ALLOC
R11 00091D6A 597,354 A(OFDBINIT) + 000018F2
R12 00090574 591,220 A(OFDBINIT) + 000000FC
R13 0003DBA0 252,832 A(0003C000) + 00001BA0, PVT SP=001 ALLOC
R14 500920DA 1,342,775,514 A(OFDBINIT) + 00001C62
R15 00000000 0
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
