Interested to Buy Any Domain ? << Click Here >> for more details...
Answer Posted / vinay gautam
This is a working example of 1D arrey...
in last ex. o posted there was a comment line......
Working-storage section.
77 index1 pic 9 value 1.
01 week value 'montuewedthufrisatsun'.
03 days pic x(3) occurs 7 times indexed by idx.
Procedure division.
perform varying index1 from 1 by 1 until index1 >= 8
display days(Index1)
End-Perform.
stop run.
Regards Vinay Gautam
| Is This Answer Correct ? | 4 Yes | 1 No |
Post New Answer View All Answers
How to detect record is locked in cobol/400? What is the solution for that?
Define perform?
Define redefine and its syntax?
Explain the types of perform?
Explain the input procedure and output procedure?
How to update data area in cobol 400 program?
What is output procedure?
Explain what all the conditiones required for using open opcode on a file?
What is the actual use of fillers?
What is the syntax of sort?
Explain the output procedure?
What is input procedure?
Explain the difference between search and searchall?
How to detect record is locked in cobol/400?
Explain the difference between comp & comp-3?
