home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a040 / 2.ddi / SHRWARE4.ARC / MSAMISC.INC < prev    next >
Encoding:
Text File  |  1988-05-18  |  339 b   |  20 lines
  1. <<* MSAMISC.INC *>>
  2.  
  3. <<procedure GenMisc>>
  4. <<begin>>
  5. PARAMETERS CHOICE_Y
  6. DO CASE
  7.    CASE CHOICE_Y = 1
  8.       DO {fileprefix}_INST
  9.    CASE CHOICE_Y = 2
  10.       CLEAR
  11.       DO {fileprefix}_HELP WITH "DOC"
  12.    CASE CHOICE_Y = 3
  13.       * ADD-IN 3
  14.    CASE CHOICE_Y = 4
  15.       * ADD-IN 4
  16. ENDCASE
  17. <<end>>
  18.  
  19. <<* EOF() MSAMISC.INC *>>
  20.