See if you can use OnHTTPBufferUpdate event to show a progress bar.

>the below code working perfect, but i want to show a progress bar
>

>clear
>SET PROCEDURE TO wwutils ADDITIVE
>SET PROCEDURE TO wwconfig ADDITIVE
>SET PROCEDURE TO wwhttp ADDITIVE
>SET PROCEDURE TO wwsoap ADDITIVE
>SET CLASSLIB TO wwxml ADDITIVE
>
>oSOAP = CREATEOBJECT("wwSoap")
>
>oSOAP.cServerUrl = "http://myserver.com"
>
>reqstr=Filetostr("myfile.xml")
>lcRequest = reqstr
>oSoap.cRequestXML=reqstr
>
>*** i want to show the progress bar
>
>lcResponse = oSoap.CallSoapServer()
>