WORKING-STORAGE SECTION.
01 A PIC X(3) VALUE 'ABC'
01 B PIC 9(3).
PROCEDURE DIVISION.
MOVE A TO B.
STOP RUN.
OUTPUT IS: AB3
WHY AND HOW THIS IS HAPPENING.
Answers were Sorted based on User's Feedback
Answer / mahe
You won't get AB3 as Output,Job will abend with SOC7 as you
r moving Character to Numeric variable
| Is This Answer Correct ? | 22 Yes | 4 No |
Answer / kamaldeep
I got AB3 as out put, when ever we are moving X(3) to 9(3) then 1st 2 bytes will be moved right(i.e. AB) but last byte will have '3' as C=+3
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / chandrababu
We will get 123 not AB3..why because
A = +1 J = -1
B = +2 K = -2
C = +3 L = -3
D = +4 M = -4
E = +5 N = -5
F = +6 O = -6
G = +7 P = -7
H = +8 Q = -8
I = +9 R = -9
So will get 123 for ABC..
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / velu
Exactly maha!!!!......actually we won't move the pic x(3)
to pic 9(3)(that's we can't move the alphabet to numeric
data type).....it should shows the abed...
| Is This Answer Correct ? | 1 Yes | 4 No |
explain sorting techniques in cobol program?
Difference between file status codes 02 and 22.... since both are for duplicate key detection.
how to check whether the open command of a sequential file is successful? or not?
What is file status 39 ?
What does EXIT do ?
If by mistake we MOVE a working storage variable into LINKAGE area. What will happen??
What is the difference between subscript and index?
How can we know that cobol program is using report file or simple file....?
can you declare redefine in level 01?
is it mandatory to give data division before procedure division ? wht happens if i give procedure division first thn data division ? reply soon
What is comp-1 and comp-2?
can we use COPY statement in w-s section? how?