.NONUMBER
.TITLE CHG - CHANGES TERMINAL PRIVILEGE STATUS
.PAGE
.INDENT 50
CHG
.SKIP 1
.CENTER
CHG - CHANGES TERMINAL PRIVILEGE STATUS
.LEFT MARGIN 10
.SKIP 1
.INDENT -10
^^PROGRAM NAME: CHG\\
.SKIP 1
.INDENT -10
^^PURPOSE:\\ ^THIS PROGRAM CHANGES THE PRIVILEGE STATUS OF A TERMINAL.  ^IF THE TERMINAL
IS PRIVILEGED, (AND THE SIGNON ^^UIC\\ OF THE TERMINAL IS IN A TABLE IN THE TASK)
THE TERMINAL IS SET TO NON-PRIVILEGED. ^IF THE TERMINAL IS NOT PRIVILEGED,
AND ITS SIGNON ^^UIC\\ IS IN THE TABLE, IT IS SET TO PRIVILEGED. ^IN BOTH CASES,
IF THE SIGNON ^^UIC\\ DOES NOT APPEAR IN THE TABLE, THE ^^UIC\\ OF THE TERMINAL
IS WRITTEN TO THE FILE SY:[111,1]CHGUSE.LST.
^THE TABLE OF ^^UIC\\S AND THE FILE
DESCRIPTOR BLOCK MAY BE CHANGED BEFORE ASSEMBLY TIME.
.SKIP 1
.INDENT -10
.SKIP 1
.INDENT -10
^^EXAMPLE:\\
.NOFILL
.NOJUSTIFY
 >^^CHG\\ !CHANGE PRIVILEGE STATUS OF THE TERMINAL!
 >    !THE PRIVILEGE STATUS HAS BEEN CHANGED!
.FILL
.JUSTIFY
.SKIP 1
.INDENT -10
^^AUTHOR:\\ ^M. ^NIELSEN
.SKIP 1
.INDENT -10
^^WRITTEN:\\ ^^JULY\\ 1977
.SKIP 1
.INDENT -10
^^SOURCE LANGUAGE:\\ ^^MACRO 11
.SKIP 1
.INDENT -10
^^LAST MODIFICATION:\\ ^^AUGUST\\ 1977
.SKIP 1
.INDENT -10
^^MAINTENANCE:\\ ^M. ^NIELSEN
.SKIP 1
.INDENT -10