$!---------------------------------------------------------------------*
$!  B O O T B I O 8 2 :                                                |
$!---------------------------------------------------------------------*
$!      Command BOOTBIO82
$!
$!  Purpose:
$!     To Define Symbols for BIMED to Access 1982 BMDP Files.
$!
$!  Source File:  BOOTBIO82.COM
$!
$!  Design:  Scott Sibley      Code:  Scott Sibley      Date:  28-APR-83
$!
$!  Input:
$!     (none)
$!  Output:
$!     (none)
$!
$!  Error Checking:
$!     (none)
$!
$!---------------------------------------------------------------------*
$!
$!---------------------------------------------- Initialize Cmd Parameters
$!---------------------------------------------- Process Cmd Parameters
$!============================================== Record Module Entry
$!----------------------------------------------
$!--------------------------------------------- Commands: BMDP
$  BIMED :== "$LIB0:[BMDP]BMDStart.EXE"
$  BIOMED :== "$LIB0:[BMDP]BMDStart.EXE"
$  IF ("''F$LOGICAL("BIMEDMANAGER")'" .NES. "VAXMAN") THEN -
      ASSIGN/GROUP VAXMAN BIMEDMANAGER
$  IF "''F$LOGICAL(""BMDPOBJDIREC"")'".NES."" THEN DEASSIGN BMDPOBJDIREC
$  ASSIGN LIB2:[BMDP82.OBJ] BMDPOBJDIREC
$  IF "''F$LOGICAL(""BMDPHOMEDIREC"")'".NES."" THEN DEASSIGN BMDPHOMEDIREC
$  ASSIGN LIB0:[BMDP] BMDPHOMEDIREC
$  IF "''F$LOGICAL(""TEMPDIREC"")'".NES."" THEN DEASSIGN TEMPDIREC
$  ASSIGN LIB0:[UTIL.TEMPFILES.BIOMED82] TEMPDIREC
$  IF "''F$LOGICAL(""BMDPLIBDIREC"")'".NES."" THEN DEASSIGN BMDPLIBDIREC
$  ASSIGN LIB2:[BMDP82.OBJ] BMDPLIBDIREC
$  IF ("''F$LOGICAL("UTILDIREC")'" .NES. "LIB0:[BMDP]") THEN -
      ASSIGN/GROUP LIB0:[BMDP] UTILDIREC
$!============================================== Record Module Exit
$      EXIT