home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / maprog.zip / mkobj.cmd < prev    next >
OS/2 REXX Batch file  |  1998-10-06  |  326b  |  18 lines
  1. /* 
  2.  * make 'maprog' WPS Object
  3.  */
  4.  
  5. CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  6. CALL SysLoadFuncs
  7.  
  8. obj = "MAProg"
  9. setup = "OBJECTID=<MAProgram>;TEMPLATE=YES"
  10.  
  11. IF SysCreateObject(obj, "MAProgram", "<WP_DESKTOP>", setup) THEN
  12.     SAY 'Create Object'
  13. ELSE
  14.     SAY 'Failed to Create Object'
  15.  
  16. EXIT
  17.  
  18.