|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。2 B" g/ z" E/ {
- i$ x2 P0 g$ N, K4 A
begin P_wait arriving( d- j1 J: D1 ~( q, h
if this load type=L_a1 then
) f3 a* j* }0 Y) O$ t% X wait to be ordered on OL_18 q: }; u" u' G. j
if this load type=L_b1 then2 g, A# @/ W3 q4 S# [
wait to be ordered on OL_2
: @4 Y* `/ o+ B. V send to P_assemble1 M& }5 F: K$ ^' u; I9 j: z
end# a$ g7 b& E0 N, a% y6 A' u
! j0 x: w5 P) n5 c( [
begin P_assemble arriving8 e& I0 G; m- H( Z. K% E
order a load from OL_1 to die' x! k0 w2 s) A9 Z1 Y8 k5 y$ v
in case order not filled backorder on OL_1
) d$ r! y, ?3 u9 _9 D8 r order a load from OL_2 to continue# o# s/ D! y; j+ ^* \2 D0 z
in case order not filled backorder on OL_2* V g; X& q7 a# z, R3 s" i7 p
set load type to L_product
* v+ i2 S- e3 z, ?5 A get R_massm5 D/ h! d7 ?; g J2 ^! L7 {9 R
wait for normal 5,1 min; I$ a3 V& U; T
free R_massm5 s5 S7 t6 ^; a0 r9 _
move into Q_stock+ @0 `: k% a3 a; ?7 R1 U3 }
end |
|
发表于 2009-6-14 16:41:55
楼主