home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / INTERWORD1.DMS / in.adf / Rexx / SetStartPage.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1993-03-15  |  627 b   |  28 lines
  1. /*
  2.  *
  3.  * Script name:     SetStartPage.rexx
  4.  * Author:          Franz Hemmer
  5.  * Purpose:         Demonstrate how to set the starting page number in InterWord.
  6.  * Related Program: InterWord Pro
  7.  * Written:         11.03.93
  8.  *
  9.  */
  10.  
  11. /*--------------------*/
  12. /* Get result in 'rc' */
  13. /*--------------------*/
  14. Options Results
  15. PARSE ARG number
  16.  
  17. IF number = "" THEN
  18.    DO
  19.       SAY 'Usage: SetStartPage <number>'
  20.       EXIT 5
  21.    END
  22. ENDIF
  23.  
  24. /*----------------------------------------------*/
  25. /* Address InterWord port, and execute command. */
  26. /*----------------------------------------------*/
  27. ADDRESS INTERWORD1 SET_START_PAGE number
  28.