Maybe I'm just lazy, but I have always considered handling files by means of these FOPEN, FREAD, FFINDBYKEY, etc., to be an excruciating pain in the a**. I would much rather do it with COBOL Opens, Reads, etc. if what I need to do can be done that way.
My guess is that the extra time it would take me to set up all that kind of stuff in a program, compared to the time it would take to set up a Suprtool extract, would be enough time to do the Suprtool extract a couple thousand times. (Of course it would depend on the specific situation.)
--- On Tue, 9/29/09, Roy Brown <[log in to unmask]> wrote:
> From: Roy Brown <[log in to unmask]>
> Subject: Re: [HP3000-L] TurboIMAGE vs KSAMXL
> To: [log in to unmask]
> Date: Tuesday, September 29, 2009, 3:09 PM
> In message <[log in to unmask]>,
> Edwin Clements <[log in to unmask]>
> writing at 04:28:37 in his/her local time opines:-
> > I was thinking the same thing. It would be easy
> enough to set up a Suprtool procedure to do that, and it
> would do it very quickly and get you the information you
> need. That is probably how I would do it.
>
> > "Smarter" is nice sometimes, but there's definitely
> something to be said for the good old "KISS" principle.
>
> Well, we can make it KIFS (Keep It Fairly Simple), by
> (rather than reading through a million records to get an
> entry count of zero or one or two) using FFINDBYKEY with
> RELOP = 0 for the key we are interested in, and then only
> having to read and count the exact matches with FREAD until
> encountering CCG.
>
> > --- On Tue, 9/29/09, Roy Brown <[log in to unmask]>
> wrote:
> >
> >> From: Roy Brown <[log in to unmask]>
> >> Subject: Re: [HP3000-L] TurboIMAGE vs KSAMXL
> >> To: [log in to unmask]
> >> Date: Tuesday, September 29, 2009, 2:25 AM
> >> In message <[log in to unmask]>,
> >> Brian
> >> Donaldson <[log in to unmask]>
> >> writing at 23:38:02 in his/her local time
> >> opines:-
> >> >In TurboIMAGE if I want to see how many
> entries have a
> >> particular key value
> >> >all I have to do is look at the chain length
> on a
> >> dbfind procedure.
> >> >Works great.
> >> >
> >> >However, I have no idea how to do this with
> data stored
> >> in a KSAMXL file.
> >> >
> >> >My question is this, can it even be done in
> KSAMXL ?
> >> >
> >> >TIA,
> >> >
> >> >Brian Donaldson.
> >>
> >> Brute force would be read 'em and count 'em.
> >>
> >> So yes, it can be done :-)
> >>
> >> But you want smarter than that, right?
> >>
> >> --
> >> Roy Brown 'Have nothing in your
> >> houses that you do not know to be
> >> Kelmscott Ltd useful, or believe to
> >> be beautiful' William Morris
> >>
> >> * To join/leave the list, search archives, change
> list
> >> settings, *
> >> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
> >>
>
>
>
> >
> > * To join/leave the list, search archives, change list
> settings, *
> > * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
> -- Roy Brown 'Have nothing in
> your houses that you do not know to be
> Kelmscott Ltd useful, or believe to
> be beautiful' William Morris
>
> * To join/leave the list, search archives, change list
> settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|