- Example 1: Simple generic search
- Example 2: Performing a search on a composite key
- Example 3: Seeking a customer with condition
Example 1: Simple generic search
// Simple generic search HReadSeek(CUSTOMER, CUSTNAME, sCustName) IF HFound(CUSTOMER) = True THEN CustomerFound() ELSE UnknownCustomer() END
Example 2: Performing a search on a composite key
// Find the record HReadSeek(CUSTOMER, LASTNAME_FIRSTNAME, [sLastName, sFirstName]) WHILE HFound(CUSTOMER) = True // Deletion HDelete(CUSTOMER) HReadNext(CUSTOMER,LASTNAME_FIRSTNAME) END
Example 3: Seeking a customer with condition
HReadSeek(CUSTOMER, Turnover, X) WHILE HOut(CUSTOMER) = False Add_Customer_List() HReadNext(CUSTOMER) END
This page is also available for…
|
|
|
|