ÿþ- - [ [
|
Hr,gÿ V e r s i o n 1 . 0
|
Rú^åe gÿ 2 0 2 4 - 6 - 1 0
|
Rú^ºNÿ H A N
|
|
Rýÿ
|
W M S NNúW@xpencôv¥cOq_ÍTTbvN¡R; ÿàVdk ZP NNpenc!h
|
ÀhpencSìbÿ
|
L o c a t i o n _ G r o u p
|
- - N _ C A P A C I T Y , N _ C U R R E N T _ N U M , N _ O U T _ L O C K _ N U M , S _ I T E M _ C O D E , . . .
|
|
- - W M S _ D a t a C h e c k _ L o a c t i o n _ G r o u p 'MOÄ~
|
|
- - ] ]
|
r e q u i r e ( " W M S - B A S E " )
|
|
|
l o c a l f u n c t i o n u p a d t e _ l o c a t i o n _ g r o u p ( s t r L u a D E I D , i d , s t r S e t A t t r , s t r C h e c k R e s u l t )
|
l o c a l n R e t , s t r R e t I n f o
|
|
l o c a l c u r T i m e = o s . d a t e ( " % Y - % m - % d % H : % M : % S C h e c k e d - > " )
|
i f ( s t r C h e c k R e s u l t = = ' ' ) t h e n s t r C h e c k R e s u l t = " O K " e n d
|
s t r C h e c k R e s u l t = c u r T i m e . . s t r C h e c k R e s u l t
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ C H E C K _ R E S U L T = ' " . . s t r C h e c k R e s u l t . . " ' "
|
|
s t r C o n d i t i o n = " S _ I D = ' " . . i 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 , " L o c a t i o n _ G r o u p " , s t r C o n d i t i o n , s t r S e t A t t r )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 ) , " ôf°e0'MOÄ~01Y%! " , s t r R e t I n f o )
|
r e t u r n 1 , " ôf°e0'MOÄ~01Y%! ÁÕåe×_"
|
e n d
|
r e t u r n 0 , " o k "
|
e n d
|
|
- - [ [
|
!h'MOÄ~^\'`vcknx'`
|
- - ] ]
|
f u n c t i o n W M S _ D a t a C h e c k _ L o a c t i o n _ G r o u p ( s t r L u a D E I D , i d )
|
l o c a l n R e t , s t r V a l u e
|
|
i f ( i d = = ' ' o r i d = = n i l ) t h e n
|
r e t u r n 1 , " W M S _ D a t a C h e c k _ L o a c t i o n _ G r o u p ÂSpei d Å_{ g<P! "
|
e n d
|
- - bG U I D { x x x x - x x x x } 9eb x x x x - x x x x
|
i d = t r i m _ g u i d _ s t r ( i d )
|
|
l o c a l d a t a _ o b j
|
n R e t , d a t a _ o b j = G e t D a t a O b j e c t ( s t r L u a D E I D , " L o c a t i o n _ G r o u p " , i d )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 ) , " G e t D a t a O b j e c t 1Y%! " , d a t a _ o b j )
|
r e t u r n 1 , " G e t D a t a O b j e c t 1Y%! ÁÕåe×_"
|
e n d
|
|
- - HQ ·ÖS 'MOÄ~ gêTN'MOÄ~b
|
l o c a l l o c _ s e t = { }
|
l o c a l s t r O r d e r = ' '
|
l o c a l s t r L o c C o n d i t i o n = " S _ A R E A _ C O D E = ' " . . d a t a _ o b j . a r e a _ c o d e . . " ' A N D N _ R O W _ G R O U P = " . . d a t a _ o b j . r o w _ g r o u p . . " A N D N _ C O L = " . . d a t a _ o b j . c o l . . " A N D N _ L A Y E R = " . . d a t a _ o b j . l a y e r
|
n R e t , s t r R e t I n f o = m o b o x . q u e r y D a t a O b j A t t r ( s t r L u a D E I D , " L o c a t i o n " , s t r L o c C o n d i t i o n , s t r O r d e r )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 ) , " ·ÖS0L o c a t i o n 01Y%! " , s t r L o c C o n d i t i o n )
|
r e t u r n 1 , " ·ÖS0L o c a t i o n 01Y%! ÁÕåe×_"
|
e n d
|
|
l o c a l e x t _ d a t a = { }
|
e x t _ d a t a . i d = i d
|
e x t _ d a t a . c l s = " L o c a t i o n _ G r o u p "
|
l o c a l s t r S e t A t t r = ' '
|
l o c a l s t r C h e c k R e s u l t = ' ' - - !hÓ~g
|
|
i f ( s t r R e t I n f o = = ' ' ) t h e n
|
- - 2 0 1 àeHepenc
|
W M S _ W a r n i n g 2 ( s t r L u a D E I D , 2 , 2 0 1 , " àeHe'MOÄ~ ÿú^® Rd! " , t a b l e 2 s t r ( e x t _ d a t a ) , " " , " D a t a C h e c k " )
|
n R e t , s t r R e t I n f o = u p a d t e _ l o c a t i o n _ g r o u p ( s t r L u a D E I D , i d , " " , " àeHe'MOÄ~ ÿú^® Rd! " )
|
r e t u r n n R e t , s t r R e t I n f o
|
e n d
|
|
l o c a l r e t O b j s = j s o n . d e c o d e ( s t r R e t I n f o )
|
l o c a l n
|
l o c a l c a p a c i t y = 0
|
l o c a l c u r _ n u m = 0
|
l o c a l i n _ l o c k _ n u m = 0
|
l o c a l o u t _ l o c k _ n u m = 0
|
l o c a l l o c = { }
|
|
- - ·ÖS T N*N'MOÄ~v'MOáOo` ÿÍ°e¡{ c a p a c i t y I{pe<PÏ
|
f o r n = 1 , # r e t O b j s d o
|
n R e t , l o c = O b j A t t r S t r T o L u a O b j ( " L o c a t i o n " , t a b l e 2 s t r ( r e t O b j s [ n ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 b j A t t r S t r T o L u a O b j ( L o c a t i o n ) 1Y%! " , l o c )
|
r e t u r n 1 , " O b j A t t r S t r T o L u a O b j ( L o c a t i o n ) 1Y%! ÁÕåe×_"
|
e n d
|
c a p a c i t y = c a p a c i t y + l o c . c a p a c i t y
|
c u r _ n u m = c u r _ n u m + l o c . c u r _ n u m
|
- - 1 eQ^ 2 úQ^
|
i f ( l o c . l o c k _ s t a t e = = 1 ) t h e n
|
i n _ l o c k _ n u m = i n _ l o c k _ n u m + 1
|
e l s e i f ( l o c . l o c k _ s t a t e = = 2 ) t h e n
|
o u t _ l o c k _ n u m = o u t _ l o c k _ n u m + 1
|
e n d
|
e n d
|
|
i f ( d a t a _ o b j . c a p a c i t y ~ = c a p a c i t y ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " N _ C A P A C I T Y = " . . c a p a c i t y . . " , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . " ¹[Ï: ( " . . d a t a _ o b j . c a p a c i t y . . " - > " . . c a p a c i t y . . " ) , "
|
e n d
|
|
i f ( d a t a _ o b j . c u r _ n u m ~ = c u r _ n u m ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " N _ C U R R E N T _ N U M = " . . c u r _ n u m . . " , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . " ¹[hVpeÏ: ( " . . d a t a _ o b j . c u r _ n u m . . " - > " . . c u r _ n u m . . " ) , "
|
e n d
|
|
i f ( d a t a _ o b j . i n _ l o c k _ n u m ~ = i n _ l o c k _ n u m ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " N _ I N _ L O C K _ N U M = " . . i n _ l o c k _ n u m . . " , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . " eQ^peÏ: ( " . . d a t a _ o b j . i n _ l o c k _ n u m . . " - > " . . i n _ l o c k _ n u m . . " ) , "
|
e n d
|
|
i f ( d a t a _ o b j . o u t _ l o c k _ n u m ~ = o u t _ l o c k _ n u m ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " N _ O U T _ L O C K _ N U M = " . . o u t _ l o c k _ n u m . . " , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . " úQ^peÏ: ( " . . d a t a _ o b j . o u t _ l o c k _ n u m . . " - > " . . o u t _ l o c k _ n u m . . " ) , "
|
e n d
|
|
- - ·ÖS'MOÄ~ÌvX[¨Pv'ÁTáOo`
|
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 _ L o c _ C o n t a i n e r W h e r e S _ L O C _ C O D E I n ( S e l e c t S _ C O D E F r o m T N _ L o c a t i o n "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . . " W h e r e " . . s t r L o c C o n d i t i o n . . " ) ) "
|
l o c a l s t r O r d e r = " S _ C N T R _ C O D E "
|
n R e t , s t r R e t I n f o = m o b o x . q u e r y D a t a O b j A t t r ( 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 , s t r O r d e r )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 ) , " ·ÖS0C G _ D e t a i l 01Y%! " , s t r C o n d i t i o n )
|
r e t u r n 1 , " ·ÖS0C G _ D e t a i l 01Y%! ÁÕåe×_"
|
e n d
|
|
i f ( s t r R e t I n f o ~ = ' ' ) t h e n
|
l o c a l c g _ d e t a i l
|
l o c a l i t e m _ c o d e = ' '
|
l o c a l i t e m _ n a m e = ' '
|
l o c a l b a t c h _ n o = ' '
|
l o c a l o w n e r = ' '
|
l o c a l e n d _ u s e r = ' '
|
l o c a l s u p p l i e r = ' '
|
|
r e t O b j s = j s o n . d e c o d e ( s t r R e t I n f o )
|
f o r n = 1 , # r e t O b j s d o
|
n R e t , c g _ d e t a i l = 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 " , t a b l e 2 s t r ( r e t O b j s [ n ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 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 ) 1Y%! " , l o c )
|
r e t u r n 1 , " 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 ) ) 1Y%! ÁÕåe×_"
|
e n d
|
i f ( n = = 1 ) t h e n
|
i t e m _ c o d e = c g _ d e t a i l . i t e m _ c o d e
|
i t e m _ n a m e = c g _ d e t a i l . i t e m _ n a m e
|
b a t c h _ n o = c g _ d e t a i l . b a t c h _ n o
|
o w n e r = c g _ d e t a i l . o w n e r
|
e n d _ u s e r = c g _ d e t a i l . e n d _ u s e r
|
s u p p l i e r = c g _ d e t a i l . s u p p l i e r
|
e l s e
|
i f ( i t e m _ c o d e ~ = c g _ d e t a i l . i t e m _ c o d e ) t h e n i t e m _ c o d e = ' ' e n d
|
i f ( i t e m _ n a m e ~ = c g _ d e t a i l . i t e m _ n a m e ) t h e n i t e m _ n a m e = ' ' e n d
|
i f ( b a t c h _ n o ~ = c g _ d e t a i l . b a t c h _ n o ) t h e n b a t c h _ n o = ' ' e n d
|
i f ( o w n e r ~ = c g _ d e t a i l . o w n e r ) t h e n o w n e r = ' ' e n d
|
i f ( e n d _ u s e r ~ = c g _ d e t a i l . e n d _ u s e r ) t h e n e n d _ u s e r = ' ' e n d
|
i f ( s u p p l i e r ~ = c g _ d e t a i l . s u p p l i e r ) t h e n s u p p l i e r = ' ' e n d
|
e n d
|
e n d
|
|
i f ( d a t a _ o b j . i t e m _ c o d e ~ = i t e m _ c o d e ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ I T E M _ C O D E = ' " . . i t e m _ c o d e . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' irex: ( " ' . . d a t a _ o b j . i t e m _ c o d e . . ' " - > " ' . . i t e m _ c o d e . . ' " ) , '
|
e n d
|
i f ( d a t a _ o b j . i t e m _ n a m e ~ = i t e m _ n a m e ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ I T E M _ N A M E = ' " . . i t e m _ n a m e . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' ire Tðy: ( " ' . . d a t a _ o b j . i t e m _ n a m e . . ' " - > " ' . . i t e m _ n a m e . . ' " ) , '
|
e n d
|
i f ( d a t a _ o b j . b a t c h _ n o ~ = b a t c h _ n o ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ B A T C H _ N O = ' " . . b a t c h _ n o . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' yb!k÷S: ( " ' . . d a t a _ o b j . b a t c h _ n o . . ' " - > " ' . . b a t c h _ n o . . ' " ) , '
|
e n d
|
i f ( d a t a _ o b j . o w n e r ~ = o w n e r ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ O W N E R = ' " . . o w n e r . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' ';N: ( " ' . . d a t a _ o b j . o w n e r . . ' " - > " ' . . o w n e r . . ' " ) , '
|
e n d
|
i f ( d a t a _ o b j . e n d _ u s e r ~ = e n d _ u s e r ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ I T E M _ C O D E = ' " . . e n d _ u s e r . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' O(uUSMO: ( " ' . . d a t a _ o b j . e n d _ u s e r . . ' " - > " ' . . e n d _ u s e r . . ' " ) , '
|
e n d
|
i f ( d a t a _ o b j . s u p p l i e r ~ = s u p p l i e r ) t h e n
|
s t r S e t A t t r = s t r S e t A t t r . . " S _ I T E M _ C O D E = ' " . . s u p p l i e r . . " ' , "
|
s t r C h e c k R e s u l t = s t r C h e c k R e s u l t . . ' O^FU: ( " ' . . d a t a _ o b j . s u p p l i e r . . ' " - > " ' . . s u p p l i e r . . ' " ) , '
|
e n d
|
e n d
|
|
n R e t , s t r R e t I n f o = u p a d t e _ l o c a t i o n _ g r o u p ( s t r L u a D E I D , i d , s t r S e t A t t r , s t r C h e c k R e s u l t )
|
r e t u r n n R e t , s t r R e t I n f o
|
e n d
|
|
f u n c t i o n T e s t ( 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 r O r d e r = " S _ C O D E "
|
n R e t , s t r R e t I n f o = m o b o x . q u e r y D a t a O b j A t t r ( s t r L u a D E I D , " L o c a t i o n _ G r o u p " , " " , s t r O r d e r )
|
i f ( n R e t ~ = 0 o r s t r R e t I n f o = = ' ' ) t h e n
|
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 ) , " ·ÖS0L o c a t i o n _ G r o u p 01Y%! " . . s t r R e t I n f o )
|
e n d
|
l o c a l n
|
l o c a l r e t O b j s
|
r e t O b j s = j s o n . d e c o d e ( s t r R e t I n f o )
|
|
f o r n = 1 , # r e t O b j s d o
|
n R e t , s t r R e t I n f o = W M S _ D a t a C h e c k _ L o a c t i o n _ G r o u p ( s t r L u a D E I D , r e t O b j s [ n ] . i d )
|
i f ( n R e t ~ = 0 ) t h e n
|
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 _ D a t a C h e c k _ L o a c t i o n _ G r o u p 1Y%! " . . s t r R e t I n f o )
|
e n d
|
e n d
|
e n d
|
