OPEN INPUT StudentFile
READ StudentFile
AT END SET EndOfStudentFile TO TRUE
END-READ
PERFORM UNTIL EndOfStudentFile
DISPLAY StudentId SPACE StudentName SPACE CourseCode
SPACE YOBirth
READ StudentFile
AT END SET EndOfStudentFile TO TRUE
END-READ
END-PERFORM
CLOSE StudentFile
STOP RUN
what will be output
- 0 Answers
- 2056 Views
- I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
what is the concept of AIX in vsam ????
How vsam datasets are cataloged?
How are different versions of GDG named ?
1. delete is not possible in esds. why? 2. i have 10 records in a esds file and i want to delete only 1st record ..then what i have to do?.. it will not affect any sequence of the RBA. 3. why open extend is not possible in rrds vsam file?
Explain what are the optional parameters to the input dataset while loading the empty cluster with the data records?
Is CA(Control Area) is part of CI(Control Interval)
Suppose a generation of GDG gets created in a particular step of a proc. How would you refer the current generation in a subsequent step? What would be the disposition of this generation now ?
On which dataset you can have alt index?
what do you mean by define model parameter?
Explain the catalog?
What are the advantages of vsam over isam?
name a few common vsam status codes?
COBOL 
