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
which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad
What is the difference between Global and External Variables?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
How to remove 2 duplicate records and copy only one using job control language?
What is the default value(s) for an initialize? What keyword will allow for an override of the default?
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
What is the local-storage section?
What is static and dynamic call in cobol?
What are literals?
how can i see junk values in dclgen or in hostvariable of comp ?
What is the difference between comp and comp-3?
Define cobol?