home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / SRPI.ZIP / SRPI / HOST / ALGABASE.EXC next >
Text File  |  1991-08-28  |  279b  |  16 lines

  1. /***     ***/
  2.  
  3. 'QUERY CMSLEVEL ( STACK LIFO'
  4.  
  5. parse UPPER pull ostype p2 relnum rest
  6.  
  7. if ( ostype='VM/XA' & relnum>='5.6,' )
  8.    then 'GLOBAL MACLIB DMSGPI'
  9.    else 'GLOBAL MACLIB CMSLIB DMSSP'
  10.  
  11. 'ASSEMBLE IBMABASE'
  12. 'LOAD IBMABASE (RLDSAVE'
  13. 'GENMOD IBMABASE'
  14.  
  15. exit
  16.