home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Internet Business Development Kit / PRODUCT_CD.iso / sqlsvr / ptk / mips / setup.inf < prev    next >
Encoding:
INI File  |  1996-01-04  |  54.0 KB  |  1,256 lines
  1. ;***************************************************************************
  2. ;***************************************************************************
  3. ;** Microsoft NT SQL Server V4.2 PTK Setup - Main Setup Script.           **
  4. ;** Copyright (C) Microsoft 1992.                                         **
  5. ;**                                                                       **
  6. ;** HISTORY:                                                              **
  7. ;**     DLL & INF Created:      12/92                                     **
  8. ;**                                                                       **
  9. ;***************************************************************************
  10. ;***************************************************************************
  11.  
  12. [Shell Commands]
  13.         set-title "SQL Server Setup"
  14.         ifstr(i) $(!STF_OS) == "NT"
  15.            install LoadSetupLibrary
  16.         else
  17.            install LoadSetupWLibrary
  18.         endif
  19.  
  20.         set-subst LF = "\n"
  21.         set Exit_Code = $(!SETUP_ERROR_GENERAL)
  22.  
  23.         StartWait
  24.         read-syms GeneralConstants
  25.         read-syms LanguageVar
  26.         detect    LanguageVar
  27.  
  28.         ifstr(i) $(Debug) == "ON"
  29.           LibraryProcedure Result, $(!DLLSQL), Debugger "15"
  30.         endif
  31.  
  32. checksrcdir =+
  33.         ifstr(i) $(STF_SRCTYPE) == "DOS"
  34.         set STF_SRCTYPE = "DOS"
  35.         endif
  36.         read-syms UiVars
  37.         detect    UiVars
  38.  
  39.         EndWait
  40.  
  41.         read-syms SetupInit$(!STF_LANGUAGE)
  42.         LibraryProcedure !ComputerName, $(!DLLSQL), GetMachineName
  43.         LibraryProcedure !SQLSetupModule, $(!DLLSQL), SQLDLLInit $(STF_HWND)
  44.         LibraryProcedure !SetupFileVersion, $(!DLLSQL), GetProductFileVersion $(!SQLSetupModule)
  45.  
  46.         set !UserType = "Admin"
  47.         ifstr(i) $(!STF_OS) == "NT"
  48.             shell "" DoAdminCheck
  49.             ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  50.                 set !UserType = "User"
  51.             endif
  52.         else
  53.             set !UserType = "User"
  54.         endif
  55.  
  56.         read-syms FailedUserSetupQuit$(!STF_LANGUAGE)
  57.         shell "" DoWelcome
  58.         ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  59.           goto setupnotdone
  60.         endif
  61.         ifstr(i) $(!STF_OS) == "NT"
  62.            LibraryProcedure Result, $(!DLLSQL), GetServiceState "\\"$(!ComputerName),$(!SQLServerService)
  63.            ifstr(i) $(Result) == "SERVICE_RUNNING"
  64.              read-syms STR_ServiceStillRunning
  65.              goto setupnotdone
  66.            endif
  67.         endif
  68.  
  69.  
  70. ;        ifstr(i) $(!Owner) == ""
  71. ;         shell "" DoLicense
  72. ;         ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  73. ;            goto setupnotdone
  74. ;         endif
  75. ;       else
  76. ;         shell "" DoAlreadyInstalled
  77. ;         ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  78. ;           read-syms FailedUserSetupQuit$(!STF_LANGUAGE)
  79. ;            goto setupnotdone
  80. ;         endif
  81. ;        endif
  82.  
  83. poseSetupType =+
  84.           shell "" DoSetupType
  85.           ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  86.             goto setupnotdone
  87.           endif
  88.           shell "" DoGetSQLPath
  89.           ifstr(i) $($R0) == "STATUS_BACK"
  90.             goto poseSetupType
  91.           else-ifstr(i) $($R0) != "STATUS_SUCCESSFUL"
  92.             goto setupnotdone
  93.           endif
  94.  
  95.           read-syms MailManDlg$(!STF_LANGUAGE)
  96.           LibraryProcedure DlgMailMan, $(!DLLSQL), BillBoard $(!STF_HWND),$(DlgTemplate),$(!SQLDlgNames)
  97.  
  98.           ;*****************************************************************
  99.           ;* Copy the SQL Server system files to the SQL Server path.
  100.           ;*****************************************************************
  101.           read-syms ProgressCopyVars
  102.           install InstallBaseInstallFiles
  103.           ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  104.             LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgMailMan)
  105.             read-syms FileCouldNotBeCopied$(!STF_LANGUAGE)
  106.             LibraryProcedure !MsgText, $(!DLLSQL), AppendToString $(!MsgText),$(!AddlText)
  107.             goto setupnotdone
  108.           endif
  109.  
  110.           install RemoveOldSQLPTKGroup
  111.           install CreateSQLProgmanItems
  112.  
  113.           LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgMailMan)
  114.           read-syms CompletionInstalled$(!STF_LANGUAGE)
  115.  
  116. setupdone =+
  117.         set Exit_Code = $(!SETUP_ERROR_SUCCESS)
  118. setupnotdone =+
  119.         read-syms SetupDoneDlg$(!STF_LANGUAGE)
  120.         LibraryProcedure DlgDone, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"",""
  121.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  122.         LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgDone)
  123.         goto end
  124. installdone =+
  125.         set Exit_Code = $(!SETUP_ERROR_SUCCESS)
  126.         read-syms InstallCompleted$(!STF_LANGUAGE)
  127.         LibraryProcedure DlgDone, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"",""
  128.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  129.         LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgDone)
  130.         ifstr(i) $(DLGEVENT) == "BACK"
  131.           goto end
  132.         else
  133.           goto rebootend
  134.         endif
  135. rebootend =+
  136.         install Install-Shutdown
  137. end =+
  138.         LibraryProcedure Result, $(!DLLSQL), SQLDLLFinish
  139.         install FreeSetupLibrary
  140.         exit
  141.  
  142.  
  143.  
  144. ;*************************************************************************
  145. ;* FUNCTION:    QueryUserQuit                                            *
  146. ;*                                                                       *
  147. ;* USE:         Displays 'Are you sure you wish to quit setup' dialog box*
  148. ;*                                                                       *
  149. ;* PARAMETERS:  None                                                     *
  150. ;*                                                                       *
  151. ;* RETURNS:     $R0     CANCEL              If the cancelled the quit    *
  152. ;*                      OK                  If the user opted to quit    *
  153. ;*************************************************************************
  154.  
  155. [QueryUserQuit]
  156.         set Status     = STATUS_FAILED
  157.         set UserAction = CANCEL
  158.         read-syms ExitWarningDlg$(!STF_LANGUAGE)
  159.         ui start "ExitWarning"
  160.         ifstr(i) $(DLGEVENT) == "YES"
  161.           set Status     = STATUS_SUCCESSFUL
  162.           set UserAction = "OK"
  163.           read-syms FailedUserQuit$(!STF_LANGUAGE)
  164.           ifstr(i) $(!AddlText) != $(!MsgText)
  165.             LibraryProcedure !MsgText, $(!DLLSQL), AppendToString $(!MsgText),$(!AddlText)
  166.           endif
  167.         else-ifstr(i) $(DLGEVENT) == "NO"
  168.           set Status     = STATUS_SUCCESSFUL
  169.           set UserAction = "CANCEL"
  170.         endif
  171.         Return $(Status) $(UserAction)
  172.  
  173.  
  174. [DoAdminCheck]
  175.         set Status = STATUS_FAILED
  176.     LibraryProcedure Result, $(!DLLSQL), IsAdmin
  177.         ifstr(i) $(Result) != "ACCESS_DENIED"
  178.           set Status = STATUS_SUCCESSFUL
  179.         endif
  180.     Return $(Status)
  181.  
  182.  
  183. ;*************************************************************************
  184. ;* FUNCTION:    DoWelcome                                                *
  185. ;*                                                                       *
  186. ;* USE:         Displays the Welcome to SQL Server Setup dialog.         *
  187. ;*                                                                       *
  188. ;* PARAMETERS:  None                                                     *
  189. ;*                                                                       *
  190. ;* RETURNS:     $R0     STATUS_USERQUIT     If the user quit setup.      *
  191. ;*                      STATUS_SUCCESSFUL   If 'A. OK                    *
  192. ;*************************************************************************
  193.  
  194. [DoWelcome]
  195.         set Status = STATUS_FAILED
  196.         read-syms WelcomeDlg$(!STF_LANGUAGE)
  197.         LibraryProcedure DlgWelcome, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  198. welcome = +
  199.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  200.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  201.           set Status = STATUS_SUCCESSFUL
  202.         else-ifstr(i) $(DLGEVENT) == "EXIT"
  203.           shell "" QueryUserQuit $(!STF_LANGUAGE)
  204.           ifstr(i) $($R1) == "OK"
  205.             set Status = STATUS_USERQUIT
  206.           else
  207.             goto welcome
  208.           endif
  209.         endif
  210.         LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgWelcome)
  211.         Return $(Status)
  212.  
  213.  
  214.  
  215. ;*************************************************************************
  216. ;* FUNCTION:    DoAlreadyInstalled                                       *
  217. ;*                                                                       *
  218. ;* USE:         Displays copyright information regarding a previous      *
  219. ;*              installation.                                            *
  220. ;*                                                                       *
  221. ;* PARAMETERS:  None                                                     *
  222. ;*                                                                       *
  223. ;* RETURNS:     $R0     STATUS_FAILED     If the user bottled out        *
  224. ;*                      STATUS_SUCCESSFUL If user is brave enough        *
  225. ;*************************************************************************
  226.  
  227. [DoAlreadyInstalled]
  228.         set Status = STATUS_FAILED
  229.         read-syms AlreadyInstalledDlg$(!STF_LANGUAGE)
  230.         LibraryProcedure DlgAlready, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"3",$(!NetworkSelList)
  231.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  232.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  233.           set Status = STATUS_SUCCESSFUL
  234.         endif
  235.         LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgAlready)
  236.         Return $(Status)
  237.  
  238.  
  239.  
  240. ;*************************************************************************
  241. ;* FUNCTION:    DoLicense                                                *
  242. ;*                                                                       *
  243. ;* USE:         Displays dialogs to retrieve and verify User and         *
  244. ;*              Organization registration information.                   *
  245. ;*                                                                       *
  246. ;* PARAMETERS:  None                                                     *
  247. ;*                                                                       *
  248. ;* RETURNS:     $R0     STATUS_FAILED     If something went wrong.       *
  249. ;*                      STATUS_USERQUIT  If the user bottled out.        *
  250. ;*************************************************************************
  251.  
  252. [DoLicense]
  253.         set Status   = STATUS_FAILED
  254.         set DlgLicense = ""
  255. license =+
  256.         ifstr(i) $(!OrgName) != ""
  257.           goto start_fullname
  258.         else
  259.           goto start_fullnameorgname
  260.         endif
  261. start_fullname =+
  262.         read-syms QueryFullNameDlg$(!STF_LANGUAGE)
  263.         LibraryProcedure DlgLicense, $(!DLLSQL), SQLDlgDisplay $(!STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  264. fullname =+
  265.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  266.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  267.           LibraryProcedure EditTextOut, $(!DLLSQL), DlgGetEditText $(DlgLicense),"EDIT1"
  268.           ifstr(i) $(EditTextOut) == ""
  269.             read-syms DBNoName$(!STF_LANGUAGE)
  270.             shell "" MessageError
  271.             goto fullname
  272.           else
  273.             set !FullName = $(EditTextOut)
  274.             LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgLicense)
  275.             goto start_verifyfullname
  276.           endif
  277.         else-ifstr(i) $(DLGEVENT) == "EXIT"
  278.           shell "" QueryUserQuit $(!STF_LANGUAGE)
  279.           ifstr(i) $($R1) == "OK"
  280.             set Status = STATUS_USERQUIT
  281.             goto finish_license
  282.           else
  283.             goto fullname
  284.           endif
  285.         else
  286.           goto finish_license
  287.         endif
  288.  
  289. start_verifyfullname =+
  290.         read-syms VerifyFullNameDlg$(!STF_LANGUAGE)
  291.         LibraryProcedure DlgLicense, $(!DLLSQL), SQLDlgDisplay $(!STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  292. verifyfullname =+
  293.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  294.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  295.           set Status = STATUS_SUCCESSFUL
  296.           goto finish_license
  297.         else-ifstr(i) $(DLGEVENT) == "BACK"
  298.           LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgLicense)
  299.           goto start_fullname
  300.         else-ifstr(i) $(DLGEVENT) == "EXIT"
  301.           shell "" QueryUserQuit $(!STF_LANGUAGE)
  302.           ifstr(i) $($R1) == "OK"
  303.             set Status = STATUS_USERQUIT
  304.             goto finish_license
  305.           else
  306.             goto verifyfullname
  307.           endif
  308.        else
  309.         goto finish_license
  310.        endif
  311.  
  312. start_fullnameorgname =+
  313.         read-syms QueryFullNameOrgNameDlg$(!STF_LANGUAGE)
  314.         LibraryProcedure DlgLicense, $(!DLLSQL), SQLDlgDisplay $(!STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  315. fullnameorgname =+
  316.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  317.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  318.           LibraryProcedure EditTextOut1, $(!DLLSQL), DlgGetEditText $(DlgLicense),"EDIT1"
  319.           LibraryProcedure EditTextOut2, $(!DLLSQL), DlgGetEditText $(DlgLicense),"EDIT2"
  320.           ifstr(i) $(EditTextOut1) == ""
  321.             read-syms DBNoNameNOrg$(!STF_LANGUAGE)
  322.             shell "" MessageError
  323.             goto fullnameorgname
  324.           else
  325.             LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgLicense)
  326.             set !FullName = $(EditTextOut1)
  327.             set !OrgName  = $(EditTextOut2)
  328.             goto start_verifyfullnameorgname
  329.           endif
  330.         else-ifstr(i) $(DLGEVENT) == "EXIT"
  331.           shell "" QueryUserQuit $(!STF_LANGUAGE)
  332.           ifstr(i) $($R1) == "OK"
  333.             set Status = STATUS_USERQUIT
  334.             goto finish_license
  335.           else
  336.             set ReInit = NO
  337.             goto fullnameorgname
  338.           endif
  339.         else
  340.           goto finish_license
  341.         endif
  342.  
  343. start_verifyfullnameorgname = +
  344.         read-syms VerifyFullNameOrgNameDlg$(!STF_LANGUAGE)
  345.         LibraryProcedure DlgLicense, $(!DLLSQL), SQLDlgDisplay $(!STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  346. verifyfullnameorgname =+
  347.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  348.         ifstr(i) $(DLGEVENT) == "CONTINUE"
  349.           set Status = STATUS_SUCCESSFUL
  350.           goto finish_license
  351.         else-ifstr(i) $(DLGEVENT) == "BACK"
  352.           LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgLicense)
  353.           goto start_fullnameorgname
  354.         else-ifstr(i) $(DLGEVENT) == "EXIT"
  355.           shell "" QueryUserQuit $(!STF_LANGUAGE)
  356.           ifstr(i) $($R1) == "OK"
  357.             set Status = STATUS_USERQUIT
  358.             goto finish_license
  359.           else
  360.             goto verifyfullnameorgname
  361.           endif
  362.         else
  363.           goto finish_license
  364.         endif
  365. finish_license = +
  366.         ifstr(i) $(DlgLicense) != ""
  367.           LibraryProcedure Result, $(!DLLSQL), CloseDialog $(DlgLicense)
  368.         endif
  369.         Return $(Status)
  370.  
  371.  
  372.  
  373. ;*************************************************************************
  374. ;* FUNCTION:    DoSetupType                                              *
  375. ;*                                                                       *
  376. ;* USE:         Displays dialogs to determine what the user wishes to    *
  377. ;*              install.                                                 *
  378. ;*                                                                       *
  379. ;* PARAMETERS:  None                                                     *
  380. ;*                                                                       *
  381. ;* RETURNS:     $R0     STATUS_FAILED     If something went wrong.       *
  382. ;*                      STATUS_USERQUIT  If the user bottled out.        *
  383. ;*************************************************************************
  384.  
  385. [DoSetupType]
  386.         set Status = STATUS_FAILED
  387.         read-syms InstallTypeChoicesDlg$(!STF_LANGUAGE)
  388.         LibraryProcedure SetupTypeDlg, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"MODAL",""
  389.         LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON1","TRUE"
  390.         LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON2","TRUE"
  391.         LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON3","TRUE"
  392.         LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON4","TRUE"
  393.         ifstr(i) $(!RiscType) != "RISC"
  394.             LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON5","TRUE"
  395.             LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON6","TRUE"
  396.         else
  397.             LibraryProcedure Result, $(!DLLSQL), EnableDlgBtn $(SetupTypeDlg),"UNIBUTTON5","FALSE"
  398.             LibraryProcedure Result, $(!DLLSQL), EnableDlgBtn $(SetupTypeDlg),"UNIBUTTON6","FALSE"
  399.             LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON5","FALSE"
  400.             LibraryProcedure Result, $(!DLLSQL), DlgCheckButton $(SetupTypeDlg),"UNIBUTTON6","FALSE"
  401.         endif
  402. setuptype = +
  403.     LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  404.     ifstr(i) $(DLGEVENT) == "EXIT"
  405.         shell "" QueryUserQuit $(!STF_LANGUAGE)
  406.         ifstr(i) $($R1) == "OK"
  407.             set Status = STATUS_USERQUIT
  408.         else
  409.             goto setuptype
  410.         endif
  411.     else
  412.         set Status = STATUS_SUCCESSFUL
  413.         LibraryProcedure !InstOptDBLibDevLibs, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON1"
  414.         LibraryProcedure !InstOptDBLibSamples, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON2"
  415.         LibraryProcedure !InstOptODSDevLibs, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON3"
  416.         LibraryProcedure !InstOptODSSamples, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON4"
  417.         LibraryProcedure !InstOptVBSQL, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON5"
  418.         LibraryProcedure !InstOptMSDTCSamples, $(!DLLSQL), IsDlgBtnChecked $(SetupTypeDlg),"UNIBUTTON6"
  419.         ifstr(i) $(!InstOptDBLibDevLibs) == "NOTCHECKED"
  420.             ifstr(i) $(!InstOptODSLibDevLibs) == "NOTCHECKED"
  421.                 ifstr(i) $(!InstOptDBLibSamples) == "NOTCHECKED"
  422.                     ifstr(i) $(!InstOptODSSamples) == "NOTCHECKED"
  423.                         ifstr(i) $(!InstOptVBSQL) == "NOTCHECKED"
  424.                             ifstr(i) $(!InstOptMSDTCSamples) == "NOTCHECKED"
  425.                                 read-syms NoInstOptsSelected$(!STF_LANGUAGE)
  426.                                 shell "" MessageError
  427.                                 goto setuptype
  428.                             endif
  429.                         endif
  430.                     endif
  431.                 endif
  432.             endif
  433.         endif
  434.     endif
  435. finish_options = +
  436.     LibraryProcedure Result, $(!DLLSQL), CloseDialog $(SetupTypeDlg)
  437.     Return $(Status)
  438.  
  439.  
  440.  
  441. ;*************************************************************************
  442. ;* FUNCTION:    DoGetSQLPath                                             *
  443. ;*                                                                       *
  444. ;* USE:         Calls the Get Path dialog box to determine the path for  *
  445. ;*              the SQL directory, and sets a flag denoting its creation.*
  446. ;*                                                                       *
  447. ;* PARAMETERS:  None                                                     *
  448. ;*                                                                       *
  449. ;* RETURNS:     $R0     STATUS_FAILED     If something went wrong.       *
  450. ;*                      STATUS_USERQUIT  If the user bottled out.        *
  451. ;*************************************************************************
  452.  
  453. [DoGetSQLPath]
  454.         read-syms GetSQLPathDlg$(!STF_LANGUAGE)
  455.         shell "" DoGetPath
  456.         set Status = $($R0)
  457.         ifstr(i) $($R0) == "STATUS_SUCCESSFUL"
  458.           set !SQLPath = $(!PathOut)
  459.           set !CreateSQLPath = $(!CreatePath)
  460.         endif
  461.         Return $(Status)
  462.  
  463.  
  464. [DoGetPath]
  465.         set Status = STATUS_FAILED
  466. start_getpath = +
  467.         ifstr(i) $(!DlgEdit) == ""
  468.           read-syms GetPathDlg$(!STF_LANGUAGE)
  469.           LibraryProcedure !DlgEdit, $(!DLLSQL), SQLDlgDisplay $(STF_HWND),$(DlgTemplate),"",$(!SQLDlgNames),"",""
  470.         endif
  471. getpath = +
  472.         LibraryProcedure DLGEVENT, $(!DLLSQL), WaitEvent
  473.         ifstr(i) $(DLGEVENT) == "EXIT"
  474.           ifstr(i) $(!AllowExit) == "YES"
  475.             shell "" QueryUserQuit $(!STF_LANGUAGE)
  476.             ifstr(i) $($R1) == "OK"
  477.               set Status = STATUS_USERQUIT
  478.             else
  479.               goto getpath
  480.             endif
  481.           else
  482.             set Status = STATUS_CANCEL
  483.           endif
  484.         else-ifstr(i) $(DLGEVENT) == "BACK"
  485.           set Status = "STATUS_BACK"
  486.         else-ifstr(i) $(DLGEVENT) == "CONTINUE"
  487.           LibraryProcedure EditTextOut, $(!DLLSQL), DlgGetEditText $(!DlgEdit),"EDIT1"
  488.           ifstr(i) $(EditTextOut) == ""
  489.             ifstr(i) $(!PermitNullName) == "NO"
  490.               read-syms $(!NoNameText)
  491.               shell "" MessageError
  492.               goto getpath
  493.             endif
  494.           endif
  495.           set Status = STATUS_SUCCESSFUL
  496.           set !PathOut = $(EditTextOut)
  497.           ifstr(i) $(!CreatePathPrompt) == "YES"
  498.             set DEST = $(!PathOut)
  499.             detect DetectDirectory
  500.             ifstr $(DirectoryThere) == "NO"
  501.               shell "" DoCreateDirectory
  502.               ifstr(i) $($R0) == "STATUS_YES"
  503.                 set !CreatePath = "YES"
  504.               else
  505.                 goto getpath
  506.               endif
  507.             endif
  508.           endif
  509.         endif
  510.         ifstr(i) $(!AutoPopoff) == "YES"
  511.           LibraryProcedure Result, $(!DLLSQL), CloseDialog $(!DlgEdit)
  512.           set !DlgEdit = ""
  513.         endif
  514.         Return $(Status)
  515.  
  516. [DoCreateDirectory]
  517.         read-syms YesNoDlg$(!STF_LANGUAGE)
  518.         ui start $(DlgTemplate)
  519.         ifstr(i) $(DLGEVENT) == "YES"
  520.           set Status = STATUS_YES
  521.         else
  522.           set Status = STATUS_NO
  523.         endif
  524.         Return $(Status)
  525.  
  526. [MessageError]
  527.         set Status = STATUS_FAILED
  528.         read-syms InfoMessage$(!STF_LANGUAGE)
  529.         ui start $(DlgTemplate)
  530.         Return $(Status)
  531.  
  532.  
  533. [Popup]
  534.         set tmpvar = $($0)
  535.         read-syms PopupInfo
  536.         ui start $(DlgTemplate)
  537.         ui pop 1
  538.         Return "STATUS_SUCCESSFUL"
  539.  
  540.  
  541. ;**************************************************************************
  542. ; DLL LOAD and FREE
  543. ; the following section contain commands to load specific dll libraries and
  544. ; to free them
  545. ;**************************************************************************
  546. [LoadSetupLibrary]
  547.         LoadLibrary "y" $(!STF_CWDDIR)sqlsetup.dll !DLLSQL
  548.         exit
  549.  
  550. [LoadSetupWLibrary]
  551.         LoadLibrary "y" $(!STF_CWDDIR)sqlsetuw.dll !DLLSQL
  552.         exit
  553.  
  554.  
  555. [FreeSetupLibrary]
  556.         FreeLibrary $(!DLLSQL)
  557.         exit
  558.  
  559. [Install-Shutdown]
  560.         LibraryProcedure STATUS,$(!DLLSQL),ShutdownSystem, ""
  561.         exit
  562.  
  563. [LanguageID]
  564.         ENG
  565.  
  566. [LanguageTextENG]
  567.         "English (American)"
  568.  
  569.  
  570. [LanguageVar]
  571.         STF_LANGUAGE    =       "" ? $(!DLLSQL) GetLanguage
  572.         LanguageList    =       ^(LanguageID, 1)
  573.  
  574. [DriveTypeVar]
  575.         DriveType       =       "" ? $(!DLLSQL) GetTypeOfDrive $(DriveToExamine)
  576.  
  577. [DetectDirectory]
  578.         DirectoryThere  =       "-" ? $(!DLLSQL) DoesDirExist $(DEST)
  579.  
  580. [InstallBaseInstallFiles]
  581.     CreateDir $(!SQLPath)
  582.     ifstr(i) $(!InstOptODSDevLibs) == "CHECKED"
  583.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)
  584.         CreateDir $(!SQLPath)"\"$(!DLLs)
  585.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!IncludeDir)
  586.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!LibDir)
  587.  
  588.         AddSectionFilesToCopyList "ODSInstallExes", $(!STF_CWDDIR), $(!SQLPath)"\"$(!Binaries)
  589.         AddSectionFilesToCopyList "ODSLibFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!LibDir)
  590.         AddSectionFilesToCopyList "ODSIncludeFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!IncludeDir)
  591.         AddSectionFilesToCopyList "ODSHelpFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!HelpDir)
  592.         ifstr(i) $(!STF_OS) == "NT"
  593.             AddSectionFilesToCopyList "Runtime", $(!STF_CWDDIR), $(!STF_WINDOWSSYSPATH)
  594.         else
  595.             AddSectionFilesToCopyList "Runtime", $(!STF_CWDDIR), $(!SQLPath)"\"$(!Binaries)
  596.         endif
  597.     endif
  598.     ifstr(i) $(!InstOptDBLibDevLibs) == "CHECKED"
  599.         CreateDir $(!SQLPath)"\"$(!DBLibDir)
  600.         CreateDir $(!SQLPath)"\"$(!RBinaries)
  601.         CreateDir $(!SQLPath)"\"$(!Binaries)
  602.         CreateDir $(!SQLPath)"\"$(!DLLs)
  603.         CreateDir $(!SQLPath)"\"$(!DLL16s)
  604.         CreateDir $(!SQLPath)"\"$(!HelpDir)
  605.         CreateDir $(!SQLPath)"\"$(!DBLibDir)"\"$(!IncludeDir)
  606.         CreateDir $(!SQLPath)"\"$(!DBLibDir)"\"$(!LibDir)
  607.         AddSectionFilesToCopyList "DBLibLibFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!LibDir)
  608.         AddSectionFilesToCopyList "DBLibIncludeFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!IncludeDir)
  609.         AddSectionFilesToCopyList "ControlPanel", $(!STF_CWDDIR), $(!SQLPath)"\"$(!Binaries)
  610.         ifstr(i) $(!STF_OS) == "NT"
  611.             AddSectionFilesToCopyList "Runtime", $(!STF_CWDDIR), $(!STF_WINDOWSSYSPATH)
  612.         else
  613.             AddSectionFilesToCopyList "Runtime", $(!STF_CWDDIR), $(!SQLPath)"\"$(!Binaries)
  614.         endif
  615.         AddSectionFilesToCopyList "DBLibHelp", $(!STF_CWDDIR), $(!SQLPath)"\"$(!HelpDir)
  616.         ifstr(i) $(!RiscType) != "RISC"
  617.             AddSectionFilesToCopyList "DBLibDosLibs", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!LibDir)
  618.             AddSectionFilesToCopyList "DBLibWin16Libs", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!LibDir)
  619.         endif
  620.     endif
  621.     ifstr(i) $(!InstOptMSDTCDevLibs) == "CHECKED"
  622.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)
  623.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!LibDir)
  624.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!IncludeDir)
  625.     endif
  626.     ifstr(i) $(!InstOptODSSamples) == "CHECKED"
  627.         CreateDir $(!SQLPath)"\"$(!DLLs)
  628.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)
  629.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)
  630.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)
  631.         ifstr(i) $(!RiscType) != "RISC"
  632.             CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)
  633.         endif
  634.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)
  635.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)"\"$(!BuildDir)
  636.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)"\"$(!BuildDir)
  637.         ifstr(i) $(!RiscType) != "RISC"
  638.             CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)"\"$(!BuildDir)
  639.             CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)"\"$(!BuildDir)"\"$(!ObjDir)
  640.         endif
  641.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)"\"$(!BuildDir)
  642.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)"\"$(!BuildDir)"\"$(!ObjDir)
  643.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)"\"$(!BuildDir)"\"$(!ObjDir)
  644.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)"\"$(!BuildDir)"\"$(!ObjDir)
  645.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)"\"$(!SrcDir)
  646.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)"\"$(!SrcDir)
  647.         ifstr(i) $(!RiscType) != "RISC"
  648.             CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)"\"$(!SrcDir)
  649.         endif
  650.         CreateDir $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)"\"$(!SrcDir)
  651.  
  652.         AddSectionFilesToCopyList "ODSSampleGtwyBuildFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)"\"$(!BuildDir)
  653.         AddSectionFilesToCopyList "ODSSampleGtwySourceFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!GatewayDir)"\"$(!SrcDir)
  654.         AddSectionFilesToCopyList "ODSSamplePSrvBuildFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)"\"$(!BuildDir)
  655.         AddSectionFilesToCopyList "ODSSamplePSrvSourceFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ProcSrvDir)"\"$(!SrcDir)
  656.         AddSectionFilesToCopyList "ODSSampleXPBuildFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)"\"$(!BuildDir)
  657.         AddSectionFilesToCopyList "ODSSampleXPSourceFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!XPDir)"\"$(!SrcDir)
  658.         AddSectionFilesToCopyList "ODSSamplesXPDLLFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DLLs)
  659.         ifstr(i) $(!RiscType) != "RISC"
  660.             AddSectionFilesToCopyList "ODSSampleODBCSourceFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)"\"$(!SrcDir)
  661.             AddSectionFilesToCopyList "ODSSampleODBCBuildFiles", $(!STF_CWDDIR), $(!SQLPath)"\"$(!OpenDSDir)"\"$(!SamplesDir)"\"$(!ODBCDir)"\"$(!BuildDir)
  662.         endif
  663.     endif
  664.     ifstr(i) $(!InstOptDBLibSamples) == "CHECKED"
  665.         CreateDir $(!SQLPath)"\"$(!DBLibDir)"\"$(!SamplesDir)
  666.         CreateDir $(!SQLPath)"\"$(!SQLOle)
  667.         CreateDir $(!SQLPath)"\"$(!SQLOle)"\"$(!IncludeDir)
  668.         CreateDir $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)
  669.         CreateDir $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!CDir)
  670.         CreateDir $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!CPPDir)
  671.         CreateDir $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!VBDir)
  672.         AddSectionFilesToCopyList "DBLibSamples", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!SamplesDir)
  673.         AddSectionFilesToCopyList "SQLOleRead", $(!STF_CWDDIR), $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)
  674.         AddSectionFilesToCopyList "SQLOleInclude", $(!STF_CWDDIR), $(!SQLPath)"\"$(!SQLOle)"\"$(!IncludeDir)
  675.         AddSectionFilesToCopyList "SQLOleCSamples", $(!STF_CWDDIR), $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!CDir)
  676.         AddSectionFilesToCopyList "SQLOleCPPSamples", $(!STF_CWDDIR), $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!CPPDir)
  677.         AddSectionFilesToCopyList "SQLOleVBSamples", $(!STF_CWDDIR), $(!SQLPath)"\"$(!SQLOle)"\"$(!SamplesDir)"\"$(!VBDir)
  678.         ifstr(i) $(!RiscType) != "RISC"
  679.             AddSectionFilesToCopyList "DBLibWin16Samples", $(!STF_CWDDIR), $(!SQLPath)"\"$(!DBLibDir)"\"$(!SamplesDir)
  680.         endif
  681.     endif
  682.     ifstr(i) $(!InstOptVBSQL) == "CHECKED"
  683.         CreateDir $(!SQLPath)"\"$(!VBSQLDir)
  684.         AddSectionFilesToCopyList "VBSQLSys", $(!STF_CWDDIR), $(!STF_WINDOWSSYSPATH)
  685.         AddSectionFilesToCopyList "VBSQL", $(!STF_CWDDIR), $(!SQLPath)"\"$(!VBSQLDir)
  686.     endif
  687.     ifstr(i) $(!InstOptMSDTCSamples) == "CHECKED"
  688.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)
  689.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)
  690.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCDBLibDir)
  691.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCODBCDir)
  692.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCTSQLDir)
  693.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!MSDTCIncDir)
  694.         CreateDir $(!SQLPath)"\"$(!MSDTCDir)"\"$(!MSDTCLibDir)
  695.         AddSectionFilesToCopyList "MSDTCDBLibSamples", $(!STF_CWDDIR),$(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCDBLibDir)
  696.         AddSectionFilesToCopyList "MSDTCODBCSamples", $(!STF_CWDDIR),$(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCODBCDir)
  697.         AddSectionFilesToCopyList "MSDTCTSQLSamples", $(!STF_CWDDIR),$(!SQLPath)"\"$(!MSDTCDir)"\"$(!SamplesDir)"\"$(!MSDTCTSQLDir)
  698.         AddSectionFilesToCopyList "MSDTCInc", $(!STF_CWDDIR),$(!SQLPath)"\"$(!MSDTCDir)"\"$(!MSDTCIncDir)
  699.         AddSectionFilesToCopyList "MSDTCLib", $(!STF_CWDDIR),$(!SQLPath)"\"$(!MSDTCDir)"\"$(!MSDTCLibDir)
  700.     endif
  701.     CopyFilesInCopyList
  702.     exit
  703.  
  704.  
  705.  
  706. [GeneralConstants]
  707.  
  708.  
  709. [UiVars]
  710.         SetupLang       = "ENG"
  711.         STF_PRODUCT     = SQLServerPTKInst
  712.         ProductVersion  = "NT 6.50.167"
  713.         Setup_Title     = "SQL Server 6.5 PTK Setup"
  714.         SQLServerService= "MSSQLServer"
  715.         WinHelpEXE    = "WINHLP32.EXE"
  716.         HelpSQLNTSetup  = "PTKSETUP.HLP"
  717.         HelpDBLib       = "DBLIBW.HLP"
  718.         Binaries        = "BINN"
  719.         RBinaries       = "BIN"
  720.         DLL16s          = "DLL16"
  721.         DLLs            = "BINN"
  722.         HelpDir         = "HELP"
  723.         OpenDSDir       = "OPENDS"
  724.         IncludeDir      = "INCLUDE"
  725.         GatewayDir      = "GATEWAY"
  726.         ProcSrvDir      = "PROCSRV"
  727.         ODBCDir        = "ODSODBC"
  728.         XPDir           = "XPDLL"
  729.         SourceDir       = "SOURCE"
  730.         SrcDir          = "SRC"
  731.         BuildDir        = "BUILD"
  732.         DBLibDir        = "DBLIB"
  733.         ObjDir          = "OBJ"
  734.         SamplesDir      = "SAMPLES"
  735.         SQLOle          = "SQLOLE"
  736.         IncludeDir    = "INCLUDE"
  737.         CDir        = "C"
  738.         CPPDir        = "CPP"
  739.         VBDir        = "VB"
  740.         LibDir          = "LIB"
  741.         SetupEXE        = "SETUP.EXE"
  742.         MSDTCDir        = "MSDTC"
  743.         MSDTCDBLibDir   = "DBLIB"
  744.         MSDTCODBCDir    = "ODBC"
  745.         MSDTCTSQLDir    = "TSQL"
  746.         MSDTCIncDir     = "INCLUDE"
  747.         MSDTCLibDir     = "LIB"
  748.         VBSQLDir        = "VBSQLOCX"
  749.  
  750.         STF_WINDOWSPATH = "" ? $(!DLLSQL) GetWindowsNtDir
  751.         STF_WINDOWSSYSPATH = "" ? $(!DLLSQL) GetWindowsNtSysDir
  752.         STF_UNUSEDDRIVES = {} ? $(!DLLSQL) GetUnusedDrives
  753.  
  754.         AllowExit       =       "NO"
  755.         Registration    =       ""
  756.         Owner           =       ""
  757.         OrgName         =       ""
  758.         FullName        =       ""
  759.         DefSQLPath      =       "C:\MSSQL"
  760.  
  761.         RegTypeString   =       "REG_SZ"
  762.         RegTypeExpString=       "REG_EXPAND_SZ"
  763.         RegTypeMulti    =       "REG_MULTI_SZ"
  764.         RegTypeDWord    =       "REG_DWORD"
  765.  
  766.         RegSWMS         =       "SOFTWARE\Microsoft"
  767.         RegValSysPath   =       "Path"
  768.  
  769.  
  770. ;*************************************************************************
  771. ;*************************************************************************
  772. ;* INTERNATIONALIZABLE CODE
  773. ;*************************************************************************
  774. ;*************************************************************************
  775.  
  776.         SQLProgPTKGrpName="Microsoft SQL Server 6.5 PTK"
  777.         SQLProgmanGrpName="Microsoft SQL Server 6.5"
  778.         OldSQLProgPTKGrpName="Microsoft SQL Server 6.0 PTK"
  779.         OldSQLProgmanGrpName="Microsoft SQL Server 6.0"
  780.  
  781.  
  782. [Source Media Descriptions]
  783.         1  = "PTK Diskette #1"  , TAGFILE = PTKDISK1
  784.  
  785. [CreateSQLProgmanItems]
  786.     ifstr(i) $(!UserType) == "Admin"
  787.         set SQLGroup = $(!SQLProgmanGrpName)
  788.         set ProgmanType = "COMMON"
  789.     else
  790.         set SQLGroup = $(!SQLProgPTKGrpName)
  791.         set ProgmanType = "VITAL"
  792.      endif
  793.      CreateProgManGroup $(SQLGroup),"",$(ProgmanType)
  794.     ifstr(i) $(!InstOptDBLibDevLibs) == "CHECKED"
  795.         RemoveProgmanItem $(SQLGroup),"DB-Library Help",$(ProgmanType)
  796.         ifstr(i) $(!STF_OS) == "NT"
  797.             CreateProgmanItem  $(SQLGroup),"DB-Library Help",$(!STF_WINDOWSSYSPATH)"\"$(!WinHelpEXE)" "$(!SQLPath)"\"$(!HelpDir)"\"$(!HelpDBLib),$(!STF_WINDOWSSYSPATH)"\"$(!WinHelpEXE),0,$(ProgmanType)
  798.         else
  799.             CreateProgmanItem  $(SQLGroup),"DB-Library Help",$(!STF_WINDOWSPATH)"\"$(!WinHelpEXE)" "$(!SQLPath)"\"$(!HelpDir)"\"$(!HelpDBLib),$(!STF_WINDOWSPATH)"\"$(!WinHelpEXE),0,$(ProgmanType)
  800.         endif
  801.     endif
  802.     exit
  803.  
  804. [RemoveOldSQLPTKGroup]
  805.     ifstr(i) $(!UserType) == "Admin"
  806.         set SQLGroup = $(!OldSQLProgmanGrpName)
  807.         set ProgmanType = "COMMON"
  808.     else
  809.         set SQLGroup = $(!OldSQLProgPTKGrpName)
  810.         set ProgmanType = "VITAL"
  811.     endif
  812.     RemoveProgmanItem $(SQLGroup),"DB-Library Help","COMMON"
  813.     RemoveProgManGroup $(SQLGroup), $(ProgmanType)
  814.     exit
  815.  
  816. [QueryFullNameDlgENG]
  817.         DlgTemplate     =       "DLG_QUERY_FULLNAME"
  818.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title), +
  819.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  820.                                  "@HELPID","101",+
  821.                                  "@DlgText","Please type your full name in the box below."$(!LF)$(!LF)+
  822.                                  "Then choose Continue or press ENTER."$(!LF)$(!LF)+
  823.                                  "The information you enter will be used by Setup "+
  824.                                  "for subsequent installations of SQL Server.",+
  825.                                  "@Edit1Label","&Name:",+
  826.                                  "@Continue","C&ontinue",+
  827.                                  "@Help","&Help",+
  828.                                  "@Exit","E&xit Setup",+
  829.                                  "@EDITIN1",$(!FullName)}
  830.  
  831. [QueryFullNameOrgNameDlgENG]
  832.         DlgTemplate     =       "DLG_QUERY_FULLNAME_ORGNAME"
  833.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title), +
  834.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  835.                                  "@HELPID","101",+
  836.                                  "@DlgText","Please type your full name in the box below.  "+
  837.                                  "You may also specify the name of your company if "+
  838.                                  "SQL Server will be used for business purposes."$(!LF)$(!LF)+
  839.                                  "Then choose Continue or press ENTER."$(!LF)$(!LF)+
  840.                                  "The information you enter will be used by Setup "+
  841.                                  "for subsequent installations of SQL Server.",+
  842.                                  "@Edit1Label","&Name:",+
  843.                                  "@Edit2Label","&Company:",+
  844.                                  "@Continue","C&ontinue",+
  845.                                  "@Help","&Help",+
  846.                                  "@Exit","E&xit Setup",+
  847.                                  "@EDITIN1",$(!FullName),+
  848.                                  "@EDITIN2",$(!OrgName)}
  849.  
  850. [VerifyFullNameDlgENG]
  851.         DlgTemplate     =       "DLG_VERIFY_FULLNAME"
  852.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title), +
  853.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  854.                                  "@HELPID","102",+
  855.                                  "@DlgText","Please verify that the name you typed is correct."$(!LF)$(!LF)+
  856.                                  "If you want to change it, choose Change. "+
  857.                                  "Otherwise choose Continue.",+
  858.                                  "@Static1Label","Name:",+
  859.                                  "@Static1Text",$(!FullName),+
  860.                                  "@Continue","C&ontinue",+
  861.                                  "@Cancel","&Change",+
  862.                                  "@Help","&Help",+
  863.                                  "@Exit","E&xit Setup"}
  864.  
  865. [VerifyFullNameOrgNameDlgENG]
  866.         DlgTemplate     =       "DLG_VERIFY_FULLNAME_ORGNAME"
  867.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title), +
  868.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  869.                                  "@HELPID","102",+
  870.                                  "@DlgText","Please verify that the information you typed is correct."$(!LF)$(!LF)+
  871.                                  "If you want to change the name or the company, "+
  872.                                  "choose Change. Otherwise, choose Continue.",+
  873.                                  "@Static1Label","Name:",+
  874.                                  "@Static1Text",$(!FullName),+
  875.                                  "@Static2Label","Company:",+
  876.                                  "@Static2Text",$(!OrgName),+
  877.                                  "@Continue","C&ontinue",+
  878.                                  "@Cancel","&Change",+
  879.                                  "@Help","&Help",+
  880.                                  "@Exit","E&xit Setup"}
  881.  
  882. [WelcomeDlgENG]
  883.         DlgTemplate     =       "DLG_WELCOME"
  884.         !SQLDlgNames    =       {"@Caption","Welcome", +
  885.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  886.                                  "@HELPID","100",+
  887.                                  "@DlgText","Welcome to Setup. "$(!LF)$(!LF)+
  888.                                  "The Setup program for Microsoft SQL Server PTK ("+
  889.                                  $(!ProductVersion)") installs the SQL Server PTK on your "+
  890.                                  "computer.  Each Setup dialog box contains basic instructions for "+
  891.                                  "completing an installation.  If you want additional "+
  892.                                  "information and instructions about a dialog box or an option, "+
  893.                                  "press the Help key, F1."$(!LF)$(!LF)+
  894.                                  "To install the SQL Server PTK on your computer now, choose Continue "+
  895.                                  "or press ENTER."$(!LF)$(!LF)+
  896.                                  "To exit Setup without installing the SQL Server PTK, press F3.",+
  897.                                  "@ABOUT","",+
  898.                                  "@Continue","C&ontinue",+
  899.                                  "@Help","&Help",+
  900.                                  "@Exit","E&xit Setup"}
  901.  
  902. [AlreadyInstalledDlgENG]
  903.         DlgTemplate     =       "DLG_INSTALLED"
  904.         !SQLDlgNames    =       {"@DlgText1","The Setup program has detected that the SQL "+
  905.                                              "Server PTK has already been installed by:",+
  906.                                  "@RegInfo",$(!Registration),+
  907.                                  "@DlgText2","It is acceptable for the legal owner to"+
  908.                                              " reinstall this product in order to update"+
  909.                                              " an existing copy or to replace a corrupted"+
  910.                                              " or missing version of the program.",+
  911.                                  "@DlgText3","You can continue to install the product, "+
  912.                                              "but you should be aware that this product "+
  913.                                              "is protected by copyright law and "+
  914.                                              "international treaties.",+
  915.                                  "@DlgText4","Unauthorized reproduction or distribution of"+
  916.                                              " this program or any portion of it may"+
  917.                                              " result in severe civil and criminal penalties"+
  918.                                              " and will be prosecuted to the maximum extent under the law.",+
  919.                                  "@Continue","&OK",+
  920.                                  "@Cancel","&Cancel"}
  921.  
  922. [SetupDoneDlgENG]
  923.         DlgTemplate     =       "DLG_RESTART"
  924.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title),+
  925.                                  "@DlgText",$(!MsgText),+
  926.                                  "@WindowsText","Exit to Windows NT",+
  927.                                  "@Windows","E&xit to Windows NT"}
  928. [PopupInfo]
  929.         DlgType         =       "Info"
  930.         DlgTemplate     =       "REBOOT"
  931.         Caption         =       "Help :-("
  932.         DlgText         =       $(tmpvar)
  933.  
  934. [InstallTypeChoicesDlgENG]
  935.         DlgTemplate     =       "DLG_PTK_OPTS"
  936.         !SQLDlgNames    =       {"@Caption","SQL Server Programmer's Toolkit Setup", +
  937.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  938.                                  "@HELPID","103",+
  939.                                  "@DlgText1","Choose one or more of the following installation options:", +
  940.                                  "@Chk1","DB-Library &development libraries",+
  941.                                  "@Chk2","DB-Library &sample applications",+
  942.                                  "@Chk3","Open Data Services de&velopment libraries",+
  943.                                  "@Chk4","Open Data Services sa&mple applications",+
  944.                                  "@Chk5","Visual Basic 32-bit control",+
  945.                                  "@Chk6","MS DTC sample code",+
  946.                                  "@DlgText2","To cancel the installation choose Cancel Setup. When you are "+
  947.                                              "ready to proceed with the installation, select Continue.",+
  948.                                  "@Continue","C&ontinue",+
  949.                                  "@Help","&Help",+
  950.                                  "@Exit","&Cancel Setup"}
  951.  
  952. [GetSQLPathDlgENG]
  953.         !Template       =       "DLG_SQLPATHBACK"
  954.         !NoNameText     =       DBNoPathENG
  955.         !PermitNullName =       "NO"
  956.         !CreatePathPrompt=      "NO"
  957.         !AutoPopoff     =       "YES"
  958.         !Text1          =       "The Setup program will copy the SQL Server Programmer's Toolkit files to the following directory tree:"
  959.         !Text2          =       "To copy the SQL Server Programmer's Toolkit files to a different "+
  960.                                 "location, use the BACKSPACE key to delete "+
  961.                                 "characters, and then type the drive and directory "+
  962.                                 "where you want the Setup program to copy the PTK files."
  963.         !EditLabel      =       "&Path:"
  964.         !EditIn         =       $(!DefSQLPath)
  965.         !HelpID         =       "104"
  966.         !Ex             =       "E&xit"
  967.  
  968. [InstallCompletedENG]
  969.         DlgTemplate     =       "DLG_REBREST"
  970.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title), +
  971.                                  "@DlgText","SQL Server ("$(!ProductVersion)") is now installed."$(!LF)$(!LF)+
  972.                                  "The system paths have been updated and will become effective "+
  973.                                  "when the system is rebooted."$(!LF),+
  974.                                  "@WindowsText","Exit to Windows NT",+
  975.                                  "@Windows","E&xit to Windows NT",+
  976.                                  "@RebootText","@Reboot",+
  977.                                  "@Reboot","&Reboot"}
  978.  
  979. [GetPathDlgENG]
  980.         DlgTemplate     =       $(!Template)
  981.         !SQLDlgNames    =       {"@Caption",$(!Setup_Title),+
  982.                                  "@HELPFILE",$(!HelpSQLNTSetup),+
  983.                                  "@HELPID",$(!HelpID),+
  984.                                  "@DlgText1",$(!Text1),+
  985.                                  "@DlgText2",$(!Text2),+
  986.                                  "@Edit1Label",$(!EditLabel),+
  987.                                  "@EDITIN1",$(!EditIn),+
  988.                                  "@Continue","C&ontinue",+
  989.                                  "@Help","&Help",+
  990.                                  "@Back","&Back",+
  991.                                  "@Exit",$(!Ex)}
  992.  
  993. [MailManDlgENG]
  994.         DlgTemplate     =       "DLG_MAILMAIN"
  995.         DlgType         =       "Billboard"
  996.         !SQLDlgNames    =       {"MAILPEOPLE","",+
  997.                                  "@Bill1","Now is a great time to fill out your registration card. "+
  998.                                           "When you send it in, Microsoft will ...",+
  999.                                  "@Bill2","- Inform you of product updates.",+
  1000.                                  "@Bill3","- Offer you customer support.",+
  1001.                                  "@Bill4","- Provide you with information about related Microsoft products."}
  1002.  
  1003. [YesNoDlgENG]
  1004.         DlgTemplate     =       "SetupMessage"
  1005.         DlgType         =       "MessageBox"
  1006.         STF_MB_TITLE    =       $(!Setup_Title)
  1007.         STF_MB_TEXT     =       $(!YesNoQ)
  1008.         STF_MB_TYPE     =       3
  1009.         STF_MB_ICON     =       4
  1010.         STF_MB_DEF      =       1
  1011.  
  1012. [InfoMessageENG]
  1013.         DlgTemplate     =       "SetupMessage"
  1014.         DlgType         =       "MessageBox"
  1015.         STF_MB_TITLE    =       $(!Setup_Title)
  1016.         STF_MB_TEXT     =       $(!AddlText)
  1017.         STF_MB_TYPE     =       1
  1018.         STF_MB_ICON     =       2
  1019.         STF_MB_DEF      =       1
  1020.  
  1021. [ExitWarningDlgENG]
  1022.         DlgType         =       "MessageBox"
  1023.         STF_MB_TITLE    =       "Exit SQL Server Setup"
  1024.     STF_MB_TEXT    =    "Are you sure you want to exit SQL Server PTK Setup?"
  1025.         STF_MB_TYPE     =       3
  1026.         STF_MB_ICON     =       5
  1027.         STF_MB_DEF      =       2
  1028.  
  1029. [ProgressCopyVars]
  1030.         ProCaption      =       "File copy in progress"
  1031.         ProCancel       =       "&Cancel"
  1032.         ProCancelMsg    =       "Setup cannot run correctly until this operation is"$(!LF)+
  1033.                                 "complete.  Are you sure you want to cancel?"
  1034.         ProCancelCap    =       "SQL Server PTK for Windows NT Setup Warning"
  1035.         ProText1        =       "Copying "
  1036.         ProText2        =       "         to "
  1037.  
  1038. [ErrorUpdatingRegistryENG]
  1039.         !AddlText= "An error occurred while updating the Windows NT Registry."
  1040.  
  1041. [FileCouldNotBeCopiedENG]
  1042.         !AddlText = "The files could not be copied."
  1043.  
  1044. [FileDoesntExistENG]
  1045.         !AddlText = "The file you have specified does not exist."
  1046.  
  1047. [DBNoPathENG]
  1048.         !AddlText = "You must specify a path."
  1049.  
  1050. [DBNoNameNOrgENG]
  1051.         !AddlText = "You must enter a name and an organization."
  1052.  
  1053. [DBNoNameENG]
  1054.         !AddlText = "You must enter a name."
  1055.  
  1056. [NoInstOptsSelectedENG]
  1057.         !AddlText = "You must select at least one installation option."
  1058.  
  1059. [InsertDiskENG]
  1060.         !AddlText = "Insert the disk in drive "$(!TmpDrive)
  1061.  
  1062. [InsufficientDiskSpaceENG]
  1063.         !AddlText = "There is insufficient disk space on "$(!TmpDrive)
  1064.  
  1065. [ErrorReadRegistryENG]
  1066.         !AddlText = "An error occurred while reading the Windows NT Registry."
  1067.  
  1068. [CompletionInstalledENG]
  1069.         !MsgText = "The SQL Server PTK ("$(!ProductVersion)") has now been installed."$(!LF)$(!LF)
  1070.  
  1071. [STR_ServiceStillRunning]
  1072.         !MsgText = "The SQL Server service is still running. Please ensure the SQL Server service has been stopped and that no other applications are using the SQL Server DLLs."
  1073.  
  1074. [FailedUserSetupQuitENG]
  1075.         !MsgText = "Setup has been terminated."
  1076.  
  1077. [FailedUserQuitENG]
  1078.         !AddlText = "Setup has been terminated."
  1079.  
  1080. [UserQuitMsgENG]
  1081.         !AddlText = "Setup has been terminated."
  1082.  
  1083. [SetupInitENG]
  1084.         !MsgText = "Setup initilization could not be successfully completed."$(!LF)$(!LF)
  1085.  
  1086. [DirCreateErrorENG]
  1087.         !AddlText = "The following directory could not be created: "
  1088.  
  1089. [RiscVars]
  1090.      !RiscType = "RISC"
  1091.  
  1092. [BaseInstallExes]
  1093.         1, setup.exe, SIZE=250880
  1094.         1, setup.inf, SIZE=50771
  1095.  
  1096. [BaseInstallDLLs]
  1097.         1, sqlsetup.dll, SIZE=153088
  1098.         1, sqlsvc32.dll, SIZE=250000
  1099.         1, sqlgui32.dll, SIZE=250000
  1100.         1, sqewnt.dll, SIZE=250000
  1101.         1, ntwdblib.dll, SIZE=250000
  1102.  
  1103. [ODSInstallExes]
  1104.         1, gateway.exe, SIZE=35840
  1105.         1, procsrv.exe, SIZE=67072
  1106.         1, service.exe, SIZE=53248
  1107.  
  1108. [ODSIncludeFiles]
  1109.         1, srv.h, SIZE=1165
  1110.         1, srvapi.h, SIZE=7616
  1111.         1, srvconst.h, SIZE=5044
  1112.         1, srvdbtyp.h, SIZE=1911
  1113.         1, srvstruc.h, SIZE=21837
  1114.         1, srvtok.h,SIZE=1939
  1115.         1, srvmisc.h, SIZE=3252
  1116.         1, srvtypes.h, SIZE=1604
  1117.  
  1118. [ODSHelpFiles]
  1119.     1, ods.hlp,SIZE=240000
  1120.  
  1121. [ODSLibFiles]
  1122.         1, opends60.lib, SIZE=56742
  1123.  
  1124. [ODSSampleXPBuildFiles]
  1125.         1, build.xpd,     RENAME=build.cmd, SIZE=1293
  1126.         1, makefile.xpd,    RENAME=makefile, SIZE=1616
  1127.         1, instxp.sql, SIZE=441
  1128.         1, xp.def, SIZE=160
  1129.  
  1130. [ODSSampleXPSourceFiles]
  1131.         1, xp.c, SIZE=18293
  1132.  
  1133. [ODSSamplesXPDLLFiles]
  1134.     1, xp.dll, SIZE=14848
  1135.  
  1136. [ODSSampleGtwyBuildFiles]
  1137.         1, build.gat, RENAME=build.cmd, SIZE=1286
  1138.         1, makefile.gat, RENAME=makefile, SIZE=1846
  1139.  
  1140. [ODSSampleGtwySourceFiles]
  1141.         1, gateway.c, SIZE=3778
  1142.         1, gatecbs.c, SIZE=34801
  1143.  
  1144. [ODSSamplePSrvBuildFiles]
  1145.         1, build.prc, RENAME=build.cmd, SIZE=1286
  1146.         1, makefile.prc, RENAME=makefile, SIZE=1817
  1147.         1, sales.dbf, SIZE=894
  1148.  
  1149. [ODSSamplePSrvSourceFiles]
  1150.     1, procsrv.c, SIZE=63280
  1151.     1, service.c, SIZE=13393
  1152.  
  1153. [ODSSampleODBCSourceFiles]
  1154.     1, libmain.c,SIZE=1390
  1155.     1, local.rc, SIZE=3700
  1156.     1, odsrc.h, SIZE=4700
  1157.         1, odbcmsg.h,SIZE=7000
  1158.         1, odbcver.h, SIZE=1100
  1159.     1, samp.rc, SIZE=16658
  1160.         1, readme.ods,RENAME=readme.txt,SIZE=2300
  1161.  
  1162. [ODSSampleODBCBuildFiles]
  1163.         1, build.ods, RENAME=build.cmd, SIZE=860
  1164.         1, makefile.ods, RENAME=makefile, SIZE=1393
  1165.         1, odsgt32.dll,SIZE=295000
  1166.  
  1167. [DBLibIncludeFiles]
  1168.         1, sqlfront.h, SIZE=17098
  1169.         1, sqldb.h, SIZE=39373
  1170.  
  1171. [DBLibLibFiles]
  1172.         1, ntwdblib.lib, SIZE=129228
  1173.  
  1174. [ControlPanel]
  1175.         1, windbver.exe,SIZE=252416
  1176.  
  1177. [Runtime]
  1178.     1, msvcrt40.dll,SIZE=500224,CHECKVERSION=*($(!SetupFileVersion), 1)^*($(!SetupFileVersion),2)
  1179.  
  1180. [DbLibDosLibs]
  1181.  
  1182. [DbLibWin16Libs]
  1183.  
  1184. [DbLibWin16Samples]
  1185.  
  1186.  
  1187. [DBLibHelp]
  1188.         1, dblibw.hlp, SIZE=487744
  1189.  
  1190. [DBLibSamples]
  1191.         1, BUILDN.BAT, SIZE=1348
  1192.         1, BUILDN.MAK, SIZE=694
  1193.         1, SQLCURS.c, SIZE=6896
  1194.         1, SQLTESTC, SIZE=497
  1195.         1, SQLTESTC.c, SIZE=4488
  1196.         1, SQLTESTC.exe,SIZE=29184
  1197.         1, SQLTESTN.ICO, SIZE=766
  1198.         1, SQLTESTN,SIZE=792
  1199.         1, SQLTESTN.c,SIZE=24644
  1200.         1, SQLTESTN.exe, SIZE=29184
  1201.         1, SQLTESTN.h, SIZE=1389
  1202.         1, SQLTESTN.Rc, SIZE=1859
  1203.         1, EXAMPLE1.c,  SIZE=5036
  1204.         1, EXAMPLE2.c,  SIZE=4933
  1205.         1, EXAMPLE3.c,  SIZE=4390
  1206.         1, EXAMPLE4.c,  SIZE=4498
  1207.         1, EXAMPLE5.c,  SIZE=3608
  1208.         1, EXAMPLE6.c,  SIZE=4842
  1209.         1, EXAMPLE7.c,  SIZE=4663
  1210.         1, EXAMPLE8.c,  SIZE=4946
  1211.         1, TWOPHASE.c,  SIZE=6040
  1212.         1, SQLEXAMP.c,  SIZE=13906
  1213.         1, DATAFILE,  SIZE=402
  1214.         1, NMPSDMP.C,  SIZE=19000
  1215.         1, NMPSDMP.MAK,  SIZE=2300
  1216.         1, NMPSDMP.EXE,  SIZE=15000
  1217.         1, README.TXT,    SIZE=14000
  1218.         1, GETOPT.C, SIZE=4800
  1219.         1, GETOPT.H, SIZE=500
  1220.         1, TEXTCOPY.H, SIZE=900
  1221.         1, TEXTCOPY.CPP, SIZE=29000
  1222.         1, TEXTCOPY,SIZE=1400
  1223.  
  1224. [SQLOleRead]
  1225.     1, readme2.txt, RENAME=readme.txt,SIZE=2048
  1226.  
  1227. [SQLOleInclude]
  1228.     1, sqlole.h,SIZE=246000
  1229.         1, sqloleid.h,SIZE=22000
  1230.  
  1231. [SQLOleCSamples]
  1232.     1, soc.c,SIZE=1800
  1233.         1, soc.mak,SIZE=5300
  1234.  
  1235. [SQLOleCPPSamples]
  1236.     1, socpp.cpp,SIZE=2000
  1237.         1, socpp.mak, SIZE=5400
  1238.  
  1239. [SQLOleVBSamples]
  1240.        1, explore.bas,SIZE=19400
  1241.        1, explore.frm,SIZE=7200
  1242.        1, explore.mak,SIZE=400
  1243.        1, generic.frm,SIZE=400
  1244.        1, generic.mak,SIZE=400
  1245.  
  1246. [MSDTCDBLibSamples]
  1247.  
  1248. [MSDTCODBCSamples]
  1249.  
  1250. [MSDTCTSQLSamples]
  1251.  
  1252. [VBSQLSys]
  1253.  
  1254. [VBSQL]
  1255.  
  1256.