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 / minhaj
p = q+r actuall result is p = 10 but u want p = 10 so we
right the code as p = q+r justified right
| Is This Answer Correct ? | 1 Yes | 1 No |
Post New Answer View All Answers
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks
What is rmode(24)
What is the difference between next sentence and continue in cobol programing language?
How do you reference the following file formats from cobol programs?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
What is a scope terminator give example?
What is the local-storage section?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
What kind of error is trapped by on size error option?
What is the difference between structured cobol programming and object alternativelyiented cobol?
What is the difference between binary search and sequential search?
What is the difference between goback, stop run and exit program in cobol?
Write a program that uses move corresponding.
IF I mention stop run in CICS what happens?
Difference between array and sub-script ?