ÿþ- - [ [
|
Tðy: ÷]S»QÓ~
|
\OÿL Z H
|
åe gÿ2 0 2 4 - 0 9 - 2 6
|
|
ýQpeÿ R o a d w a y F r e e z e
|
Rý: ÷]STù[^;^:S
|
N
|
|
ôf9e°U_:
|
V 1 . 1 2 0 2 4 1 0 2 4 L Z H eEQÞV O¥cãS
|
|
- - ] ]
|
|
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 _ w h = r e q u i r e ( " w m s _ w h " )
|
r e q u i r e ( " G T - B a s e " )
|
f u n c t i o n R o a d w a y F r e e z e ( 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
|
|
- - ·ÖSS_MR -Nvpencù[a
|
n R e t , o b j s = 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 ) 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 b j s ) 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 ) , ' 0÷]S»QÓ~0ÂSpe: ' , o b j s )
|
i f ( o b j s = = ' ' ) 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Ó~v÷]S! " ) e n d
|
|
l o c a l o b j _ a t t r s
|
l o c a l s t r C o n d i t i o n
|
|
f o r n = 1 , # o b j s d o
|
o b j _ 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 ( o b j s [ n ] . a t t r s )
|
i f ( o b j _ a t t r s ~ = n i l a n d o b j _ a t t r s ~ = ' ' ) t h e n
|
- - $Re÷]S/f&Tò]»QÓ~
|
s t r C o n d i t i o n = " S _ Z O N E _ C O D E = ' " . . o b j _ a t t r s . S _ Z O N E _ C O D E . . " ' A N D N _ L O C K _ S T A T E = 0 "
|
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 , " 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 ) , " (WÀhåg0÷]S0/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 g o t o c o r o u t i n e e n d
|
|
- - ;^:S
|
N
|
n R e t , s t r R e t I n f o = w m s . w m s _ L o c k Z o n e ( s t r L u a D E I D , o b j _ a t t r s . S _ Z O N E _ C O D E , 3 )
|
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 Z o n e 1Y%! " . . s t r R e t I n f o ) e n d
|
|
- - îO9e÷]Sv¶r`
|
s t r C o n d i t i o n = " S _ Z O N E _ C O D E = ' " . . o b j _ a t t r s . S _ Z O N E _ C O D E . . " ' "
|
l o c a l s t r S e t S Q L = " N _ L O C K _ 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 T a b l e 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 , " T N _ R o a d w a y " , 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 ) , ' îO9e0÷]S0¶r`1Y%' . . s t r R e t I n f o ) e n d
|
|
- - ·ÖSù[^÷]S(WÓN^
Qv'ÁTáOo`ÞV OÙ~G T - W M S
|
l o c a l n u m = 0
|
l o c a l n u m L i s t = { }
|
- - ·ÖS-NôháOo`
|
l o c a l s t r T a b N a m e =
|
" T N _ C G _ D e t a i l " - - penc^h T
|
l o c a l s t r F i e l d L i s t =
|
' [ " S _ S E R I A L _ N O " , " S _ I T E M _ C O D E " , " S _ B A T C H _ N O " , " F _ Q T Y " ] ' - - ·ÖSvW[µk
|
l o c a l n P a g e S i z e = 1 0 0 - - Ïkupencagpe
|
s t r C o n d i t i o n = " S _ I T E M _ C O D E < > ' K G Z ' A N D 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 " - - ågâagö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 . .
|
" 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 W h e r e N _ R O A D W A Y = " . .
|
o b j _ a t t r s . N _ R O A D W A Y . . " A n d S _ A r e a _ C o d e = ' L K ' ) ) "
|
l o c a l s t r O r d e r B y = " " - - c^agöN
|
n R e t , s t r R e t I n f o = m o b o x . q u e r y T a b l e 2 ( s t r L u a D E I D , s t r T a b N a m e , s t r F i e l d L i s t , n P a g e S i z e , s t r C o n d i t i o n ,
|
s t r O r d e r B 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 ) , ' (uq u e r y T a b l e 2 1Y%! ' . . 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 = = ' ' ) t h e n g o t o c o r o u t i n e e n d
|
- - ãgÔÞVpenc
|
l o c a l r e s D a t a = j s o n . d e c o d e ( s t r R e t I n f o )
|
i f ( r e s D a t a . r e c o r d _ c o u n t = = 0 ) t h e n g o t o c o r o u t i n e e n d
|
|
f o r n P a g e = 1 , r e s D a t a . p a g e _ c o u n t d o
|
n R e t , s t r R e t I n f o = m o b o x . q u e r y T a b l e 2 ( s t r L u a D E I D , n P a g e )
|
l o c a l p a g e D a t a = j s o n . d e c o d e ( s t r R e t I n f o ) . d a t a _ l i s t
|
|
f o r m = 1 , # p a g e D a t a d o
|
n u m = n u m + 1
|
l o c a l s e r i a l _ n o = p a g e D a t a [ m ] . S _ S E R I A L _ N O
|
l o c a l b a t c h _ n o = p a g e D a t a [ m ] . S _ B A T C H _ N O
|
l o c a l q t y = t o n u m b e r ( p a g e D a t a [ m ] . F _ Q T Y )
|
|
- - ÇAm4l÷S·ÖSmQMOx
|
c o n d i t i o n = " S _ S E R I A L _ N O = ' " . . s e r i a l _ n o . . " ' "
|
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 , " G T _ L a b e l _ C r a d " , c o n d i t i o n )
|
i f ( n R e t = = 1 ) t h e n
|
c o n d i t i o n = " S _ S E R I A L _ N O = ' " . . s e r i a l _ n o . . " ' "
|
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 , " G T _ R O M " , 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
|
e l s e 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 ) , s t r R e t I n f o )
|
e n d
|
|
l o c a l i t e m _ c o d e = s t r R e t I n f o . i t e m _ c o d e _ 9
|
n u m L i s t [ n u m ] = {
|
i t e m _ c o d e = i t e m _ c o d e ,
|
b a t c h _ n o = b a t c h _ n o ,
|
q t y = q t y
|
}
|
e n d
|
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 u m L i s t ' , n u m L i s t )
|
|
l o c a l r e s u l t = { }
|
|
f o r _ , i t e m i n i p a i r s ( n u m L i s t ) d o
|
l o c a l k e y = i t e m . i t e m _ c o d e . . " _ " . . i t e m . b a t c h _ n o
|
i f n o t r e s u l t [ k e y ] t h e n
|
r e s u l t [ k e y ] = {
|
i t e m _ c o d e = i t e m . i t e m _ c o d e ,
|
b a t c h _ n o = i t e m . b a t c h _ n o ,
|
t o t a l _ q t y = i t e m . q t y
|
}
|
e l s e
|
r e s u l t [ k e y ] . t o t a l _ q t y = r e s u l t [ k e y ] . t o t a l _ q t y + i t e m . q t y
|
e n d
|
e n d
|
|
l o c a l f i n a l _ r e s u l t = { }
|
f o r _ , v a l u e i n p a i r s ( r e s u l t ) d o
|
t a b l e . i n s e r t ( f i n a l _ r e s u l t , v a l u e )
|
e n d
|
|
f o r j = 1 , # f i n a l _ r e s u l t d o
|
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 ) , ' j ' , j )
|
l o c a l a t t r = f i n a l _ r e s u l t [ j ]
|
- - (uG T - W M S vÞV O¥cã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 = a t t r . b a t c h _ n o ,
|
s k u = a t t r . i t e m _ c o d e ,
|
q t y = a t t r . t o t a l _ q t y ,
|
f r o m l o c = " L K 0 0 1 " ,
|
t o l o c = " L K 0 0 6 " ,
|
l o c t y p e = n i l ,
|
t y p e = 1
|
}
|
}
|
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 )
|
s o u r c e = " G T W M S ^X[»QÓ~"
|
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 e t , s t r R e t I n f o = m o b o x . s e n d H t t p R e q u e s t ( s t r u r l , s t r H e a d e r , l u a . t a b l e 2 s t r ( s t r B o d 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 ) , " (uW M S ÞV O¥cãS1Y%! " . . s t r R e t I n f o )
|
- - e n d
|
e n d
|
e n d
|
: : c o r o u t i n e : :
|
e n d
|
m o b o x . s e t I n f o ( s t r L u a D E I D , " »QÓ~bR! " )
|
e n d
|
