Waithostquiet... how many time???

[mbars]

My Extra! (6.5 sp1) macro has at top
...
Global g_HostSettleTime%
...

then
...
g_HostSettleTime = 1200 ' milliseconds
...

every call such:
Sess0.Screen.WaitHostQuiet(g_HostSettleTime)

will (several times) wait 1,2 second then the macro goes on, BUT occasionally the macro seems to hang-up and seems to wait without end. This situation doesn't let me share my macros with my coworkers! I tryed some debugging but I haven't found anything...

May be a problem having declared the variable with a '%' (integer) and using that one without the '%' ???

Thanks very much!

 

[mbars]

Has anyone found some problem using waithostquiet???

 

[garrett1977]

I had this problem. If you pass in the settle time to the function, it does weird things and doesn't seem to wait. It also sometimes will wait the entire time even if it is done, and it even slowed the host down...Try this:

Private Function ExtraWaitHostQuiet(Optional ByVal p_iTimeout As Integer = 10000) As Boolean
Dim oExtraSystem As Object

Set oExtraSystem = CreateObject("EXTRA.System&quot

oExtraSystem.TimeoutValue = p_iTimeout

clsExtraAppInterface_WaitHostQuiet = oExtraSystem.ActiveSession.Screen.WaitHostQuiet()

Set oExtraSystem = Nothing

End Function

 

[calculus]

The WaitHostQuiet has always performed as a pause in miliseconds for me. I rarely use it.

Try telling the system to wait for a specific screen.
rc% = ...WaitforString "Whatever", x,y
This wait function will time out after a longer time (30 secs or more) and the code continue.

This eliminates any timing issues with the host. The problem with WaitHostQuiet is that it just waits, then continues. Depending on the code, this could cause some unexpected outcomes.

 

[sal21]

Solo per dimostrare che c'è ancora qualche Italiano in giro e che usa Extra Attacmate
MBARS se ci sei batti un colpo possiamo scambiarci qualche info su questa applicazione Host 3270 che ne dici.?
gss.italy@iol.it

 

[pseudoman]

garrett1977 could you explain that function alittle more, and mbars:

that # 1200 represents how many milliseconds that the macro is going to wait before firing try lowering the # and the macro will preform faster.

as for the not working on other machines I have found that different machines run at different speeds. what I would do is use WaitForString to check something something on the screen every page you navigate through(maybe the page name), and use moveto to navigate instead of sendkeys (so your not assuming that you are where you want to be on the page). This way with the wait for string you slow your macro to the speed of the machine, rather than assuming it is 1200 milliseconds.