CICS LE

[QJC]

QJC (Programmer) Apr 19, 2004
I have a Cobol program running in LE 1.4 which statically calls a PL1 program which calls a TableBase(DataKinetics product) program that is written in assembler. When the assembler program is called the process abends with the following error code....

DFHSR0001 KGSCIC1 An abend (code 0C4/AKEA) has occurred at offset X'FFFFFFFF' in
DFHME0116 KGSCIC1 426
(ModuleFHMEME) CICS symptom string for message DFHSR0001 is
PIDS/565514700 LVLS/530 MS/DFHSR0001 RIDS/DFHSRP PTFS/UQ80794
AB/S00C4 AB/UAKEA RIDS/NAPSTQ ADRS/FFFFFFFF
DFHDU0205 KGSCIC1 A SYSTEM DUMP FOR DUMPCODE: SR0001 , WAS SUPPRESSED BY THE D
DUMPCODE


...and then this.....

CIB Address: 1F2C0000
Current Condition:
CEE3204S The system detected a protection exception (System Completion Code=0C
Original Condition:
CEE3204S The system detected a protection exception (System Completion Code=0C
Location:
Program Unit: BIB811P Entry: BIB811P Statement: Offset: +0037D788
Machine State:
ILC..... 0004 Interruption Code..... 0004
PSW..... 479D0000 8055CE54
GPR0..... 1F271D78 GPR1..... 001E3748 GPR2..... 801DF74E GPR3..... 001E3650
GPR4..... 1F2BEEC2 GPR5..... 00000000 GPR6..... 1F2BE29E GPR7..... 1F2BE260
GPR8..... 1F2BE29E GPR9..... 1F2BE428 GPR10.... 1F2BCB97 GPR11.... 1F2BE29E
GPR12.... 1F256660 GPR13.... 1F271C00 GPR14.... 801DFA92 GPR15.... 0055CE50
orage dump near condition, beginning at location: 0055CE40
+000000 0055CE40 Inaccessible storage.


I think it is a setting within the region but do not know what and can not get anybody to help on this. Any ideas?


Thanks,
Q

 

[stevexff]

Q

Couple of questions (no answers yet!).

1. Try to isolate the problem - does the TableBase work OK from just the PL/1 program, i.e. does the problem only occur when you call the PL/1 program from COBOL?

2. Is TableBase LE370-compliant, or is it stand-alone?

3. What are the TASKDATAKEY (transaction) and EXECKEY (program) definitions set to in CEDA?

Steve

 

[QJC]

Steve,

Thanks for your reply. I have had a look and the answer to your questions are:

1. We have debugs in the PL1 code which show up on TSQ so it seems like it is only the TableBase (Assembler) code that is causing the problem.

2. Yes, it is compliant to LE370 as we have it running with LE in another region.

3. Both keys are set to user in the region.

We have the exact code running in another region with no problems but because our regions are not identical we do not know what to look for.

Regards,
Q

 

[stevexff]

It definitely looks environmental. Have you got the same load libraries in STEPLIB and DFHRPL?

It might be worth checking that the TableBase components are correctly defined in your CICS (I don't like to say RTFM, but it should have an 'Installing in CICS' section somewhere).

Steve