Untitled Document

;*******************************************************************************
;**
;** SharedApps.kix
;**
;*******************************************************************************

;*************************************************************************
;**
;** Remove existing Shared Programs folders
;**
;*************************************************************************

If Exist("%userprofile%\Desktop\Shared Programs\")=1
SHELL "%COMSPEC% /C RD /S /Q " + Chr(34) + "%UserProfile%\Desktop\Shared Programs" + Chr(34)
EndIf

If Exist("%userprofile%\Start Menu\Shared Programs\")=1
SHELL "%COMSPEC% /C RD /S /Q " + Chr(34) + "%UserProfile%\Start Menu\Shared Programs" + Chr(34)
EndIf

?
?"Refreshing Shared Programs..."
?

MD "%userprofile%\Start Menu\Shared Programs\"

;*************************************************************************
;**
;** Start Menu\Shared Programs
;**
;*************************************************************************

Copy @SCRIPTDIR + "\SharedApps\Start Menu\The River.url" "%userprofile%\Start Menu\Shared Programs\*.*"

If InGroup("TMS\MLSG App AllRegs 40")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Allregs 4.0.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\App Citrix Corona")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Corona.lnk" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\MLSG App Easy Access 98")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Easy Access 98 (Cornerstone).LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App EA2000")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Easy Access 2000.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\NMS App Easy Access")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Easy Access 98 (Tulsa).LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\NMS App FasTTrak")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\FastTrak.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\NMS App HomeSite")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\HomeSite.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\App Homeq Analysis Model")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Homeq Analysis Model.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\App jEdit")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\jEdit.lnk" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\App LawPack")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LawPack 6.1.lnk" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\MLSG App LC-Win3.0")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LC-Win3.0.lnk" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App MSProj98")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Microsoft Project 98.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App MSPub98")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Microsoft Publisher 98.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If Exist("H:\RUMBA\MSP.WDM")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\MSP_H.LNK" "%userprofile%\Start Menu\Shared Programs\MSP.LNK"
Else
Copy @SCRIPTDIR + "\SharedApps\Start Menu\MSP_J.LNK" "%userprofile%\Start Menu\Shared Programs\MSP.LNK"
EndIf

If InGroup("TMS\NMS App Pacer")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Pacer.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App PowerCalc")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\PowerCalc3.0.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\App Secretariat")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Secretariat.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\NMS App SnapPro3")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\SnapPRO! 3.0.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\SnapView.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"

If InGroup("TMS\MLSG App SwiftView")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\SwiftView.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App Toad")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Toad.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\MLSG App TopDog")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Top Dog.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App Trail Doc Shipping")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\TrailDocShipping.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If EXIST("P:\Settings\Rumba\Trets.wdm")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\TRETS.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App UltraEdit")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\UltraEdit-32 Text Editor.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App Winpsar")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\WinPSAR.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\NMS App WinZip32")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\WinZip.LNK" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

If InGroup("TMS\TMS App WS_FTP Pro")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\WS_FTP Pro.lnk" "%userprofile%\Start Menu\Shared Programs\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Action Request System 4.0
;**
;*************************************************************************

If InGroup("TMS\MLSG App Remedy 4 Client")
If Exist("%userprofile%\Start Menu\Shared Programs\Action Request System 4.0\")=0
MD "%userprofile%\Start Menu\Shared Programs\Action Request System 4.0\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Action Request System 4.0\Remedy User.LNK" "%userprofile%\Start Menu\Shared Programs\Action Request System 4.0\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Action Request System 4.0\Remedy Notifier.LNK" "%userprofile%\Start Menu\Shared Programs\Action Request System 4.0\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Business Tools
;**
;*************************************************************************

If InGroup("TMS\TMS App NetSend")
If Exist("%userprofile%\Start Menu\Shared Programs\Business Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Business Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Business Tools\NetSend.LNK" "%userprofile%\Start Menu\Shared Programs\Business Tools\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\ComplianceWare
;**
;*************************************************************************

If InGroup("TMS\TMS App ComplianceWare")
If Exist("%userprofile%\Start Menu\Shared Programs\ComplianceWare\")=0
MD "%userprofile%\Start Menu\Shared Programs\ComplianceWare\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\ComplianceWare\*.*" "%userprofile%\Start Menu\Shared Programs\ComplianceWare\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\CustomView
;**
;*************************************************************************

If InGroup("TMS\App CustomView Director")
If Exist("%userprofile%\Start Menu\Shared Programs\CustomView\")=0
MD "%userprofile%\Start Menu\Shared Programs\CustomView\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\CustomView\Director.lnk" "%userprofile%\Start Menu\Shared Programs\CustomView\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\CustomView\Director Help.lnk" "%userprofile%\Start Menu\Shared Programs\CustomView\*.*"
EndIf

If InGroup("TMS\App CustomView Producer")
If Exist("%userprofile%\Start Menu\Shared Programs\CustomView\")=0
MD "%userprofile%\Start Menu\Shared Programs\CustomView\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\CustomView\Producer.lnk" "%userprofile%\Start Menu\Shared Programs\CustomView\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\CustomView\Producer Help.lnk" "%userprofile%\Start Menu\Shared Programs\CustomView\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\CustomView\Real Time Fields Help.lnk" "%userprofile%\Start Menu\Shared Programs\CustomView\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Dealer Analysis
;**
;*************************************************************************

If InGroup("TMS\TMS App DealerAnalysis")
If Exist("%userprofile%\Start Menu\Shared Programs\Dealer Analysis\")=0
MD "%userprofile%\Start Menu\Shared Programs\Dealer Analysis\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Dealer Analysis\Complaints.LNK" "%userprofile%\Start Menu\Shared Programs\Dealer Analysis\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Dealer Analysis\Correspondent Complaints.LNK" "%userprofile%\Start Menu\Shared Programs\Dealer Analysis\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Davox
;**
;*************************************************************************

If Exist("c:\Davox\pcws\clapi\cl_api.exe")
If Exist("%userprofile%\Start Menu\Shared Programs\Davox\")=0
MD "%userprofile%\Start Menu\Shared Programs\Davox\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Davox\Davox Exclusion.LNK" "%userprofile%\Start Menu\Shared Programs\Davox\*.*"
EndIf

If InGroup("TMS\NMS All Users")
If Exist("%userprofile%\Start Menu\Shared Programs\Davox\")=0
MD "%userprofile%\Start Menu\Shared Programs\Davox\"
EndIf
; Copy @SCRIPTDIR + "\SharedApps\Start Menu\Davox\Davox Monitor.LNK" "%userprofile%\Start Menu\Shared Programs\Davox\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Davox\VI Code Translator.LNK" "%userprofile%\Start Menu\Shared Programs\Davox\*.*"
EndIf

;If Exist("c:\Davox\pcws\clapi\cl_api.exe")
; If Exist("%userprofile%\Start Menu\Shared Programs\Davox\")=0
; MD "%userprofile%\Start Menu\Shared Programs\Davox\"
; EndIf
; Copy @SCRIPTDIR + "\SharedApps\Start Menu\Davox\Exclusion Generator.LNK" "%userprofile%\Start Menu\Shared Programs\Davox\*.*"
;EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Horizon
;**
;*************************************************************************

If InGroup("TMS\App Horizon")
If Exist("%userprofile%\Start Menu\Shared Programs\Horizon\")=0
MD "%userprofile%\Start Menu\Shared Programs\Horizon\"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Title Tracking Database.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Valuation Services Database.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Eviction Tracking Database.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Vendor Upload.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Chargeoff Log.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\REO CO Process.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\QC Module.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Clear QC Information.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\Fidelity Invoice Database.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Horizon\CFK Calculator.LNK" "%userprofile%\Start Menu\Shared Programs\Horizon\*.*"

EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Human Resources
;**
;*************************************************************************

If InGroup("TMS\App CLT Personic")
If Exist("%userprofile%\Start Menu\Shared Programs\Human Resources\")=0
MD "%userprofile%\Start Menu\Shared Programs\Human Resources\"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Human Resources\CLT Personic.lnk" "%userprofile%\Start Menu\Shared Programs\Human Resources\*.*"
EndIf

If InGroup("TMS\App Restrac")
If Exist("%userprofile%\Start Menu\Shared Programs\Human Resources\")=0
MD "%userprofile%\Start Menu\Shared Programs\Human Resources\"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Human Resources\Restrac.lnk" "%userprofile%\Start Menu\Shared Programs\Human Resources\*.*"
EndIf

If InGroup("TMS\App Tivoli Service Desk")
If Exist("%userprofile%\Start Menu\Shared Programs\Human Resources\")=0
MD "%userprofile%\Start Menu\Shared Programs\Human Resources\"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\Human Resources\Tivoli Service Desk.lnk" "%userprofile%\Start Menu\Shared Programs\Human Resources\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\IT Applications
;**
;*************************************************************************

If Exist("%userprofile%\Start Menu\Shared Programs\IT Applications\")=0
MD "%userprofile%\Start Menu\Shared Programs\IT Applications\"
EndIf

If InGroup("TMS\MLSG App BackOnTrack")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Back On Track.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\App BPO")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\BPO.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App BreachLetter")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Breach Letter.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App CheckPost")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Check Post.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App CheckRecon")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Check Reconciliation.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App CheckUpdate")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Check Update.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\NMS App CPINavigator")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\CPI Navigator.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App DeferUtil")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Deferment Utility.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App Insurance EDI")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Insurance EDI.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App IT Admin")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\IT Admin.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App IT Maintenance")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\IT Maintenance.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\NMS App IT Reports")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\IT Mapping.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\IT Reports.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App LetterWriter2000")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Letter Writer 2000.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App LetterWriterAdmin")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Letter Writer Administrator.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App Loan Queue")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Loan Queue.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App Manual Breach")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Manual Breach Letter.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\App Propertytax")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Propertytax.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App Skipwire")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Skipwire.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

If InGroup("TMS\MLSG App SpeedPop")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\SpeedPay Population.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\SysFlow Comments.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"

If InGroup("TMS\MLSG App Telewire")
Copy @SCRIPTDIR + "\SharedApps\Start Menu\IT Applications\Telewire.LNK" "%userprofile%\Start Menu\Shared Programs\IT Applications\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\LenStar
;**
;*************************************************************************

If InGroup("TMS\NMS App LenStar")
If Exist("%userprofile%\Start Menu\Shared Programs\LenStar\")=0
MD "%userprofile%\Start Menu\Shared Programs\LenStar\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LenStar\LenStar Tracking.LNK" "%userprofile%\Start Menu\Shared Programs\LenStar\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LenStar\Order Entry.LNK" "%userprofile%\Start Menu\Shared Programs\LenStar\*.*"
EndIf

If InGroup("TMS\NMS App Reflectn")
If Exist("%userprofile%\Start Menu\Shared Programs\LenStar\")=0
MD "%userprofile%\Start Menu\Shared Programs\LenStar\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LenStar\MSP - Reflection.LNK" "%userprofile%\Start Menu\Shared Programs\LenStar\*.*"
EndIf

If InGroup("TMS\MLSG App BidModel")
If Exist("%userprofile%\Start Menu\Shared Programs\LenStar\")=0
MD "%userprofile%\Start Menu\Shared Programs\LenStar\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\LenStar\Bid Model.LNK" "%userprofile%\Start Menu\Shared Programs\LenStar\*.*"

EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Office 2000
;**
;*************************************************************************

If InGroup("TMS\App Citrix Access 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Access 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"
EndIf

If InGroup("TMS\App Citrix Excel 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Excel 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"
EndIf

If InGroup("TMS\App Citrix PowerPoint 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\PowerPoint 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"
EndIf

If InGroup("TMS\App Citrix Project 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Project 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"
EndIf

If InGroup("TMS\App Citrix Publisher 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Publisher 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"
EndIf

If InGroup("TMS\App Citrix Word 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Word 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"

EndIf

If InGroup("TMS\App Citrix Visio 2000")
If Exist("%userprofile%\Start Menu\Shared Programs\Office 2000\")=0
MD "%userprofile%\Start Menu\Shared Programs\Office 2000\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Office 2000\Visio 2000.LNK" "%userprofile%\Start Menu\Shared Programs\Office 2000\*.*"

EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Phonix
;**
;*************************************************************************

If InGroup("TMS\TMS App Phonix")
If Exist("%userprofile%\Start Menu\Shared Programs\Phonix\")=0
MD "%userprofile%\Start Menu\Shared Programs\Phonix\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Phonix\Phonix.LNK" "%userprofile%\Start Menu\Shared Programs\Phonix\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Polaris
;**
;*************************************************************************

If InGroup("TMS\App PCR")
If Exist("%userprofile%\Start Menu\Shared Programs\Polaris\")=0
MD "%userprofile%\Start Menu\Shared Programs\Polaris\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Polaris\Corr Report.LNK" "%userprofile%\Start Menu\Shared Programs\Polaris\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Polaris\Corr Report Install.LNK" "%userprofile%\Start Menu\Shared Programs\Polaris\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Polaris\PCR.LNK" "%userprofile%\Start Menu\Shared Programs\Polaris\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Server Tools
;**
;*************************************************************************

If InGroup("TMS\MLSG App EA")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\Enterprise Administrator.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\HelpDesk")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\Create User's HomeDrive.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\MLSG App RightFax")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\RightFax Administrator.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\RightFax Utility.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\MLSG App Server Manager")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\Server Manager.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\MLSG App SQL Utilities")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\SQL 6.5 Enterprise Manager.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\MLSG App User Manager")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\User Manager For Domains.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\App AirSourcePro")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\AirSource Pro.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

If InGroup("TMS\App FileNet Admin")
If Exist("%userprofile%\Start Menu\Shared Programs\Server Tools\")=0
MD "%userprofile%\Start Menu\Shared Programs\Server Tools\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Server Tools\FileNet Admin.LNK" "%userprofile%\Start Menu\Shared Programs\Server Tools\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\SQL Scripts
;**
;*************************************************************************

If InGroup("TMS\App SQLScripts")
If Exist("%userprofile%\Start Menu\Shared Programs\SQL Scripts\")=0
MD "%userprofile%\Start Menu\Shared Programs\SQL Scripts\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\SQL Scripts\ForcedPlacedInsurance.LNK" "%userprofile%\Start Menu\Shared Programs\SQL Scripts\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\SQL Scripts\PreviouslyPosted.LNK" "%userprofile%\Start Menu\Shared Programs\SQL Scripts\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\SQL Scripts\SeriouslyDelq.LNK" "%userprofile%\Start Menu\Shared Programs\SQL Scripts\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Source Safe
;**
;*************************************************************************

If InGroup("TMS\TMS App SourceSafeAdmin")
If Exist("%userprofile%\Start Menu\Shared Programs\Source Safe\")=0
MD "%userprofile%\Start Menu\Shared Programs\Source Safe\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Source Safe\Source Safe Admin.LNK" "%userprofile%\Start Menu\Shared Programs\Source Safe\*.*"
EndIf
If InGroup("TMS\TMS App SourceSafe")
If Exist("%userprofile%\Start Menu\Shared Programs\Source Safe\")=0
MD "%userprofile%\Start Menu\Shared Programs\Source Safe\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Source Safe\Source Safe Explorer.LNK" "%userprofile%\Start Menu\Shared Programs\Source Safe\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\TCS
;**
;*************************************************************************

If InGroup("TMS\NMS App TCS")
If Exist("%userprofile%\Start Menu\Shared Programs\TCS\")=0
MD "%userprofile%\Start Menu\Shared Programs\TCS\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\TCS\TCS Browser.LNK" "%userprofile%\Start Menu\Shared Programs\TCS\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\TCS\TeleCenter System.LNK" "%userprofile%\Start Menu\Shared Programs\TCS\*.*"
EndIf

;*************************************************************************
;**
;** Start Menu\Shared Programs\Visio Standard
;**
;*************************************************************************

If InGroup("TMS\NMS App Visio5")
If Exist("%userprofile%\Start Menu\Shared Programs\Visio Standard\")=0
MD "%userprofile%\Start Menu\Shared Programs\Visio Standard\"
MD "%userprofile%\Start Menu\Shared Programs\Visio Standard\Visio Documentation\"
EndIf
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Visio Standard\Visio Standard.LNK" "%userprofile%\Start Menu\Shared Programs\Visio Standard\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Visio Standard\Visio Documentation\Using Visio Products.LNK" "%userprofile%\Start Menu\Shared Programs\Visio Standard\Visio Documentation\*.*"
Copy @SCRIPTDIR + "\SharedApps\Start Menu\Visio Standard\Visio Documentation\Developing Visio Solutions.LNK" "%userprofile%\Start Menu\Shared Programs\Visio Standard\Visio Documentation\*.*"
EndIf