echo off
CLS
echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
echo     OF THE PRODUCT YOU ARE PATCHING.   PATCHING AN ALREADY PATCHED COPY
echo     MAY CAUSE UNPREDICTABLE ERRORS.
echo ÿ
echo ÿ
IF %1! == ! GOTO PARAM
IF %2! == ! GOTO PARAM
IF  %1 == BSERVER GOTO BSERVER
IF  %1 == bserver GOTO BSERVER
IF  %1 == BROUTER GOTO BROUTER
IF  %1 == brouter GOTO BROUTER
IF  %1 == BREQUEST GOTO BREQUEST
IF  %1 == brequest GOTO BREQUEST
GOTO PARAM
::
:BROUTER
IF NOT EXIST BPATRTR.510 GOTO BROUERRP
IF NOT EXIST BROUTER.VAP GOTO BROUERRV
echo ÿ
echo BROUTER.VAP VERSION %2 ** PATCHING .............
echo ÿ
DEBUG BROUTER.VAP <BPATRTR.510 >TEMP
GOTO FIXDONE
::
:BSERVER
IF NOT EXIST BPATVAP.510 GOTO BSERERRP
IF NOT EXIST BSERVER.VAP GOTO BSERERRV
echo ÿ
echo BSERVER.VAP VERSION %2 ** PATCHING .............
echo ÿ
DEBUG BSERVER.VAP <BPATVAP.510 >TEMP
GOTO FIXDONE
::
:BREQUEST
IF %2 == 5.10 GOTO V510
IF %2 == 5.10A GOTO V510A
GOTO PARAM
:V510A
IF NOT EXIST BPATREQ.511 GOTO BREQERPA
IF NOT EXIST BREQUEST.EXE GOTO BREQERRV
echo ÿ
echo BREQUEST.EXE VERSION %2 ** PATCHING .............
echo ÿ
REN BREQUEST.EXE BRQ511
DEBUG BRQ511 <BPATREQ.511 >TEMP
REN BRQ511 BREQUEST.EXE
GOTO FIXDONE
:V510
IF NOT EXIST BPATREQ.510 GOTO BREQERRP
IF NOT EXIST BREQUEST.EXE GOTO BREQERRV
echo ÿ
echo BREQUEST.EXE VERSION %2 ** PATCHING .............
echo ÿ
REN BREQUEST.EXE BRQ510
DEBUG BRQ510 <BPATREQ.510 >TEMP
REN BRQ510 BREQUEST.EXE
GOTO FIXDONE
::
:BROUERRP
echo ÿ
echo CANNOT FIND BPATRTR.510
GOTO END
::
:BROUERRV
echo ÿ
echo CANNOT FIND BROUTER.VAP
GOTO END
::
:BSERERRP
echo ÿ
echo CANNOT FIND BPATVAP.510
GOTO END
::
:BSERERRV
echo ÿ
echo CANNOT FIND BSERVER.VAP
GOTO END
::
:BREQERRP
echo ÿ
echo CANNOT FIND BPATREQ.510
GOTO END
::
:BREQERPA
echo ÿ
echo CANNOT FIND BPATREQ.511
GOTO END
::
:BREQERRV
echo ÿ
echo CANNOT FIND BREQUEST.EXE
GOTO END
::
:PARAM
echo ÿ
echo THE FORMAT IS:
echo ÿ
echo PATCHVAP [filename] [version]
echo ÿ
echo WHERE [filename] IS:       BSERVER
echo                            BROUTER
echo                            BREQUEST
echo ÿ
echo AND [version] is:          5.10
echo                            5.10A
echo ÿ
GOTO END
::
:FIXDONE
echo ÿ
echo BTRIEVE PRODUCT FOR VAP VERSION %2 ** PATCHING COMPLETE **
echo ÿ
::
:END
