Interested to Buy Any Domain ? << Click Here >> for more details...
I have a sequential file. How do I access a record in this
sequential file randomly in my program ?
- 8 Answers
- 21447 Views
- CGI, Xansa, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / srinivas.d
you cannot randomly acces in sequential files..
| Is This Answer Correct ? | 9 Yes | 3 No |
Answer / guest
Harish ,
What is "KEY-FILE1" ?
Anyhow - you are still reading file sequentially ? arnn't
you ?
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / sruthi
we can do that by using tables means arrays concept.
we can use search all for that
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / jack
Read seq. file and store it in tables means arrays.
We can use 'seach all' for random access.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / mohan
Guys, i suppose that we need to use Arrays concept along
with Subscript or Index concept to access a record in a
sequential file.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / santhosh
write a temporary index file defining unique key, move the
sequential file to that temp index file and access the temp.
index file randomly
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / lu
Hi Guys,
when you say "sequential" it means you have to read from 1
to 9999...Never say sequential file and read randomly !!!!!
use read util the field you want....
Perform 100-read until ws-field = 'yes'.......
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / harish
YS WE CANT ACCESS FLAT FILE RANDOMLY
IF WE WANT TO ACCESS PARTICULAR RECORD
PROCEDURE DIVISION.
MOVE KEYFIELD VALUE TO W-S VARIABLE
PERFORN UNTIL W-FLAG = 'Y'
READ FILE1 AT END MOVE 'Y' TO W-FLAG
NOT AT END
IF KEY-FILE1 = WS-KEY-VARIABLE
MOVE--------
ELSE
MOVE 'Y' TO W-FLAG.
pls correct me if anything wrong
HARISH POOMGAME SHIVAPPA(hassan,karnataka)
NIIT TECHNOLOGY
KOLKATA
| Is This Answer Correct ? | 0 Yes | 12 No |
01 a pic 9(3) value is 123 01 b pic 9(6) move a to b wht will be the value ? and 01 a pic x(6) value is abc 01 b pic x(3) move a to b wht will be the value ?
i need a program by giving input as a abcd in any randem order but i need a output as 1234 related to abcd. i.e,. a for 1,b=2,c.....etc..
In a program, there are 2 sections defined say SECTION-A and SECTION-B. There is a paragraph say CALC-INT in both the sections. If this para has to be called directly for SECTION-A, then PERFORM CALC-INT will not work as it is present in both sections. How the PERFORM statement has to be coded here?
what are the error codes in cobol, db2, cics, vsam , and jcl
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
What are the different rules to perform a Search?
WT R TECHNICAL MAINFRAME QUESTION ASKED IIN ANJANASOFTEARE??
Explain about different table spaces.
How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length
How to replace the GOTO statement in COBOL without changing the structure of program. e.g. consider following code... I.D. E.D. D.D. P.D. compute C = A + B. GOTO para 100-display. compute D = C - D. GOTO 200-display. some other logic...... ........ GOTO 300-para. ...... ...... GOTO 400-para. Now I want to replacce all GOTO statements without changing the structure and otput of program.
I have sequential file recl 1000 i want to add another 15 bytes to it. The record length should not change..How?
Give some advantages of REDEFINES clause?
COBOL 
