|
Yes. The K is there too. Here's a test program I used: (use fixed font) ************************************************************* FDVLINKFMCF E WORKSTN F RRNA KSFILE SFLA FDVLINK3 IF E K DISK C* .................................................. C Z-ADD1 RRN 40 C Z-ADD1 RRNA C Z-ADD13108 KEY 60 C KEY SETLLDVLINK3 C* Fill the subfile: C *IN58 DOWEQ*OFF C Z-ADDRRN RRNA C WRITESFLA C ADD 1 RRN C READ DVLINK3 58 C END C RRNA IFGT 5 C MOVE *ON *IN91 C END C EXFMTFMT01 C** C MOVE *ON *INLR C*----------------------------------------------------------- ************* End of data *********************************** This code displays the file, beginning with the first record in the file. In <000201be58de$87f95140$3203a8c0@pii450>, on 02/15/99 at 07:25 AM, "Art Tostaine, Jr." <art@link400.com> said: >Do you have a "K" in the files F-Spec? >Art Tostaine, Jr. >CCA, Inc. >Parlin, NJ 08859 >> -----Original Message----- >> From: owner-midrange-l@midrange.com >> [mailto:owner-midrange-l@midrange.com]On Behalf Of Pete Hall >> Subject: Re: Omit/select in a logical file's dds >> At 17:05 02/14/1999 -0500, Booth Martin wrote: >> >Lets say a physical file has five records, all with a field >> filled with >> >"SAMMY", and a second field filled with a sequential number, >> 1 through 5. >> >Further, lets say there is a logical built over the file, >> with the field >> >holding the "SAMMY"s as it's only key, and Omit on any >> record with a 1 or a >> >3 in the sequential field. This would leave record 2, 4, >> and 5 in the >> >logical file. >> > >> >If I chain to that file with "SAMMY" will I get a hit? If >> so, on which >> record? >> >+--- >| This is the Midrange System Mailing List! >| To submit a new message, send your mail to MIDRANGE-L@midrange.com. >| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. >| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. >| Questions should be directed to the list owner/operator: david@midrange.com >+--- -- ----------------------------------------------------------- boothm@ibm.net Booth Martin ----------------------------------------------------------- +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
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.