There is a production file which has millions of records in
it.The program that uses it ends up with an SOC7 abend.It
is sure that the abend is due to some invalid data in the
file.Is there any way to debugg the SOC7 abend with out
giving displays? I need the record which is cause for the
abend.
Answer Posted / ramesh
Steps taken to resolve to resolve S0C7
1. Get the offet of the abend from sysout
e.g lets say the offset is 0005DA
2. Go the compile listing and locate the offset. This will
be present in the assembly listing of the program.
000067 MOVE
0005D6 4820 8018 LH 2 24(0 8) WS-COMP
0005DA 4E20 D100 CVD 2 256(0 13) TS2 0
0005DE F332 8020 D105 UNPK 32(4 8) 261(3 13) WS-DEST
0005E4 96F0 8023 OI 35(8) X'F0' WS-DEST+3
000068 DISPLAY
0005E8 5820 905C L 2 92(0 9) TGTFIXD+92
0005EC 58F0 202C L 15 44(0 2) V(IGZCDSP )
0005F0 4110 A1F6 LA 1 502(0 10) PGMLIT AT +490
0005F4 05EF BALR 14 15
000069 DISPLAY
0005F6 58F0 202C L 15 44(0 2) V(IGZCDSP )
0005FA 4110 A1E0 LA 1 480(0 10) PGMLIT AT +468
0005FE 05EF BALR 14 15
3. Get the statement number from the listing here the offet
0005DA is the expansion for the statrement number 000067.
4. Using the statement number obtain the statement.
which would be something like this:
000067 MOVE WS-COMP TO WS-DEST.
Now this is the problematic statement.
Look in to this to resolve the abend.
Hope this helps.
Regards
Rameshkumar.H.K,Belgaum Karnataka.
Infosys Technology Bangalore
Is This Answer Correct ? | 12 Yes | 6 No |
Post New Answer View All Answers
explain sorting techniques in cobol program?
How to print 10 to 1 if the input have only 10 digit number?
Define cobol?
Mention the guidelines to write a structured cobol program?
how do you reference the esds vsam file formats from cobol programs
A table has two indexes defined. Which one will be used by the SEARCH?
What are the different types of condition in cobol and write their forms.
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
In which area will you utilize 88 level items in cobol?
What is static and dynamic call in cobol?
write a cobol logic. i have file that has 10 records .1 record go to first output file and second record goes to 2 output and etc
For rewrite, why is it mandatory that file needs to be opened?
What is the utilization of copybook in cobol?
Can a Search can be done on a table with or without Index?
Explain about different table spaces.