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
No Answer is Posted For this Question
Be the First to Post Answer
What is the difference between CI( Control Interval)and CA (Control Area)?
what is the syntax of ams modal commands?
What is the significance of the SHAREOPTIONS parameter?
What is the utility program closely associated with VSAM?
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?
What is a CI, control interval?
What do you mean by RDW in VSAM?
Is it slower if you access a record through alt index as compared to primary index?
What is the VSAM-code field?
What is RECOVERY and SPEED parameters in DEFINE CLUSTER command?
Do all versions of the GDG have to be of the same record length ? is it possible to ovverride the dcb of the model dataset?
How do you define an altindx?