'*****************************  H E A D E R  ********************************
'**                                                                        **
'** TITLE:        Installation of Loadable Requests   (BTOS II Only)       **
'**                                                                        **
'** FILE ID:      [B25BMU1]<Sys>rqInstall.Sub                             **
'**                                                                        **
'** FUNCTION:     This submit file will update the given loadable request  **
'**               file.  A [Sys]<Sys>Request.Txt file will be used during  **
'**               the procedure.  It takes only one parameter (the full    **
'**               loadable request file name) as input.                    **
'**                                                                        **
'**               In the process, it copies the existing loadable request  **
'**               file to a 0save file.                                  **
'**                                                                        **
'** OUTPUT:       None.                                                    **
'**                                                                        **
'** CALLED BY:    [B25BMU1]<Sys>Install.Sub                               **
'**               [B25BMU1]<Sys>XEInstall.Sub                             **
'**                                                                        **
'** CALLSUSES:   MakeList Request Set                                    **
'**               [Vol]<Sys>Request.Sys or whatever is given as 0         **
'**               [B25BMU1]<Sys>Request.BMULTI.Txt                        **
'**                                                                        **
'** ASSUMPTIONS:  0 will exist and be a valid [Vol]<Dir>FileName of the   **
'**               desired loadable request file to be updated.             **
'**                                                                        **
'** HISTORY:                                                               **
'**                                                                        **
'** mmddyy  Who     Description                                          **
'**                                                  **
'** 031589  TEG     Created                                              **
'** 051789  TEG     Updated for use of named volume [B25BMU1]           **
'** 072189  TEG     0 now must be the entire loadable request file name.**
'**                                                                        **
'*****************************************************************************'
'  'Copy
'      File from       '0
'      File to         '0Save
'      [Overwrite ok?] 'Yes
'      [Confirm each?] '
'   GO''
'
'  'List Request Set
'      Request.n.Sys file(s)'  0
'      [Output file]'          [Sys]<Sys>Request.Txt
'      [Include padded requests?]'
'   GO''
'
'  'Copy
'      File from       '[Kbd]
'      File to         '[Sys]<Sys>rqDesc2.tmp
'      [Overwrite ok?] 'Yes
'      [Confirm each?] '
'   GO''
'[Kbd] = '[Sys]<Sys>Request.Txt [B25BMU1]<sys>Request.Bmulti.txt
'
'  'Copy
'      File from       '[Kbd]
'      File to         '[Vid]
'      [Overwrite ok?] '
'      [Confirm each?] '
'   GO''
'
'[Kbd] = '
PF
AE  Loadable Request File Update  AA
                                                                             
                 AM The following command may take some time AA                 
                                                                             

'CANCEL''
'
'  'Make Request Set
'      Text file(s)         '@[Sys]<sys>rqDesc2.tmp
'      Binary request file  '0
'      [Error file]         '
'      [Version]            '
'      [Type (WS, SRP, Current) default = Current]  '
'   GO''
'
'  'Delete
'      File list       '[Sys]<Sys>Request.Txt
'      [Confirm each?] '
'   GO''
'
'  'Append
'      File list from  '[B25BMU1]<Sys>Request.BMULTI.Version [Kbd]
'      File to         '[Sys]<Sys>Sys.Version
'      [Confirm each?] '
'   GO''
'
'[Kbd] = ' Request.BMULTI.Txt merged with 0 on d|*w *n *d, yyyy, at *t:0m|
'FINISH''
'
'
'  'Copy
'      File from       '[Kbd]
'      File to         '[Sys]<Sys>rqDesc2.tmp
'      [Overwrite ok?] 'Yes
'      [Confirm each?] '
'   GO''
'[Kbd] = 
PF

                AEA new Loadable Request File has been created.AA                

          Please ensure that you reboot the master and all cluster          
          workstations immediately after this software installation          
          has been completed.                                                

                AFPRESS AEGOAF TO CONTINUE SOFTWARE INSTALLATION...AA                


PN
'  'Copy
'      File from       '[Sys]<Sys>rqDesc2.tmp
'      File to         '[Vid]
'      [Overwrite ok?] 'Yes
'      [Confirm each?] '
'   GO''
'
'   Wait for the GO character'1'
'
'
'****************************************************************************
'*****                                                                  *****
'*****                         C L E A N  U P                          *****
'*****                                                                  *****
'****************************************************************************
'
'  'Delete
'      File list       '[Sys]<Sys>rqDesc?.tmp
'      [Confirm each?] '
'   GO''
'
'
