'
'	FILE ID:	RqInstall.sub
'
'	FUNCTION:	This submit file will merge all of the loadable request 
'				files into Request.sys on a hard disk.  It takes from one 
'				to three parameters as input, explained below under INPUT.
'
'	
'
'	When Request.Sys needs to be created, the following occurs:
'
'		a)  The file 0Request.sys is copied to the file 0Request.sysSave.
'		b)  List Request Set is invoked with @[Sys]<Sys>rqArgs.tmp as the 
'			first parameter and 0Request.txt as the second parameter. 
'		c)  A message indicating that the next command could take some time 
'			is copied from [Kbd] to [Vid].
'		d)  The command Make Request Set is invoked with 0Request.Txt as 
'			the first parameter and 0Request.Sys as the second parameter.
'		e)  The files 0Request.Txt and 0Request.Lst are deleted.
'		f)  A message is appended to [Sys]<Sys>Sys.Version stating the 
'			version of Request.BOTL.Sys that was merged with Request.Sys.
'
'	INPUT:	0	The [volume]<directory> where the loadable requests
'				are to reside.
'
'			1	For XE520 loading.  Not used in this implementation.
'
'			2	Determines whether or not we are will create a new
'				Request.Sys (for BTOS II) file on the path passed as 0.
'				NOTE:  Only the existence (nonzero length) of this 
'				parameter is checked, NOT the contents.
'
'	OUTPUT:		Request.sys
'
'  CALLED BY:	[B25OTL1]<Sys>Install.sub
'
'  USES:		[B25OTL2]<Sys>Request.BOTL.sys
'				[B25OTL2]<Sys>Request.ProtMgr.sys (user conditional)
'				[B25OTL2]<Sys>Request.STI.sys (user conditional)
'				Make Request Set
'				List Request Set
'				Request.txt
'
'	ASSUMES:	0 will exist and be a valid [Volume]<Directory> path.
'
'				If 2 exists, and 1 is meant not to exist, 1 should 
'				then be passed as two single quotes so that it takes up 
'				a parameter but is still null (nonzero in length).
'
'**************************************************************************
'
?2'The starting 84h delimiter
'
' ****** This will be expanded if a third parameter (2) was passed 
' ****** (2 has a nonzero length) to this submit file.  BTOS II system.
'
Copy
'	File from				' 0Request.sys
'	File to					' 0Request.sysSave
'	[Overwrite ok?]			' Yes
List Request Set
'	Request.n.Sys file(s)	' @0rqArgs.tmp
'	[Output file]			' 0Request.txt
'	[Include padded rqs?]	' 
Copy
'	File from				' [Kbd]
'	File to					' [Vid]'
'
PF
  B Request.Sys Creation AA
                                                                            
      The OSI TransportLAN requests are being merged with Request.sys.     
                                                                            
                    B This process may take several minutes AA                
                                                                            
  
'CANCEL''
'
Make Request Set
'	Text file(s)			' 0Request.txt
'	Binary request file		' 0Request.sys
'	[Error file]			'
'	[Version]				'
'	[Type (WS, SRP, Curr)]	'
Delete
'	File list				' 0Request.txt 0Request.Lst
Delete
'	File list				' 0rqArgs.tmp
Copy
'	File from				' [B25OTL2]<Sys>Request.BOTL.message
'	File to					' [Vid]1
'
' ****** The ending 84h delimiter''
'
; ; ; ; 4; :;  b <b Ab cb b b b b b 3b 8b Zb b b b b b b 