%TIME Rückkehr aus Connection nach einem Zeitintervall
*ON %TIME=s RETURN
Diese Bedingung setzt ein Zeitintervall, nach dessen Ablauf CFS aus einer Connection in die Grundebene (Kommandofeld) zurückkehrt. Damit ist es selbst im Prozedurmodus möglich, aus einer "aktiven" Connection nach CFS zurückzukehren, ohne daß in der Connection eine Eingabeaufforderung besteht. So kann CFS auch bei Programmen mit freilaufenden Ausgaben bzw. bei Anwendungen ohne direkte Eingabeaufforderung (z.B. $CONSOLE) die Steuerung zurückbekommen.
s Elapsed Time in Sekunden (0 <= s <= 9999).
Beispiele:
Die folgende Prozedur eröffnet eine Connection zu $CONSOLE und setzt zuerst das Kommando /STA MSG und danach /STA P ab. Nach Rückkehr in die Grundebene durch K2 + R wird die Connection durch die Prozedur automatisch abgebaut.
OC9$CONSOLE,,,R           R: Rückkehrschalter. Nach erfolgreichem Eröffnen der Konsole kehrt
CFS in den Grundprozeß zurück.
xxxxx,C'sssss'            Eingabe der Benutzerkennung und des Passworts nach Rückkehr aus
CC9B                      der Connection: K2 für die Konsole
*ON %TIME=1 RETURN        Nach einer Sekunde: Rückkehr in die Grundebene von CFS
STA MSG                   Eingabe für Konsole
CC9B                      nach Rückkehr in die Grundebene (*ON %TIME=1):
                          erneut K2 für die Konsole generieren
*ON %TIME=1 RETURN        Timer für Rückkehr wieder initialisieren.
STA P                     Eingabe an Konsole
*ON %CMD CONTINUE         Nach Rückkehr in die Grundebene von CFS durch den Benutzer
                          soll der automatische Prozedurablauf wieder aufgenommen werden.
*DIA                      Umschaltung der Eingabequelle auf Benutzerdialog
DC9                       Beenden der Connection
Unter der Benutzerkennung TSOS soll eine Connection zum Hostrechner VAR2 eröffnet werden. Mit SM2 werden Statistikdaten zur Systemauslastung gesammelt.
/PROC N
/SYSFILE SYSDTA=(SYSCMD)
/SETSW ON=(1,4)
/EXEC $CFS
*002 FILE=NO
OC1,,VAR2/LOGON TSOS,...
EXEC $SM2
*ON %TIME=10 RETURN
nach 10 Sekunden: automatische Rückkehr in die Grund-ebene von CFS
HC SM2.STATISTIK,N        Die folgenden Ausgaben werden in die Hardcopydatei protokolliert
START                     Beginn der Statistikausgabe durch SM2. Die Statistik-informationen
                          werden im Intervall von 120 Sekunden ausgegeben
                          Nachdem nur Interesse an der ersten Ausgabe besteht, wird die
                          Connection nach 10 Sekunden verlassen. Dies gibt die Möglichkeit,
                          neue CFS-Kommandos abzusetzen.
CC1B                      K2-Taste für Connection 1. Dadurch wird die weitere Ausgabe
                          der Statistikinformationen durch SM2 beendet.
NHC                       Ausschalten des Hardcopy-Modus.
LOGOFF                    Beenden der Connection.
END                       Beenden von CFS.
/SETSW OFF=(1,4)
/ENDP