Well you can't limit it through the use of intrinsics. Use FFINDBYKEY to
point to the first record (using a relational operator of equal). After
each FREAD compare the value you just read to the key value you
specified for FFINDBYKEY (and stop FREADing when it changes).

Costas Anastassiades,
Intracom SA
Athens-Greece

-----Original Message-----
From: Eben Yong <[log in to unmask]>
To: [log in to unmask] <[log in to unmask]>
Date: Thursday, November 04, 1999 7:07 AM
Subject: KSAMXL question


>I am trying to set up a COBOL program that reads records in a KSAMXL
file
>based on an exact match to a key value.  The file can contain multiple
>records based on the key value.  I only want to read those records that
>match the key value exactly.  I have been able to successfully find and
read
>the first record using FREADBYKEY and FFINDBYKEY+FREAD, but then
subsequent
>FREADs will take the rest of the KSAMXL file until it hits EOF.  How do
I
>limit the FREAD so that it only reads the qualifying logical records
(based
>on the key value)?  If someone could provide the intrinsic sequence and
>logic I can figure out the programming details.  Thank you for your
>assistance.
>
>Eben Yong
>MIS Manager
>Health Plan of San Mateo
>650-616-2010
>[log in to unmask]
>