|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。: L% `- G; T. O# R+ O Y( p/ t6 s
* E5 A# w+ H% S. ]0 P6 @1 V
begin P_wait arriving
- {/ G+ [) H' Q! T8 c$ J if this load type=L_a1 then
i6 q; H- i) n/ p7 S# K wait to be ordered on OL_16 M& z% f3 J& z- O4 U: K* k9 w4 n$ b
if this load type=L_b1 then0 _5 q6 N$ L9 R0 t# a
wait to be ordered on OL_2
+ T- ?1 t: D* r) l send to P_assemble
6 a* w* K% r: b: H6 q8 v' uend3 M9 O% F5 s }' r
5 Z' y" S5 P& z, pbegin P_assemble arriving( C$ ^( t j* Q; x! { v+ ]
order a load from OL_1 to die
: G; h1 h0 J2 p6 j3 f in case order not filled backorder on OL_1+ i& V9 Y; s: n+ C
order a load from OL_2 to continue
9 S) e4 W6 l6 I) T in case order not filled backorder on OL_26 ]% r1 F/ _5 a
set load type to L_product! s7 m; T0 ^! L
get R_massm* y% `. L0 v g: @
wait for normal 5,1 min \" a5 f. p. _6 @+ N" s, V0 D, F% @
free R_massm
, R8 M- g; M' G2 M move into Q_stock+ u, \( u9 _6 v3 T$ V \
end |
|
发表于 2009-6-14 16:41:55
楼主