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.

Answer / mridul

Hi all,
i think we will not get SOC 7, but we will get error while
moving alphabetic value to numeric field.

Answer / shan

Manju, you are exactly correct

Answer / i go crazy

Yes. you won't get any abend.

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

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 ??

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.

plz,could any one tell me? what about EBCDIC in cobol?briefly?

1 Answers  

What will happen if a variable is declared as below.. Explain with an example? Working storage section:- 01 WS-VARX PIC X(10) VALUE 'ABCDEFGHIJ'. 01 WS-VARN REDEFINES WS-VARX PIC 9(5) VALUE '12345'. What will happen I am going to Display the WS-VARX and WS- VARN?

6 Answers   Xansa,

is this below syntax correct? CALL 'subprg' using A,B Please help

2 Answers  

How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

0 Answers  

Should I use STOP RUN in the sub program??why?

6 Answers   Xansa,

I want to declare a field with data type Double in my COBOL program. how shall i do that ?

5 Answers  

i want to enter the name 'pandu' into ur table how?

1 Answers   Fidelity,

What is rmode(24)

0 Answers  

How do you define a table/array in COBOL?

5 Answers   Hexaware,

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.

0 Answers   iNautix,

wirte a pgm in using files in which we hav 10 ,20,30 40...100 records in inputfile and i want them to be send to outputfile in reverse order. PLZ HELP ME OUT .........THIS IS A RECENT QUESTION IN IGATE..

5 Answers   iGate,

I have files that contains both duplicates files(occur more than twice) and non-duplicate files.The file is already sorted by a key.I want to determine those records that are duplicate and will be move to a duplicate file and non- duplicate files to be move to a valid file.thank you.help please

2 Answers