ÿþ- - [ [
|
x: J X - 3 0 0 - 0 2
|
Tðy: S t a c k e r L o c R e q u e s t
|
\OÿH A N
|
åe gÿ2 0 2 5 - 1 - 2 9
|
|
eQãSýQpeÿ m a i n
|
|
Rýôf:
|
eQ
|
{
|
" r e q u e s t P k " : " P K 0 0 0 " ,
|
" c o n t N o " : " F B - 0 0 2 9 " ,
|
" t a s k N o " : " T A 2 4 1 0 1 7 - 0 0 0 0 1 " ,
|
" c o n t N o 2 " : " " ,
|
" t a s k N o 2 " : " " ,
|
" c u r P o s " : " L 0 0 3 " ,
|
" i s F u l l " : 1 ,
|
" c l i e n t C o d e " : " W C S " ,
|
" r e q T i m e " : " 2 0 2 4 - 1 0 - 1 8 8 : 0 : 0 "
|
}
|
ØSôf°U_:
|
- - ] ]
|
|
w m s _ t a s k = r e q u i r e ( " w m s _ t a s k " )
|
w m s _ o p = r e q u i r e ( " w m s _ o p e r a t i o n " )
|
w m s _ w h = r e q u i r e ( " w m s _ w h " )
|
j x _ b a s e = r e q u i r e ( " j x _ b a s e " )
|
w m s _ a l g = r e q u i r e ( " w m s _ b a s e _ a l g o r i t h m " )
|
|
- - 9hncûN¡R÷S~b0R\ON ÿb\ONv¶r`¾n:N 1
|
l o c a l f u n c t i o n r e s t a r t _ o p e r a t i o n ( s t r L u a D E I D , t a s k _ c o d e , c n t r _ c o d e , t o _ l o c _ c o d e )
|
l o c a l n R e t , s t r R e t I n f o
|
l o c a l t a s k
|
|
n R e t , t a s k = w m s _ t a s k . G e t I n f o ( s t r L u a D E I D , t a s k _ c o d e )
|
- - YgûN¡R NX[(WbúQ ÿ ÔÞV
|
i f ( n R e t ~ = 0 ) t h e n r e t u r n 1 , " ·ÖSûN¡Rù[a1Y%! " . . t a s k e n d
|
|
l o c a l t o _ l o c
|
n R e t , t o _ l o c = w m s _ w h . G e t L o c I n f o ( t o _ 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áOo`1Y%! ' . . t o _ l o c _ c o d e ) e n d
|
|
l o c a l o p e r a t i o n
|
n R e t , o p e r a t i o n = w m s _ o p . G e t I n f o ( s t r L u a D E I D , t a s k . o p _ c o d e )
|
i f ( n R e t ~ = 0 ) t h e n r e t u r n 1 , " ·ÖS\ONù[a1Y%! " . . o p e r a t i o n e n d
|
i f ( o p e r a t i o n . b s _ s t a t e ~ = 6 ) t h e n
|
r e t u r n 1 , " ûN¡R' " . . t a s k _ c o d e . . " ' v\ON¶r` NI{N' I{
_' , NýgbLÍ/T\ON! "
|
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 )
|
|
l o c a l s t r C o n d i t i o n = " S _ C O D E = ' " . . t a s k . o p _ c o d e . . " ' "
|
l o c a l s t r U p d a t e S q l = " N _ B _ S T A T E = 1 , S _ B _ S T A T E = ' gbL' , S _ E N D _ W H = ' " . . t o _ l o c . w h _ c o d e . . " ' , "
|
s t r U p d a t e S q l = s t r U p d a t e S q l . . " S _ E N D _ A R E A = ' " . . t o _ l o c . a r e a _ c o d e . . " ' , S _ E N D _ L O C = ' " . . t o _ 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 . 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 , " O p e r 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 r e t u r n 2 , " ôf°e0\ON0¶r`1Y%! " . . s t r R e t I n f o e n d
|
|
l o c a l t a s k _ s o u r c e
|
i f ( o p e r a t i o n . o p _ d e f _ n a m e = = " è] fúQ^" o r o p e r a t i o n . o p _ d e f _ n a m e = = " è] feQ^" ) t h e n
|
t a s k _ s o u r c e = " è] f"
|
e l s e
|
t a s k _ s o u r c e = " è]l"
|
e n d
|
|
- - Rú^¿~,dÐûN¡R
|
l o c a l t a s k = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " T a s k " )
|
|
- - Rú^:g,dÐûN¡R
|
t a s k . o p _ c o d e = o p e r a t i o n . c o d e - - \ONx
|
t a s k . o p _ n a m e = o p e r a t i o n . o p _ d e f _ n a m e
|
t a s k . s o u r c e _ s y s = t a s k _ s o u r c e
|
n e w _ t a s k . f a c t o r y = o p e r a t i o n . f a c t o r y - - å]S
|
n e w _ t a s k . 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 , " ûN¡R{|W- XW:geQ^,dÐ" )
|
n e w _ t a s k . c n t r _ c o d e = c n t r _ c o d e
|
n e w _ t a s k . b s _ n o = o p e r a t i o n . b s _ n o
|
|
- - w¹p
|
n e w _ t a s k . s t a r t _ w h _ c o d e = t a s k . e n d _ w h _ c o d e
|
n e w _ t a s k . s t a r t _ a r e a _ c o d e = t a s k . e n d _ a r e a _ c o d e
|
n e w _ t a s k . s t a r t _ l o c _ c o d e = t a s k . e n d _ l o c _ c o d e
|
- - È~¹p
|
n e w _ t a s k . e n d _ w h _ c o d e = t o _ l o c . w h _ c o d e
|
n e w _ t a s k . e n d _ a r e a _ c o d e = t o _ l o c . a r e a _ c o d e
|
n e w _ t a s k . e n d _ l o c _ c o d e = t o _ l o c _ c o d e
|
n e w _ t a s k . s c h e d u l e _ 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 , " ¦^{|W- XW:g" ) - - ¾n¦^{|W
|
|
- - È~¹p'MO R
|
n e w _ t a s k . b s _ s t a t e = 2 - - Rú^1\/fgbL¶r`
|
n R e t , n e w _ t a s k = 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 , n e w _ t a s k )
|
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ú^XW:gûN¡R1Y%! " . . n e w _ t a s k ) e n d
|
|
- - 'MO ReQ^
|
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 , n e w _ t a s k . e n d _ 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- eQ^" ) ,
|
n e w _ t a s k . c o d e , n e w _ t a s k . o p _ c o d e , n e w _ t a s k . o p _ n a m e )
|
i f ( n R e t ~ = 0 ) t h e n r e t u r n 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
|
r e t u r n 0 , n e w _ t a s k . c o d e
|
e n d
|
|
- - [ [
|
QvàQ*Nî:
|
1 # W C S O NOÍ Y3u÷ ÿÔkY3u÷N N!k W M S Ù~[ÔÞV¡l6e0Rmo`?
|
] ]
|
f u n c t i o n L o c R e q u 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 b o d y
|
|
- - ·ÖS¥cãS OeQvpenc
|
n R e t , b o d y = 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 )
|
|
- - eQpencÀhåg
|
l o c a l c n t r _ n u m = 1
|
l o c a l c n t r _ c o d e 1 = b o d y . c o n t N o
|
l o c a l t a s k _ c o d e 1 = b o d y . t a s k N o
|
l o c a l c n t r _ c o d e 2
|
l o c a l t a s k _ c o d e 2 = ' '
|
l o c a l c u r _ p o s , r e t _ l o c
|
l o c a l r o a d w a y
|
l o c a l o p e r a t i o n
|
|
i f ( c n t r _ c o d e 1 = = n i l o r c n t r _ c o d e 1 = = ' ' ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " c o n t N o Å_{ g<P! " )
|
r e t u r n
|
e n d
|
i f ( t a s k _ c o d e 1 = = n i l o r t a s k _ c o d e 1 = = ' ' ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " t a s k N o Å_{ g<P! " )
|
r e t u r n
|
e n d
|
|
c n t r _ c o d e 2 = l u a . G e t _ S t r A t t r V a l u e ( b o d y . c o n t N o 2 )
|
t a s k _ c o d e 2 = l u a . G e t _ S t r A t t r V a l u e ( b o d y . t a s k N o 2 )
|
i f ( c n t r _ c o d e 2 ~ = " " ) t h e n
|
c n t r _ n u m = 2
|
i f ( t a s k _ c o d e 2 = = n i l o r t a s k _ c o d e 2 = = ' ' ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " t a s k N o 2 Å_{ g<P! " )
|
r e t u r n
|
e n d
|
e n d
|
|
c u r _ p o s = b o d y . c u r P o s
|
i f ( c u r _ p o s = = n i l o r c u r _ p o s = = ' ' ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " c u r _ p o s Å_{ g<P! " )
|
r e t u r n
|
e n d
|
- - ·ÖS c u r _ p o s v'MOáOo`
|
l o c a l l o c
|
n R e t , l o c = w m s _ w h . G e t L o c I n f o ( c u r _ p o s )
|
|
i f ( n R e t ~ = 0 ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " ·ÖS'MO' " . . c u r _ p o s . . " ' áOo`1Y%! " . . l o c )
|
r e t u r n
|
e n d
|
|
- - ¡{÷]S
Q'MO
|
r o a d w a y = l u a . G e t _ N u m A t t r V a l u e ( l o c . e x t _ a t t r ) - - ·ÖS÷]S÷S
|
i f ( r o a d w a y < = 0 ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " 'MO' " . . c u r _ p o s . . " ' ¾[v÷]SáOo`àeHe! " )
|
r e t u r n
|
e n d
|
|
l o c a l s t o r a g e _ a r a e
|
n R e t , s t o r a g e _ a r a e = w m s _ b a s e . G e t _ s C o n s t 2 ( s t r L u a D E I D , " e±{^X[¨P:S" )
|
i f ( n R e t ~ = 0 ) t h e n
|
l u a . S t o p ( s t r L u a D E I D , " û|ß~àeÕl·ÖS8^Ï' e±{^X[¨P:S' " )
|
r e t u r n
|
e n d
|
|
n R e t , r e t _ l o c = w m s _ a l g . G e t _ A i s l e _ E m p t y _ L o c ( s t r L u a D E I D , s t o r a g e _ a r a e , r o a d w a y , 0 , 0 , " " , c n t r _ n u m )
|
i f ( n R e t ~ = 0 ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " ¡{÷]S
Q'MO1Y%! " . . r e t _ l o c )
|
r e t u r n
|
e n d
|
|
n R e t , s t r R e t I n f o = r e s t a r t _ o p e r a t i o n ( s t r L u a D E I D , t a s k _ c o d e 1 , c n t r _ c o d e 1 , r e t _ l o c . l o c _ c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " r e s t a r t _ o p e r a t i o n 1Y%! " . . s t r R e t I n f o )
|
r e t u r n
|
e n d
|
l o c a l n e w _ t a s k _ c o d e 1 = s t r R e t I n f o
|
l o c a l t o P o s 1 = r e t _ l o c . l o c _ c o d e
|
l o c a l n e w _ t a s k _ c o d e 2 = " "
|
l o c a l t o P o s 2 = " "
|
|
i f ( t a s k _ c o d e 2 ~ = ' ' ) t h e n
|
n R e t , s t r R e t I n f o = r e s t a r t _ o p e r a t i o n ( s t r L u a D E I D , t a s k _ c o d e 2 , c n t r _ c o d e 2 , r e t _ l o c . a d j a c e n t _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
m o b o x . s t o p P r o g r a m ( s t r L u a D E I D , " r e s t a r t _ o p e r a t i o n 1Y%! " . . s t r R e t I n f o )
|
- - èlab
|
NbvÙ*NûN¡RRMv'MOã
|
w m s . w m s _ U n l o c k L o c a t i o n ( s t r L u a D E I D , r e t _ l o c . l o c _ c o d e , n e w _ t a s k _ c o d e 1 )
|
r e t u r n
|
e n d
|
n e w _ t a s k _ c o d e 2 = s t r R e t I n f o
|
t o P o s 2 = r e t _ l o c . a d j a c e n t _ l o c
|
e n d
|
|
l o c a l r e s u l t = {
|
t a s k C o d e 1 = n e w _ t a s k _ c o d e 1 ,
|
t o P o s 1 = t o P o s 1 ,
|
t a s k C o d e 2 = n e w _ t a s k _ c o d e 2 ,
|
t o P o s 2 = t o P o s 2 ,
|
r e q u e s t P k = b o d y . r e q u e s t P k
|
}
|
|
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 s p o n s e " , r e s u l t )
|
m o b o x . r e t u r n V a l u e ( s t r L u a D E I D , 1 , t a b l e 2 s t r ( r e s u l t ) )
|
|
e n d
|
