|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。
! ~5 D* E* g$ R: B2 q; C: ^' ^5 _7 d4 g5 s( ]; v6 C: }$ L. H
begin P_wait arriving
+ J7 W2 d6 x( _& v1 G* v7 \4 p if this load type=L_a1 then6 B1 D- L# l/ k0 {
wait to be ordered on OL_1 M7 Y; [: T3 n
if this load type=L_b1 then
5 A/ F1 E" o; V" Y# O$ Q wait to be ordered on OL_2. z% ^% f$ n$ Y
send to P_assemble; E' z/ @. w, b2 z0 G+ S5 }, f* ]
end
' w4 d! |1 I0 \3 z f0 |8 y0 h0 g8 l! }7 b2 T; j* W6 e
begin P_assemble arriving
- ]; D# u" n7 B' V order a load from OL_1 to die
6 A/ P& n" S0 v+ `7 V6 [) u in case order not filled backorder on OL_1. H& G) E2 {( q3 ~2 Y
order a load from OL_2 to continue
; o1 y0 e' ~& U7 x) U- E7 [ in case order not filled backorder on OL_2! K/ C! u: A: r$ @1 |" p% Y
set load type to L_product0 N! e m: g/ d) F
get R_massm
* Z& O! U6 ~9 q wait for normal 5,1 min; M7 ~' i+ S, _7 D1 S- y/ x
free R_massm
# e: e- h0 L, W6 ^ move into Q_stock' K8 x, E) k! ?% N% z2 x2 }7 ~
end |
|
发表于 2009-6-14 16:41:55
楼主