ÿþ- - [ [
|
x: G T - 1 1 9 - 1 9
|
Tðy: Rú^\ON
|
\OÿL Z H
|
åe gÿ2 0 2 4 / 8 / 1 3
|
|
ýQpeÿ C r e a t e O p e r a t i o n
|
Rý:
|
s t e p 1 $ReúQ^USnc/f&T/f/T¨R¶r`
|
s t e p 2 /T¨R¶r`RÇúQ^V{eu·ÖS\ONw¹p
|
s t e p 3 Rú^\ON
|
|
ØSôf°U_:
|
V 1 . 1 L Z H 2 0 2 4 1 1 2 2 úQ^USîO9e:N;NP[h ÿãNxte
|
V 1 . 2 L Z H 2 0 2 5 0 3 2 6 °eXÇ- 'Am z ÿYgG T W M S NÑSvÈ~¹p:gðS:NúV[v
|
V 1 . 3 L Z H 2 0 2 5 0 5 2 6 eQ^USirexý/f9 MOx ÿågâÇ
|
N8n NÑSv6 MOx!jÊ|ågâ6qTÇyb!k÷S[MO
|
|
- - ] ]
|
|
j s o n = r e q u i r e ( " j s o n " )
|
m o b o x = r e q u i r e ( " O I L u a _ J a v e l i n E x t " )
|
m 3 = r e q u i r e ( " o i _ b a s e _ m o b o x " )
|
w m s _ b a s e = r e q u i r e ( " w m s _ b a s e " )
|
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 " )
|
w m s _ w h = r e q u i r e ( " w m s _ w h " )
|
f u n c t i o n C r e a t e O p e r a t i o n ( 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
|
|
l o c a l s t o c k _ o u t
|
n R e t , s t o c k _ o u t = 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 , " G T _ S t o c k _ O u t " )
|
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 o c k _ o u t ) 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 ) , ' s t o c k _ o u t ' , s t o c k _ o u t )
|
|
l o c a l r e t _ l o c
|
i f ( s t o c k _ o u t . s t a t e = = ' /T(u' ) t h e n
|
- - ·ÖSåirevire{|W
|
l o c a l i t e m _ t y p e , m a t e r i a l
|
n R e t , i t e m _ t y p e , m a t e r i a l = G T _ G e t _ I t e m T y p e ( s t r L u a D E I D , s t o c k _ o u t . i t e m _ 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 ) , i t e m _ t y p e ) e n d
|
|
- - ·ÖS ire+ yb÷S @b(W^:S
|
- - V 1 . 3
|
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 I N ( S E L E C T S _ C N T R _ C O D E F R O M T N _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E L I K E ' % " . .
|
s t o c k _ o u t . i t e m _ c o d e . . " % ' A N D S _ B A T C H _ N O = ' " . . s t o c k _ o u t . b a t c h _ n o . . " ' ) "
|
l o c a l l o c _ c o n t a i n e r
|
n R e t , l o c _ c o n t a i n e r = 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 , " L o c _ C o n t a i n e r " , s t r C o n d i t i o n )
|
i f ( n R e t = = 1 ) 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 ) , " NX[(Wyb!k÷S:N" . . s t o c k _ o u t . b a t c h _ n o . . " vire! " )
|
e l s 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 ) , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . l o c _ c o n t a i n e r )
|
e n d
|
- - ·ÖS'MOáOo`
|
l o c a l l o c _ i n f o
|
n R e t , l o c _ i n f o = 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 , l o c _ c o n t a i n e r . 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%! " . . l o c _ i n f o ) e n d
|
|
l o c a l o p _ d e f _ n a m e = ' '
|
|
|
|
l o c a l e n d _ l o c _ c o d e , l o c _ b a s e i n f o
|
i f ( s t o c k _ o u t . m s _ c o d e = = ' A B C ' ) t h e n
|
o p _ d e f _ n a m e = " Ç- '"
|
- - ·ÖS:gðS Nô~¤bvúQ^^:S
|
l o c a l a r e a _ l i n k
|
s t r C o n d i t i o n = " S _ M S _ C O D E = ' A B C ' "
|
n R e t , a r e a _ l i n k = 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 , " M S _ A r e a _ L i n 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Ç- ':gðSáOo`1Y%! ' . . a r e a _ l i n k ) e n d
|
i f ( a r e a _ l i n k = = n i l o r a r e a _ l i n k = = ' ' ) 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 ) , ' ÷ô~¤bÇ- 'úQ^^:SbMOn! ' ) 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 ) , ' a r e a _ l i n k ' , a r e a _ l i n k )
|
|
- - ·ÖS:gpe, :gc[úQ^^:SMOn
|
l o c a l r a n d o m I n t = m a t h . r a n d o m ( 1 , # a r e a _ l i n k )
|
l o c a l a t t r
|
n R e t , a t t r = m 3 . O b j A t t r S t r T o L u a O b j ( " M S _ A r e a _ L i n k " , l u a . t a b l e 2 s t r ( a r e a _ l i n k [ r a n d o m I n t ] . 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 ) ,
|
" m 3 . O b j A t t r S t r T o L u a O b j ( G T _ L a b e l _ C r a d ) 1Y%! " . . a t t r )
|
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 ) , ' a t t r ' , a t t r )
|
|
i f ( t o n u m b e r ( a t t r . l a _ t y p e ) = = 0 ) t h e n
|
e n d _ l o c _ c o d e = a t t r . l a _ c o d e . . " - Q Y "
|
e l s e i f ( t o n u m b e r ( a t t r . l a _ t y p e ) = = 1 ) t h e n
|
e n d _ l o c _ c o d e = a t t r . l a _ c o d e
|
e n d
|
e l s e
|
i f ( l o c _ i n f o . a r e a _ c o d e = = ' P F L ' o r l o c _ i n f o . a r e a _ c o d e = = ' T F L ' o r l o c _ i n f o . a r e a _ c o d e = = ' H W P F L ' o r l o c _ i n f o . a r e a _ c o d e = = ' H W T F L ' ) t h e n
|
n R e t , r e t _ l o c = F L _ S t o c k O u t ( s t r L u a D E I D , s t o c k _ o u t )
|
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 ) , r e t _ l o c ) 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 ) , ' 1 1 1 ' , 1 1 1 )
|
o p _ d e f _ n a m e = " |eúQ^"
|
e n d _ l o c _ c o d e = s t o c k _ o u t . m s _ c o d e
|
e l s e i f ( l o c _ i n f o . a r e a _ c o d e = = ' L K ' ) t h e n
|
n R e t , r e t _ l o c = L K _ S t o c k O u t ( s t r L u a D E I D , s t o c k _ o u t )
|
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 ) , r e t _ l o c ) 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 ) , ' r e t _ l o c ' , l u a . t a b l e 2 s t r ( r e t _ l o c ) )
|
o p _ d e f _ n a m e = " Ëz^úQ^"
|
n R e t , e n d _ l o c _ c o d e = w m s _ b a s e . G e t A r e a A v a l i a b l e L o c ( s t r L u a D E I D , s t o c k _ o u t . m s _ 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 _ G e t A r e a A v a l i a b l e L o c 1Y%ÿ" . . e n d _ l o c _ c o d e ) e n d
|
e n d _ l o c _ c o d e = e n d _ l o c _ c o d e . l o c _ c o d e
|
e n d
|
|
i f ( r e t _ l o c = = n i l o r r e t _ l o c = = ' ' ) 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ïSúQ^v'ÁT! " )
|
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 ) , ' r e t _ l o c ' , r e t _ l o c )
|
n R e t , l o c _ b a s e i n f o = w m s . w m s _ G e t L o c B a s e I n f o ( r e t _ l o c . s t a r t _ 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 ) , " ·ÖS'MOúW,gáOo`1Y%! " . . l o c _ b a s e 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 ) , ' w¹p'MOáOo`' , l o c _ b a s e i n f o )
|
l o c _ b a s e i n f o = j s o n . d e c o d e ( l o c _ b a s e 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 ) , ' e n d _ l o c _ c o d e ' , e n d _ l o c _ c o d e )
|
l o c a l e n d _ l o c
|
n R e t , e n d _ l o c = w m s . w m s _ G e t L o c B a s e I n f o ( 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 ) , " ·ÖS'MOúW,gáOo`1Y%! " . . e n d _ l o c ) 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 ) , ' È~¹p'MOáOo`' , e n d _ l o c )
|
e n d _ l o c = j s o n . d e c o d e ( e n d _ l o c )
|
|
- - s t e p 4 : Rú^,dÐ\ON
|
l o c a l o p e r a t i o n = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " O p e r a t i o n " )
|
o p e r a t i o n . s t a r t _ w h _ c o d e = l o c _ b a s e i n f o . w h _ c o d e
|
o p e r a t i o n . s t a r t _ a r e a _ c o d e = l o c _ b a s e i n f o . a r e a _ c o d e
|
o p e r a t i o n . s t a r t _ l o c _ c o d e = l o c _ b a s e i n f o . c o d e
|
|
- - È~¹p/fsOW M S OÇegv
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . 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
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
|
o p e r a t i o n . b s _ n o = s t o c k _ o u t . d e l i v e r y _ n o - - N¡RUS÷S:NúQ^ûN¡R÷S
|
|
o p e r a t i o n . c n t r _ c o d e = r e t _ l o c . c n t r _ c o d e
|
o p e r a t i o n . o p _ d e f _ n a m e = o p _ d e f _ n a m e
|
o p e r a t i o n . o p _ 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 , " \ON{|W- úQ^" )
|
|
l o c a l s t r C o d e
|
l o c a l s t r H e a d e r = ' T A ' . . o s . d a t e ( " % y % m % d " ) . . ' - '
|
n R e t , s t r C o d e = m o b o x . g e t S e r i a l N u m b e r ( " ûN¡R" , s t r H e a d e r , 5 )
|
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 ) , ' 3u÷0ûN¡R0x1Y%! ' . . s t r C o d e ) e n d
|
|
- - ¾nibU\ÂSpe&^eQ\ON/T¨R ÿûN¡R[b
|
l o c a l e x t _ t a b l e = { }
|
e x t _ t a b l e . b a t c h _ n o = s t o c k _ o u t . b a t c h _ n o
|
e x t _ t a b l e . i t e m _ t y p e = i t e m _ t y p e
|
e x t _ t a b l e . d e l i v e r y _ n o = s t o c k _ o u t . d e l i v e r y _ n o
|
e x t _ t a b l e . t a s k _ n o = s t r C o d e
|
e x t _ t a b l e . m e s _ t a s k _ n o = s t o c k _ o u t . m e s _ t a s k _ n o
|
e x t _ t a b l e . w m s _ t a s k _ n o = s t o c k _ o u t . w m s _ t a s k _ n o
|
e x t _ t a b l e . w m s L o t = s t o c k _ o u t . w m s _ l o t
|
o p e r a t i o n . e x t _ d a t a = l u a . t a b l e 2 s t r ( e x t _ t a b l e )
|
|
n R e t , o p e r a t i o n = 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 , 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 ) , ' Rú^0\ON01Y%! ' . . o p e r a t i o n ) 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 ) , ' o p e r a t i o n ' , o p e r a t i o n )
|
|
- - \ONvw¹p R
|
n R e t , s t r R e t I n f o = w m s . w m s _ L o c k L o c a t i o n ( s t r L u a D E I D , o p e r a t i o n . s t a r t _ l o c _ c o d 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 , " {|W- úQ^" ) , s t r C o d e , o p e r a t i o n . c o d e , o p e r a t i o n . o p _ d e f _ n a m 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 k L o c a t i o n 1Y%! " . . s t r R e t I n f o ) e n d
|
|
- - ¹[hV R
|
l o c a l c o n t a i n e r
|
n R e t , c o n t a i n e r = w m s _ c n t r . 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 . c n t r _ 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 ) , ' ·ÖS¹[hVù[a1Y%! ' . . c o n t a i n e r ) e n d
|
n R e t , s t r R e t I n f o = w m s _ c n t r . S e t L o c k ( s t r L u a D E I D , c o n t a i n e r , " {|W- úQ^" , 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 ) , ' XbØv¹[hVûm RúQ^1Y%! ' . . 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 ) , ' 1 1 1 ' , 1 1 1 )
|
- - °eXúQ^USfÆ~
|
l o c a l s o _ d e t a i l = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " G T _ S O _ D e t a i l " )
|
- - w¹páOo`
|
s o _ d e t a i l . d e l i v e r y _ n o = s t o c k _ o u t . d e l i v e r y _ n o
|
s o _ d e t a i l . o p _ c o d e = o p e r a t i o n . c o d e
|
s o _ d e t a i l . c n t r _ c o d e = r e t _ l o c . c n t r _ c o d e
|
s o _ d e t a i l . s t a r t _ a r e a _ c o d e = l o c _ b a s e i n f o . a r e a _ c o d e
|
s o _ d e t a i l . s t a r t _ l o c _ c o d e = l o c _ b a s e i n f o . c o d e
|
s o _ d e t a i l . 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
|
s o _ d e t a i l . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
n R e t , s o _ d e t a i l = 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 , s o _ d e t a i 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 ) , ' Rú^0úQ^USfÆ~01Y%! ' . . s o _ d e t a i l ) e n d
|
e n d
|
e n d
|
