|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。
/ R4 T0 P1 V) ^1 M& X3 a5 d* E+ r1 H0 o
begin P_wait arriving+ W, Q4 w |9 H+ B
if this load type=L_a1 then) \$ D' |7 D5 }0 e% H, O4 N
wait to be ordered on OL_1
, N& E, E4 y# y: R9 [ if this load type=L_b1 then
7 ~2 ^2 g* e; a3 d @ wait to be ordered on OL_2
( O! ?) h1 B% J' z* Y* ^4 b& P send to P_assemble
) x; V2 Y# u( I6 @end
6 ~ r+ t% r! l$ I
, c# }6 V/ S& { a* l9 c4 l5 Z/ gbegin P_assemble arriving8 q$ v& @$ V5 `( q* y: G
order a load from OL_1 to die8 A1 g4 H+ [: \" T( o# ~
in case order not filled backorder on OL_1( g; x0 g/ ]2 W( s) _- F
order a load from OL_2 to continue& E' U3 s/ ?3 a
in case order not filled backorder on OL_2# i. ~7 K" J" T6 _
set load type to L_product0 n7 N3 @7 }' L# M
get R_massm
5 r% G' D; j# V' K8 u wait for normal 5,1 min' N; E% X7 {! q0 P, [
free R_massm0 o" V; x1 K. e% P" i
move into Q_stock
8 \ ^' H k: Y) q3 aend |
|
发表于 2009-6-14 16:41:55
楼主