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 == BTRIEVE GOTO BTRIEVE
IF  %1 == btrieve GOTO BTRIEVE
IF  %1 == BROUTER GOTO BROUTER
IF  %1 == brouter GOTO BROUTER
IF  %1 == BREQUEST GOTO BREQUEST
IF  %1 == brequest GOTO BREQUEST
GOTO PARAM
::
:BROUTER
IF %2 == 30 GOTO BRERR30
IF %2 == 31 GOTO BROUT31
GOTO PARAM
::
:BROUT31
IF NOT EXIST BPATRTR.511 GOTO BRERRP31
IF NOT EXIST BROUTER.NLM GOTO BRERRN31
echo ÿ
echo BROUTER.NLM FOR NETWARE 3.1 ** PATCHING .............
echo ÿ
DEBUG BROUTER.NLM <BPATRTR.511 >TEMP
GOTO FIX31
::
:BTRIEVE
IF %2 == 30 GOTO BTR30
IF %2 == 31 GOTO BTR31
GOTO PARAM
::
:BTR30
IF NOT EXIST BPATNLM.510 GOTO BERRP30
IF NOT EXIST BTRIEVE.NLM GOTO BERRN
echo ÿ
echo BTRIEVE.NLM FOR NETWARE 3.0 ** PATCHING .............
echo ÿ
DEBUG BTRIEVE.NLM <BPATNLM.510 >TEMP
GOTO FIX30
::
:BTR31
IF NOT EXIST BPATNLM.511 GOTO BERRP31
IF NOT EXIST BTRIEVE.NLM GOTO BERRN
echo ÿ
echo BTRIEVE.NLM FOR NETWARE 3.1 ** PATCHING .............
echo ÿ
DEBUG BTRIEVE.NLM <BPATNLM.511 >TEMP
GOTO FIX31
::
:BREQUEST
IF %2 == 30 GOTO BREQ30
IF %2 == 31 GOTO BREQ31
GOTO PARAM
::
:BREQ30
IF NOT EXIST BPATREQ.510 GOTO BQERRP30
IF NOT EXIST BREQUEST.EXE GOTO BQERRN
echo ÿ
echo BREQUEST.EXE FOR NETWARE 3.0 ** PATCHING .............
echo ÿ
REN BREQUEST.EXE BRQ510
DEBUG BRQ510 <BPATREQ.510 >TEMP
REN BRQ510 BREQUEST.EXE
GOTO FIX30
::
:BREQ31
IF NOT EXIST BPATREQ.511 GOTO BQERRP31
IF NOT EXIST BREQUEST.EXE GOTO BQERRN
echo ÿ
echo BREQUEST.EXE FOR NETWARE 3.1 ** PATCHING .............
echo ÿ
REN BREQUEST.EXE BRQ511
DEBUG BRQ511 <BPATREQ.511 >TEMP
REN BRQ511 BREQUEST.EXE
GOTO FIX31
::
:BRERR30
echo ÿ
echo BROUTER DOES NOT EXIST FOR NETWARE V3.0
GOTO END
::
:BRERRP31
echo ÿ
echo CANNOT FIND BPATRTR.511
GOTO END
::
:BRERRN31
echo ÿ
echo CANNOT FIND BROUTER.NLM
GOTO END
::
:BERRP30
echo ÿ
echo CANNOT FIND BPATNLM.510
GOTO END
::
:BERRP31
echo ÿ
echo CANNOT FIND BPATNLM.511
GOTO END
::
:BERRN
echo ÿ
echo CANNOT FIND BTRIEVE.NLM
GOTO END
::
:BQERRP30
echo ÿ
echo CANNOT FIND BPATREQ.510
GOTO END
::
:BQERRP31
echo ÿ
echo CANNOT FIND BPATREQ.511
GOTO END
::
:BQERRN
echo ÿ
echo CANNOT FIND BREQUEST.EXE
GOTO END
::
:PARAM
echo ÿ
echo THE FORMAT IS:
echo ÿ
echo PATCHNLM [filename] [netware version]
echo ÿ
echo WHERE [filename] IS:       BTRIEVE
echo                            BROUTER
echo                            BREQUEST
echo ÿ
echo ÿ
echo AND [netware version] IS:  30     {For Netware v3.0}
echo                            31     {For Netware v3.1}
echo ÿ
GOTO END
::
:FIX30
echo ÿ
echo BTRIEVE PRODUCT FOR NETWARE 3.0 ** PATCH COMPLETE **
echo ÿ
GOTO END
::
:FIX31
echo ÿ
echo BTRIEVE PRODUCT FOR NETWARE 3.1 ** PATCH COMPLETE **
echo ÿ
::
:END