SWIT - examine and change user switch words.

Syntax:

swit [options]
(+|-)Verbose      (+|-)Print (-)
ON=[nn[,nn]*]     OFf=[nn[,nn]*]
(+|-)nn
Low=nn            High=nn
First=nn          Second=nn

Examples:

swit
swit l=0 on=5,6,7 +p
swit h=777777777777 -72 +5 +v

Options:

+nn
turns on the specified bit.
-nn
turns off the specified bit. If the same bit is mentioned in both a +nn and -nn form, it is left unchanged.
Low=nn
 
First=nn
sets the low word to the specified octal value.
High=nn
 
Second=nn
sets the high word to the specified octal value.
OFf=[nn[,nn]*]
turns off the bits that are listed.
ON=[nn[,nn]*]
turns on the bits that are listed. If a bit is listed for both ON and OFf, it is left unchanged.
+Print
displays the switch words in octal format, low word first.
+Verbose
displays a list of the bits that are set. This is the default if no other options are given.
-Verbose
does not show what bits are set.

Description:

SWIT lets you examine the contents of the Program Switch Words and turn PSW bits on or off. The current meanings of the PSW bits are given below:

First switch word (.LSWTH)
The following conditions are indicated by the specified bit being on.
0
ALGOL RUN or Call TAPE subsystem after execution.
1
JOVIAL RUN or Call RECO subsystem after execution.
2
BREAK received while in EDITOR build mode.
3
Recovery/Rollback in effect.
4
VIP 7700 cassette active for read or write.
5
Transparent Paper Tape Mode (LUCID).
6
VIP 7700 print page adapter operable.
7
Reserved.
8
OLDP/NEWP command in effect.
9
CHAIN overlay (BASIC) in use.
10
Automatic dump (sy**) engaged.
11
HOLD command in effect.
12
Paper tape source file (SYT*) exists.
13
Error was detected by last subsystem executed.
14
Last RESEQUENCE command was in a non-BASIC subsystem.
15
OLD/NEW command received from user.
16
NOPARITY command in effect.
17
Valid data on "sy**" file.
18-35
These are used by user programs. Note that many subsystems are "user" programs to TSS, and return status information in these bits. See "expl b lib exit" for a common use.
Second switch word (.LSWT2)
Bits are numbered from 36 to 71. For the sake of convenience, we also list the position of bits in the word (0-35).
36 (0)
Update primitive switch (dataBASIC).
37 (1)
Rerun primitive switch (dataBASIC).
38 (2)
VIP terminal UCASE/LCASE control.
39 (3)
VIP terminal FORM/NFORM control.
40 (4)
FORTRAN source exists (set by RUNY).
41 (5)
Command file processing $*$TRAP (zero if trap mode is enabled).
42 (6)
Terminate subsystem upon any DRL T.ERR.
43 (7)
DBCS usage.
44 (8)
CRN (COBOL-74) logical delete specified on database.
45 (9)
Set by SCROLL/NSCROLL; controls paging in VIPS.
46 (10)
Reserved for TSS.
47 (11)
Debug switch for CRN.
48 (12)
Invoke FDEBUG.
49-71 (13-35)
Reserved for TSS.

Copyright © 1996, Thinkage Ltd.