Function Similar to MsgRun()

Post Reply
User avatar
Jeff Barnes
Posts: 912
Joined: Sun Oct 09, 2005 1:05 pm
Location: Ontario, Canada
Contact:

Function Similar to MsgRun()

Post by Jeff Barnes »

Hi,

Is there a function similar to MsgRun() that will display a message WHILE a user function is being run and keep the message there until the user function is completed.

I've tried MsgRun() but it seems to display the message AFTER the user function has been completed.

Thanks,
Jeff
DanielPuente
Posts: 108
Joined: Sun Oct 09, 2005 6:12 pm
Location: Mar del Plata - Argentina
Contact:

Post by DanielPuente »

Jeff:

I user msgrun() this way and I don't have that problem, the message is correctly displayed:

MSGRUN("Esperando respuesta fiscal...","Conectando con IFiscal",{|| ejecuta(cticket,cDir,wLfact)})

Maybe a sysrefresh() after the msgrun() will help.

Regards,
Daniel Puente
Mar del Plata, Argentina
danielpuente@speedy.com.ar
puenteda@hotmail.com
User avatar
dutch
Posts: 1395
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand

Post by dutch »

Dear Jeff,

Try this example will popup window for complete function before close MsgRun().

Regards,
Dutch

MsgRun('Please Wait, Report is processing.',,{|oDlg| ;
WaitRun('RRWRUN.EXE RREPORT '+str(RPT_NR,3)+' /H /B /WY /R'+cLibrary+' /ORROUT'+Strim(RPT_NR,3)) } )
User avatar
Jeff Barnes
Posts: 912
Joined: Sun Oct 09, 2005 1:05 pm
Location: Ontario, Canada
Contact:

Post by Jeff Barnes »

Thanks Daniel / Dutch,

I have it working ... my mistake ... I was doing it this way:

MsgRun("Please Wait ... Generating Report",,MyFunction() )

I left out the {|| }

Thanks again.

Jeff
Post Reply