Adam Glauser wrote:
SETLL ('X':'A') logicalFile;
READ file;
DOW (field2 = 'X' AND (field1 = 'A' OR field1 = 'B' OR field1 = 'C')
AND
NOT %eof(logicalFile));
// process file
READ file;
ENDDO
Dave Parnin wrote:
Your idea of the sorted index might work. It
could filter only the records where FIELD2 is blank then I could process
all of the A's, then the B's, the the C's.
Right ... I messed that up. So if I understand this right, the set of
valid values for FIELD2 is (' ','X')? In that case, my code should of
course change to
SETLL(' ':'A')
and
DOW (field2 = ' ' [and so on]
Dave Parnin wrote:
Like I said, I'm still learning how to integrate SQL into my routine to
replace DDS. That brings up the question "how do you filter the
selection"? I've created indexes that sort before such as
CREATE INDEX DPWORK3/POLEFLL01 ON DPWORK3/POLEFL
(PLCOMP, PLFRLIB, PLFROUTQ ASC) WITH 1 DISTINCT VALUES;
How do you filter it?
My understanding is that you don't. I think if an SQL Index as equivalent
to a keyed logical file, but without the ability to limit which fields are
available or do any select/omit. The idea is that you do the select/omit
by using SETLL/( READ or READE ) or by using SQL with a WHERE clause.
We're sort of at the same stage as you - we are doing DDS data definition
right now, but starting to experiment and try to understand the
ramifications of going to DDL. There was a really thorough disscussion of
this in the last week or so on this list. I think the thread was
something like "SQL Logical file equivalent".
HTH,
Adam
Attention:
The information contained in this message and or attachments is
intended only for the person or entity to which it is addressed and may contain
confidential and/or privileged material. Any review, retransmission,
dissemination or other use of, or taking of any action in reliance upon, this
information by persons or entities other than the intended recipient is
prohibited. If you received this message in error, please contact the sender
and
delete the material from any system and destroy any copies. Thank you for your
time and consideration.
Attention:
Le contenu de ce message et(ou) les fichiers ci-joints s?adressent
exclusivement à la personne ou -entité à laquelle ils sont destinés. Ils
peuvent
contenir de l?information confidentielle, protégée et(ou) classifiée. Il est
strictement interdit à toute personne ou entité autre que le(la) destinataire
prévu(e) de ce message d?examiner, de réviser, de retransmettre ou de diffuser
cette information, de prendre une quelconque action en fonction ou sur la base
de celle-ci, ou d?en faire tout autre usage. Si vous avez reçu ce message par
erreur, veuillez communiquer avec l?expéditeur(trice), supprimer ce message et
les fichiers ci-inclus de tout système, et en détruire toutes copies, qu?elles
soient électroniques ou imprimées. Nous vous remercions de votre entière
collaboration.
midrange.com
