ÿþ- - [ [
|
x: W M S - 0 4 - 0 4
|
Tðy: 'MO- 'MOáOo`!hck
|
\OÿH A N
|
åe gÿ2 0 2 4 - 3 - 2
|
|
§~+RÿúV[ ( ôf,gµkãNx(Wyîv-N N*YOØSS)
|
|
ýQpeÿ C h e c k L o c A t t r
|
|
Rý:
|
- - bS_MR¹[Ï> = 1 v^Nå'MO¡l gÑ~[¹[hVv'MOh^\'` N _ C U R R E N T _ N U M ¾n:N 0
|
|
ôf9e°U_:
|
|
- - ] ]
|
r e q u i r e ( " W M S - B A S E " )
|
|
f u n c t i o n C h e c k L o c A t t r ( 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 C o n d i t i o n = " N _ C U R R E N T _ N U M > = 1 a n d S _ C O D E N O T I N ( s e l e c t S _ L O C _ C O D E F R O M T N _ L o c _ C o n t a i n e r ) "
|
|
- - ·ÖS'MOáOo`X[(Wîv'MO
|
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 " , s t r C o n d i t i o n , s t r O r d e r , " 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 ) , " ·ÖS0'MO0áOo`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 r e t u r n e n d
|
l o c a l l o c a t i o n = { }
|
l o c a l n , n C o u n t
|
l o c a l s u c c e s s
|
l o c a l a t t r s
|
|
s u c c e s s , l o c a t i o n = p c a l l ( j s o n . d e c o d e , s t r R e t I n f o )
|
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 ) , " ^ÕlvJ S O N <h_! " . . w a r e h o u s e ) e n d
|
|
n C o u n t = # l o c a t i o n
|
i f ( n C o u n t = = 0 ) t h e n r e t u r n e n d
|
- - Ä~Ç~p r o m p t áOo`
|
l o c a l d i r t y _ l o c _ c o d e _ s e t = ' '
|
f o r n = 1 , n C o u n t d o
|
a t t r s = l o c a t i o n [ n ] . a t t r s
|
d i r t y _ l o c _ c o d e _ s e t = d i r t y _ l o c _ c o d e _ s e t . . ' " ' . . a t t r s [ 1 ] . v a l u e . . ' " , '
|
e n d
|
i f ( d i r t y _ l o c _ c o d e _ s e t ~ = " " ) t h e n
|
m o b o x . s e t I n f o ( s t r L u a D E I D , d i r t y _ l o c _ c o d e _ s e t )
|
e n d
|
|
l o c a l s t r U p d a t e S q l = " N _ C U R R E N T _ N U M = 0 "
|
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 " , s t r C o n d i t i o n , s t r 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 ) , " ôf°e0'MO0áOo`1Y%! " . . s t r R e t I n f o ) e n d
|
e n d
|
