home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / prtsmp.zip / printing / select / form.1 < prev    next >
Text File  |  1993-11-07  |  257b  |  10 lines
  1. Arg window 
  2.  
  3. Call RxQueueList 'queues.'
  4. Call RxListBoxFromStem window, 1000, 'queues.'
  5. /* Select item  List Box */
  6. CALL VpSelect window,1000,queues.default, 1
  7. Do i = 1 to queues.0
  8.   Call RxListBoxItemHandle window, 1000, i, queues.i.drivername
  9. End
  10.