-
From: Ross Ferris [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Friday, August 19, 2005 9:48 AM
Subject: RE: [U2] Universe active lists
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
Following up on this list question, I want to respond to the questions and
suggestions. I do so appreciate each person who took a stab at it.
Why would I write a program like BLEEP? Well, I wouldn't! But that was the
very simplest way to illustrate the problem I was having with a far more
Greetings U2 users,
I have a technical question/problem in Universe that I could sure use help
with.
If you type this:
SELECT VOC = A]
ED VOC
(from a P flavored account in this case, but I'm not sure flavor has any
influence on the real problem)
The
[EMAIL PROTECTED] wrote:
Greetings U2 users,
I have a technical question/problem in Universe that I could sure use help
with.
If you type this:
SELECT VOC = A]
ED VOC
(from a P flavored account in this case, but I'm not sure flavor has any
influence on the real
Firstly your program doesn't make much sense.
Who would want to do this by program?
But nevertheless you could use something like this:
IF SYSTEM(11) THEN
EOD=0
LOOP
READNEXT ID ELSE EOD=1
UNTIL EOD DO
EXECUTE ED VOC :ID
REPEAT
END
STOP
Or you could use SAVE-LIST before you run
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