Sage-ST

Sage-ST ä
Manager
Documentation


  procedure AddCommandFirst
             (FileName : in     string;
              cmnd     : in     string;
              done     : in out boolean);

  --*
  --  AddCommandFirst - Add command/arguments to top of batch file.
  --
  --  CALLING SEQUENCE -
  --
  --    AddCommandFirst (fileName, cmnd, done);
  --
  --  ENTRY -
  --
  --    fileName : string
  --      Name of batch file.
  --
  --    cmnd : string
  --      Name of command and arguments to be added to the top of the batch file.
  --
  --  EXIT -
  --
  --    done : boolean
  --      A flag indicating if completed successfully.
  --
  --  EXAMPLE -
  --
  --    FileName : string (1..9) := "BATCH.BAT";
  --    Cmnd     : string (1..11):= "DRIVER.EXE ";
  --    Args     : string (1..12):= "procedure=01";
  --    Done     : boolean;
  --
  --    begin
  --      Manager.AddCommandFirst (fileName, Cmnd&Args, Done);
  --


  procedure AddCommandLast
             (FileName : in     string;
              cmnd     : in     string;
              done     : in out boolean);

  --*
  --  AddCommandLast - Add command/arguments to end of batch file.
  --
  --  CALLING SEQUENCE -
  --
  --    AddCommandLast (fileName, cmnd, done);
  --
  --  ENTRY -
  --
  --    fileName : string
  --      Name of batch file.
  --
  --    cmnd : string
  --      Name of command and arguments to be added to the end of the batch file.
  --
  --  EXIT -
  --
  --    done : boolean
  --      A flag indicating if completed successfully.
  --
  --  EXAMPLE -
  --
  --    FileName : string (1..9) := "BATCH.BAT";
  --    Cmnd     : string (1..11):= "DRIVER.EXE ";
  --    Args     : string (1..12):= "procedure=01";
  --    Done     : boolean;
  --
  --    begin
  --      Manager.AddCommandLast (fileName, Cmnd&Args, Done);
  --


  procedure FlushCommands
             (FileName : in     string);

  --*
  --  FlushCommands - Delete batch file.
  --
  --  CALLING SEQUENCE -
  --
  --    FlushCommands (fileName);
  --
  --  ENTRY -
  --
  --    fileName : string
  --      Name of batch file.
  --
  --  EXAMPLE -
  --
  --    FileName : string (1..9) := "BATCH.BAT";
  --
  --    begin
  --      Manager.FlushCommands (fileName);
  --


  procedure ReadCommandLine
             (FileName : in     string;
              cmnd     : in out string;
              args     : in out string;
              done     : in out boolean);

  --*
  --  ReadCommandLine - Read command & arguments from batch file.
  --
  --  CALLING SEQUENCE -
  --
  --    ReadCommandLine (fileName, cmnd, args, done);
  --
  --  ENTRY -
  --
  --    fileName : string
  --      Name of batch file.
  --
  --  EXIT -
  --
  --    cmnd : string
  --      Name of command in batch file.
  --
  --    args : string
  --      list of arguments in batch file.
  --
  --    done : boolean
  --      A flag indicating if completed successfully.
  --
  --  EXAMPLE -
  --
  --    fileName : string (1..9) := "BATCH.BAT";
  --    cmnd     : string (1..10):= (others => ' ');
  --    args     : string (1..10):= (others => ' ');
  --    done     : boolean;
  --
  --    begin
  --      Manager.ReadCommandLine (fileName, cmnd, args, done);
  --