|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。3 n7 L1 c( U" Y- }! X& a* t
) a2 O$ g* q2 N7 Y9 @begin P_wait arriving1 e: i) d1 m7 Z4 V: y9 e
if this load type=L_a1 then
0 W& G. a) i7 p, I( m" ~# P t wait to be ordered on OL_1
% Z; n+ m/ U7 v' N if this load type=L_b1 then* \. a5 Q4 u$ G' c6 v
wait to be ordered on OL_2
- Y' b/ }' B8 u/ ? send to P_assemble
/ ^ `$ ~' B U' G& O' {: n1 i3 S% {end
+ ~* _; B3 ~6 H0 h# ?4 ?/ G! l5 [
+ `( @+ m3 |: d `begin P_assemble arriving; [$ o3 f; f/ i; M0 M7 V
order a load from OL_1 to die" r- q5 J# B+ d$ [4 F" p2 W
in case order not filled backorder on OL_1% J. I6 v9 U2 S; S; t7 f' U
order a load from OL_2 to continue
; h7 V1 f- P$ Y- M, a in case order not filled backorder on OL_2
9 @, B7 |: ^: a; b3 ^. G( O# s1 c set load type to L_product# M' t$ B4 F$ v) a/ x! a3 Y
get R_massm
7 i5 v, @$ c- U' w5 V: y9 Q2 p wait for normal 5,1 min, ^- N: B; T8 t; z+ l& a' Q& }
free R_massm; x/ u7 ^: Q# V2 _3 F5 O- K2 d8 ]0 T
move into Q_stock6 t X/ K ?& J: O6 L H. Z% u
end |
|
发表于 2009-6-14 16:41:55
楼主