|
ah, what a wonderful application for the RPG cycle! Forget the SET command, just use InputPrimary, leave off the K and race through the file doing If date > testfield. If the numbers indicate few deletions, then leave the K there, by date, and stop or start doing something when the date threshold is crossed. It'd be 3 or 4 lines of c-specs, max, plus the sub-routine for what is to be done? Without the K and using IP, performance can be astonishly fast. --------------------------------------------------------- Booth Martin http://www.MartinVT.com Booth@MartinVT.com --------------------------------------------------------- -------Original Message------- From: midrange-l@midrange.com Date: Saturday, December 08, 2001 01:18:54 AM To: midrange-l@midrange.com Subject: RPG/400 SETLL Dumb Question I still process some files via RPG READ loop after *LOVAL SETLL I want to access a file by descending key & would you believe I have never done that before via READ* variants? I have got a logical of the records in descending sequence & I am not sure if my logic would be same pattern ie. *LOVAL SETLL file then READ loop ("forwards" through the records) or if I should *HIVAL SETHH at begeinning because I'm going to be reading backwards. Reason for this is I want to flag the oldest entries for deletion & I thought I would start at the beginning of the point I want to keep. MacWheel99@aol.com (Alister Wm Macintyre) (Al Mac) _______________________________________________ This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l or email: MIDRANGE-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.