|
|
22仿真币
现有二类产品，A和B，如何实现1个A和1个B组装成1个C？我用orderlist建了二个OL_1和OL_2,分别用于A和B的等待，到了下一个进程，要取用的时候，一个都取不出来，实在不知为什么了，请大侠帮忙。9 C- x- _ [" n, ]
* [$ j& O. l4 b; }% ]. R. L. Dbegin P_wait arriving
" G- Q, c" C N% M) ]# f: B if this load type=L_a1 then
- E1 P+ i% N5 W3 }6 M" | wait to be ordered on OL_1
S: d9 d; E& C8 V) O if this load type=L_b1 then
0 ]4 s1 ^4 I* K8 j wait to be ordered on OL_2; r% C4 ~9 Z3 t# N- p
send to P_assemble
/ ^+ m2 o c9 n- F0 Z; wend. _: Y, O- m( I# L) L) x0 s, D
3 S& D# _- T z! N \ g5 t
begin P_assemble arriving
$ U% P" j9 o; C0 r order a load from OL_1 to die+ X0 |) r3 j: k$ e& @; w
in case order not filled backorder on OL_1
8 ~8 n! Z; H1 b& d3 Q6 L2 a' [ order a load from OL_2 to continue
2 W/ l j* Q! i' _+ v- H* m in case order not filled backorder on OL_2
# r" H; E9 @6 s2 n, q& q set load type to L_product0 e: A& E/ j% q, T& [2 `# o
get R_massm
4 O# M9 Y2 o7 C wait for normal 5,1 min4 A" E. P4 d+ h' t h! i$ n
free R_massm0 [1 h9 S# P# O2 r+ \ ^) B7 Z
move into Q_stock6 I$ S4 j; m' E0 o; Q2 Q
end |
|
发表于 2009-6-14 16:41:55
楼主