George,

This was possible in PI/Open using

PA
GET-LIST LISTNAME
LOOP
    IF <<L, ID>> = "" THEN GO NEXT 
     RUN LIB PROGRAMNAME
     DATA <<ID>>
REPEAT
NEXT:

Unfortunately this never made it in to Universe, don't know about Unidata. I 
reported this when I beta tested the PI/Open to Universe migration stuff,I 
think they 'fixed it' by documenting somewhere that it doesn't work.

Cheers,

Andy


----- Original Message ----
From: George Gallen <[email protected]>
To: U2 Users List <[email protected]>
Sent: Thu, 10 December, 2009 19:03:08
Subject: [U2] A readnext within a VOC?

I'd like to setup a VOC to select a list, then run  a program for each entry in 
the list (like below...)

PA
GET-LIST LISTNAME
LOOP
     READNEXT ID ELSE EXIT
     DATA ID
     RUN LIB PROGRAMNAME
REPEAT

I Thought there was a way to do this...but just can't remember how.

In the meantime, I pass the list to another program (on another channel) which 
reads each item
   and EXECUTEs the PROGRAMNAME


George Gallen
Senior Programmer/Analyst
Accounting/Data Division, EDI Administrator
[email protected]
ph:856.848.9005 Ext 220
The Wyanoke Group
http://www.wyanokegroup.com



_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users



      
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to