.tf KIOS III 4/21/86
.sh FILE
KIOS.mod
.sh DEFINES
.nf
MODULE KIOS;
.s3
PROCEDURE put_access_level(
	l:		access_level_type);
.s3
PROCEDURE put_da(
	da:		discr_access);
.s3
PROCEDURE put_priv_struct(
	s:		priv_struct);
.s3
PROCEDURE put_tii(
	tii:		tii_struct);
.s3
PROCEDURE put_seid(
	s:		seid);
.s3
PROCEDURE get_cardinal(
	s:		ARRAY integer OF char;
	VAR n:		cardinal
	):		boolean;
.s3
PROCEDURE get_access_level(
	VAR l:		access_level_type
	):		boolean;
.s3
PROCEDURE get_da(
	s:		ARRAY integer OF char;
	VAR da:		discr_access
	):		boolean;
.s3
PROCEDURE get_priv_struct(
	s:		ARRAY integer OF char;
	VAR p:		priv_struct
	):		boolean;
.s3
PROCEDURE get_tii(
	VAR tii:	tii_struct
	):		boolean;
.s3
PROCEDURE get_seid(
	VAR s:		seid
	):		boolean;
.fi
.sh "DESCRIPTION"
The procedures defined by this module are used to input and output
the values of various tii-related structures.
The output procedures present appropriate labels along with the data,
while the input procedures prompt with the name of a field before reading
its value.
.s3
.lp 10 5
put_access_level,
put_da,
put_priv_struct,
put_tii,
and
put_seid
all output the specified structured variable, along with labels
for each of the variables fields.
.s3
.lp 10 5
get_cardinal
uses
putString
to print the argument string, and then uses
getDec
to input a cardinal.
The boolean value returned is that
value returned from
getDec.
.s3
.lp 10 5
get_access_level,
get_da,
get_priv_struct,
get_tii,
and
get_seid
all input the specified structured variable.  For each field of the
structure, the name of the field is printed and then the value is
read.  If an error occurs at any point (an illegal value is entered),
false
is returned.
Otherwise,
true
is returned.
.i0
.sh "INCLUDED BY"
.ta 20,40
SSP.mod	fam.mod
.dt
