Can we MOVE X(9) to 9(9) OR 9(9) to X(9)? If yes what are
the ways for doing this?
Answers were Sorted based on User's Feedback
hi all
Numeric can be moved to alphanumeric
and alphanumeric can be moved to numeric only if it has the
numeric data.
| Is This Answer Correct ? | 42 Yes | 10 No |
Answer / sivakumar sekharannair
Chakri and kavya are correct.We can move numeric to
alphanumeric and vice versa. error will be thrown only when
we do arithmetic operations when we move alpha numeric to
numeric data items .
| Is This Answer Correct ? | 21 Yes | 1 No |
Answer / jawaad
yes you can do both , but wait....
1) 9(9) to x(9) will be fine
2) x(9) to 9(9) may have problem in some cases:-
a) Suppose :x(9) has value "5"
when you move to 9(9) it will be
"5 " ,Yes 9(9) will have spaces
instead of
"000000005"
b)you will get soc7 when you perform arithemetic on x(9)
above
| Is This Answer Correct ? | 10 Yes | 3 No |
Answer / varun v
yes you can..use REDEFINES for the same purpose.
Move X(9) to 9(9):-
Working storage section:-
01 WS-VARX PIC X(9) VALUE SPACES.
01 WS-VARN REDEFINES WS-VARX PIC 9(9).
Now you can move X(9) variable to WS-VARX.Eventually it is
moved to the 9(9) variable WS-VARN.
Similarly viceversa..
| Is This Answer Correct ? | 18 Yes | 12 No |
Answer / chakri
kavya is right. We can move numeric to alphanumeric and
vice versa. error will be thrown only when we do arithmetic
operations when we move alpha numeric to numeric data
items .
| Is This Answer Correct ? | 8 Yes | 3 No |
Answer / sp
Fully agree to Jayaprabhu.
We can move 9(9) to X(9). But if alphanumeric field
contains only numeric then and then we can move X(9) to 9
(9).
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / ajay
Sorry ..
I don't know why you are looking into Redefines clause for
the above ...
See what ever it is you can able to move from NUMERIC to
ALPHANUMERIC.But you can not able to move alphanumerics to
NUMERIC.
Move 9(9) to x(9) --possible
Move x(9) to 9(9) -- Not possible.
They may try to confuse you ... but don't give a chance to
them Thanks.
| Is This Answer Correct ? | 12 Yes | 8 No |
Answer / leena_kulkarni
Hey varun,
thanx for the answer but do you know the other way than
REDEFINES? Actually I was looking for that.
| Is This Answer Correct ? | 2 Yes | 3 No |
Answer / harish
Hi,
i hope ajay's answer is correct,but if by moving we will
not get any error .suppose if we use recieved field in any
operation we will get soc07 ..
pls correct me if anything wrong
HARISH POOMGAME SHIVAPPA
NIIT TECHNOLOGY
KOLKATA
| Is This Answer Correct ? | 1 Yes | 2 No |
I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.
consider the following piece of code 01 GROSS-PAY 05 BASIC-PAY PIC 9(5) 05 ALLOWENCES PIC 9(3) if BASIC-PAY has a value 1000 and ALLOWENCES has a value of 250,what will be displayed by the statement DISPLAY GROSS-PAY a.1250 b.01000250 c.01250 d.1.250
when iam reading a flat file which has 100 records through cobol program when iam reading 50th records it gets abends .. so when i run the program again it should read from 50th record .where it got abened ? how it is possible
How To Separate The Numerics From An Alphanumric Data Item Which Contains Both Alphabates And Numerics ?
Why we need to use redefine clause when we can define the variable seperately... what is actual need....
period is missing in the cobol program which error we getting
What compiler option would you use for dynamic linking?
what happens if parmparameter passes zero bytes to the program
wht do u mean by (*,intrdr) wht is * used for ?
Is It Possible to Update or change in VIEW Mode?
What is SDSF?
Suppose a program has the following code. What will be the output? MAIN-PARA. DISPLAY 'MAIN-PARA' PERFORM SECTION-A. STOP RUN. SECTION-A. PARA-A1. DISPLAY 'SECTION A PARA A1'. PARA-A2. DISPLAY 'SECTION A PARA A2'.