HP3000-L Archives

October 2001, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
NTC John Pitman <[log in to unmask]>
Reply To:
NTC John Pitman <[log in to unmask]>
Date:
Tue, 23 Oct 2001 09:01:21 +0300
Content-Type:
text/plain
Parts/Attachments:
text/plain (40 lines)
Cant you achieve this with 2 opens of the base? Use open1 currency to hold
position in the B tree, and open 2 to do the DBFIND and DBGET 5? Saves a lot
of mucking around , and the only (?) negative is another DBCB etc.

JP

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]]On
Behalf Of Steve Dirickson (Volt)
Sent: Tue, October 23, 2001 4:03 AM
To: [log in to unmask]
Subject: Re: [HP3000-L] Image B-tree troubles


> Works great.  But I want to display the detail chain too...
> DBFIND mode 1 set SCHEDULE search FLEET arg {the specific fleet}
> DBGET mode 5 until end of chain, still great.
>
> How do I get back on the b-tree chain for the next F1/F2?

Short and sweet: you can't. This is a known issue for both the Image people
and at least some of the language groups. What is needed is an analogue of
DBGET Mode 4 that passes the information required to re-establish the
position on the "superchain" the way Mode 4 does on the regular chain. Of
course, that will require a way to *get* that info in the first place. As
far as I know, there is no solution at the moment.

There are, however, workarounds for developers. Basically, you read the
entire superchain, storing whatever info you need to navigate around later.
Then you re-process the stored list as if it were the DBGET loop. Some
languages make this a bit easier; with Transact/iX, for example, all you do
is add the ",WORKFILE" option to the FIND(CHAIN)... call (or sort the
results with ",SORT"). In lower-level languages, you have to do it manually.

* 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 *

ATOM RSS1 RSS2