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 |
wht happens if we dnt give scope terminator ?
What type of Call you would use if you don;t want the control back to the calling program?
if you give cylinder(1,1)how many cylinders it will be allocate?
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
How can you get the ksds file records into your cobol program?
What are different file OPEN modes available in COBOL?
How can we increase the size of an existing PDS to include more no. of modules.
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
I have a variable account-number declared as comp-3, s9(10) comp-3 in a file. How do i find a particular account number say 123456 in that file?
In COBOL "BEFORE" advancing is there or not ?
i need the code for this program in cobol. 2 + 1 = 3 4+3=7 6+5=11 8+7=15 10+9=19
What is the usage of comp fields in cobol?