ÿþ- - [INýQpe(uNÆbRW[&{2Nv^lbc:NpeW[ÆT
|
l o c a l f u n c t i o n s p l i t A n d C o l l e c t N u m b e r s ( s t r )
|
l o c a l n u m b e r s = { }
|
f o r n u m i n s t r i n g . g m a t c h ( s t r , " % d + " ) d o
|
n u m b e r s [ t o n u m b e r ( n u m ) ] = t r u e
|
e n d
|
r e t u r n n u m b e r s
|
e n d
|
|
- - [INýQpe(uN~búQ$N*NÆT-NÍTvpeW[v^üb¥cbW[&{2N
|
l o c a l f u n c t i o n f i n d C o m m o n N u m b e r s ( s t r A , s t r B )
|
l o c a l s e t A = s p l i t A n d C o l l e c t N u m b e r s ( s t r A )
|
l o c a l s e t B = s p l i t A n d C o l l e c t N u m b e r s ( s t r B )
|
l o c a l c o m m o n N u m b e r s = { }
|
f o r n u m i n p a i r s ( s e t A ) d o
|
i f s e t B [ n u m ] t h e n
|
t a b l e . i n s e r t ( c o m m o n N u m b e r s , t o s t r i n g ( n u m ) )
|
e n d
|
e n d
|
r e t u r n t a b l e . c o n c a t ( c o m m o n N u m b e r s , " , " )
|
e n d
|
- - [
|
- - S t o c k I n q u i r y ^X[ågâ
|
- - 1 0·ÖS÷]S'MO;`pe
|
- - 2 0·ÖSán'MO;`pe
|
- - 3 0ÿán'MO;`pe / ÷]S;`pe ÿ* 1 0 0 = án'MO~vRÔk
|
- - 4 0$Reán'MO^X[/f&T¾0R8 0 % , ¡l¾0RRÔÞVïSeQ^÷]S
|
- - p a r a m :
|
- - s t r _ r o a d w a y ÷]0R
|
- - ]
|
l o c a l f u n c t i o n S t o c k I n q u i r y ( s t r L u a D E I D )
|
- - ·ÖS*g»QÓ~v÷]S
|
l o c a l s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' L K ' A N D N _ L O C K _ S T A T E = 0 "
|
l o c a l n R e t , r o a d w a y = m 3 . Q u e r y D a t a O b j e c t ( s t r L u a D E I D , " R o a d w a y " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' ågâ÷]SáOo`1Y%' . . r o a d w a y )
|
e n d
|
i f ( r o a d w a y = = n i l o r r o a d w a y = = ' ' ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' ¡l gïSeQ^v÷]S! ' )
|
e n d
|
|
l o c a l s t r = ' '
|
f o r i = 1 , # r o a d w a y d o
|
l o c a l a t t r s = r o a d w a y [ i ] . a t t r s
|
a t t r s = m 3 . K e y V a l u e A t t r s T o O b j A t t r ( a t t r s )
|
i f ( a t t r s = = n i l ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
|
s t r = s t r . . a t t r s . N _ R O A D W A Y . . " , "
|
: : c o r o u t i n e : :
|
e n d
|
- - »Sd gT N*N,
|
s t r = l u a . t r i m _ l a s t e r _ c h a r ( s t r )
|
l u a . D e b u g ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " s t r " , s t r )
|
r e t u r n 0 , s t r
|
e n d
|
|
- - Rú^ûN¡R
|
l o c a l f u n c t i o n G T _ C r e a t e T a s k ( s t r L u a D E I D , o p e r a t i o n , t a s k , e n d _ l o c , t y p e , s c h e d u l e _ t y p e , r o a d w a y )
|
l o c a l n R e t , s t r R e t I n f o
|
l o c a l n e w _ t a s k = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " T a s k " )
|
n e w _ t a s k . o p _ c o d e = o p e r a t i o n . c o d e
|
n e w _ t a s k . o p _ n a m e = o p e r a t i o n . o p _ d e f _ n a m e
|
n e w _ t a s k . f a c t o r y = o p e r a t i o n . f a c t o r y
|
n e w _ t a s k . t y p e = w m s _ b a s e . G e t _ n C o n s t ( s t r L u a D E I D , t y p e )
|
n e w _ t a s k . c n t r _ c o d e = o p e r a t i o n . c n t r _ c o d e
|
- - w¹p:N
|
N N*NûN¡RvÈ~¹p
|
n e w _ t a s k . s t a r t _ w h _ c o d e = t a s k . e n d _ w h _ c o d e
|
n e w _ t a s k . s t a r t _ a r e a _ c o d e = t a s k . e n d _ a r e a _ c o d e
|
n e w _ t a s k . s t a r t _ l o c _ c o d e = t a s k . e n d _ l o c _ c o d e
|
n e w _ t a s k . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
n e w _ t a s k . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
n e w _ t a s k . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
n e w _ t a s k . r o a d w a y = r o a d w a y
|
n e w _ t a s k . s c h e d u l e _ t y p e = w m s _ b a s e . G e t _ n C o n s t ( s t r L u a D E I D , s c h e d u l e _ t y p e )
|
n R e t , n e w _ t a s k = m 3 . C r e a t e D a t a O b j ( s t r L u a D E I D , n e w _ t a s k )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " Rú^ûN¡R1Y%! " . . n e w _ t a s k
|
e n d
|
r e t u r n 0 , n e w _ t a s k
|
e n d
|
- - [ [
|
x: G T - 4 0 - 2 7
|
Tðy: ¨R\OÑv,T
|
\O:
|
eQãSýQpeÿT a s k F i n i s h
|
Rýôf:
|
|
ØSôfSòS:
|
- - ] ]
|
w m s _ o p = r e q u i r e ( " w m s _ o p e r a t i o n " )
|
m 3 = r e q u i r e ( " o i _ b a s e _ m o b o x " )
|
r e q u i r e ( " G T - B a s e " )
|
r e q u i r e ( " G T _ I n A n d O u t b o u n d P o l i c i e s " )
|
f u n c t i o n T a s k F i n i s h ( s t r L u a D E I D )
|
l o c a l n R e t , s t r R e t I n f o , o b j s
|
|
l o c a l o p e r a t i o n
|
n R e t , o p e r a t i o n = m 3 . G e t S y s C u r E d i t D a t a O b j ( s t r L u a D E I D , " O p e r a t i o n " )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , o p e r a t i o n )
|
e n d
|
|
- - ·ÖSûN¡Rù[a
|
l o c a l t a s k
|
n R e t , t a s k = m 3 . S y s I n p u t P a r a m T o D a t a O b j ( s t r L u a D E I D , " T a s k " )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , t a s k )
|
e n d
|
|
- - ãg\ON-NvibU\ÂSpe
|
l o c a l e x t _ d a t a , s u c c e s s
|
s u c c e s s , e x t _ d a t a = p c a l l ( j s o n . d e c o d e , o p e r a t i o n . e x t _ d a t a )
|
i f ( s u c c e s s = = f a l s e ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " o p e r a t i o n _ o b j . e x t _ d a t a -N
Q¹[J S O N <h_ NTÕl! " )
|
e n d
|
l o c a l t y p e = e x t _ d a t a . t y p e - - 1 |eèb,dÐ 2 Øpö,dÐ
|
l u a . D e b u g ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " t y p e " , t y p e )
|
l u a . D e b u g ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " t a s k " , t a s k )
|
|
- - 1 |eèb,dÐ 2 Øpöûy^ 3 T÷]Sûy^
|
i f ( t o n u m b e r ( t y p e ) = = 1 ) t h e n
|
l o c a l e n d _ l o c
|
- - ûN¡R{|W :NA G V úQ^,dÐ RRú^NµkýVêûN¡R
|
i f ( t a s k . t y p e = = w m s _ b a s e . G e t _ n C o n s t ( s t r L u a D E I D , " ûN¡R{|W- A G V úQ^,dÐ" ) ) t h e n
|
- - ÇûN¡RvÈ~¹p·ÖSæS N¹vlÐ/ ÞV^ãS
|
i f ( t a s k . e n d _ l o c _ c o d e = = w m s _ b a s e . G e t _ s C o n s t ( s t r L u a D E I D , " sO- N|iJS¢ÞV^ãS" ) ) t h e n
|
n R e t , e n d _ l o c = w m s _ w h . L o c a t i o n _ G e t I n f o ( s t r L u a D E I D , " T H R E E - Q G C K K - Q Y " )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " W M S _ L o c a t i o n _ G e t I n f o 1Y%! " . . e n d _ l o c )
|
e n d
|
e l s e
|
n R e t , e n d _ l o c = w m s _ w h . L o c a t i o n _ G e t I n f o ( s t r L u a D E I D , " T H R E E - B G C K K - Q Y " )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " W M S _ L o c a t i o n _ G e t I n f o 1Y%! " . . e n d _ l o c )
|
e n d
|
e n d
|
|
- - ·ÖSïSeQ^÷]S
|
l o c a l o p _ n u m , r o a d w a y
|
l o c a l s t r
|
n R e t , s t r = S t o c k I n q u i r y ( s t r L u a D E I D )
|
s t r = f i n d C o m m o n N u m b e r s ( s t r , " 3 , 4 " )
|
i f ( s t r = = ' ' ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " |eèb¡l gïSRMv÷]S! " )
|
e n d
|
l o c a l r o a d w a y _ l i s t = l u a . s p l i t ( s t r , " , " )
|
f o r i = 1 , # r o a d w a y _ l i s t d o
|
- - ·ÖS÷]SûN¡RpeÏ
|
l o c a l s t r C o n d i t i o n = " N _ R O A D W A Y = " . . r o a d w a y _ l i s t [ i ] . . " A N D N _ B _ S T A T E = 1 "
|
n R e t , s t r R e t I n f o = m o b o x . g e t D a t a O b j C o u n t ( s t r L u a D E I D , " T a s k " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " g e t D a t a O b j C o u n t 1Y%! " . . s t r R e t I n f o )
|
e n d
|
i f ( o p _ n u m = = n i l ) t h e n
|
o p _ n u m = l u a . S t r T o N u m b e r ( s t r R e t I n f o )
|
r o a d w a y = r o a d w a y _ l i s t [ i ]
|
e l s e i f ( t o n u m b e r ( o p _ n u m ) > = l u a . S t r T o N u m b e r ( s t r R e t I n f o ) ) t h e n
|
o p _ n u m = l u a . S t r T o N u m b e r ( s t r R e t I n f o )
|
r o a d w a y = r o a d w a y _ l i s t [ i ]
|
e n d
|
e n d
|
i f ( r o a d w a y = = n i l ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " |eèb¡l gïSRMv÷]S! " )
|
e n d
|
|
- - Rú^ûN¡R
|
l o c a l n e w _ t a s k
|
n R e t , n e w _ t a s k = G T _ C r e a t e T a s k ( s t r L u a D E I D , o p e r a t i o n , t a s k , e n d _ l o c , " ûN¡R{|W- Ëz^eQ^,dÐ" ,
|
" ¦^{|W- ýVê" , r o a d w a y )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , n e w _ t a s k )
|
e n d
|
|
- - ǹ[hV·ÖSireáOo`
|
l o c a l c g _ d e t a i l _ l i s t , c g _ d e t a i l
|
n R e t , c g _ d e t a i l _ l i s t = w m s _ c n t r . G e t _ C o n t a i n e r _ G o o d s ( s t r L u a D E I D , n e w _ t a s k . c n t r _ c o d e )
|
n R e t , c g _ d e t a i l = m 3 . O b j A t t r S t r T o L u a O b j ( " C G _ D e t a i l " , l u a . t a b l e 2 s t r ( c g _ d e t a i l _ l i s t [ 1 ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , c g _ d e t a i l )
|
e n d
|
|
- - ·ÖSw¹pÑ~[vW C S Ùz¹p
|
l o c a l c o n d i t i o n = " S _ V A L U E = ' " . . n e w _ t a s k . s t a r t _ l o c _ c o d e . . " ' A N D S _ N O T E N O T L I K E ' % ئ^Ä<hÙzðS% ' "
|
n R e t , s t r R e t I n f o = m 3 . G e t D a t a O b j B y C o n d i t i o n ( s t r L u a D E I D , " W M S _ C o n s t " , c o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " ·ÖS08^Ï0áOo`1Y%! " . . s t r R e t I n f o )
|
e n d
|
l o c a l s t a r t _ l o c _ c o d e _ z d = s t r R e t I n f o . n a m e
|
c o n d i t i o n = " S _ V A L U E = ' " . . n e w _ t a s k . e n d _ l o c _ c o d e . . " ' A N D S _ N O T E N O T L I K E ' % ئ^Ä<hÙzðS% ' "
|
n R e t , s t r R e t I n f o = m 3 . G e t D a t a O b j B y C o n d i t i o n ( s t r L u a D E I D , " W M S _ C o n s t " , c o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " ·ÖS08^Ï0áOo`1Y%! " . . s t r R e t I n f o )
|
e n d
|
l o c a l e n d _ l o c _ c o d e _ z d = s t r R e t I n f o . n a m e
|
|
- - (uýVêvûN¡R NÑS¥cãS
|
l o c a l s t r C o d e = l u a . g u i d ( ) - - u§N N*NG U I D W[&{2N
|
l o c a l s t r _ d a y _ t i m e = o s . d a t e ( " % Y - % m - % d % H : % M : % S " )
|
l o c a l u r l = w m s _ b a s e . G e t _ s C o n s t ( s t r L u a D E I D , " W C S - u r l " )
|
l o c a l s t r u r l = u r l . . " / c r e a t e "
|
l o c a l s t r H e a d e r = " "
|
l o c a l s t r B o d y = { }
|
l o c a l d a t a = {
|
r e q _ n o = s t r C o d e ,
|
t a s k _ t y p e = 5 , - - 1 = 'ireQ^ÿ2 = 'irúQ^ÿ3 = XbØvÄ~eQ^ÿ4 = XbØvÄ~úQ^ÿ5 = ûy¨Rÿ NÇ^MO ÿÿ6 = T÷]Sûy^; 7 = N T÷]Sûy^
|
t a s k _ n o = n e w _ t a s k . c o d e ,
|
t u n n e l _ n o = r o a d w a y ,
|
f r o m _ p o s = s t a r t _ l o c _ c o d e _ z d ,
|
t o _ p o s = e n d _ l o c _ c o d e _ z d ,
|
m a t _ c o d e = o p e r a t i o n . c n t r _ c o d e ,
|
m a t _ t y p e = c g _ d e t a i l . i t e m _ c o d e ,
|
m a t _ m e m o = c g _ d e t a i l . i t e m _ n a m e ,
|
r e q _ t i m e = s t r _ d a y _ t i m e
|
}
|
s t r B o d y [ 1 ] = d a t a
|
l u a . D e b u g ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' s t r B o d y ' , s t r B o d y )
|
n R e t , s t r R e t I n f o = C r e a t e I n t e r f a c e E x c ( s t r L u a D E I D , s t r u r l , s t r H e a d e r , s t r B o d y , " W C S " , " ûN¡RRú^" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " (u¥cãS1Y%! " . . s t r R e t I n f o )
|
e n d
|
- - ¾n¶r`*g¨c
|
w m s _ t a s k . S e t S t a t e B y C o d e ( s t r L u a D E I D , n e w _ t a s k . c o d e , " ûN¡R¶r`- ò]¨c" )
|
|
- - w¹pãÑ~
|
n R e t , s t r R e t I n f o = w m s _ w h . L o c _ C o n t a i n e r _ U n b i n d i n g ( s t r L u a D E I D , t a s k . s t a r t _ l o c _ c o d e , o p e r a t i o n . c n t r _ c o d e ,
|
" Ñ~[ãÑ~¹eÕl- û|ß~" , " [b" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' 'MO¹[hVãÑ~1Y%! ' . . s t r R e t I n f o )
|
e n d
|
|
- - w¹pã
|
n R e t , s t r R e t I n f o = w m s . w m s _ U n l o c k L o c a t i o n ( s t r L u a D E I D , t a s k . s t a r t _ l o c _ c o d e , o p e r a t i o n . b s _ n o )
|
i f ( n R e t ~ = 0 ) t h e n l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " w m s _ U n l o c k L o c a t i o n 1Y%! " . . s t r R e t I n f o ) e n d
|
|
- - ûN¡R{|W :NA G V eQ^,dÐ R¾nûN¡R[bTsOûN¡R[b
|
e l s e i f ( t a s k . t y p e = = w m s _ b a s e . G e t _ n C o n s t ( s t r L u a D E I D , " ûN¡R{|W- A G V eQ^,dÐ" ) ) t h e n
|
- - ¾n\ON[b
|
n R e t , s t r R e t I n f o = w m s _ o p . S e t F i n i s h ( s t r L u a D E I D , o p e r a t i o n . c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) ,
|
" ¾n\ON÷S= ' " . . o p e r a t i o n . c o d e . . " ' v\ON[b1Y%! " . . s t r R e t I n f o )
|
e n d
|
|
- - ¾nsOûN¡R[b
|
l o c a l c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . o p e r a t i o n . c n t r _ c o d e . . " ' "
|
l o c a l u p d a t e _ s q l = " N _ B _ S T A T E = 3 , S _ B _ S T A T E = ' [b' "
|
n R e t , s t r R e t I n f o = m o b o x . u p d a t e D a t a A t t r B y C o n d i t i o n ( s t r L u a D E I D , " G T _ T a s k " , c o n d i t i o n , u p d a t e _ s q l )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " îO9eûy^USfÆ~¶r`1Y%ÿ" . . s t r R e t I n f o )
|
e n d
|
|
- - $ResOûN¡RvegnUS÷S@b(WvsOûN¡R/f&Týò][b, [bR¾n|eèb¶r`:N[b
|
s t r C o n d i t i o n = " S _ B _ S T A T E < > ' [b' A N D S _ B S _ N O = ( S E L E C T S _ B S _ N O F R O M T N _ G T _ T a s k w h e r e S _ C O D E = ' " . .
|
o p e r a t i o n . b s _ n o . . " ' ) "
|
n R e t , s t r R e t I n f o = m o b o x . g e t D a t a O b j C o u n t ( s t r L u a D E I D , " G T _ T a s k " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , s t r R e t I n f o )
|
e n d
|
l u a . D e b u g ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " n R e t " , n R e t )
|
i f ( t o n u m b e r ( s t r R e t I n f o ) = = 0 ) t h e n
|
c o n d i t i o n = " S _ N O = ( S E L E C T S _ B S _ N O F R O M T N _ G T _ T a s k w h e r e S _ C O D E = ' " . . o p e r a t i o n . b s _ n o . . " ' ) "
|
u p d a t e _ s q l = " S _ B _ S T A T E = 3 "
|
n R e t , s t r R e t I n f o = m o b o x . u p d a t e D a t a A t t r B y C o n d i t i o n ( s t r L u a D E I D , " G T _ A l l o t _ O r d e r " , c o n d i t i o n , u p d a t e _ s q l )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " îO9e|eèbUS¶r`1Y%ÿ" . . s t r R e t I n f o )
|
e n d
|
e n d
|
|
- - w¹pãÑ~
|
n R e t , s t r R e t I n f o = w m s _ w h . L o c _ C o n t a i n e r _ U n b i n d i n g ( s t r L u a D E I D , t a s k . s t a r t _ l o c _ c o d e , o p e r a t i o n . c n t r _ c o d e ,
|
" Ñ~[ãÑ~¹eÕl- û|ß~" , " [b" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' 'MO¹[hVãÑ~1Y%! ' . . s t r R e t I n f o )
|
e n d
|
- - È~¹pÑ~[
|
n R e t , s t r R e t I n f o = w m s _ w h . L o c _ C o n t a i n e r _ B i n d i n g ( s t r L u a D E I D , t a s k . e n d _ l o c _ c o d e , o p e r a t i o n . c n t r _ c o d e ,
|
" Ñ~[ãÑ~¹eÕl- û|ß~" , " [b" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , ' 'MO¹[hVãÑ~1Y%! ' . . s t r R e t I n f o )
|
e n d
|
|
- - 9hnc\ONvÈ~¹p^:SÞV O^MO
|
l o c a l t o l o c , f r o m l o c
|
i f ( o p e r a t i o n . e n d _ a r e a _ c o d e = = ' P F L ' o r o p e r a t i o n . e n d _ a r e a _ c o d e = = ' H W P F L ' ) t h e n
|
t o l o c = ' L K 0 0 7 '
|
e l s e i f ( o p e r a t i o n . e n d _ a r e a _ c o d e = = ' T F L ' o r o p e r a t i o n . e n d _ a r e a _ c o d e = = ' H W T F L ' ) t h e n
|
t o l o c = ' L K 0 0 5 '
|
e n d
|
i f ( o p e r a t i o n . s t a r t _ a r e a _ c o d e = = ' P F L ' o r o p e r a t i o n . s t a r t _ a r e a _ c o d e = = ' H W P F L ' ) t h e n
|
f r o m l o c = ' L K 0 0 7 '
|
e l s e i f ( o p e r a t i o n . s t a r t _ a r e a _ c o d e = = ' T F L ' o r o p e r a t i o n . s t a r t _ a r e a _ c o d e = = ' H W T F L ' ) t h e n
|
f r o m l o c = ' L K 0 0 5 '
|
e n d
|
|
- - ·ÖS¹[hV'ÁTfÆ~
|
l o c a l c g _ d e t a i l
|
l o c a l s t r C o n d i t i o n = " S _ C N T R _ C O D E = ' " . . o p e r a t i o n . c n t r _ c o d e . . " ' "
|
n R e t , c g _ d e t a i l = m 3 . G e t D a t a O b j B y C o n d i t i o n ( s t r L u a D E I D , " C G _ D e t a i l " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . c g _ d e t a i l )
|
e n d
|
|
- - ÞV OG T W M S
|
l o c a l u r l = w m s _ b a s e . G e t _ s C o n s t ( s t r L u a D E I D , " G T W M S - u r l " )
|
l o c a l s t r u r l = u r l
|
l o c a l s t r H e a d e r = " "
|
l o c a l s t r B o d y = {
|
a p p l i c a t i o n = " G I T I " ,
|
c o d e = " W C S _ F R E E Z E _ W M S " ,
|
d a t a = {
|
w h _ c o d e = " w m w h s e 1 " ,
|
b a t c h _ n o = c g _ d e t a i l . b a t c h _ n o ,
|
s k u = c g _ d e t a i l . i t e m _ c o d e ,
|
q t y = c g _ d e t a i l . q t y ,
|
f r o m l o c = f r o m l o c ,
|
t o l o c = t o l o c ,
|
l o c t y p e = n i l ,
|
t y p e = 3 - - 1 . »QÓ~/ 2 . ã»Q/ 3 . ,dÐ
|
}
|
}
|
l o c a l s o u r c e = " G T W M S èbÞV O"
|
n R e t , s t r R e t I n f o = C r e a t e I n t e r f a c e E x c ( s t r L u a D E I D , s t r u r l , s t r H e a d e r , s t r B o d y , " G T W M S " , s o u r c e )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " (u¥cãS1Y%! " . . s t r R e t I n f o )
|
e n d
|
|
- - ûN¡R{|W ûN¡R{|W- Ëz^eQ^,dÐ RRú^ NµkA G V ûN¡R
|
e l s e i f ( t a s k . t y p e = = w m s _ b a s e . G e t _ n C o n s t ( s t r L u a D E I D , " ûN¡R{|W- Ëz^eQ^,dÐ" ) ) t h e n
|
n R e t , e n d _ l o c = w m s _ w h . L o c a t i o n _ G e t I n f o ( s t r L u a D E I D , o p e r a t i o n . e n d _ l o c _ c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " W M S _ L o c a t i o n _ G e t I n f o 1Y%! " . . e n d _ l o c )
|
e n d
|
|
- - Rú^ûN¡R
|
l o c a l n e w _ t a s k
|
n R e t , n e w _ t a s k = G T _ C r e a t e T a s k ( s t r L u a D E I D , o p e r a t i o n , t a s k , e n d _ l o c , " ûN¡R{|W- A G V eQ^,dÐ" ,
|
" ¦^{|W- A G V " )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , n e w _ t a s k )
|
e n d
|
- - ǹ[hV·ÖSireáOo`
|
l o c a l c g _ d e t a i l
|
n R e t , c g _ d e t a i l = w m s _ c n t r . G e t _ C o n t a i n e r _ G o o d s ( s t r L u a D E I D , n e w _ t a s k . c n t r _ c o d e )
|
n R e t , c g _ d e t a i l = m 3 . O b j A t t r S t r T o L u a O b j ( " C G _ D e t a i l " , l u a . t a b l e 2 s t r ( c g _ d e t a i l [ 1 ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , c g _ d e t a i l )
|
e n d
|
|
l o c a l d a t a = {
|
t a s k D a t a = {
|
t a s k N u m = n e w _ t a s k . c o d e ,
|
p i c k S t a t i o n = n e w _ t a s k . s t a r t _ l o c _ c o d e ,
|
d r o p S t a t i o n = n e w _ t a s k . e n d _ l o c _ c o d e ,
|
t a s k T y p e = 5 ,
|
c a r r i e r T y p e = 1 ,
|
p r i o r i t y = 1 ,
|
s o u r c e = " Y C L "
|
} ,
|
p a r t D a t a = {
|
r f i d = o p e r a t i o n . c n t r _ c o d e ,
|
l o t N u m b e r = n i l ,
|
p a r t N u m b e r = c g _ d e t a i l . i t e m _ c o d e ,
|
p a r t D e s c = c g _ d e t a i l . i t e m _ c o d e ,
|
p a r t T y p e = n i l ,
|
w e i g h t = c g _ d e t a i l . q t y ,
|
u n i t = c g _ d e t a i l . w u ,
|
m a t u r i t y T i m e = n i l ,
|
p r o d u c t i o n T i m e = n i l ,
|
s t e w i n g T i m e = n i l ,
|
o v e r d u e T i m e = n i l
|
}
|
}
|
- - (uA G V ûN¡R NÑS
|
l o c a l u r l = w m s _ b a s e . G e t _ s C o n s t ( s t r L u a D E I D , " A G V - u r l " )
|
l o c a l s t r u r l = u r l . . " / C r e a t e T a s k "
|
l o c a l s t r H e a d e r = " "
|
l o c a l s t r B o d y = d a t a
|
n R e t , s t r R e t I n f o = C r e a t e I n t e r f a c e E x c ( s t r L u a D E I D , s t r u r l , s t r H e a d e r , s t r B o d y , " A G V " , " ûN¡RRú^" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " (uW C S ¥cãS1Y%! " . . s t r R e t I n f o )
|
e n d
|
|
- - ¾n¶r`*g¨c
|
w m s _ t a s k . S e t S t a t e B y C o d e ( s t r L u a D E I D , n e w _ t a s k . c o d e , " ûN¡R¶r`- ò]¨c" )
|
e n d
|
e l s e i f ( t o n u m b e r ( t y p e ) = = 3 ) t h e n
|
- - ¾n\ON[b
|
n R e t , s t r R e t I n f o = w m s _ o p . S e t F i n i s h ( s t r L u a D E I D , o p e r a t i o n . c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) ,
|
" ¾n\ON÷S= ' " . . o p e r a t i o n . c o d e . . " ' v\ON[b1Y%! " . . s t r R e t I n f o )
|
e n d
|
|
- - ¾nsOûN¡R[b
|
l o c a l c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . o p e r a t i o n . c n t r _ c o d e . . " ' "
|
l o c a l u p d a t e _ s q l = " N _ B _ S T A T E = 3 , S _ B _ S T A T E = ' [b' "
|
n R e t , s t r R e t I n f o = m o b o x . u p d a t e D a t a A t t r B y C o n d i t i o n ( s t r L u a D E I D , " G T _ T a s k " , c o n d i t i o n , u p d a t e _ s q l )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " îO9eûy^USfÆ~¶r`1Y%ÿ" . . s t r R e t I n f o )
|
e n d
|
e n d
|
e n d
|
|
