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 / 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 |
Post New Answer View All Answers
What is the compute verb? How is it used?
How you can read the file from bottom?
What are the various section in data division and briefly explain them.
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
How do define dynamic array in cobol.
how to refer the data field?
What is the difference between Global and External Variables?
Difference between array and sub-script ?
What is rmode(any) ?
what is difference between cobol and cobol/400
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
Differentiate between structured cobol programming and object-oriented cobol programming.
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
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?