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
What is sort? And its syntax?
What is input procedure?
Define redefine and its syntax?
What is output procedure?
Define perform? And its types?
I like to know if possible to use %TRIM or any statement with prefiv "%" like RPG ile programs. thanks
How to detect record is locked in cobol/400?
Explain the syntax of redefine?
What is sort?
Explain the difference between comp & comp-3?
Explain the input procedure and output procedure?
Define perform?
What are the types of perform?
What are fillers?
How to update data area in cobol 400 program?
