home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / INTERWORD1.DMS / in.adf / Rexx / OpenDocument.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1993-03-15  |  626 b   |  29 lines
  1. /*
  2.  *
  3.  * Script name:     OpenDocument.rexx
  4.  * Author:          Franz Hemmer
  5.  * Purpose:         Demonstrate how to open a new document with a requester in InterWord.
  6.  * Related Program: InterWord Pro
  7.  * Written:         02.03.93
  8.  *
  9.  */
  10.  
  11. /*--------------------*/
  12. /* Get result in 'rc' */
  13. /*--------------------*/
  14. Options Results
  15.  
  16. /*----------------------------------------------*/
  17. /* Address InterWord port, and execute command. */
  18. /*----------------------------------------------*/
  19. ADDRESS INTERWORD1 OPEN_DOCUMENT
  20. IF rc > 0 THEN
  21.     DO
  22.         SAY 'No document choosen.'
  23.     END
  24. ELSE
  25.     DO
  26.         SAY 'Document name opened: 'result
  27.     END
  28. ENDIF
  29.