在使用Order List时,当一个order list满足不了order的数量,要用第二个甚至第三个order list,有一段程序,请大虾解释一下,多谢!程序如下:% }9 `6 |$ {" |
begin P_Order arriving procedure 1 _. M& R( O, E set V_NumWanted to 10. t( Z; P K( C8 m
set V_NumOnList to OL_List1 current value& G! _) x" i9 p5 h6 ^
order V_NumWanted loads from OL_List1 to P_NextProc% u) M" ` ~( T B& \
in case order not filled 5 S6 _4 q U, F" \ begin6 p6 K2 m" Z; q
wait for .01 sec0 Q8 X) f: Y2 S2 r9 Z; l6 |3 _
decrement V_NumWanted by V_NumOnList - OL_List1 current value . t# c* g7 _1 x: {: T' w set V_NumOnList to OL_List2 current value. e8 K6 i: Z+ { R2 h$ e
order V_NumWanted loads from OL_List2 to P_NextProc/ u" v6 [1 } e) N) N
in case case order not filled% s* `! N# W- _! A7 v
................................................................. X) u8 [( l; |$ G- n5 h: P
& l8 Y- W2 E2 ^