!*** MODULE $BRKDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! +
 ! 
 !  Breakthru system service input definitions.
 ! 
 ! -
	PARAMETER BRK$C_DEVICE = '00000001'X	 !  device name
	PARAMETER BRK$C_USERNAME = '00000002'X	 !  user name
	PARAMETER BRK$C_ALLUSERS = '00000003'X	 !  all users
	PARAMETER BRK$C_ALLTERMS = '00000004'X	 !  all logged in users
	PARAMETER BRK$C_MAXSENDTYPE = '00000004'X
 ! 
 !  Requestor ID's, DEC use only (0-31)
 ! 
	PARAMETER BRK$C_GENERAL = '00000000'X	 !  GENERAL (OR UNSPECIFIED)
	PARAMETER BRK$C_PHONE = '00000001'X	 !  PHONE
	PARAMETER BRK$C_MAIL = '00000002'X	 !  MAIL
	PARAMETER BRK$C_QUEUE = '00000003'X	 !  QUEUE MANAGER
	PARAMETER BRK$C_SHUTDOWN = '00000004'X	 !  SYSTEM SHUTDOWN
	PARAMETER BRK$C_URGENT = '00000005'X	 !  URGENT MESSAGE
	PARAMETER BRK$C_DCL = '00000006'X	 !  DCL (control T)
	PARAMETER BRK$C_OPCOM = '00000007'X	 !  OPERATOR MESSAGE
 !  Note that only first 16 are really stored by TTDRIVER now 
	PARAMETER BRK$C_USER1 = '00000020'X	 !  reserved to customer
	PARAMETER BRK$C_USER2 = '00000021'X	 !  reserved to customer
	PARAMETER BRK$C_USER3 = '00000022'X	 !  reserved to customer
	PARAMETER BRK$C_USER4 = '00000023'X	 !  reserved to customer
	PARAMETER BRK$C_USER5 = '00000024'X	 !  reserved to customer
	PARAMETER BRK$C_USER6 = '00000025'X	 !  reserved to customer
	PARAMETER BRK$C_USER7 = '00000026'X	 !  reserved to customer
	PARAMETER BRK$C_USER8 = '00000027'X	 !  reserved to customer
	PARAMETER BRK$C_USER9 = '00000028'X	 !  reserved to customer
	PARAMETER BRK$C_USER10 = '00000029'X	 !  reserved to customer
	PARAMETER BRK$C_USER11 = '0000002A'X	 !  reserved to customer
	PARAMETER BRK$C_USER12 = '0000002B'X	 !  reserved to customer
	PARAMETER BRK$C_USER13 = '0000002C'X	 !  reserved to customer
	PARAMETER BRK$C_USER14 = '0000002D'X	 !  reserved to customer
	PARAMETER BRK$C_USER15 = '0000002E'X	 !  reserved to customer
	PARAMETER BRK$C_USER16 = '0000002F'X	 !  reserved to customer
	PARAMETER BRK$M_SCREEN = '00000100'X
	PARAMETER BRK$M_BOTTOM = '00000200'X
	PARAMETER BRK$M_NOREFRESH = '00000400'X
	PARAMETER BRK$M_CLUSTER = '00000800'X
	STRUCTURE /FLAGS_INPUT/			 !  mimics $BRDCSTDEF
	    PARAMETER BRK$S_ERASE_LINES = 8
	    PARAMETER BRK$V_ERASE_LINES = 0		 !  number of lines to erase
	    PARAMETER BRK$S_SCREEN = 1
	    PARAMETER BRK$V_SCREEN = 8		 !  Do screen formatted write
	    PARAMETER BRK$S_BOTTOM = 1
	    PARAMETER BRK$V_BOTTOM = 9		 !  "screen" message at bottom
	    PARAMETER BRK$S_NOREFRESH = 1
	    PARAMETER BRK$V_NOREFRESH = 10		 !  Refresh an interrupted read
	    PARAMETER BRK$S_CLUSTER = 1
	    PARAMETER BRK$V_CLUSTER = 11		 !  broadcast to cluster
	BYTE %FILL (2)
	END STRUCTURE	! FLAGS_INPUT
!DEC$ END OPTIONS