|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。
; G- B% a. X5 A' `& k/ u1 e' [+ a9 P4 f6 F v
begin P_wait arriving$ { j; R. t) i4 O% v' O
if this load type=L_a1 then0 g. K, `9 \$ ]3 ]8 V4 ]7 F$ e
wait to be ordered on OL_1
+ K( ]: W J! H- p# [6 u% H if this load type=L_b1 then& d* ~5 O+ S9 s* B. t
wait to be ordered on OL_2: @, _* B& [! B* U+ Z: {5 u; Y( Q
send to P_assemble
0 k% T# k' `, C/ b( \end: _1 d* c6 s. f2 U! Q
4 N" V: ?: b( N, F. R, l; ^. @begin P_assemble arriving( a6 @" l2 h: n4 M8 B& H- i
order a load from OL_1 to die% M' J! E" }" \/ Z7 q4 R# a
in case order not filled backorder on OL_1
' A" u$ [& u7 y' N( { order a load from OL_2 to continue
( f+ _6 I& g, r. [1 ^( O% [ in case order not filled backorder on OL_22 ~) G' s" p0 h+ z3 F- ~
set load type to L_product7 ^/ |& g9 u+ D7 T D( H" E; u
get R_massm
1 W+ o: c5 |% c# w* ? wait for normal 5,1 min/ }) T; F1 \8 M8 Z# M4 p
free R_massm& H! N/ b6 }9 }/ P# n7 s# j
move into Q_stock
, }, u+ q, u& O, T$ eend |
|
发表于 2009-6-14 16:41:55
楼主