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.
Answer Posted / 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 |
Post New Answer View All Answers
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
HOw can I get the negative sign while deduct high value from low value
Write a program to explain size error.
What is a scope terminator give example?
How do you reference the fixed block file formats from cobol programs
I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
what are decleratives in cobol?
Why did you choose to work with ibm mainframe cobol programming?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
What is the difference between structured cobol programming and object alternativelyiented cobol programming?
) how do u code after getting data?
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
What is the problem of ordered sequential files access?
How to know whether the module is dynamical or statistical?