Search code examples
terminalopenvmsdcl

Wait command in DCL before executing next command

Is there a command in DCL that will wait for a specified amount of time before executing the next command. I am making a simple command file that will ping a user specified IP Address, wait 5 seconds then repeat the ping process.

Currently I have managed to ask the user for an IP Address which is then pinged. 

$ INQUIRE PINGTEST "Enter IP Address"
$ TCPIP PINGTEST
$ <wait command>
$ <repeat TCPIP PINGTEST>
Solution

  • Based on the information provided by @Svend DCL supports a WAIT command formatted as WAIT delta-time

    So for example if I wanted to wait 5 seconds before executing the next command the code would be as follows:

    $ INQUIRE PINGTEST "Enter IP Address"
$ TCPIP PINGTEST
$! WAIT time format hour:minute:second.hundredth 
$ WAIT 00:00:05
$ TCPIP PINGTEST