$!---------------------------------------------------------------------*
$!  S Y S T A R T U P :                                                |
$!---------------------------------------------------------------------*
$!  Command:  SYSTARTUP                Source File:  SYSTARTUP.COM
$!  Purpose:  To Perform Site-Specific Start-up Commands at Boot.
$!
$!  Design:  Scott B. Sibley   Code:  Scott B. Sibley   Date:  16-AUG-83
$!  Input:
$!     (none)
$!  Output:
$!     (none)
$!  Error Checking:
$!     (none)
$!---------------------------------------------------------------------*
$!---------------------------------------------- Initialize Cmd Parameters
$!---------------------------------------------- Process Cmd Parameters
$   IF F$EXTRACT(0,1,P1) .EQS. "-" THEN GOTO Info
$!============================================== Record Module Entry
$!---------------------------------------------- LIMIT LOGINS
$   SET LOGINS/INTERACTIVE=0
$!---------------------------------------------- DEFINE OPERATOR DEVICE
$   DEFINE/SYSTEM LIB0 "__DBA0:"
$!---------------------------------------------- INDICATE PROCEDURE
$   WRITE SYS$OUTPUT "  "
$   WRITE SYS$OUTPUT "To Mount Disks, Start Queues & Allow Users:  ",-
      "Sign on OPERATOR; Type:  STARTSITE"
$   WRITE SYS$OUTPUT "  "
$!============================================== Record Module Exit
$   EXIT
$!---------------------------------------------- Information
$Info: WRITE SYS$OUTPUT "       Site Start-up:  SYSTARTUP -F | -H"
$   IF F$EXTRACT(0,2,P1) .EQS. "-F" THEN EXIT
$   CREATE SYS$OUTPUT:

     This command performs Site-Specific Start-up Commands at Boot.