Interested to Buy Any Domain ? << Click Here >> for more details...
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 ?
- 6 Answers
- 10735 Views
- L&T, I also Faced
- E-Mail Answers
Answer Posted / sam
01 p pic 9(02) value zero.
01 p1 pic 9(03) value zero
01 q pic 9(02) value 99.
01 r pic 9(02) value 1.
01 s pic x(02) value spaces.
p = q+r.
actual p value = 100. but p value is numeric so it writes
from right to left tuncations will be taken left side.
so p value = 00 if u want p = 10
but we cann't use justifications
since justification claue works on alphanumeric field.
so compute p1 = q+r.
move p1 to s . ( here s will contain value 10)
now move s to p.then p will be 10.
| Is This Answer Correct ? | 2 Yes | 1 No |
Post New Answer View All Answers
How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.
What guidelines should be followed to write a structured cobol prgm?
What is Pic 9v99 Indicates in COBOL?
What are different data types in cobol?
HOw can I get the negative sign while deduct high value from low value
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
Write a cobol program making use of the redefine clause.
) How do u handle errors in BMS macro
What is inspect in cobol ?
What is a SSRANGE and NOSSRANGE?
Write a program that uses move corresponding.
Define cobol?
What are the various section in data division and briefly explain them.
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?
