|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。
) i/ A* x$ X# y( U. Z8 m; C. y0 W6 Z
begin P_wait arriving2 R, t, S0 R, r7 `6 F7 j3 `
if this load type=L_a1 then
0 }! ?7 F# a9 r* X wait to be ordered on OL_1
+ K5 q6 u) b: G/ e2 Z if this load type=L_b1 then9 Z) n1 A% Q; G8 @/ d; @7 Z0 w
wait to be ordered on OL_2* S9 ^; J9 `# l( u7 D, w
send to P_assemble% U# s7 a% p, M# @# j% Z7 y" x
end
: ?( V8 D X F8 Z
3 {% G X6 f( B4 qbegin P_assemble arriving T* n. w3 _, H% D- R( {) H% e
order a load from OL_1 to die: Q6 |) {- n6 D
in case order not filled backorder on OL_1
# K3 H9 T6 u$ | order a load from OL_2 to continue
0 G' f7 V/ h! D5 Z* _! l* w in case order not filled backorder on OL_2
; J- G( h: A# T1 `8 Z set load type to L_product- m X% P, \2 c5 n8 E
get R_massm5 g) q+ q) @- a, u) ?
wait for normal 5,1 min' F4 a7 [% d5 s) S6 B- U2 g$ l
free R_massm: Q- E: [3 s0 v: D" C% l
move into Q_stock
4 v6 U7 P* z0 gend |
|
发表于 2009-6-14 16:41:55
楼主