Prototype

subroutine EcsSetAutoWait( integer:AutoWaitFlag )

Description

Sets the defined variable EcsAutoWaitFlag to control the AutoWait feature. The AutoWait feature uses a predefined watch command(s) within the global variables EcsWatchCommandString and EcsTimeLimit to attempt a screen synchronisation after the any of the following routines:

•EcsPressKey

•EcsPressENTER

•EcsEnterString

Parameters

Return Value

NA

Example

###*********************************************************

###  Initialize Ecs Parameters for automatic synchronisation

###*********************************************************

subroutine InitializeEcs () is

 

integer SettleTime_IV

        AutoWait_IV is ECS_AUTOWAITON

 

    # Allow one tenth of a second for Input Inhibitor to settle

    call EcsClearWatch ( EcsWatchCommandString )

    copy 100 to SettleTime_IV

    call EcsWatchForIIOff ( SettleTime_IV, EcsWatchCommandString )

    # Set the time allowed before the wait gives up to 5 seconds

    copy 5000 to EcsTimeLimit

    # Turn on the Auto Wait feature

    call EcsSetAutoWait( AutoWait_IV )