>Is there an easy way to search for text in a .prg? I need to know if a specific procedure exists in a .prg before I try to run it.
>
>For instance, I need to know if 'procedure ix_insured' is in tblstruc.prg. The tblstruc.prg is included in the project.

Brief tool which would do that:

lparameters cPrg, cProcName
local cText, nAt
cText=lower(filetostr(cPrg))
lFound=.f.
for i=1 to occurs("proc", cText)
   nLine=atcline("proc", cText)
   cLine=mline(cText,nLine)
   lFound=atc(cProcName, cLine)
   if lFound
      exit
   else
      cText=subs(cText, _mline)
   endif
endfor
return lFound

Now this needs some more checking (i.e. does the cPrg exist etc). It should also be repeated for the Func keyword, and should keep a copy of cText for the second run, because this way cText is being chopped. After a little tweaking this would be stable enough.

I figure you need this at runtime - because in the editor you can always pull up the procedure list (v3,5,6) or document view (vfp7), sort it alphabetically and look for your routine.