in a indexed file what is procedure for read the records
from 12 to 18. please give the code example
Answer Posted / santhosh vayathuri
use fallowing code
file-control
organization is indexed.
access mode is dynamic
record key is eno
procedure division
move 12 to eno
perform readpara until fnd = yes
stop run.
readpara.
read file1
if eno = 18
move 'yes' to fnd
end-if.
Is This Answer Correct ? | 2 Yes | 1 No |
Post New Answer View All Answers
input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.
Are you comfortable in cobol or jcl?
How to print 10 to 1 if the input have only 10 digit number?
What is the difference between comp and comp-3?
How do define dynamic array in cobol.
how do you reference the variable block file formats from cobol programs
How do you reference the fixed block file formats from cobol programs
how do you reference the rrds file formats from cobol programs
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
1.give the details about WHEN OTHER. 2. how many form are available in evaluate.
What is difference between static and dynamic call in cobol?
What is redefines clause in COBOL?
What are various search techniques in cobol? Explain.
Write a program to enter and display the names of students in a class using the occurs clause.
how do you reference the variable unblock file formats from cobol programs