ÿþ- - [ [
|
x: W M S - 0 4 - 0 3
|
Tðy: ybÏü[eQ
|
\OÿH A N
|
eQãSýQpeÿI m p o r t L o c a t i o n
|
|
Rýôf:
|
Yt'MOü[eQ ÿ(Wü[eQvöeP$Re N NÓN^0^:SI{/f&TX[(W ÿYg NX[(W°eRú^
|
ü[eQ<h_Á
|
0# M O W M S - 0 0 1 ÓN^'MO[INh. x l s x 0
|
ØSôfSòS:
|
V 1 . 0 H A N 2 0 2 2 - 9 - 1 1 °eú^
|
V 1 . 1 H A N 2 0 2 2 - 1 0 - 5 ÖSm N _ L O C _ T Y P E 'MO{|W ÿ^\'`ØSN ÿ÷]SI{^\'`ÎN S _ 9e:N N _
|
V 1 . 2 H A N X U 2 0 2 2 - 1 0 - 8 °eXÓN^ Tðy ÿ'MO Tðy ÿ^:S Tðy ÿ'MO{|W, A G V ù[gqx
|
V 6 . 0 H A N 2 0 2 3 / 9 / 6 l u a . E r r o r / l u a . D e b u g ýQpeØSS
|
V 6 . 1 N A N 2 0 2 3 / 9 / 1 6 eQÂSpeÎNI n p u t P a r a m t e r 9ebÎND a t a J s o n ·ÖS ÿ
|
ÎNSegv NagpencûÖSØSbYagÿÐcØHes ÿ
|
'MOù[a-Nv S _ L O C _ C O D E 9e:N S _ C O D E ÿÓN^ù[a-Nv S _ W H _ C O D E 9e:N S _ C O D E ÿ S _ W H _ N A M E 9e:N S _ N A M E
|
^:Sù[a-Nv S _ A R E A _ C O D E 9e:N S _ C O D E ÿ S _ A R E A _ N A M E 9e:N S _ N A M E
|
V 7 . 0 H A N 2 0 2 3 / 1 1 / 1 5 ÖSm d e e p _ t y p e , ñmMO ÿW M S _ L o c D e e p P o s i t i o n
|
- - ] ]
|
w m s _ b a s e = r e q u i r e ( " w m s _ b a s e " )
|
|
l o c a l l o c a t i o n _ t y p e = { } - - 'MO{|W
|
l o c a l p u r p o s e = { } - - (u
|
|
- - ·ÖSW[xQy-NvN a m e ÿv^Nlbpe<PÔÞV
|
l o c a l f u n c t i o n G e t L o c a t i o n T y e V a l u e ( s t r L o c T y p e N a m e )
|
l o c a l n , n C o u n t
|
l o c a l n V a l u e = 1
|
|
n C o u n t = # l o c a t i o n _ t y p e
|
f o r n = 1 , n C o u n t d o
|
i f ( l o c a t i o n _ t y p e [ n ] . V a l u e = = s t r L o c T y p e N a m e ) t h e n
|
n V a l u e = l u a . S t r T o N u m b e r ( l o c a t i o n _ t y p e [ n ] . N a m e )
|
i f ( n V a l u e = = 0 ) t h e n n V a l u e = 1 e n d
|
r e t u r n n V a l u e
|
e n d
|
e n d
|
r e t u r n n V a l u e
|
e n d
|
|
- - ·ÖSW[xQy-NvN a m e ÿv^Nlbpe<PÔÞV
|
l o c a l f u n c t i o n G e t P u r p o s e V a l u e ( s t r P u r p o s e )
|
l o c a l n , n C o u n t
|
l o c a l n V a l u e = 0
|
|
n C o u n t = # p u r p o s e
|
f o r n = 1 , n C o u n t d o
|
i f ( p u r p o s e [ n ] . V a l u e = = s t r P u r p o s e ) t h e n
|
r e t u r n l u a . S t r T o N u m b e r ( p u r p o s e [ n ] . N a m e )
|
e n d
|
e n d
|
r e t u r n n V a l u e
|
e n d
|
|
f u n c t i o n I m p o r t L o c 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
|
- - ·ÖSü[eQvpenc, ÔÞV [ { " a t t r " : " x x " , " v a l u e " : " " } , . . . ]
|
l o c a l r o w _ d a t a = { }
|
n R e t , r o w _ d a t a = m 3 . G e t S y s D a t a J s o n ( s t r L u a D E I D )
|
i f ( n R e t ~ = 0 o r s t r R e t I n f o = = ' ' ) 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Õl·ÖSü[eQpenc! " ) 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 o w _ d a t a ' , r o w _ d a t a )
|
|
l o c a l r o w _ a t t r s
|
l o c a l n , n C o u n t , n V a l u e , n R o w s
|
n R o w s = # r o w _ d a t a
|
i f ( n R o w s = = 0 ) t h e n r e t u r n e n d
|
|
- - ·ÖSÍd\Ovå]ShÆ
|
l o c a l f a c t o r y
|
n R e t , f a c t o r y = m 3 . G e t M y F a c t o r y ( s t r L u a D E I D )
|
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 M y F a c t o r y 1Y%! " . . f a c t o r y ) e n d
|
i f ( f a c t o r y = = ' ' ) t h e n f a c t o r y = ' 0 0 0 0 ' e n d
|
|
- - NNsQ.^\'`
|
l o c a l s t r W H C o d e = ' '
|
l o c a l s t r W H N a m e = ' '
|
l o c a l s t r A r e a C o d e = ' '
|
l o c a l s t r A r e a N a m e = ' '
|
l o c a l s t r L o c C o d e = ' '
|
l o c a l s t r L o c N a m e = ' '
|
l o c a l l o c a t i o n = { }
|
|
- - ·ÖS 'MO{|W W[xQ ÿb eQ v 8^Ä/ XàS lb tepe<P
|
n R e t , s t r R e t I n f o = m o b o x . g e t D i c t I t e m I I n f o ( " W M S _ L o c a t i o n T y p e " )
|
i f ( n R e t ~ = 0 o r s t r R e t I n f o = = ' ' ) 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[INW M S _ L o c a t i o n T y p e W[xQ! " ) e n d
|
l o c a t i o n _ t y p e = j s o n . d e c o d e ( s t r R e t I n f o )
|
|
n R e t , s t r R e t I n f o = m o b o x . g e t D i c t I t e m I I n f o ( " W M S _ L o c a t i o n P u r p o s e " )
|
i f ( n R e t ~ = 0 o r s t r R e t I n f o = = ' ' ) 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[INW M S _ L o c a t i o n P u r p o s e W[xQ! " ) e n d
|
p u r p o s e = j s o n . d e c o d e ( s t r R e t I n f o )
|
|
- - ek¤1 ·ÖSÎNe x c e l ü[eQv NLpenc
|
f o r r o w = 1 , n R o w s d o
|
r o w _ a t t r s = r o w _ d a t a [ r o w ]
|
n C o u n t = # r o w _ a t t r s
|
s t r W H C o d e = ' '
|
s t r W H N a m e = ' '
|
s t r A r e a C o d e = ' '
|
s t r A r e a N a m e = ' '
|
s t r L o c C o d e = ' '
|
s t r L o c N a m e = ' '
|
- - RËYS 'MO ù[a
|
l o c 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 , " L o c a t i o n " )
|
f o r n = 1 , n C o u n t d o
|
s t r A t t r = r o w _ a t t r s [ n ] . a t t r
|
s t r V a l u e = r o w _ a t t r s [ n ] . v a l u e
|
i f ( s t r A t t r ~ = ' ' ) t h e n
|
|
- - 9hncü[eQve x c e l R4Y TðyÛL$Re
|
- - sQ.^\'`$Re ÿYg^\'` NX[(W¥b
|
i f ( s t r A t t r = = " ÓN^x" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
s t r W H C o d e = s t r V a l u e
|
l o c a t i o n . w h _ c o d e = s t r W H C o d e
|
- - V 1 . 2
|
e l s e i f ( s t r A t t r = = " ÓN^ Tðy" ) t h e n
|
s t r W H N a m e = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " ^:Sx" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
s t r A r e a C o d e = s t r V a l u e
|
l o c a t i o n . a r e a _ c o d e = s t r A r e a C o d e
|
e l s e i f ( s t r A t t r = = " ^:S Tðy" ) t h e n
|
s t r A r e a N a m e = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " 'MOx" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
s t r L o c C o d e = s t r V a l u e
|
l o c a t i o n . c o d e = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " 'MO Tðy" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
s t r L o c N a m e = s t r V a l u e
|
l o c a t i o n . n a m e = s t r V a l u e
|
- - 8^Ä^\'`
|
e l s e i f ( s t r A t t r = = " ÷]S" ) t h e n
|
l o c a t i o n . r o a d w a y = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " c" ) t h e n
|
l o c a t i o n . r o w = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " R" ) t h e n
|
l o c a t i o n . c o l = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " B\" ) t h e n
|
l o c a t i o n . l a y e r = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " 'MO{|W" ) t h e n
|
l o c a t i o n . l o c _ t y p e = G e t L o c a t i o n T y e V a l u e ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " (u" ) t h e n
|
l o c a t i o n . l o c _ t y p e = G e t P u r p o s e V a l u e ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " ¹[Ï" ) t h e n
|
l o c a t i o n . c a p a c i t y = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " ¦^" ) t h e n
|
l o c a t i o n . l e n g t h = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " ½[¦^" ) t h e n
|
l o c a t i o n . w i d t h = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
e l s e i f ( s t r A t t r = = " ئ^" ) t h e n
|
l o c a t i o n . h e i g h t = l u a . S t r T o N u m b e r ( s t r V a l u e )
|
- - V 1 . 2
|
e l s e i f ( s t r A t t r = = " A G V ù[gqx" ) t h e n
|
l o c a t i o n . a g v _ s i t e = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " MOn" ) t h e n
|
l o c a t i o n . p o s = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " ñm¦^" ) t h e n
|
l o c a t i o n . d e e p = s t r V a l u e
|
e l s e i f ( s t r A t t r = = " cÄ~÷S" ) t h e n
|
l o c a t i o n . r o w _ g r o u p = s t r V a l u e
|
e n d
|
e n d
|
e n d
|
|
- - ek¤2 9hnc'MOxeg$Reü[eQv'MO/f&Tò]Ï~X[(W
|
- - Ygò]Ï~X[(W ÿ9hncü[eQvpencÛLÖv
|
- - Yg NX[(W Rú^
|
l o c a l a t t r s
|
l o c a l s t r C o n d i t i o n = " S _ C O D E = ' " . . s t r L o c C o d e . . " ' "
|
n R e t , s t r R e t I n f o = m o b o x . e x i s t T h i s D a t a ( s t r L u a D E I D , " L o c a t i o n " , 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 ) , " (WÀhåg'MO/f&TX[(Wöe1Y%! " . . s t r R e t I n f o ) e n d
|
|
i f ( s t r R e t I n f o = = ' y e s ' ) t h e n
|
- - ò]Ï~X[(W ÿ9hncü[eQvpencÛLÖv
|
s t r C o n d i t i o n = " S _ C O D E = ' " . . s t r L o c C o d e . . " ' "
|
s t r S e t S Q L = " S _ W H _ C O D E = ' " . . s t r W H C o d e . . " ' , S _ A R E A _ C O D E = ' " . . s t r A r e a C o d e . . " ' , S _ C O D E = ' " . . s t r L o c C o d e . . " ' , S _ N A M E = ' " . .
|
s t r L o c N a m e . . " ' , N _ R O A D W A Y = ' " . . l o c a t i o n . r o a d w a y . . " ' , N _ R O W = ' " . . l o c a t i o n . r o w . . " ' , N _ C O L = ' " . .
|
l o c a t i o n . c o l . . " ' , N _ L A Y E R = ' " . . l o c a t i o n . l a y e r . . " ' , N _ T Y P E = ' " . . l o c a t i o n . l o c _ t y p e . . " ' , N _ C A P A C I T Y = ' " . .
|
l o c a t i o n . c a p a c i t y . . " ' , N _ L E N G T H = ' " . . l o c a t i o n . l e n g t h . . " ' , N _ W I D T H = ' " . . l o c a t i o n . w i d t h . .
|
" ' , N _ H E I G H T = ' " . . l o c a t i o n . h e i g h t . . " ' , S _ A G V _ S I T E = ' " . . l o c a t i o n . a g v _ s i t e . . " ' , N _ P O S = ' " . . l o c a t i o n . p o s . . " ' , N _ D E E P = ' " . . l o c a t i o n . d e e p . . " ' "
|
i f ( l o c a t i o n . r o w _ g r o u p ~ = n i l a n d l o c a t i o n . r o w _ g r o u p ~ = ' ' ) t h e n
|
s t r S e t S Q L = s t r S e t S Q L . . " , N _ R O W _ G R O U P = ' " . . l o c a t i o n . r o w _ g r o u p . . " ' "
|
e n d
|
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 , " 'MO" , s t r C o n d i t i o n , s t r S e t 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 ) , s t r R e t I n f o ) e n d
|
r e t u r n
|
e n d
|
|
- - ü[eQv'MO NX[(W Rú^
|
- - (W°eX'MOMRHQ$Re N NÓN^0^:S/f&TX[(W ÿYg NX[(W Rú^
|
- - $ReÓN^/f&TX[(W
|
s t r C o n d i t i o n = " S _ C O D E = ' " . . s t r W H C o d e . . " ' "
|
n R e t , s t r R e t I n f o = m o b o x . e x i s t T h i s D a t a ( s t r L u a D E I D , " W a r e h o u s e " , 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 ) , " (WÀhågÓN^/f&TX[(Wöe1Y%! " . . s t r R e t I n f o ) e n d
|
i f ( s t r R e t I n f o = = ' n o ' ) t h e n
|
- - °eXÓN^
|
i f ( s t r W H N a m e = = ' ' ) t h e n s t r W H N a m e = s t r W H C o d e e n d
|
l o c a l w a r e h o u s e = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " W a r e h o u s e " )
|
w a r e h o u s e . c o d e = s t r W H C o d e
|
w a r e h o u s e . n a m e = s t r W H N a m e
|
w a r e h o u s e . f a c t o r y = f a c t o r y
|
n R e t , s t r R e t I n f o = 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 , w a r e h o u 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 o b o x Rú^0ÓN^0ù[a1Y%! ' . . s t r R e t I n f o ) e n d
|
e n d
|
- - $Re^:S/f&TX[(W
|
s t r C o n d i t i o n = " S _ W H _ C O D E = ' " . . s t r W H C o d e . . " ' A N D S _ C O D E = ' " . . s t r A r e a C o d e . . " ' "
|
n R e t , s t r R e t I n f o = m o b o x . e x i s t T h i s D a t a ( s t r L u a D E I D , " A r e a " , 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 ) , " (WÀhåg^:S/f&TX[(Wöe1Y%! " . . s t r R e t I n f o ) e n d
|
- - m o b o x . w r i t e S y s L o g ( " s t r R e t I n f o " , s t r R e t I n f o )
|
i f ( s t r R e t I n f o = = ' n o ' ) t h e n
|
- - °eX^:S
|
i f ( s t r A r e a N a m e = = ' ' ) t h e n s t r A r e a N a m e = s t r A r e a C o d e e n d
|
|
l o c a l a r e a = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " A r e a " )
|
a r e a . c o d e = s t r A r e a C o d e
|
a r e a . n a m e = s t r A r e a N a m e
|
a r e a . w h _ c o d e = s t r W H C o d e
|
a r e a . f a c t o r y = f a c t o r y
|
n R e t , a r e a = 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 , a r e a )
|
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 o b o x Rú^0^:S0ù[a1Y%! ' . . a r e a ) e n d
|
i f ( l o c a t i o n . l o c _ t y p e = = 0 ) t h e n
|
l o c a t i o n . l o c _ t y p e = a r e a . l o c _ t y p e
|
e n d
|
e n d
|
i f ( l o c a t i o n . l o c _ t y p e = = 0 ) t h e n l o c a t i o n . l o c _ t y p e = 1 e n d
|
- - Rú^'MO
|
n R e t , s t r R e t I n f o = 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 , l o c 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ú^'MO1Y%! " . . s t r R e t I n f o ) e n d
|
e n d
|
e n d
|
