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
how do you reference the printer file formats from cobol programs
What is a report item?
How do you reference the following file formats from cobol programs?
How you can characterize tables in cobol?
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.
What is a SSRANGE and NOSSRANGE?
How do you define a variable of comp-1 and comp-2?
What is static and dynamic call in cobol?
HOw can I get the negative sign while deduct high value from low value
Which Search verb is equivalent to PERFORM…VARYING?
Which is not true about evaluate statement
) How do u handle errors in BMS macro
How do you code cobol to access a parameter that has been defined in jcl? And do you code the parm parameter on the exec line in jcl?
What are the cobol coding sheets?
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?