> >_reportoutput='reportoutput.app' >SET ENGINEBEHAVIOR 90 >SET CLASSLIB TO HOME()+ "ffc\_reportlistener" additive >SET PROCEDURE TO \common30\hyperlinklistener.prg additive > >ON ERROR > >loListener = newobject('HyperlinkListener', ; > 'HyperlinkListener.prg') > >WAIT window TYPE('lolistener') > > >>