|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。/ |$ M5 B8 |/ J$ e) p0 k
) j) }" ?" C C3 F" A3 i
begin P_wait arriving* D/ i; q: Y" @/ I1 x
if this load type=L_a1 then! f6 `" N$ j0 _% X' X9 I+ q/ V6 @
wait to be ordered on OL_1
, j: |1 I! ?5 T& P) w$ T if this load type=L_b1 then( D* j2 M& X' M
wait to be ordered on OL_2
7 g. F4 V$ K7 N% m, {0 x# H) ~ send to P_assemble8 [7 s' f) i. h! Y( L$ a
end7 ?: [' W0 ]* d4 V- I
$ h* Z o" j1 H" qbegin P_assemble arriving
8 B2 V5 i% l5 n. V0 W order a load from OL_1 to die
5 Q6 x$ W7 e- `9 n6 q in case order not filled backorder on OL_1
# \, x% k1 Z3 u# m order a load from OL_2 to continue# o, I# b+ A( [/ J( v# {
in case order not filled backorder on OL_28 l6 a6 X: G$ _
set load type to L_product0 U6 W) [7 ]8 a- Q, f7 g
get R_massm) r- ^2 Z) A8 O
wait for normal 5,1 min4 s; b# y+ c0 ]- A9 z2 P$ E
free R_massm' ^. Q4 Z: y1 Z6 T9 o+ S4 D
move into Q_stock. g A( c$ G; U. Q3 ^9 I
end |
|
发表于 2009-6-14 16:41:55
楼主