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
Which mode is used to operate the sequential file?
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
How do we get current date from system with century in COBOL?
How to know whether the module is dynamical or statistical?
What is the difference between Call and a Link?
What is an in line perform? When would you use it? Anything else you wish to say about it.
What are the different types of condition in cobol and write their forms.
Whats the difference between search & search ALL?
What are declaratives and what are their uses in cobol?
What is a report item?
Which is not true about evaluate statement
how to access the file from prodution from changeman tool and to submit a file to production
What is the compute verb? How is it used?
What are the different data types in cobol?
i want a program using by if, evaluate , string, unstring, perform, occurs?