opnqryf interferes with chain

Can anybody tell me why my chain won't work in my pgm when the below two
commands are issued first before the pgm runs?


OVRDBF FILE(TESTTBL) TOFILE(*FILE) OVRSCOPE(*JOB) SHARE(*YES) SEQONLY(*NO)
OPNSCOPE(*JOB)

OPNQRYF FILE((*LIBL/TESTTBL *FIRST *ONLY)) OPTION(*INP) KEYFLD((FLDCHAR20
*ASCEND)) SEQONLY(*NO) OPNSCOPE(*JOB)

program is compiled with...

H DftActGrp(*No) ActGrp(*Caller)

ftesttbl if e k disk

d g_fldchar20 s like(fldchar20) inz('0000001')

chain g_fldchar20 testtbl;
if %found(testtbl);
dsply (fldchar20);
else;
dsply ('not found');
endif;