REXX Tips & Tricks, Version 2.80

0.9b (c) 1995 Peter Childs

How to wait in the STARTUP.CMD until the WPS is up

If you're using WPS-related code in your STARTUP.CMD, you should use the 
following code (or use the function <SysWaitForShell from the new REXXUTIL 
DLL) to wait until the WPS is up: 

 
  call rxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs'
  call SysLoadFuncs

  rc = SysIni('USER', 'PM_InstallObject', 'ALL:', 'stem')
  do while rc \= 'ERROR:'
    call SysSleep 2
    rc = SysIni('USER', 'PM_InstallObject', 'ALL:', 'stem')
  end /* do while rc \= 'ERROR:' */

  /* add WPS related code here */

Inf-HTML End Run - Successful