不能在waituntil的statement中访问table

xiongbing2010

我写的一个程序想实现在IObuffer中的MU按时刻表exit，若需要exit的时候IObuffer中没有MU，那一旦IObuffer中有MU就立即exit。IObuffer的名字是zhuZhan，程序如下：
is       
do       
        waituntil EventController.simTime = Schedule[now_depart_num];
0 S/ q8 j4 A! X& w        if zhuZhan.empty = false
        then
                zhuZhan[1].move();
. ^5 t6 Y& M5 f4 }, S9 O                now_depart_num = now_depart_num + 1;               
( S0 V3 s6 A4 I! B- q- f* t* {8 A        else
                waituntil zhuZhan.empty = false;
                zhuZhan[1].move();
# ^4 f+ K9 @' m/ l                now_depart_num = now_depart_num + 1;
" Z' L: d6 b7 [$ c  W) @        end;                                       
end;
$ w2 \3 f; T& s6 b" a3 d
但是一直说有错误，提示信息是：access to tables is not allowed within a waituntil statement.
; s8 j9 ]& B) \; N0 H若是增加一个局部变量，如下：
& X3 W# a4 L8 ^is
              depart_time : time;
do
              depart_time := schedule[now_depart_num];
3 b, D, e) |4 y- ]: @              waituntil EventController.simTime = depart_time;
% S! r- T/ ]' G/ [& F              。。。
- Z4 J  v0 J4 l9 x1 ?: \又会出现syntax error near line 5 at <;>!

2 r! _1 s& z7 r7 W各位大侠帮帮忙，或者教我怎么改程序的错误，或者教教我用别的方法实现我的目的，谢谢了！

SimChen

waituntil 有很多限制条件，监控variable是可以的，表格好像是不行的。另外，这个命令对程序的performance有很大影响，能不用就尽量不要用。有一个技巧，通过不断循环的方式来实现时间点的控制。
8 v2 ~0 n0 _) l, f7 v) U8 B
now_depart_num := 1;
begin_time := 0;
& J$ \  S! O- \% y8 p( ^6 Iwhile 1 = 1 loop
depart_time := schedule[now_depart_num];
8 e9 v: i2 Z$ A! n; d; p wait depart_time - begin_time;
....
1 R/ C4 K. k* Q( |1 `
) v5 G, @# F/ b; C% D( i( I& O begin_time := depart_time;
now_depart_num := now_depart_num + 1;
end;

xiongbing2010

回复 2# SimChen谢谢楼上热心指导，只是我还是没有太明白，尤其是begin_time在程序中是起什么作用的？它是怎么从0变成now_depart_time的?

SimChen

我尽量用你的变量定义,增加了一个begin_time
6 w* s  b, K" Y' Z, ]depart_time和begin_time的差就是要等待的时间，也就是表格相邻两行定义的时间
每次等待以后把now_depart_num增加1，表格就往下走一行。

1 @  [' c; Q0 \2 l另外，这个程序原则上由Init调用，所以起始时间是0，然后每次等待后上一个终止点就是下一个起始点。