For Missing - RESOLVED

[Terry Pickering]

Well, thanks to Mike P. here at 4J, I have what turned out to be a very 
simplistic solution. Change the driver file to the primary, and then the 
master file (the one I really want) to a SECONDARY.  Here is the code that 
resulted, and it works just fine now.

Thanks to all for the suggestions and to Bob for explaining the GET works 
different depending on the procedure.

SCREEN GLS_EXE:TPK016  ACTIVITIES FIND

FILE GLS-PO-DRIVER PRIMARY OCCURS 14
   ACCESS VIAINDEX VENDOR-CUSTOMER-KEY REQUEST VENDOR-NUM

FILE WPS-PO-MST SECONDARY OCCURS WITH GLS-PO-DRIVER
   ACCESS VIA PO-NUM USING PO-NUM OF GLS-PO-DRIVER

TEMP T-VENDOR-NUM CHAR*10 RESET AT STARTUP

FIELD T-VENDOR-NUM

CLUSTER OCCURS WITH GLS-PO-DRIVER
ALIGN (1,,1) (10,,10)
FIELD PO-NUM OF WPS-PO-MST SIZE 6
FIELD CUSTOMER-NUM OF WPS-PO-MST
;*********************** PROCEDURES ***************************

PROCEDURE PATH
   BEGIN
     REQUEST T-VENDOR-NUM
     IF PROMPTOK
       THEN LET PATH = 1
     IF PATH = 0
       THEN ERROR "Key required."
     END

PROCEDURE FIND
   BEGIN
     FOR MISSING GLS-PO-DRIVER
       BEGIN
         GET GLS-PO-DRIVER VIAINDEX VENDOR-CUSTOMER-KEY USING T-VENDOR-NUM
         GET WPS-PO-MST OPTIONAL
         END
     END

Terry Pickering
Eugene School District 4J
(503) 687-3416


= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.