;****************************** MODULE HEADER *******************************;
;*																		     *;
;*																		     *;
;* MACHINE: B20		OS: BTOS II											     *;
;*																		     *;
;* DESCRIPTION:															     *;
;*																		     *;
;* This is the loadable request definitions for the Multiple Gateway Server	 *;
;* requests.															     *;
;*																		     *;
;* HISTORY:																     *;
;*																		     *;
;* MMDDYY VVVVMM PROGRAMMER     DESCRIPTION							     *;
;*																		     *;
;* 100688         J. Reed      Created this module, Tab setting = 4       *;
;*																		     *;
;* TITLE:  BTOS Systems Multiple Gateway Server R1.0					     *;
;*																		     *;
;*			PROPRIETARY PROGRAM MATERIAL								     *;
;*																		     *;
;* THIS MATERIAL IS PROPRIETARY TO UNISYS CORPORATION AND IS NOT TO BE       *;
;* REPRODUCED, USED OR DISCLOSED EXCEPT IN ACCORDANCE WITH PROGRAM LICENSE   *;
;* OR UPON WRITTEN AUTHORIZATION OF THE GENERAL COUNSEL, OFFICE OF GENERAL   *;
;* COUNSEL, UNISYS CORPORATION, BLUE BELL, PA. 19424, USA                    *;
;*																		     *;
;*              COPYRIGHT (C) 1988 UNISYS CORPORATION			             *;
;* ************************************************************************* *;
;*																		     *;
;* THE WITHIN INFORMATION IS NOT INTENDED TO BE NOR SHOULD SUCH BE CONSTRUED *;
;* AS AN AFFIRMATION OF FACT, REPRESENTATION OR WARRANTY BY UNISYS           *;
;* CORPORATION OF ANY TYPE, KIND, OR CHARACTER.  THE WITHIN PRODUCT AND      *;
;* THE RELATED MATERIALS ARE ONLY FURNISHED PURSUANT AND SUBJECT TO THE      *;
;* TERMS AND CONDITIONS OF A DULY EXECUTED LICENSE AGREEMENT.  THE ONLY      *;
;* WARRANTIES MADE BY UNISYS WITH RESPECT TO THE PRODUCTS DESCRIBED IN THIS  *;
;* MATERIAL ARE SET FORTH IN THE ABOVE FURNISHED MENTIONED AGREEMENT.        *; ;*																		     *;
;* THE CUSTOMER SHOULD EXERCISE CARE TO ASSURE THAT USE OF THE SOFTWARE      *;
;* WILL BE IN FULL COMPLIANCE WITH LAWS, RULES AND REGULATIONS OF THE        *;
;* JURISDICTIONS WITH RESPECT TO WHICH IT IS USED.						     *;
;*																		     *;
;*																		     *;
;*************************** END OF MODULE HEADER ****************************
;
;	Editing this file:
;		The semicolon denotes the beginning of a comment. Comments
;		extend to the end of the line. Hexidecimal values must be 
;		suffixed with an 'h', otherwise the value is decimal.
;		
;		A loadable request is defined by a collection of tokens and 
;		values. The token ':RequestCode:' signals the start of a new
;		definition. 
;
;		:RequestCode:	<value>
;		:RequestName:	<string>
;		:Version:		<value>
;		:LclSvcCode:	<value> or <LclSvcCodeToken>
;  		:ServiceExch:	<value> or <ExchToken>
;  		:sCntInfo:		<value>
;  		:nReqPbCb:		<value>
;  		:nRespPbcb:		<value>
;  		:Params:		<ParamToken>, <paramToken>,...
;  		:NetRouting:	<value> or <NetRoutingToken>
;  		:SrpRouting:	<value> or <SrpRoutingToken>
;
;		where
;
;		Local Service Code tokens are:
;			Dummy	:the local service code '0AD31h' is used. Requests
;					 with dummy local service codes will be replaced by
;					 real requests if files containing identical nondummy
;					 requests are merged.
;
;		Exchange tokens are:
;			ExchInstalledLocal	:the exchange is set to 0.
;			ExchInstalledMastr	:the exchange is set to 0 on Master
;								 and StandAlone OS's, set to the cluster
;								 agent on cluster OS's.
;
;		Parameter tokens are:
;			none	:no arguments on the stack
;			w(o)	:next stack word goes at offset 'o' of the request block
;			b(o)	:next byte goes at offset 'o' of the request block
;			p(o)	:next two words go at offset 'o' of the request block
;			c(v,o)	:the value 'v' is placed at offset 'o' of the request 
;					 block
;			pbcb0	:is equivalent to p(18), w(22)
;			pbcb1	:is equivalent to p(24), w(28)
;			pbcb2	:is equivalent to p(30), w(34)
;			pbcb3	:is equivalent to p(36), w(40)
;			lfa		:is equivalent to w(16), w(14)
;
;
;		Net Routing tokens are:
;			NoRouting
;			RW
;			specPw
;			rFh
;			devSpec
;			dirSpec
;			FileSpec
;			FileSpec2
;			FileSpecP2S2
;			OpenFh
;			CloseFh
;			CloseAtTermination
;
;		SRP Routing tokens are:
;			rLocal
;			rRemote
;			rMasterFP
;			rHandle
;			rFileID
;			rMasterCP
;			rLineNumber
;
;
;	Termination, WsAbort, ChangeUserNum, and Swapping requests may be added
;	using the following tokens:
;
;
;		:WsAbortRq:		<value>
;		:TerminationRq:	<value>
;		:SwappingRq:	<value>
;		:ChgUserNumRq:	<value>
;
; 	MERGING RULES:
;
;	The following rules take effect when merging two or more loadable
;	request files which contain the same request code(s).
;
;		1. requests are identical in every way  delete one of them
;		2. versions are different  delete earlier version 
;		3. one request has dummy local service code  delete it
;	  	4. identical except for exch where one exch is zero  delete request
;			with zero exchange (assume old style SRP request).
;		5. different field values for the same request code  abort merge
;
;
;
;
;
; Multiple Gateway Server Loadable request file.
; Instructions for editing Request.Txt
; Use this file as a template for changing the SRP routing to allow
; several copies of MGS (up to one for each board).  Each request
; code requiring change is indicated with the following line indicating
; the new value.  Changes to this file may necessitate changes to 
; gateway request definitions.


:WsAbortRq:			07163h
:TerminationRq:		07163h

:RequestCode:		0C153h
:RequestName:		MGSRegister
:Version:			1
:LclSvcCode:		0000h
:ServiceExch:		exchInstalledLocal
:sCntInfo:			4 
:nReqPbCb:			3    
:nRespPbcb:			1    
:Params:w(12), w(14), p(16), w(20), p(22), w(26), p(28), w(32), p(34), c(2,38)
:NetRouting:		NoRouting
; The following line must be changed for a multiple instances of MGS on the XE.
:SrpRouting:		rRemote
; The above line should be changed to ':SrpRouting:		rLocal'

:RequestCode:		0C154h
:RequestName:		MGSDeRegister
:Version:			1
:LclSvcCode:		0000h
:ServiceExch:		exchInstalledLocal
:sCntInfo:			2
:nReqPbCb:			1
:nRespPbcb:			0
:Params:			w(12),p(14),w(18)
:NetRouting:		NoRouting
; The following line must be changed for a multiple instances of MGS on the XE.
:SrpRouting:		rRemote
; The above line should be changed to ':SrpRouting:		rLocal'

:RequestCode:		0DB3Eh
:RequestName:		MGSDeInstall
:Version:			2
:LclSvcCode:		0000h
:ServiceExch:		exchInstalledLocal
:NetRouting:		NoRouting
; No Change is required here.
:SrpRouting:		rLocal

:RequestCode:		0DB3Fh
:RequestName:		MGSStatus
:Version:			1
:LclSvcCode:		0000h
:ServiceExch:		ExchInstalledMastr
:NetRouting:		FileSpec
; The following line must be changed for a multiple instances of MGS on the XE.
:SrpRouting:		rRemote
; The line should be changed to ':SrpRouting:		0F7h'

:RequestCode:		7164h
:RequestName:		MGSTaskInstall
:Version:			2
:LclSvcCode:		0000h
:ServiceExch:		exchInstalledLocal
:NetRouting:		NoRouting
; No Change is required here.
:SrpRouting:		rLocal

:RequestCode:		07163h
:RequestName:		MGSTerminationAndAbortRq
:Version:			2
:LclSvcCode:		0002h
:ServiceExch:		exchInstalledMastr
:NetRouting:		noRouting
; The following line must be changed for a multiple instances of MGS on the XE.
:SrpRouting:		rRemote
; The above line should be changed to ':SrpRouting:		0F7h'


