View previous topic :: View next topic
|
Author |
Message |
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
Hi,
I am getting the below abend in my job .
Code: |
18.43.23 JOB45620 IEA995I SYMPTOM DUMP OUTPUT 530
530 USER COMPLETION CODE=4039 REASON CODE=00000000
530 TIME=18.41.33 SEQ=36140 CPU=0000 ASID=00C5
530 PSW AT TIME OF ERROR 078D1000 A0C07056 ILC 2 INTC 0D
530 ACTIVE LOAD MODULE ADDRESS=20B4AC00 OFFSET=000B
530 NAME=CEEPLPKA
530 DATA AT PSW 20C07050 - 00181610 0A0D58D0 D00498EC
530 AR/GR 0: 80C7B81E/84000000 1: 00000000/84000FC7
530 2: 00000000/0008A958 3: 00000000/00040004
530 4: 00000000/20BFBE24 5: 00000000/0008A4A4
530 6: 00000000/00000000 7: 00000000/20B458E0
530 8: 00000000/0008A958 9: 00000000/0008C016
530 A: 00000000/0008A4A4 B: 00000000/20C06F80
530 C: 00000000/00073A58 D: 00000000/0008D158
530 E: 00000000/A0C06FB2 F: 00000000/00000000
530 END OF SYMPTOM DUMP
18.43.29 JOB45620 +AB400A ===== ABEND-AID ===== 556
556 REPORT WRITTEN TO: ABND.DIR.RPT
556 REPORT NUMBER: 908866
556 JOB-IMTSRNG8 STEP-REGION
556 LE COND CODE=CEE3204S / EXPECTED COMP CODE=S0C4 |
The current statement shown in abendaid is a display statement. But the values displayed are populated fine in its variables (checked the listing in abend aid).
Please help me in interpretting the above dump and finding the reason for the abend. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Hi,
Could be different causes. What pgm/utility was executing? |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
I would guess IKJEFT01..BTW. |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
A cobol sub-routine was executing. |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
It is being called from IMSDC online. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Hi,
I'm sorry but it's really tough to explain what to do from my end, one guess would be -did you have both programs with same AMODE? If they differ (one = 24 and the other = 31) passing pointers easely leads to protection exeption, which can eventually lead to 4039. |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
Hi,
AMODE of the calling program and this program are 31 |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
We face this issue only when the input is more. |
|
Back to top |
|
|
Mahendran3784
New User
Joined: 04 May 2007 Posts: 20 Location: INDIA
|
|
|
|
let me put this with an example
Code: |
Program-A (AMODE#31)
Data -Division
Working-Storage
01 VAR-1 pic x(9) value '123456789'.
01 VAR-2 pic 9(2) value 22.
Procedure-Division.
Call Program-b using VAR-1 VAR-2
Program-B (AMODE#31)
Data -Division
Linkage Section
01 VAR-1 pic x(9) value 'asd;lf'.
01 VAR-2 pic 9(2) value '..'. |
i.e while receiving in program-b, the values in the variables are not what we passed from Program-A. And DISPLAY statement being the 1st statement in the Program-B, it abends there?
This abend is not happening all the times. Only when Program-A handles bulk values but not in the variables being passed, this issue occurs.
It would be better if we get some insight about how exactly the variables being passed are retrieved in the Called Module? (internal things)
Thanks,
M |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
The register values shown in abend-aid are as follows,
Code: |
REG HEX Decimal Description
R0 00078FE8 495,592 A(00075000) + 00003FE8, PVT SP=001 ALLOC
R1 20E925EE 552,150,510 A(TSTDCIOS) + 000005EE
R2 10101010 269,488,144 A(100D1000) + 00030010, CSA SP=231 ALLOC
R3 20E92000 552,148,992 A(TSTDCIOS) + 00000000
R4 20E92038 552,149,048 A(TSTDCIOS) + 00000038
R5 000631BC 405,948 A(00063000) + 000001BC, PVT SP=001 ALLOC
R6 0007C5E8 509,416 A(00075000) + 000075E8, PVT SP=001 ALLOC
R7 00073A58 473,688 A(00072000) + 00001A58, PVT SP=001 ALLOC
R8 00063A80 408,192 A(00063000) + 00000A80, PVT SP=001 ALLOC
R9 20E89DF8 552,115,704 A(20E88000) + 00001DF8, PVT SP=001 ALLOC
R10 0007B850 505,936 A(00075000) + 00006850, PVT SP=001 ALLOC
R11 A0D71338 -1,596,517,576 A(IGZCDSP ) + 00000000
R12 20E920FC 552,149,244 A(TSTDCIOS) + 000000FC
R13 00078A90 494,224 A(00075000) + 00003A90, PVT SP=001 ALLOC
R14 00078C48 494,664 A(00075000) + 00003C48, PVT SP=001 ALLOC
R15 00078A90 494,224 A(00075000) + 00003A90, PVT SP=001 ALLOC |
|
|
Back to top |
|
|
Craq Giegerich
Senior Member
Joined: 19 May 2007 Posts: 1512 Location: Virginia, USA
|
|
|
|
Are either of the programs being compiled as CICS programs. |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
No. We deal only with IMS. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
The CEE3204 means there's a storage violation. Interesting that program TSTDCIOS is loaded with 31-bit addressing but several of the registers point to a 24-bit location (00075000, 00072000, 00063000). Is there any chance one of the subroutines is not compiled 31-bit?
Have you analyzed the CEEDUMP to see what it tells you? Are you using DISPLAY on LINKAGE-SECTION items? Have you googled CEE3204 and IMS to look at the various APARs that may apply? |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
Code: |
------------------------
Load-Mod Amode Rmode
TSTDCIOS 31 ANY
TBROOTI 24 24
DFSPCC20 31 24
TSTDRIV 31 ANY
CEEBINIT 24 24
IGZCPAC 31 ANY
TSTLOGS 31 ANY
TSTLLLSS 31 ANY
CEEPLPKA 31 ANY
LEAID 31 ANY
------------------------ |
|
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
Posted above is the AMODE info we got from Abend-aid |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Does the program have one or more arrays?
Is there a check in the code to make sure that if there is more data than there is array entries that the code issues an error and stops or might the code just keep running and "walk on storage"? |
|
Back to top |
|
|
nbalajibe Warnings : 1 New User
Joined: 28 Nov 2006 Posts: 75 Location: India
|
|
|
|
We have done all the validations |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
This module could cause a problem. It looks like a 24-bit subroutine in a 31-bit routine; odd results could occur. |
|
Back to top |
|
|
|