home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / info / document / usergrps / missouri / issue_07 / lstobj.cmd < prev    next >
Encoding:
Text File  |  1993-06-10  |  786 b   |  22 lines
  1. /* REXX file to list WPS system objects.    */
  2. /*                                          */
  3. /*     From the July 1993 MMOUG newsletter. */
  4.  
  5. "@echo off"
  6. "cls"
  7. SAY "Getting list of all WPS objects:";
  8.  
  9. /* Add WPS system functions to REXX. */                                      
  10. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs' 
  11. call SysLoadFuncs                                         
  12.                                                           
  13. /* Loop to list each system object. */
  14. call SysQueryClassList "list."                            
  15. do i=1 to list.0                                      
  16.   say "Class" i "is" list.i                               
  17. end                                                       
  18.  
  19. SAY "List creation completed."
  20. EXIT
  21.  
  22.