|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。+ m" m! v$ G' G7 b+ s: }
5 U' I6 n! t% K7 J% W9 M
begin P_wait arriving
: A* U( j4 u& Z1 ~. s: n5 w2 x+ I if this load type=L_a1 then
+ \9 I* m7 U; E3 L& E+ w: D wait to be ordered on OL_1. ]% r# K2 ^1 d$ W: P
if this load type=L_b1 then
9 y6 \5 R& {! `6 T2 L; w wait to be ordered on OL_2 |& x4 q" |& G; s, h7 f/ ]8 ^+ z6 g
send to P_assemble' ]; r- m. w/ f7 V1 Q2 N
end6 ~6 F2 b, x8 b- w
# d( r7 O' U1 f. Gbegin P_assemble arriving: @, _8 W, f8 i# f# D1 q
order a load from OL_1 to die
) l* ~% e. ~" [/ `! a% w# K in case order not filled backorder on OL_1
9 J, O0 r1 s1 |' I/ L9 s order a load from OL_2 to continue
" }- b6 p9 W- l in case order not filled backorder on OL_2
( [% f: ?$ `( T, P set load type to L_product
] W) X, q: z0 C$ l! _* R% _- g get R_massm
$ S5 O* }; ^ m8 G5 `; c wait for normal 5,1 min) b# e" w: r' ]; Y0 t7 `# c3 x
free R_massm
9 w. ]6 N2 c R3 b& O2 G move into Q_stock
0 e2 r( y# X, ?( {+ Fend |
|
发表于 2009-6-14 16:41:55
楼主