; QuickGraph>Install.jcl
; Install the QuickGraph Utility subpackage
EchoSome
FromFloppy   = 0
FromServer   = 2
FloppySpec   = ConcatStrings(DeviceFrom, '<Utils>')
ToSpec       = ConcatStrings(VolumeTo,   DirectoryTo)
FromSpec     = ConcatStrings(FloppySpec, 'QuickGraph.Run')
Dest         = ConcatStrings(VolumeTo, DirectoryTo)
Dest         = ConcatStrings(Dest, '*')
Dest         = ConcatStrings('\'',Dest)
Dest         = ConcatStrings(Dest,'\'')

Command Merge Command Files   ,
          CmdFileFrom         ,
          CmdFileTo           ,
          Yes                 ,
          VolumeTo


If InstallType = FromServer
    Command LCopy                                      ,
                                                       ,
              @[Scr]<$>InstallOverwriteOkFrom.fls      ,
              @[Scr]<$>InstallOverwriteOkTo.fls        ,
                                                       ,
              Yes                                      ,
              No                                       ,
              No                                       
    GoTo EndIt
    Endif

$Run ([utils]<utils>qg.run, '', ''),'<Pas>*',Dest,y,

EndIt:

End
