|
Just another quick question from a guy who'd really rather not have to fart
around with this stuff.... :) I'm converting a bunch of flat file FMTDTA
stuff to use OPNQRYF instead.
when reading a file in cobol that's been sorted via opnqryf, is there
anything I need to worry about as far as COBOL syntax?
this is what I have:
OVRDBF FILE(HISTRY4) SHARE(*YES)
OPNQRYF FILE((HISTRY4)) QRYSLT( +
'HPEROD *EQ ' *CAT &PERIOD *BCAT +
'*AND LMRKTC *NE "00" +
*AND HITEM *NE 0') +
KEYFLD((HITEM) (LMRKTC))
and in my cobol:
SELECT HISTRY4 ASSIGN TO DATABASE-HISTRY4
ORGANIZATION IS INDEXED
ACCESS MODE IS SEQUENTIAL
RECORD KEY IS EXTERNALLY-DESCRIBED-KEY
FILE STATUS IS FILE-STATUS-01.
OPEN INPUT HISTRY4
READ HISTRY4 AT END
MOVE "Y" TO EOF-HISTRY4.
CLOSE HISTRY4
If I'm missing something obvious, I'd appeciate the heads up - I'm
particularly concerned about the ACCESS MODE and RECORD KEY clauses of the
SELECT Statement. - indexed, sequential with external key - (not the
file's natural key)
I'm changing a ton of these, and I won't have a chance to test till I'm
done, and I'd like to get it right the first time.
Thanks a ton,
Rick
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.