$!
$!	START OF DTIME.TST (DCL PROCEDURE TO DEMONSTRATE USE OF DTIME.MAR)
$!
$WRITE SYS$OUTPUT "FOLLOWING IS A DUMMY SUBMIT COMMAND TO ILLUSTRATE DTIME"
$INQ DEL ENTER DESIRED DELTA TIME FOR SUBMIT COMMAND
$ASSIGN "''DEL'" TIMS$DEL
$RUN DTIME
$VER = 'F$VERIFY(1)
$SUBMIT/Q=SYSQUE HDLREQR/AFTER='F$LOGICAL("TIMS$ABS")'
$ASSIGN "-360" TIMS$DEL
$RUN DTIME
$DELETE/BEFORE='F$LOGICAL("TIMS$ABS")' HDLREQR.LOG.*
VER = 'F$VERIFY(VER)
$!
$! END
$!