Enscribe Programmer's Guide
name address region curbal limit
ADAMS
BROWN, A
BROWN, B
EVANS
HARTLEY
JONES
KOTTER
RICHARDS
ROGERS
SANFORD
SMITH
MIAMI, FL
REEDLEY, CA
BOSTON, MA
BUTTE, MT
CHICAGO, IL
DALLAS, TX
NEW YORK, NY
MINNEAPOLIS, MN
BOISE, ID
LOS ANGELES, CA
DAYTON, OH
SO
WE
EA
WE
NO
SO
EA
NO
WE
WE
NO
0000.00
0256.95
0301.00
0010.00
0433.29
1234.56
0089.00
0000.00
1024.00
0301.00
0010.00
0500.00
0300.00
1000.00
0100.00
0500.00
2000.00
0500.00
0500.00
1500.00
1000.00
0500.00
Example 1: Action of Current Position
This sample TAL code shows how to position by the primary-key value ROGERS:
! blank the key
key ':=' " ";
key[1] ':=' key FOR name^len - 1 BYTES;
key ':=' "ROGERS";
CALL KEYPOSITION ( cust^filenum, key);
Successive read calls will then access the unshaded records in this illustration, in the order shown:
88 Key-Sequenced Files