Quick question, pardon the pun

[Gassett, Chris]

If the find on the primary file fails how do I search on the designer file
using quick?  Main goal is to find on employeeno from worker_comp, if that
fails then search via surname from designer table.  We are using PH ver.
7.33 on HP.

SCREEN TEMP
FILE WORKER_COMP PRIMARY
FILE EMPLOYEES   DESIGNER
ALIGN (1,4,21)(41,44,61)
FIELD EMPLOYEENO OF WORKER_COMP REQUIRED NOCHANGE &
      NULL VALUE NOT ALLOWED
FIELD SURNAME    OF EMPLOYEES
FIELD GIVEN_NAME OF EMPLOYEES DISPLAY
PROCEDURE ENTRY
BEGIN
  ACCEPT EMPLOYEENO OF WORKER_COMP
END
PROCEDURE PATH
BEGIN
  REQUEST EMPLOYEENO OF WORKER_COMP
  IF PROMPTOK
    THEN LET PATH = 1
  IF PATH = 0
    THEN BEGIN
      REQUEST SURNAME OF EMPLOYEES
      IF PROMPTOK
      THEN LET PATH = 2
    END
  IF PATH = 0
    THEN BEGIN
      LET PATH = 3
    END
END
PROCEDURE FIND
BEGIN
  IF PATH = 1
    THEN GET WORKER_COMP VIA EMPLOYEENO
  IF PATH = 2
    THEN GET EMPLOYEES VIA EMPLOYEENO
  IF PATH = 3
    THEN GET WORKER_COMP SEQUENTIAL
END
BUILD
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.