|
|
22仿真币
现有二类产品,A和B,如何实现1个A和1个B组装成1个C?我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待,到了下一个进程,要取用的时候,一个都取不出来,实在不知为什么了,请大侠帮忙。
& b! @0 i, Q! Z3 B; b5 @, o, S. z4 u! Y8 J
begin P_wait arriving
, R. m, ?! M0 B. p9 f2 c: r% U# X$ S if this load type=L_a1 then
* ]: x1 h. _; @2 l9 j) E+ ] wait to be ordered on OL_1
; v; z7 J. W0 n3 g8 i0 m0 N: t7 y/ q if this load type=L_b1 then
4 `& A8 z% n/ k D( L( x wait to be ordered on OL_2, h3 X# ~) g, O) x, L2 N8 m
send to P_assemble
. r. G) B7 \# ~; Y) d) S# uend
( _9 o! E3 Z4 ]( V# N- x% r b5 W( z- T3 |# U+ ^$ |
begin P_assemble arriving
" w- }2 k) N3 M. w! r, o order a load from OL_1 to die
8 ~, z! \: ?5 p7 L6 f8 ~ K1 n9 g, H in case order not filled backorder on OL_1/ N1 x2 ^8 f4 C* Z. U; }4 l5 I
order a load from OL_2 to continue
" a. P- l, Q) P+ n) F1 U( ]) A in case order not filled backorder on OL_2
5 n W3 J/ n/ i! P set load type to L_product
8 l' d9 d. n/ C- [" [3 A get R_massm" ^6 A4 U5 i) h
wait for normal 5,1 min
) V1 s) e' p; ~: m: P' k free R_massm T# j6 h" O. s5 a
move into Q_stock( N8 W; ]5 R- M# c* _
end |
|