Prototype
subroutine EcsDoEmulate()
Description
Activates the 3270 Emulator window. A response is received when you minimize the 3270 Emulator window. This allows the ESL application to response to other stimuli (for example, DDE), whilst the Emulator window is active.
Parameters
NA
Return Value
ECS_E_NOTINIT |
Not initialized - command was ignored |
ECS_E_NOTCONN |
Not connected to an active session |
ECS_E_NOTAVAIL |
Action is not available in this configuration |
ECS_E_ERRORFREE |
No errors were generated |
Example
###********************************************************
### Action to wait for the emulator window to be minimized
###********************************************************
action Emulate is
call EcsDoEmulate ( )
copy errorlevel to ErrorLevel_IV
copy "EcsDoEmulate" to Call_SV
copy "Emulate was successful" to Message_SV
if (ErrorLevel_IV != ECS_E_ERRORFREE) then
action DisplayError
end if
response to stimulus EaselComServer ECS_EMULATEWATCHDONE
action DisplayMessage
make Emulate_DB invisible
make Emulate_DB temporary
response to stimulus EaselComServer ECS_EMULATEWATCHERROR
copy eventparam to ErrorLevel_IV
action DisplayError
make Emulate_DB invisible
make Emulate_DB temporary