|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。6 ]6 |7 c, l3 v% j2 @! @
7 e, g. i* Y1 o: \9 ibegin P_wait arriving
9 s" _, Z9 ]- L2 A; W4 }0 [3 O- J if this load type=L_a1 then3 U" Y4 X, j! _7 P& ]
wait to be ordered on OL_1
- T3 i, q, a3 a5 q) q# T% g if this load type=L_b1 then( E$ C7 G1 p" ], O, y1 K/ y! S+ j0 F
wait to be ordered on OL_2, i q, Y5 g' j. m" b; s7 t: ~9 B' b
send to P_assemble
w, n; F. S* R, F$ L5 c. n# ^end
! G5 F+ N- e7 A5 c. E7 {" S7 R" P) \" v+ c" R
begin P_assemble arriving
8 j- m% q, n* V, V7 ]( a order a load from OL_1 to die8 _" |0 x+ [8 I
in case order not filled backorder on OL_1' N3 q) }" X1 B+ i: {1 X1 l: b
order a load from OL_2 to continue$ m; _( W# }2 ?, L0 j: x, V
in case order not filled backorder on OL_2
: x+ x7 c1 R! L$ ] G set load type to L_product' @9 ?7 o- ~4 N J' P
get R_massm
' y# _% T1 e- M! L& z5 I wait for normal 5,1 min4 R& B. b v" o; o
free R_massm
" o( Z/ A' _" } move into Q_stock
7 S2 {* T6 X5 eend |
|
发表于 2009-6-14 16:41:55
楼主