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
- 10736 Views
- L&T, I also Faced
- E-Mail Answers
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
Can a Search can be done on a table with or without Index?
how to refer the data field?
Why is it necessary that file needs to be opened in I-O mode for REWRITE?
how do you reference the fixed unblock file formats from cobol programs
What are the different rules to perform a Search?
What is difference between static and dynamic call in cobol?
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
What is the difference between comp and comp-3?
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
What are the different rules for performing sort operation?
explain sorting techniques in cobol program?
what is difference between cobol and cobol/400
I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.
What is the Purpose of Pointer in the string?
