soc-7 is a bad data,invalid data.
when ever we are moving the alphabets in the position of
numeric then we got this abend. so my question is if
o1 ws-data pic 9(1) value passing the alphabet some x. then
we got soc-7 or not? i want clarification ?
Answers were Sorted based on User's Feedback
Answer / manju
Hi,
Sruthi's answer is completely wrong.
Guys, If you are not clear with the answer then please dont
post it. This website is refered by many and you may lead
them to wrong direction. Even if you post when you are not
clear, then mention it clearly that you are not sure about
the answer and ask somebody else's suggestion to correct if
that is wrong. Dont post the wrong answer as such you are
sure.
The answer for the above question is:
Yes, S0C7 is data exception, However it is no where related
with move statement. Move statement (Alphanum or Alpha to
Num) and (Num to Alphanum or Alpha) never give you any
abend or error. The move happens either ways.
the simple answer for the above question is "No" you wont
get any abend for the above move statement.
S0C7 comes only when you use Alphabetic feild for
arithmatic operation OR a Numeric feild containing an
alphabet and used for arithmatic operation.
I dont think i am wrong here.. If anybody feels please
correct me.
Thanks,
Manju.
| Is This Answer Correct ? | 10 Yes | 3 No |
Answer / mridul
Hi all,
i think we will not get SOC 7, but we will get error while
moving alphabetic value to numeric field.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / jaganmohanreddy
hai manju u said for arthimatic expressions we will get
this abend not only for this when u trying to read file in
cobol it has alphanumeric data but the corresponding field
described in file description has 9(5) something numeric
pic clause we will get this abend just check it once u have
any doubt so soc7 is for invalid data , when u try with
move statemets with data exception u will get runtime error
check it also once, and u said numeric field containg
alphabet using for arthimatic exp then we will get this ,i
have one doubt how numeric filed will contail alphabetic
data just clear my doubt please
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / tania
So Manju u mean to say if we try to move spaces to Numeric
field (PIC 9(5) for ex) u wont get any abend ??
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / sruthi
Hi,
we can pass numeric data to alphanumeric.bcz x accept
both numerica alphabets.
if we pass numerics to alphebets like 9 to a we will get
that kind of error.
| Is This Answer Correct ? | 4 Yes | 9 No |
What is difference between static and dynamic call in cobol?
study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10
Can anyone tell me how to handle the array beyond the limit. If we have an array or a table which can handle 5000 records but now we have to compensate 20000 records with the same array? how to handle the situation.
can we declare s9(9)v9(9) in cobol ? if yes how many bytes it will occupy ?(urgent plz answer it)
) How do u handle errors in BMS macro
What type of SDLC u followed? Why?
How do you compile cobol program..?
how to display comp3 variables reply soon ?
have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..
given the following: 77 A PIC 9V9 VALUE 9.5 77 B PIC 9 VALUE 9. 77 C PIC V9 VALUE 0.8 77 D PIC 9 77 E PIC 9 77 F PIC 9V999 what are the contenta of D E nad F after the following statements are executed: COMPUTE F ROUNDED=A+C/B MULTIPLY A BY C GIVING E ADD B C A GIVING D ROUNDED a.F=9.589 E=8 D=1 b.F=9.589 E=8 D=9 c.F=9.589 E=7 D=9 d.F=9.589 E=7 D=1
what is the difference between Plan & package?
How can you declare the file ?