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


Please Help Members By Posting Answers For Below Questions

What is the local-storage section?

903


How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.

3962


What is redefines clause in COBOL?

1064


How do you define a variable of comp-1 and comp-2?

933


EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?

2306


What are the rules of the move verb?

969


Can you please let me know the centre name of INS certification in Kolkata.

1962


What is the difference between a binary search and a sequential search? What are the pertinent cobol commands?

924


how do you reference the variable block file formats from cobol programs

952


) how do u code after getting data?

1832


What is the difference between comp and comp-3?

915


What are 77 levels used for?

864


how to access the file from prodution from changeman tool and to submit a file to production

7128


Can we redefine the field of x(200) to less than 200?

1125


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

970