home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / smart21b.zip / SMFOLDER.CMD < prev    next >
OS/2 REXX Batch file  |  1994-10-05  |  3KB  |  96 lines
  1. /* SMART Folder Objects */
  2. Call RxFuncAdd 'SysLoadFuncs','REXXUTIL','SysLoadFuncs';
  3. Call SysLoadFuncs; 
  4. Say 'Please enter path and directory of SMART2!';
  5. PARSE PULL path 
  6. option = "U"
  7.  
  8. rc=SysCreateObject("WPFolder","SMART2"||'0A'X||"Toolset","<WP_DESKTOP>",,
  9.   "OBJECTID=<WP_SMART2>;"||,
  10.   "HELPPANEL=1277;"||,
  11.   "NOPRINT=YES;"||,
  12.   "ICONFILE=" || path || "\smart.ICO;"||,
  13.   "ICONVIEW=NORMAL;"||,
  14.   "TREEVIEW=LINES,NORMAL;"||,
  15.   "DETAILSVIEW=MINI;"||,
  16.   '', option); 
  17. If rc<>1 Then Say "SMART Folder could not be created !"; 
  18.  
  19. rc=SysCreateObject("WPProgram","SMART2"||'0A'X||"Portability"||'0A'X||"Guide","<WP_SMART2>",,
  20.   "OBJECTID=<SMPORT_INF2>;"||,
  21.   "HELPPANEL=4083;"||,
  22.   "NOPRINT=YES;"||,
  23.   "EXENAME=VIEW.EXE;"||,
  24.   "PARAMETERS=SM_PORT.INF;"||,
  25.   "PROGTYPE=DEFAULT;"||,
  26.   "STARTUPDIR="path || ";"||,
  27.   '', option); 
  28. If rc<>1 Then Say "Portability Guide object could not be created!"; 
  29.  
  30. rc=SysCreateObject("WPProgram","The SMART Editor","<WP_SMART2>",,
  31.   "OBJECTID=<SLINK_EXE2>;"||,
  32.   "HELPPANEL=4083;"||,
  33.   "NOPRINT=YES;"||,
  34.   "EXENAME=" || path || "\SLINK2.EXE;"||,
  35.   "PROGTYPE=PM;"||,
  36.   "STARTUPDIR="path || ";"||,
  37.   '', option); 
  38. If rc<>1 Then Say "SLink object could not be created!"; 
  39.  
  40. rc=SysCreateObject("WPProgram","The SMART Editor"||'0A'X||"User's Guide","<WP_SMART2>",,
  41.   "OBJECTID=<SLINK_INF2>;"||,
  42.   "HELPPANEL=4083;"||,
  43.   "NOPRINT=YES;"||,
  44.   "EXENAME=VIEW.EXE;"||,
  45.   "PARAMETERS=SM_SLINK.INF;"||,
  46.   "PROGTYPE=DEFAULT;"||,
  47.   "STARTUPDIR="path || ";"||,
  48.   '', option); 
  49. If rc<>1 Then Say "The SMART Editor User's Guide object could not be created!"; 
  50.  
  51. rc=SysCreateObject("WPProgram","SMART2"||'0A'X||"Programming"||'0A'X||"Guide","<WP_SMART2>",,
  52.   "OBJECTID=<SMPROG_INF2>;"||,
  53.   "HELPPANEL=4083;"||,
  54.   "NOPRINT=YES;"||,
  55.   "EXENAME=VIEW.EXE;"||,
  56.   "PARAMETERS=SM_PROG.INF;"||,
  57.   "PROGTYPE=DEFAULT;"||,
  58.   "STARTUPDIR="path || ";"||,
  59.   '', option); 
  60. If rc<>1 Then Say "Programming Guide object could not be created!"; 
  61.  
  62. rc=SysCreateObject("WPProgram","SMART2"||'0A'X||"User Guide","<WP_SMART2>",,
  63.   "OBJECTID=<SMUSER_INF2>;"||,
  64.   "HELPPANEL=4083;"||,
  65.   "NOPRINT=YES;"||,
  66.   "EXENAME=VIEW.EXE;"||,
  67.   "PARAMETERS=SM_GUIDE.INF;"||,
  68.   "PROGTYPE=DEFAULT;"||,
  69.   "STARTUPDIR="path || ";"||,
  70.   '', option); 
  71. If rc<>1 Then Say "User Guide object could not be created!"; 
  72.  
  73. rc=SysCreateObject("WPProgram","SMART2"||'0A'X||"Viewer","<WP_SMART2>",,
  74.   "OBJECTID=<SMVIEWER_EXE2>;"||,
  75.   "HELPPANEL=4083;"||,
  76.   "NOPRINT=YES;"||,
  77.   "EXENAME=" || path || "\SMVIEWER.EXE;"||,
  78.   "PROGTYPE=DEFAULT;"||,
  79.   "STARTUPDIR="path || ";"||,
  80.   '', option); 
  81. If rc<>1 Then Say "SMVIEWER.EXE object could not be created!"; 
  82.  
  83. rc=SysCreateObject("WPProgram","SMART2"||'0A'X||"Source"||'0A'X||"Migration","<WP_SMART2>",,
  84.   "OBJECTID=<SMART2M_EXE2>;"||,
  85.   "HELPPANEL=4083;"||,
  86.   "NOPRINT=YES;"||,
  87.   "EXENAME=" || path || "\SMART2.EXE;"||,
  88.   "PROGTYPE=PM;"||,
  89.   "STARTUPDIR="path || ";"||,
  90.   '', option); 
  91. If rc<>1 Then Say "SMART2.EXE object could not be created!"; 
  92.  
  93.  
  94.  
  95.  
  96.