in a indexed file what is procedure for read the records
from 12 to 18. please give the code example
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / satish
it is dynamical acess.using start verb it is done
| Is This Answer Correct ? | 0 Yes | 0 No |
how many subpgms we can use in a main pgm ? how do u link sub pgm to main pgm ? how can i use the parameters declared in main pgm to sub pgm ?
Explain sorting techniques in cobol program? Provide the sort file definition, the sort statement, its syntax and meaning
ZEROES and SPACES are _______ constants (a) Figurative (b) Numeric (c) Non-numeric (d) Alphabete
What are the different ways to run a COBOL DB2 program using JCL?
Explain about Redefines cluse?
what happens if parmparameter passes zero bytes to the program
There are two flat files one having 10 records and other having 5 records. write a cobol pgm to find the duplicate records(matching records)from both files.
what is redefines? where it can be effectively use for the purpose of memory utilization? give an example?
How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length
can we use full outer join with cursors declared in cobol program?
If we use GO BACK instead of STOP RUN in cobol?
2)Where the Plan is located in CICS-DB2?