DECLARE PUBLIC FUNCTION ProductRegAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC FUNCTION DefaultUserRegAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC FUNCTION InitAPR (prodno%, network$, direction$, basedir$) AS STRING
DECLARE PUBLIC FUNCTION PrevVersionsAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC FUNCTION PathChangeAPR (prodno%, network$, direction$, destdirsym$, mainprodsonly%) AS STRING
DECLARE PUBLIC FUNCTION InitCopyListAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC FUNCTION PreCopyConfigAPR (prodno%, network$, direction$, lic%) AS STRING
DECLARE PUBLIC FUNCTION AddTheBillBoardsAPR (prodno%, network$, direction$, nbytes&) AS STRING
DECLARE PUBLIC FUNCTION PostCopyConfigAPR (prodno%, network$, direction$, programgroup$) AS STRING
DECLARE PUBLIC FUNCTION AddIconsAPR (prodno%, network$, direction$, programgroup$) AS STRING
DECLARE PUBLIC FUNCTION UIAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC FUNCTION PostSuccessRegAPR (prodno%, network$, direction$) AS STRING
DECLARE PUBLIC SUB AddRegistryKeysAPR (prodno%, network$)
DECLARE PUBLIC FUNCTION InitLanguageAPR (prodno%, network$, direction$) AS STRING
DECLARE FUNCTION DetectPreviousVersion (Productfound$) AS STRING
DECLARE SUB APRRemoveObsoleteFiles (hDlg&, CtrlId%, Classes$, LInst&)
''/** Product specific functions
''*****************************
''*** TV: From Notes install script. Used for notes detection. */
PUBLIC CONST W16_NOTES = "_strings.dll"
PUBLIC CONST W32_NOTES = "nstrings.dll"
PUBLIC CONST GENERIC_EXECUTE = &H20000000
PUBLIC CONST GENERIC_READ = &H80000000
PUBLIC CONST GENERIC_WRITE = &H40000000
PUBLIC CONST LOCALE_SENGCOUNTRY = &H1002
PUBLIC CONST LOCALE_SYSTEM_DEFAULT = 2048
DECLARE FUNCTION FindWindowA LIB "user32" (ByVal lpClassName As Any, ByVal lpCaption As Any) AS LONG
DECLARE FUNCTION OpenSCManager Lib "advapi32.dll" Alias "OpenSCManagerA" (ByVal lpMachineName As String, ByVal lpDatabaseName As String, ByVal dwDesiredAccess As Long) As Long
DECLARE FUNCTION CloseServiceHandle Lib "advapi32.dll" Alias "CloseServiceHandle" (ByVal hSCObject As Long) As Long
DECLARE FUNCTION GetLocaleInfo Lib "kernel32" Alias "GetLocaleInfoA" (Byval Locale As Long, Byval LCType As Long, Byval lpLCData As String, Byval cchData As Long) As Long
DECLARE FUNCTION LoadTypeLibrary Lib "OLEAUT32" Alias "LoadTypeLib" (Byval t As Unicode String, j As Long ) As Long
DECLARE FUNCTION RegisterTypeLibrary Lib "OLEAUT32" Alias "RegisterTypeLib" (Byval a As Long, Byval b As Unicode String, Byval c As Unicode String) As Long
DECLARE PUBLIC FUNCTION filedate LIB "filedate.dll" ALIAS "_filetime@8" (ByVal FileName1$, ByVal FileName2$ ) AS INTEGER
DECLARE FUNCTION GetPrivateProfileInt Lib "kernel32" Alias "GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long
DECLARE FUNCTION WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
DECLARE FUNCTION GetAPRPathfromLotusIni() AS STRING
DECLARE FUNCTION GetAPRPathfromRegistry() AS STRING
DECLARE FUNCTION StrGSub(S$, SKey$, SSub$) AS INTEGER
DECLARE FUNCTION FileSub(ReadFn$, WriteFn$, SKey$, SSub$) AS INTEGER
DECLARE FUNCTION FixCompnentPath(CompnentPath$) AS STRING
DECLARE FUNCTION APR_AddRegistryEntries(prodno%, network$) AS INTEGER
DECLARE FUNCTION APR_AddODBCiniEntries (prodno%) AS INTEGER
DECLARE FUNCTION APR_AddAPPROACHiniEntries (prodno%) AS INTEGER
DECLARE FUNCTION APR_AddLOTUSiniEntries (prodno%, network$) AS INTEGER
DECLARE FUNCTION APR_AddLTSTOOLSiniEntries (prodno%, network$) AS INTEGER
DECLARE FUNCTION APR_AddOLEEntries (prodno%, network$) AS INTEGER
DECLARE FUNCTION APR_TurnOnNTSpecialFiles (prodno%, network$) AS INTEGER
DECLARE FUNCTION APR_IsInstalled() AS INTEGER
DECLARE FUNCTION APR_GetInstalledVersion() AS STRING
DECLARE FUNCTION RemNullInString(s as string) AS STRING
DECLARE FUNCTION GetNotesFromPath() AS STRING
DECLARE FUNCTION GetNotesPathfromRegistry() AS STRING
DECLARE SUB APR_RegisterSharedComponent(Key$, FileName$, Version$)
DECLARE FUNCTION Lot_WriteOLERegForAPR(network$, prodno%) AS INTEGER
DECLARE FUNCTION GetPreviousMastersDir(defaultlang$) AS STRING
DECLARE FUNCTION GetPreviousWorkDir(defaultlang$, prodno%) AS STRING
DECLARE FUNCTION GetPreviousSamplesDir(defaultlang$) AS STRING
DECLARE FUNCTION GetPreviousQMFDir(defaultlang$) AS STRING
DECLARE FUNCTION GetPreviousLang() AS STRING
DECLARE FUNCTION APRIsAdmin() AS INTEGER
DECLARE FUNCTION APRSMInst() AS Integer
DECLARE FUNCTION APRGetSystemCountry() As String
DECLARE FUNCTION APRRegisterTypeLib( typelibname as string, helpdir as string ) as long
DECLARE SUB APR_AddIcon(Feature$, Group$, Caption$, File$, CommandArgs$, WorkingDir$, Icon$)
DECLARE SUB APRMOREDIRSCB (hDlg&, CtrlId%, Classes$, LInst&)
DECLARE SUB APR_RemoveProdFilesCB(hDlg&, CtrlId%, Classes$, LInst&)
DECLARE SUB RegAndIncrementCount(s$)
DECLARE SUB APRAddNotesToPathNT
DECLARE SUB APRAddNotesToPathWin95
DECLARE SUB APRFixupServerDirectory(dirsym$, feature$)
DECLARE SUB APRPrintDIRs(FunctionName$)
DECLARE SUB DebugMsg(msg$, location$)
DECLARE SUB APRAddQMFToEnvironmentNT(prodno%, network$)
DECLARE SUB APRDoBackupSmartMasters()
DECLARE SUB APRRemoveProdDirs()
DECLARE SUB APRWriteToAUTOEXEC()
DECLARE SUB APR_TurnOnDummyScriptFiles()
DECLARE SUB APR_RenameDummyScriptFiles()
DECLARE SUB APRChangeTheDate(fnpath as String)
DECLARE SUB APRTurnOnODBCSection(network as String)
