01 ws-p pic 9(2).
01 ws-q pic 9(2) value 01.
01 ws-r pic 9(2) value 99.
p.d.
compute p = q + r
what will be result of p ans(00) but my question is that
how i got 10 on the place of 00.
(truncation will ocuure on right side not left).
please tell me ?
Answer Posted / reddy kanupuru
u will get 00 only.
Because any numeric move will start from decimal pont
for exp : as per the given ques
compute p = q+r =100
here the decimal point is placed at the right side .
100.
so if u move that to 99 , means before point two digits
(00) will be moved .
another exp:
q = 99v99
01 r pic 99v99 value 100.345
move r to q
the value is 00v34
| Is This Answer Correct ? | 6 Yes | 0 No |
Post New Answer View All Answers
What is a report item?
When is inspect verb is used in cobol?
how do you reference the rrds file formats from cobol programs
What is length is cobol?
What is the difference between PIC 9.99 and 9v99 in COBOL?
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
What is the difference between perform … with test after and perform … with test before?
What is a scope terminator give example?
how do you reference the variable unblock file formats from cobol programs
How do you get the data to code the BMS macro?
How do u write test cases?
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
What is the difference between comp and comp-3 usage?
How do you reference the following file formats from cobol programs?
Can a Search can be done on a table with or without Index?