/****************************************************************/
/*  INSTALL.DAT                                                 */
/*                                                              */
/*  Copyright (c) 1996 Computer Associates International        */
/*  All Rights Reserved                                         */
/*                                                              */
/*  Last revision:   03/20/96                                   */
/****************************************************************/

@DefineDisk
   @Label = "CA-Clipper 5.3a Update Disk 2 of 2"
@EndDisk

@Display
 @Cls
 @Move( 2, 1, "Preparing to patch files, please wait...." )

 @If (@PatchCaci == 1)
  @Copy("\\626CACI.RTP", "@OutDrive:\\@SubDir\\626CACI.RTP")
 @Endif
@EndDisplay

@Finish

@ChDrive(@OutDrive)
@ChDir("@SubDir")

@If(@System("Echo Patching ROOT directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@SubDir 620ROOT.RTP > @OutDrive:\\@SubDir\\patch.log"))
@EndIf
@Delete("@OutDrive:\\@SubDir\\620ROOT.RTP")

@If(@System("PATCH @OutDrive:\\@SubDir 626ROOT.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626ROOT.RTP")

@If(@System("Echo Patching BIN directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Bin 620BIN.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\620BIN.RTP")

@If(@System("PATCH @OutDrive:\\@Bin 626BIN.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626BIN.RTP")

@If(@System("PATCH @OutDrive:\\@Bin 807BIN.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\807BIN.RTP")

@If(@System("Echo Patching LIB directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Lib 626LIB.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626LIB.RTP")

@If(@System("Echo Patching OBJ directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Obj 626OBJ.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626OBJ.RTP")

@If (@PatchPe == 1)
@If(@System("Echo Patching PE directory, please wait...."))
@Endif
   @If(@System("PATCH @OutDrive:\\@Pe 626PE.RTP >> @OutDrive:\\@SubDir\\patch.log"))
   @Endif
   @Delete("@OutDrive:\\@SubDir\\626PE.RTP")
@Endif

@If (@PatchRl == 1)
@If(@System("Echo Patching RL directory, please wait...."))
@Endif
   @If(@System("PATCH @OutDrive:\\@Rl 626RL.RTP >> @OutDrive:\\@SubDir\\patch.log"))
   @Endif
   @Delete("@OutDrive:\\@SubDir\\626RL.RTP")
@Endif

@If(@System("Echo Patching NG directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Ng 53ANG.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\53ANG.RTP")

@If(@System("Echo Patching INCLUDE directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Include 626INCLU.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626INCLU.RTP")

@If (@PatchDbu == 1)
@If(@System("Echo Patching DBU directory, please wait...."))
@Endif
   @If(@System("PATCH @OutDrive:\\@Dbu 626DBU.RTP >> @OutDrive:\\@SubDir\\patch.log"))
   @Endif
   @Delete("@OutDrive:\\@SubDir\\626DBU.RTP")
@Endif

@If (@PatchSys == 1)
@If(@System("Echo Patching SYS directory, please wait...."))
@Endif
   @If(@System("PATCH @OutDrive:\\@Sys 53ASYS.RTP >> @OutDrive:\\@SubDir\\patch.log"))
   @Endif
   @Delete("@OutDrive:\\@SubDir\\53ASYS.RTP")
@Endif

@If (@PatchSample == 1)
@If(@System("Echo Patching SAMPLE directory, please wait...."))
@Endif
   @If(@System("PATCH @OutDrive:\\@Sample 53ASAMPLE.RTP >> @OutDrive:\\@SubDir\\patch.log"))
   @Endif
   @Delete("@OutDrive:\\@SubDir\\53ASAMPLE.RTP")
@Endif

@If(@System("Echo Patching GDBU directory, please wait...."))
@Endif
@If(@System("PATCH @OutDrive:\\@Gdbu 626GDBU.RTP >> @OutDrive:\\@SubDir\\patch.log"))
@Endif
@Delete("@OutDrive:\\@SubDir\\626GDBU.RTP")

@If (@PatchCaci == 1)
@If(@System("Echo Patching CACI directory, please wait...."))
@Endif
  @If(@System("PATCH @OutDrive:\\@Caci 620CACI.RTP >> @OutDrive:\\@SubDir\\patch.log"))
  @Endif
  @Delete("@OutDrive:\\@SubDir\\620CACI.RTP")
  @If(@System("PATCH @OutDrive:\\@Caci 626CACI.RTP >> @OutDrive:\\@SubDir\\patch.log"))
  @Endif
  @Delete("@OutDrive:\\@SubDir\\626CACI.RTP")
@Endif

@Delete("@OutDrive:\\@SubDir\\PATCH.EXE")

@ChDrive(@StartUpDrive)
@ChDir("@StartupDir")

  @Cls
  ÛßßßßßßßßßßßßßßßßßÛ     @InstName Installation
  Û Computer        Û
  Û  Associates     Û     CA-Clipper 5.3a has been installed on your
  Û   International Û     computer. Before using the product, view the
  ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ     CLIP53A.TXT file using your word processor or
       ÜÜÜÜÜÜÜÜÜ          the DOS TYPE command. This file contains the
    ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ       latest product information.



IMPORTANT:
   In order to ensure that the CA-Clipper 5.3a patch has been
   successfully installed, you should compare the date and time
   stamps of the updated files against the file list in the
   CLIP53A.TXT file.  If you have encountered a problem that you are
   unable to correct, call your CA-Clipper Technical Support
   representative.

   Please examine the PATCH.LOG file in the root of your CA-Clipper
   5.3a directory to view the results of the patch.
@Pause
@EndFinish
