bugsuite: KEY-NAME FROM SOURCE ALWAYS FLK1=1
With these FILE-CONTROL paragraphs
SELECT TSPFILE
ASSIGN TO "TSPFILE"
ORGANIZATION INDEXED ACCESS DYNAMIC
RECORD KEY IS CM-CUST-NUM
ALTERNATE RECORD KEY IS SPLIT-KEY2
SOURCE IS CM-TELEPHONE WITH DUPLICATES
ALTERNATE RECORD KEY IS SPLIT-KEY3
SOURCE IS CM-DISK,CM-TAPE WITH DUPLICATES
and these three instructions:
START TSPFILE KEY GREATER THAN OR EQUAL TO CM-CUST-NUM
START TSPFILE KEY GREATER THAN OR EQUAL TO SPLIT-KEY2
START TSPFILE KEY GREATER THAN OR EQUAL TO SPLIT-KEY3
the 'flk' parameter at
void parser_file_start(struct cbl_file_t *file, relop_t op, int flk, cbl_refer_t length_ref )
is 1 for all three. The 'flk' parameter should be, respectively, 1, 2, then 3