_screen.Visible=.f. **********Set Program Defaults*************** SET DELETED on SET TALK OFF SET ESCAPE on SET MULTILOCKS ON SET DEFAULT TO 'C:\TechnicalHanger' *SET PATH TO C:\TechnicalHanger\forms;pics;progs;tables;reports;U:\QuestPDM\Data SET PATH TO U:\QuestPDM\TechnicalHanger\forms;pics;progs;tables;reports;U:\QuestPDM\Data SET SAFETY OFF SET PROCEDURE TO procs SET EXCLUSIVE OFF **********Open Tables*************** =opendbf("article","artikey") =opendbf("modacad","mainkey") =opendbf("fabsum","labref") =opendbf("stylesum","mainkey") =opendbf("testsum","labref") =opendbf("fabusers","userid") =opendbf("thattach","keydept") =opendbf("specific","artikey") =opendbf("thstandard","types") =opendbf("cmscomp","artikey") =opendbf("articolr","articolr") DO FORM welcome READ events RETURNAny help would be much appreciated