Using KSAM/XL and KSAM 64 (32650-90886)

50 Chapter5
Reading File Data
Sequential Access by Primary and Alternate Key
Figure 5-2. FFINDBYKEY Intrinsic Sample
fby_keyvalue := '0000';
fby_keylocation := 1;
fby_keylength := 4;
fby_relop := 1;
.
.
.
FFINDBYKEY(filenum,fby_keyvalue,fby_keylocation,fby_keylength,fby_relop);
.
.
.
lgth := FREAD(filenum,fr_record,fr_tcount);