求助关于Order lists的问题

louzhuqin

在使用Order List时，当一个order list满足不了order的数量，要用第二个甚至第三个order list，有一段程序，请大虾解释一下，多谢！程序如下：
begin P_Order arriving procedure
% C& z. e0 n, d( P7 i" ?3 m  set V_NumWanted to 10
, g) f7 L: E4 S! c7 e  set V_NumOnList to OL_List1 current value
  order V_NumWanted loads from OL_List1 to P_NextProc
     in case order not filled
- F1 Z6 g4 L6 A' b      begin
        wait for .01 sec
       decrement V_NumWanted by V_NumOnList - OL_List1 current value
$ W) v% F- d' l; w4 [2 n       set V_NumOnList to OL_List2 current value
# F/ I" F+ l: g9 W       order V_NumWanted loads from OL_List2 to P_NextProc
          in case case order not filled
   .................................................................

/ ^$ C, f1 f' u+ j! Q- f) P
& L+ ~: E' {& q1 Q我就是不明白上面用红绿色作标记的那句，为什么后面要加-OL_List1 current value.用前面绿色部分，即把不够的load算出来就不行了吗？

jsokok

由于有in case order not filled这句，所以我觉得红色部分应该可以去掉。你还是自己测试一下吧，不一定要按书上说的做。

louzhuqin

谢谢TX！

zhdew

我是觉得这句没有更好。
1 ^/ U: M, B! A  S; P2 c6 a
* ^4 e, i9 I) ]) }分析一下，他要写上wait for .01 sec，目的应该是，第一个OL里的load先出去，再去order第二个OL，否则容易乱序；而在这0.01秒内，恐怕不能保证OL1里面不进新load。如果这样的话，有这句 - OL_List1 current value反倒容易出问题。

写这个程序的大概是西方人吧，喜欢逻辑上的严谨和形式上的正确？
, E% \* \7 j# |7 T7 f* L; h3 F或者，OL里会存在有Load不被Order出来的问题么？