>>LOCAL laproclist[1],lavcxlist[1], lnRes, lnx >>aaa= _vfp.ActiveProject >> >>FOR lnx = 1 TO aaa.Files.Count >> dd=aaa.Files.Item[lnx] >> DO CASE >> CASE dd.type = "V" >> lnRes = AVCXCLASSES(lavcxlist,JUSTFNAME(dd.name)) >> *// Process here *// lavcxlist[xxx,1] is the class name plus method ie myclass.mymethod. *// lavcxlist[xxx,2] is the line number the class.method starts. *// you can use EDITSOURCE to go directly to the code. EDITSOURCE("myprgname.prg",lavcxlist[xxx,2],GETWORDNUM(lavcxlist[xxx,1],2,".")) > > *Yes, I was thinking along these lines, but we need to extract the methods' names here... > >> CASE dd.type = "P" >> lnRes = APROCINFO(laproclist,JUSTFNAME(dd.name)) >> *// Process here >> OTHERWISE >> >> ENDCASE >>NEXT >> >>>>