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
Explain how to convert 2010/02/11 to m/dd/yyy.. With string and without string if any other method... Code?
What is perform?
Explain the output procedure?
What is the actual use of fillers?
Define perform?
Explain how to update data area in cobol 400 program?
Explain the syntax of sort?
why icetool be used in programmer view?
What is sort?
Explain the input procedure and output procedure?
What is output procedure?
How to detect record is locked in cobol/400? What is the solution for that?
Explain how to detect record is locked in cobol/400? What is the solution for that?
Define sort?
Explain the types of perform?