Just to give you an Idea here is a quick sample, cut 'n' paste to a prg, and run it. I have not tried this in an EXE, so please inform me if it does not work. The Idea is to put the .QPR file content into a memo field, then you can do what you want with it. Do remember that Var's can only hold 254 characters, so you might have to split the select command over 2 or more var's depending how long it is.

creat table hold_qpr (Tofind m)
if NOT USED('hold_qpr')
	use hold_qpr in 0
ENDIF
select hold_QPR
append blank
replace hold_qpr.tofind with 'queryid from findhere where findhere.queryid="4" into table yippy'
CREATE TABLE findhere (queryID c(6))
if not USED('findhere')
	use findhere in 0
ENDIF
select findhere
for i =1 to 30
	insert into findhere (queryID) values(alltrim(str(i)))
endfor
holdfield='hold_qpr.Tofind'
runqpr=&holdfield
select &runqpr
if not used('yippy')
	use yippy in 0
endif
select yippy
brow

I am sure there are otherway's for doing the above, but it works for me, so iam happy chappy Yipppyyy!!!!!.