Lisa,
Thanks for the great advice.

[],s
Peter

>Peter, you don't even need to recompile REPORTOUTPUT.APP or make any changes in the shipping Xbase classes to do what you want <s>.
>
>HTMLListener provides the default output for object type 5, which you are using in your request. But HTMLListener does not provide any feedback messages at all by itself; it does not augment the DoStatus native method.
>
>If you use the baseclass listener, or subclass it from scratch, you already have exactly what you want. This message is customizable as follows:
>
>

>ox = CREATEOBJECT("reportlistener")
>ox.DoStatus(cMessage)
>

>
>... IOW, all you would have to do is DODEFAULT("Your own Message") in the DoStatus method and you would have what you want.
>
>However, you have better alternatives <s>.
>
>To get better user feedback from HTMLListener, you could subclass HTMLListener... but user feedback really not HTMLListener's job.
>
>A better approach would be to turn off HTMLListener's feedback altogether and tell HTMLListener to defer to UpdateListener to provide user feedback, instead.
>
>Take a look at UpdateListener in OAX.HTM in your release notes. This class provides the default user feedback for previewing and printing (OBJECT TYPE 0 and 1).
>
>UpdateListener has a number of properties you can set to localize (or otherwise personalize) *all* its feedback messages. It is much more sophisticated than the base class (for example, it can provide timings, and let you know when the report will go through two passes) besides being customizable for all its messages.
>
>Here is an example to show you how you could do it (much more is possible -- read the PEMs in OAX.HTM) and also to show you how to chain the two listeners together to do multiple jobs.
>
>Note that, although I am getting object references from _REPORTOUTPUT, you could get them from the equivalent FFC classes in _REPORTLISTENER.VCX instead:
>
>

>
>oHtml = null
>
>oUpdate = null
>
>do (_REPORTOUTPUT) WITH 1, oUpdate
>
>do (_REPORTOUTPUT) WITH 5, oHTML
>
>
>oUpdate.initStatusText = "Starting up"
>oUpdate.runStatusText = "Running"
>oUpdate.thermFormCaption = "Whatever"
>* there are many more UI PEMs
>* in UpdateListener to set, if you want!
>
>* turn off baseclass feedback
>* behavior in HTMLListener:
>oHTML.QuietMode = .T.
>
>* attach UpdateListener as a successor:
>oHTML.successor = oUpdate
>
>REPORT FORM ? object oHTML
>
>

>
>HTH,
>
>>L<