Enables or disables the Ctrl/Y or the Ctrl/T function. Pressing Ctrl/Y interrupts a command and returns you to the DCL command level. Pressing Ctrl/T momentarily interrupts a command to print a line of statistics. SET CONTROL=T requires that SET TERMINAL/BROADCAST be set for the information to be displayed at your terminal. Format SET CONTROL [=(T,Y)] SET NOCONTROL [=(T,Y)]
1 – Parameter
(T,Y) Specifies that T (Ctrl/T) or Y (Ctrl/Y) be enabled or disabled. If you specify only one character, you can omit the parentheses. If you do not specify either T or Y, Y is the default.
2 – Examples
1.$ SET NOCONTROL=Y The SET CONTROL command in this example disables the Ctrl/Y function as well as most Ctrl/C functions. 2.$ SET CONTROL=T The SET CONTROL command in this example enables the Ctrl/T function. 3.$ SET NOCONTROL=(T,Y) The SET CONTROL command in this example disables both the Ctrl/T and Ctrl/Y functions. 4.$ <Ctrl/T> NODE22::SMITH 16:21:04 (DCL) CPU=00:03:29.39 PF=14802 IO=18652 MEM=68 $ SET NOCONTROL=T $ <Ctrl/T> As shown in this example, when you press Ctrl/T, the system displays the appropriate information. The SET NOCONTROL=T command disables the Ctrl/T function. Now when you press Ctrl/T, no information is displayed. 5.$ TYPE CTRLT_LOOP.COM $ inner=0 $ outer=0 $ loop: $ loop1: $ if inner .gt. 20000 then goto end_loop1 $ inner=inner+1 $ dcl$ctrlt=F$FAO("Inner loop count is !SL O !S !SL Outer loop count is !SL",inner,outer) $ goto loop1 $ end_loop1: $ inner=0 $ outer=outer+1 $ goto loop $ @CTRLT_LOOP <<Press Ctrl/T>> NODE1::JSMITH 10:46:37 (DCL) CPU=00:03:42.68 PF=13453 IO=6743 MEM=187 Inner loop count is 12306 Outer loop count is 0 NODE1::JSMITH 10:46:43 (DCL) CPU=00:03:49.19 PF=13455 IO=6744 MEM=187 Inner loop count is 19200 Outer loop count is 2 . . . <<Press Ctrl/C>> <<--- To exit the loop. $ SET NOCONTROL=T $ @CTRLT_LOOP <<Press Ctrl/T>> <<Nothing is displayed as CTRL/T is disabled.>> <<Press Ctrl/C>> <<--- To exit the loop. This example demonstrates the use of DCL$CTRLT within a command procedure. The command procedure is running in a loop that updates the symbol DCL$CTRLT to indicate the number of loop iterations executed so far.