(MPE) Alpha Lookup Screen Using Image B-Tree

[Joe Boyle]

it might also be worth adding a 'build list detail' and checking that the
find proc contains a get which is wrapped in a 'for missing...' loop; if not
- try adding one.

Regards, Joe.

-----Original Message-----
From: powerh-l-bounces+atla38=dsl.pipex.com at lists.sowder.com
[mailto:powerh-l-bounces+atla38=dsl.pipex.com at lists.sowder.com] On Behalf Of
Blair Combs
Sent: 26 October 2005 17:33
To: Powerhouse Listserv
Subject: (MPE) Alpha Lookup Screen Using Image B-Tree

I am attempting to setup an alpha lookup screen using an image b-tree
but am having difficulty.

The basic skeletons of the dictionary and screen below only shows the
first record matching the selection.

Any assistance would be appreciated.

Additional Question:  When I/we get this working will it also work on
Unix with Eloquence?

*** dictionary record start ***

RECORD MIG-CMD-CODE-A   ORGANIZATION AUTOMATIC MASTER INDEXED
  ITEM MIG-CMD-NAME     DATATYPE CHARACTER SIZE 8
INDEX MIG-CMD-NAME
  SEGMENT MIG-CMD-NAME

*** dictionary record end ***

*** screen source start ***

screen MIGQSALP receiving TEMP-ID act find
;
temp TEMP-ID   char*8
temp TEMP-NAME char*8
def  D-NAME    char*8 = TRUNCATE(TEMP-NAME) + "@"
;
file MIG-CMD-CODE-A occurs 15
     access viaindex MIG-CMD-NAME generic &
            using D-NAME request TEMP-NAME
;
; ** There seems to be some confusion in the doc
; ** concerning generic vs nogeneric
;
align (,3,10)
field TEMP-NAME
;
align (5,,10)
cluster occurs with MIG-CMD-CODE-A
field MIG-CMD-NAME of MIG-CMD-CODE-A
cluster
;
procedure designer 1
begin
    let TEMP-ID = MIG-CMD-NAME of MIG-CMD-CODE-A
    RETURN
end

*** dictionary screen source start ***


-- 
= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: powerh-l at lists.sowder.com
Subscribe: "subscribe" in message body to powerh-l-request at lists.sowder.com
Unsubscribe: "unsubscribe <password>" in message body to
powerh-l-request at lists.sowder.com
http://lists.sowder.com/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.