Interested to Buy Any Domain ? << Click Here >> for more details...
How to solve SOC7. I have the cobol coded as below
01 A PIC 9(4).
01 AIN REDEFINES A.
05 AIN1 PIC S9(4)
01 B PIC 9(4)V99.
01 BIN REDEFINES B.
05 BIN1 PIC S9(4)V99.
PROCEDURE DIVISION.
START-PARA.
INITIALIZE A AIN B BIN.
ACCEPT A B.
DISPLAY 'VALUE OF A=' A.
DISPLAY 'VALUE OF B=' B.
DISPLAY 'VALUE OF BIN1=' BIN1.
DISPLAY 'VALUE OF AIN1=' AIN1.
COMPUTE AIN1 = BIN1 - AIN1.
DISPLAY 'VALUE OF AIN1=' AIN1.
When i'm executing this code i'm getting SOC7 for A = 12 &
B=34. Can someone explain
SDSF OUTPUT DISPLAY TCOM058R JOB05458 DSID 102 LINE
0 COLUMNS 02- 81
COMMAND INPUT
===> SCROLL ===>
CSR
********************************* TOP OF DATA
**********************************
VALUE OF
A=12
VALUE OF
B=34
VALUE OF
BIN1=34
VALUE OF
AIN1=12
CEE3207S The system detected a data exception (System
Completion Code=0C7).
From compile unit PROG1 at entry point PROG1 at
statement 29 at compile
+000004CE at address 00007ECE.
Please address how to solve this issue Thanks in
advance.
- 1 Answers
- 9296 Views
- I also Faced
- E-Mail Answers
Answer Posted / guest
try by providing the input values as A=0012 and B=003400 through the JCL SYSIN.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
Name the sections present in data division.
Define static linking and dynamic linking.
how do you reference the rrds file formats from cobol programs
How do we get current date from system with century in COBOL?
What is the difference between Global and External Variables?
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
What is a SSRANGE and NOSSRANGE?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
What is amode(31)
HOw can I get the negative sign while deduct high value from low value
In COBOL, what is the different between index and subscript?
how do you reference the variable block file formats from cobol programs
Explain how you can characterize tables in cobol?
Mention the guidelines to write a structured cobol program?
What is a report item?
