Leaving the OVRDBF Share(*YES) intact don’t do a CLOF. Run POSDBF OPNID(openid) POSITION(*START) instead. set ‘openid’ equal to what you used in the OPNQRYF. This will position the file from the OPNQRYF back to the beginning of the file. You can then call the next RPG program that is using this. Once you are all done then do a CLOF.