home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 16 / 16.iso / w / w058 / 1.img / FMAPI.IN_ / FMAPI.bin
Encoding:
Text File  |  1993-09-15  |  2.4 KB  |  53 lines
  1. '** Uncomment next line for single product installer.
  2. '** (Remove first "'". There are two "'" if commented out.
  3. ''$DEFINE SINGLEPROD
  4.  
  5. '** Change version numbers below
  6.  
  7. CONST INFFILE$ = "401P1h.INF"
  8. CONST MAKERITEM$ = "FrameMaker 4"    '*** change version
  9. CONST BUILDERITEM$ = "FrameBuilder"
  10.  
  11. '** Strings below need to be translated. **
  12.  
  13. CONST MAINTITLE$ = "FrameMaker 4 Setup (P1h)"    '*** change version
  14. CONST PROGGROUP$ = "Frame Products"
  15. CONST ERRMSG$ = "Setup sources were corrupted."
  16. CONST ERRTITLE$ = "Setup Message"
  17.  
  18. '** Strings above need to be translated. **
  19.  
  20. '*************************************************************************
  21. '************************  Frame API's  **********************************
  22. '*************************************************************************
  23.  
  24. DECLARE FUNCTION ValidateRegNo LIB "mscuistf.dll" (regNo$) AS INTEGER
  25. DECLARE FUNCTION UpdateResources LIB "mscuistf.dll" (DLLPath$,UserName$,OrgName$,RegNo$,Demo%) AS INTEGER
  26. DECLARE FUNCTION GetFields LIB "mscuistf.dll" (UserName AS STRING *30,OrgName AS STRING *30,RegNo AS STRING *30, DLLPath$) AS INTEGER
  27.  
  28. '*************************************************************************
  29. '************************ Wrapper Declarations  **************************
  30. '*************************************************************************
  31.  
  32. DECLARE FUNCTION FMValidateRegNo (regnum$) AS INTEGER
  33. DECLARE FUNCTION FMUpdateRes (fmDLL$, uname$, org$, reg$, demostat%) AS INTEGER
  34. DECLARE FUNCTION FMGetFields (uname AS STRING *30, org AS STRING *30, reg AS STRING *30, fmDLL$) AS INTEGER
  35. '*************************************************************************
  36. '*****************  Wrapper Definitions  *********************************
  37. '*************************************************************************
  38.  
  39. FUNCTION FMValidateRegNo(regnum$) STATIC AS INTEGER
  40.     FMValidateRegNo = ValidateRegNo(regnum$)
  41. END FUNCTION
  42.  
  43.  
  44. '**************************************************************************
  45. FUNCTION FMUpdateRes(fmDLL$,uname$,org$,reg$,demostat%) STATIC AS INTEGER
  46.     FMUpdateRes = UpdateResources(fmDLL$,uname$,org$,reg$,demostat%)
  47. END FUNCTION
  48.  
  49. '**************************************************************************
  50. FUNCTION FMGetFields(uname AS STRING *30,org AS STRING *30,reg AS STRING *30, fmDLL$) STATIC AS INTEGER
  51.    FMGetFields = GetFields(uname,org,reg,fmDLL$)
  52. END FUNCTION
  53.