If wols idea doesn't work, maybe something like

SIZE = SYSTEM(11)
IF SIZE # 0 THEN
 OK = 1
 IDS = ""
 LOOP
  READNEXT ID ELSE OK = 0
 WHILE OK DO
  IDS := '"':ID:'"'
 REPEAT
 CRT "you had a list active!
 EXECUTE 'ED VOC ':IDS
END


Not neat, but ....

Ross Ferris
Stamina Software
Visage > Better by Design!
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to