ÿþ- - ÛV NeQýQpe
|
l o c a l f u n c t i o n r o u n d ( n u m b e r , p r e c i s i o n )
|
p r e c i s i o n = p r e c i s i o n o r 0
|
l o c a l m u l t = 1 0 ^ ( p r e c i s i o n o r 0 )
|
r e t u r n m a t h . f l o o r ( n u m b e r * m u l t + 0 . 5 ) / m u l t
|
e n d
|
|
- - [INýQpe(uNÆbRW[&{2Nv^lbc:NpeW[ÆT
|
l o c a l f u n c t i o n s p l i t A n d C o l l e c t N u m b e r s ( s t r )
|
l o c a l n u m b e r s = { }
|
f o r n u m i n s t r i n g . g m a t c h ( s t r , " % d + " ) d o
|
n u m b e r s [ t o n u m b e r ( n u m ) ] = t r u e
|
e n d
|
r e t u r n n u m b e r s
|
e n d
|
|
- - [INýQpe(uN~búQ$N*NÆT-NÍTvpeW[v^üb¥cbW[&{2N
|
l o c a l f u n c t i o n f i n d C o m m o n N u m b e r s ( s t r A , s t r B )
|
l o c a l s e t A = s p l i t A n d C o l l e c t N u m b e r s ( s t r A )
|
l o c a l s e t B = s p l i t A n d C o l l e c t N u m b e r s ( s t r B )
|
l o c a l c o m m o n N u m b e r s = { }
|
f o r n u m i n p a i r s ( s e t A ) d o
|
i f s e t B [ n u m ] t h e n
|
t a b l e . i n s e r t ( c o m m o n N u m b e r s , t o s t r i n g ( n u m ) )
|
e n d
|
e n d
|
r e t u r n t a b l e . c o n c a t ( c o m m o n N u m b e r s , " , " )
|
e n d
|
|
- - [
|
- - P a c k W o r k G e n e r a l O p e r a t i o n ű{å]USeQ^USeQ^(uÍd\O
|
- - 1 0·ÖSîvÆaSáOo`
|
- - 2 0°eX¹[hV'ÁTÑ~[
|
- - 3 0°eXű{°U_
|
- - 4 0ôf°eű{å]USpeÏ
|
- - 5 0ôf°eeQ^USpeÏ
|
- - 6 0$Reű{å]US0eQ^US/f&TsQí
|
- - p a r a m :
|
- - s e r i a l _ n o agx
|
- - c n t r _ c o d e ¹[hVx
|
- - p a c k _ n o ű{å]US÷S
|
- - o r d e r _ n o eQ^US÷S
|
- - ]
|
l o c a l f u n c t i o n P a c k W o r k G e n e r a l O p e r a t i o n ( s t r L u a D E I D , s e r i a l _ n o , c n t r _ c o d e , p a c k _ n o , o r d e r _ n o , d i s p e r s o i d )
|
l o c a l n R e t , s t r R e t I n f o , l a b e l _ c a r d , s t r C o n d i t i o n
|
|
- - s t e p 1 ·ÖSîvÆaS-NváOo` ÿ(uÙ*NaS-NváOo`Rú^ C G _ D e t a i l
|
s t r 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 , l a b e l _ c a r d = 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 " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . l a b e l _ c a r d
|
e n d
|
- - îvÆaSúW,g^\'`$Re
|
i f ( l a b e l _ c a r d . q t y < = 0 ) t h e n
|
r e t u r n 1 , " îvÆaS' " . . s e r i a l _ n o . . " ' vpeÏÅ_{ g<P Ný/f pe! "
|
e n d
|
|
n R e t , s t r R e t I n f o = w m s _ c n t r . E m p t y C o n t a i n e r _ V e r i f y ( s t r L u a D E I D , c n t r _ c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¹[hVÁ1Y%! " . . s t r R e t I n f o
|
e n d
|
|
- - s t e p 2 °eX¹[hV'irÑ~[
|
l o c a l c g _ d e t a i l = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " C G _ D e t a i l " )
|
c g _ d e t a i l . c n t r _ c o d e = c n t r _ c o d e
|
c g _ d e t a i l . b a t c h _ n o = l a b e l _ c a r d . b a t c h _ n o
|
c g _ d e t a i l . i t e m _ c o d e = l a b e l _ c a r d . i t e m _ c o d e
|
c g _ d e t a i l . i t e m _ n a m e = l a b e l _ c a r d . i t e m _ n a m e
|
c g _ d e t a i l . q t y = l a b e l _ c a r d . q t y
|
c g _ d e t a i l . u o m = ' k g '
|
c g _ d e t a i l . s e r i a l _ n o = l a b e l _ c a r d . s e r i a l _ n 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 ) , ' c g _ d e t a i l ' , c g _ d e t a i l )
|
n R e t , c g _ d e t a i l = 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 , c g _ d e t a i l )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' m o b o x Rú^0¹[hV'ÁTfÆ~0ù[a1Y%! ' . . c g _ d e t a i l
|
e n d
|
|
- - s t e p 3 °eX0ű{°U_0
|
l o c a l p a c k i n g _ r e c o r d = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " G T _ P a c k i n g _ R e c " )
|
p a c k i n g _ r e c o r d . p a c k _ n o = p a c k _ n o
|
p a c k i n g _ r e c o r d . q t y = l a b e l _ c a r d . q t y
|
p a c k i n g _ r e c o r d . c n t r _ c o d e = c n t r _ c o d e
|
p a c k i n g _ r e c o r d . s e r i a l _ n o = l a b e l _ c a r d . s e r i a l _ n o
|
n R e t , p a c k i n g _ r e c o r d = 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 , p a c k i n g _ r e c o r d )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' Rú^0ű{°U_01Y%! ' . . p a c k i n g _ r e c o r d
|
e n d
|
|
- - s t e p 4 ôf°e0ű{å]US0-Nv/}¡Å±{peÏ
|
- - ű{å]UShv/}¡peÏ+ 1
|
s t r C o n d i t i o n = " S _ P A C K _ N O = ' " . . p a c k _ n o . . " ' "
|
l o c a l s t r S e t S Q L _ u p d a t e = " N _ A C C _ Q T Y = N _ A C C _ Q T Y + 1 "
|
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 , " G T _ P a c k i n g _ O r d e r " , s t r C o n d i t i o n , s t r S e t S Q L _ u p d a t e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " 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 1Y%! " . . s t r R e t I n f o
|
e n d
|
|
- - Yg/fceÅöRUSìr$ReeQ^USncL ubv;`ÍÏ/f&Tán³eQ^USnc4Yvyb!k÷S;`Í, án³RsQíeQ^USTű{å]US
|
i f ( d i s p e r s o i d = = ' Y ' ) t h e n
|
- - ·ÖSeQ^USnc4Y
|
l o c a l i n c o m i n g _ I n f o
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
n R e t , i n c o m i n g _ 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 _ I n c o m i n g _ I n f o " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . i n c o m i n g _ I n f o
|
e n d
|
|
- - ·ÖSêñ] ubvceÅövpeÏ;`T
|
s t r C o n d i t i o n = " S _ S E R I A L _ N O L I K E ' S % ' A N D S _ O R D E R _ N O = ' " . . i n c o m i n g _ I n f o . o r d e r _ n o . . " ' "
|
l o c a l s u m Q t y
|
n R e t , s u m Q t y = m o b o x . g e t D a t a O b j A t t r S u m ( s t r L u a D E I D , " G T _ L a b e l _ C r a d " , s t r C o n d i t i o n , " F _ Q T Y " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ·ÖSò]eQ^ceÅö;`pe1Y%! " . . s u m Q t y
|
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 ) , ' s u m Q t y ' , s u m Q t y )
|
s u m Q t y = j s o n . d e c o d e ( s u m Q t y )
|
i f ( s u m Q t y [ 1 ] = = n i l o r s u m Q t y [ 1 ] = = ' ' ) t h e n
|
s u m Q t y = 0
|
e l s e
|
s u m Q t y = t o n u m b e r ( s u m Q t y [ 1 ] )
|
e n d
|
|
- - $Reò]eQ^peÏ/f&T¾0R G T W M S NÑSveQ^USnc4Yvyb!k÷S;`Í, ¾0RNR¾nű{å]USTeQ^US¶r`:N[b
|
i f ( t o n u m b e r ( s u m Q t y ) > = t o n u m b e r ( i n c o m i n g _ I n f o . a c t u a l _ q t y ) ) t h e n
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
l o c a l s t r S e t S Q L = " S _ S T A T E = ' [b' "
|
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 _ G T _ I n c o m i n g _ I n f o " , 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
|
r e t u r n 2 , s t r R e t I n f o
|
e n d
|
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
s t r S e t S Q L = " S _ S T A T E = ' [b' "
|
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 _ G T _ P a c k i n g _ O r d e r " , s t r C o n d i t i o n ,
|
s t r S e t S Q L )
|
e n d
|
e l s e
|
- - s t e p 5 ôf°e0eQ^US0-Nv/}¡Å±{peÏ
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . o r d e r _ n o . . " ' "
|
s t r S e t S Q L _ u p d a t e = " N _ A C C _ P A C K _ Q T Y = N _ A C C _ P A C K _ Q T Y + 1 "
|
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 , " G T _ I n c o m i n g _ I n f o " , s t r C o n d i t i o n ,
|
s t r S e t S Q L _ u p d a t e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " 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 1Y%! " . . s t r R e t I n f o
|
e n d
|
|
- - s t e p 6 $Reű{å]US0eQ^US/f&TsQí
|
- - 1 0$Reű{å]US/f&T gű{öNpe ÿYg g$Reű{å]US/f&T[b
|
- - 2 0$Reåű{å]US
|
N8nveQ^USv/}¡peÏTXbØvpeÏ/f&Tøv T ÿøv TR¾neQ^US¶r`åNÊSeQ^US N@b g/T¨R¶r`vű{å]US ¶r`:N[b
|
l o c a l o b j _ d i s p l a y _ n a m e = p a c k i n g _ r e c o r d . p a c k _ n o
|
l o c a l w f p _ l i s t _ s h o w _ n a m e = " ' " . . p a c k i n g _ r e c o r d . p a c k _ n o . . " ' °eX0ű{°U_0TYt z^"
|
n R e t , s t r R e t I n f o = m o b o x . a d d S y s W F P ( s t r L u a D E I D , 1 , " " , p a c k i n g _ r e c o r d . c l s , p a c k i n g _ r e c o r d . i d , o b j _ d i s p l a y _ n a m e ,
|
0 , " " , " $Re¶r`/f&T[b" , w f p _ l i s t _ s h o w _ n a m e , " ¥cãS W C S t o r e C a l l b a c k " , 0 )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " a d d S y s W F P 1Y%! " . . s t r R e t I n f o
|
e n d
|
e n d
|
|
r e t u r n 0 , l a b e l _ c a r d
|
e n d
|
|
- - [
|
- - M a n u a l B i n d G e n e r a l O p e r a t i o n ºNå]Ñ~[eQ^USeQ^(uÍd\O
|
- - 1 0Á¹[hV'irÑ~[
|
- - 2 0·ÖSeQ^US÷S
|
- - 3 0ôf°eeQ^US¶r`0peÏ
|
- - 4 0$ReeQ^US/f&TsQí
|
- - p a r a m :
|
- - c n t r _ c o d e ¹[hVx
|
- - ]
|
l o c a l f u n c t i o n M a n u a l B i n d G e n e r a l O p e r a t i o n ( s t r L u a D E I D , c n t r _ c o d e )
|
l o c a l n R e t , s t r R e t I n f o , c g _ d e t a i l , s t r C o n d i t i o n
|
|
- - s t e p 1 Á¹[hV'irÑ~[
|
n R e t , c g _ d e t a i l = w m s _ c n t r . G e t _ C o n t a i n e r _ G o o d s ( s t r L u a D E I D , c n t r _ c o d e )
|
i f ( c g _ d e t a i l = = n i l o r c g _ d e t a i l = = ' ' o r # c g _ d e t a i l = = 0 ) t h e n
|
r e t u r n 1 , " *gÛLxØvÍd\O! "
|
e n d
|
c g _ d e t a i l = c g _ d e t a i l [ 1 ] . a t t r s
|
c g _ d e t a i l = m 3 . K e y V a l u e A t t r s T o O b j A t t r ( c g _ d e t a i l )
|
|
- - s t e p 2 ÇAm4l÷S·ÖSeQ^US÷S
|
s t r C o n d i t i o n = " S _ S E R I A L _ N O = ' " . . c g _ d e t a i l . S _ S E R I A L _ N O . . " ' "
|
l o c a l l a b e l _ c a r d
|
n R e t , l a b e l _ c a r d = 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 " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . l a b e l _ c a r d
|
e n d
|
|
- - C G _ D e t a i l ÌbvW[µk N _ I S _ F J :N YÀhhÆ, Ygåpenc/f YÀhR N ôf°eeQ^USv¶r`
|
i f ( t o n u m b e r ( c g _ d e t a i l . N _ I S _ F J ) = = 1 ) t h e n
|
r e t u r n 0 , l a b e l _ c a r d
|
e n d
|
|
- - s t e p 3 ôf°eeQ^US¶r`0peÏ
|
- - Yg/fceÅöRUSìr$ReeQ^USncL ubv;`ÍÏ/f&Tán³eQ^USnc4Yvyb!k÷S;`Í, án³RsQíeQ^USTű{å]US
|
i f ( l a b e l _ c a r d . d i s p e r s o i d = = ' Y ' ) t h e n
|
- - ·ÖSeQ^USnc4Y
|
l o c a l i n c o m i n g _ I n f o
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
n R e t , i n c o m i n g _ 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 _ I n c o m i n g _ I n f o " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . i n c o m i n g _ I n f o
|
e n d
|
|
- - ·ÖSêñ] ubvceÅövpeÏ;`T
|
s t r C o n d i t i o n = " S _ S E R I A L _ N O L I K E ' S % ' A N D S _ O R D E R _ N O = ' " . . i n c o m i n g _ I n f o . o r d e r _ n o . . " ' "
|
l o c a l s u m Q t y
|
n R e t , s u m Q t y = m o b o x . g e t D a t a O b j A t t r S u m ( s t r L u a D E I D , " G T _ L a b e l _ C r a d " , s t r C o n d i t i o n , " F _ Q T Y " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ·ÖSò]eQ^ceÅö;`pe1Y%! " . . s u m Q t y
|
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 ) , ' s u m Q t y ' , s u m Q t y )
|
s u m Q t y = j s o n . d e c o d e ( s u m Q t y )
|
i f ( s u m Q t y [ 1 ] = = n i l o r s u m Q t y [ 1 ] = = ' ' ) t h e n
|
s u m Q t y = 0
|
e l s e
|
s u m Q t y = t o n u m b e r ( s u m Q t y [ 1 ] )
|
e n d
|
|
- - $Reò]eQ^peÏ/f&T¾0R G T W M S NÑSveQ^USnc4Yvyb!k÷S;`Í, ¾0RNR¾nű{å]USTeQ^US¶r`:N[b
|
i f ( t o n u m b e r ( s u m Q t y ) > = t o n u m b e r ( i n c o m i n g _ I n f o . a c t u a l _ q t y ) ) t h e n
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
l o c a l s t r S e t S Q L = " S _ S T A T E = ' [b' "
|
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 _ G T _ I n c o m i n g _ I n f o " , 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
|
r e t u r n 2 , s t r R e t I n f o
|
e n d
|
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n o . . " ' "
|
s t r S e t S Q L = " S _ S T A T E = ' [b' "
|
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 _ G T _ P a c k i n g _ O r d e r " , s t r C o n d i t i o n ,
|
s t r S e t S Q L )
|
e n d
|
e l s e
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . l a b e l _ c a r d . o r d e r _ n 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 O n e D a t a O b j A t t r ( s t r L u a D E I D , " G T _ I n c o m i n g _ I n f o " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " q u e r y O n e D a t a O b j A t t r 1Y%! " . . s t r R e t I n f o
|
e n d
|
s t r R e t I n f o = 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 s t r S e t S Q L _ u p d a t e = " N _ A C C _ P A C K _ Q T Y = N _ A C C _ P A C K _ Q T Y + 1 "
|
i f ( s t r R e t I n f o . s t a t e = = ' °eú^' ) t h e n
|
s t r S e t S Q L _ u p d a t e = s t r S e t S Q L _ u p d a t e . . " , S _ S T A T E = ' /T(u' "
|
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 , " G T _ I n c o m i n g _ I n f o " , s t r C o n d i t i o n , s t r S e t S Q L _ u p d a t e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " 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 1Y%! " . . s t r R e t I n f o
|
e n d
|
|
- - s t e p 4 $ReeQ^US/f&TsQí
|
- - $ReeQ^USncv /}¡peÏ = XbØvpeÏ ÿYgøvI{R¾neQ^US:N[b ÿYg
úQ XbØvpe û|ß~¥b
|
l o c a l o r d e r
|
n R e t , o r d e r = m 3 . G e t D a t a O b j e c t B y K e y ( s t r L u a D E I D , " G T _ I n c o m i n g _ I n f o " , " S _ O R D E R _ N O " , l a b e l _ c a r d . o r d e r _ n o )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , o r d e r
|
e n d
|
i f ( t o n u m b e r ( o r d e r . a c c _ p a c k _ q t y ) = = t o n u m b e r ( o r d e r . c n t r _ q t y ) ) t h e n
|
s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . o r d e r . o r d e r _ n o . . " ' "
|
l o c a l s t r S e t S Q L = " S _ S T A T E = ' [b' "
|
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 _ G T _ I n c o m i n g _ I n f o " , 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
|
r e t u r n 2 , s t r R e t I n f o
|
e n d
|
e l s e i f ( t o n u m b e r ( o r d e r . a c c _ p a c k _ q t y ) > t o n u m b e r ( o r d e r . c n t r _ q t y ) ) t h e n
|
r e t u r n 2 , " eQ^USò][b ÿ NAQ¸eQ^! "
|
e n d
|
e n d
|
|
r e t u r n 0 , l a b e l _ c a r d
|
e n d
|
|
- - [
|
- - P a c k V e r i f i c a t i o n ű{!h
|
- - 1 0Á¹[hV'irÑ~[
|
- - 2 0Áå]MONű{å]US/f&T Nô
|
- - 3 0·ÖSeQ^US÷S
|
- - p a r a m :
|
- - s t a t i o n _ n o eQ^Ùz¹p
|
- - ]
|
l o c a l f u n c t i o n P a c k V e r i f i c a t i o n ( s t r L u a D E I D , s t a t i o n _ n o )
|
l o c a l n R e t , s t r R e t I n f o
|
|
- - s t e p 1 ·ÖS,gå]MO g°ev 0ű{Àh0
|
l o c a l s t r C o n d i t i o n = " S _ S T A T I O N = ' " . . s t a t i o n _ n o . . " ' A N D S _ S T A T E = ' °eú^' "
|
l o c a l s t r O r d e r = " T _ C R E A T E d e s c "
|
l o c a l p a c k i n g _ c h e c k
|
n R e t , p a c k i n g _ c h e c k = 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 _ P a c k i n g _ C h e c k " , 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 = = 1 ) t h e n
|
r e t u r n 1 , " ÷HQ(uP D A kbÏcîvÆaSÛLÀh! "
|
e n d
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . p a c k i n g _ c h e c k
|
e n d
|
|
- - s t e p 2 Áå]MONű{å]US/f&T Nô
|
l o c a l d e l i v e r y _ n o = p a c k i n g _ c h e c k . d e l i v e r y _ n o - - 6e'US÷S
|
l o c a l d e l i v e r y _ r o w _ n o = p a c k i n g _ c h e c k . d e l i v e r y _ r o w _ n o - - 6e'USL÷S
|
- - Àhű{å]US
|
Nvire/f&T(W,gå]MOű{
|
- - Ç 6e'US÷S06e'USL÷S ÿ êSű{å]US
|
N g Ù*Nå]MOv6e'US÷S06e'USL÷S·ÖSveQ^US÷S 1\Ç
|
- - ågâ ¶r`= /T¨R vű{å]US
|
l o c a l s q l = " S E L E C T S _ O R D E R _ N O F R O M T N _ G T _ I n c o m i n g _ I n f o W H E R E S _ D E L I V E R Y _ N O = ' " . . d e l i v e r y _ n o . .
|
" ' A N D N _ D E L I V E R Y _ R O W _ N O = ' " . . d e l i v e r y _ r o w _ n o . . " ' "
|
s t r C o n d i t i o n = " S _ S T A T I O N = ' " . . s t a t i o n _ n o . . " ' A N D S _ S T A T E = ' /T(u' A N D S _ O R D E R _ N O = ( " . . s q l . . " ) "
|
l o c a l p a c k i n g _ o r d e r
|
n R e t , p a c k i n g _ o r d e r = 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 _ P a c k i n g _ O r d e r " , 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 = = 1 ) t h e n
|
r e t u r n 1 , " îvMRvű{å]MO Nýù[6e'US÷S:N' " . . d e l i v e r y _ n o . . " ' vireÛLű{! "
|
e n d
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . p a c k i n g _ o r d e r
|
e n d
|
|
- - s t e p 3 ôf°e0ű{!h0¾n:N" [b"
|
s t r C o n d i t i o n = " S _ S E R I A L _ N O = ' " . . p a c k i n g _ c h e c k . s e r i a l _ n o . . " ' A N D S _ S T A T I O N = ' " . . s t a t i o n _ n o . .
|
" ' A N D S _ S T A T E = ' °eú^' "
|
l o c a l s t r U p d a t e S q l = " S _ S T A T E = ' [b' "
|
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 , " G T _ P a c k i n g _ C h e c k " , 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ű{!h0áOo`1Y%! " . . s t r R e t I n f o
|
e n d
|
|
r e t u r n 0 , p a c k i n g _ c h e c k . s e r i a l _ n o
|
e n d
|
|
- - [
|
- - S t o c k I n q u i r y ^X[ågâ
|
- - 1 0·ÖS÷]S'MO;`pe
|
- - 2 0·ÖSán'MO;`pe
|
- - 3 0ÿán'MO;`pe / ÷]S;`pe ÿ* 1 0 0 = án'MO~vRÔk
|
- - 4 0$Reán'MO^X[/f&T¾0R8 0 % , ¡l¾0RRÔÞVïSeQ^÷]S
|
- - p a r a m :
|
- - s t r _ r o a d w a y ÷]0R
|
- - ]
|
l o c a l f u n c t i o n S t o c k I n q u i r y ( s t r L u a D E I D )
|
- - ·ÖS*g»QÓ~v÷]S
|
l o c a l s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' L K ' A N D N _ L O C K _ S T A T E = 0 "
|
l o c a l n R e t , r o a d w a y = m 3 . Q u e r y D a t a O b j e c t ( 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
|
r e t u r n 2 , ' ågâ÷]SáOo`1Y%' . . r o a d w a y
|
e n d
|
i f ( r o a d w a y = = n i l o r r o a d w a y = = ' ' ) t h e n
|
r e t u r n 2 , ' ¡l gïSeQ^v÷]S! '
|
e n d
|
|
l o c a l s t r = ' '
|
f o r i = 1 , # r o a d w a y d o
|
l o c a l a t t r s = r o a d w a y [ i ] . a t t r s
|
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 ( a t t r s )
|
i f ( a t t r s = = n i l ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
|
- - (uW C S ¥cãS·ÖS÷]Sv¶r`
|
l o c a l d a t a = {
|
r e q _ n o = l u a . g u i d ( ) ,
|
r o a d w a y = a t t r s . N _ R O A D W A Y
|
}
|
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 , " W C S - u r l " )
|
l o c a l s t r u r l = u r l . . " / S t a c k e r S t a t e "
|
l o c a l r o a d w a y _ s t a t e
|
l o c a l 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 , " " , l u a . t a b l e 2 s t r ( d a t a ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " (u¥cãS1Y%! " . . s t r R e t I n f o
|
e n d
|
l o c a l s u c c e s s , r e s J s o n = p c a l l ( j s o n . d e c o d e , r o a d w a y _ s t a t e )
|
i f ( s u c c e s s = = 0 ) t h e n
|
r o a d w a y _ s t a t e = r e s J s o n . d a t a [ 1 ] . r o a d w a y _ s t a t e
|
i f ( t o n u m b e r ( r o a d w a y _ s t a t e ) = = 0 o r t o n u m b e r ( r o a d w a y _ s t a t e ) = = 3 ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
e n d
|
|
l o c a l s t r R e t I n f o
|
- - ·ÖS÷]S'MO;`pe
|
s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' L K ' A N D N _ R O A D W A Y = " . . a t t r s . N _ R O A D W A Y
|
n R e t , s t r R e t I n f o = m o b o x . g e t D a t a O b j C o u n t ( 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
|
r e t u r n 2 , " g e t D a t a O b j C o u n t 1Y%! " . . s t r R e t I n f o
|
e n d
|
l o c a l h w _ c o u n t = t o n u m b e r ( s t r R e t I n f o ) - - c[÷]Sv'MO;`pe
|
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 ) , " h w _ c o u n t " , h w _ c o u n t )
|
|
s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' L K ' A N D N _ C U R R E N T _ N U M < > 0 A N D N _ R O A D W A Y = " . . a t t r s . N _ R O A D W A Y
|
n R e t , s t r R e t I n f o = m o b o x . g e t D a t a O b j C o u n t ( 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
|
r e t u r n 2 , " g e t D a t a O b j C o u n t 1Y%! " . . s t r R e t I n f o
|
e n d
|
l o c a l m h w _ c o u n t = t o n u m b e r ( s t r R e t I n f o ) - - c[÷]Sván'MO;`pe
|
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 ) , " m h w _ c o u n t " , m h w _ c o u n t )
|
l o c a l m h w _ r a t i o = ( m h w _ c o u n t / h w _ c o u n t ) * 1 0 0 - - án'MO`SÔk
|
i f ( m h w _ r a t i o = = n i l ) t h e n
|
r e t u r n 1 ,
|
" ¡{1Y%! ÷]S: " . . a t t r s . N _ R O A D W A Y . . " án'MOpeÏ: " . . m h w _ c o u n t . . " 'MO;`pe: " . .
|
h w _ c o u n t
|
e n d
|
|
- - ·ÖSW[xQ[INvûy^ÔkO
|
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 ( " G T _ L K _ R A T I O " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " g e t D i c t I t e m I I n f o 1Y%! " . . s t r R e t I n f o
|
e n d
|
s t r R e t I n f o = 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 i t e m _ r a t i o = t o n u m b e r ( s t r R e t I n f o [ 1 ] . n a m e ) - - W[xQ[INv÷]S[hQ^X[ÔkO
|
|
i f ( m h w _ r a t i o < = i t e m _ r a t i o ) t h e n
|
s t r = s t r . . a t t r s . N _ R O A D W A Y . . " , "
|
e n d
|
: : c o r o u t i n e : :
|
e n d
|
- - »Sd gT N*N,
|
s t r = l u a . t r i m _ l a s t e r _ c h a r ( s t r )
|
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 " , s t r )
|
r e t u r n 0 , s t r
|
e n d
|
|
- - [
|
- - R o b o t B o x i n g :ghVºNű{
|
- - 1 0·ÖSG T W M S TekvAm4l÷S
|
- - 2 0G T W M S Am4l÷SYLöenx[wQSOYtL
|
- - 3 0·ÖSÇirexceÅöÄ~ØvÄRô~¤bvirevhÆQÍÏ
|
- - 4 09hncxØvÄR¡{ÍÏ
|
- - 5 0°eXeQ^USncLáOo`
|
- - p a r a m :
|
- - o r d e r _ n o eQ^US÷S
|
- - q t y ű{peÏ
|
- - p a l l e t i z i n g xØvÄR
|
- - ]
|
l o c a l f u n c t i o n R o b o t B o x i n g ( s t r L u a D E I D , o r d e r _ n o , q t y , p a l l e t i z i n g )
|
l o c a l n R e t , s t r R e t I n f o
|
|
i f ( q t y = = n i l ) t h e n
|
r e t u r n 2 , " ceÅöpeÏ^peW[b:Nzz! "
|
e n d
|
i f ( q t y ~ = m a t h . f l o o r ( q t y ) o r q t y < = 0 ) t h e n
|
r e t u r n 2 , " ceÅöpeÏ^cktepe"
|
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 ) , ' q t y ' , t o n u m b e r ( q t y ) )
|
|
i f ( p a l l e t i z i n g = = ' ' o r p a l l e t i z i n g = = n i l ) t h e n
|
r e t u r n 2 , " ceÅöxØvÄR Ný:Nzz! "
|
e n d
|
|
- - s t e p 1 ·ÖSG T W M S TekvAm4l÷S( ïSýX[(W N*NUSnc4Y ÿY*NAm4l÷SvX[(W)
|
l o c a l s t r C o n d i t i o n = " S _ O R D E R _ N O = ' " . . o r d e r _ n o . . " ' A N D S _ S E R I A L _ N O N O T L I K E ' S % ' "
|
l o c a l l a b e l _ c r a d
|
n R e t , l a b e l _ c r a d = m 3 . Q u e r y D a t a O b j e c t ( s t r L u a D E I D , " G T _ L a b e l _ C r a d " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . l a b e l _ c r a d
|
e n d
|
|
l o c a l a t t r
|
- - s t e p 2 G T W M S Am4l÷SYLöenx[wQSOYtL
|
f o r i = 1 , # l a b e l _ c r a d d o
|
n R e t , a t t r = m 3 . O b j A t t r S t r T o L u a O b j ( " G T _ L a b e l _ C r a d " , l u a . t a b l e 2 s t r ( l a b e l _ c r a d [ i ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . O b j A t t r S t r T o L u a O b j ( G T _ L a b e l _ C r a d ) 1Y%! " . . a t t r
|
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 ) , ' a t t r ' , a t t r )
|
|
- - 9hncAm4l÷Sv/U Nxß~¡bìNêñ]ÔÞVvceÅö S _4Yvx vpeÏ;`T
|
s t r C o n d i t i o n = " S _ R E Q _ N O = ' " . . a t t r . r e q _ n o . . " ' A N D S _ S E R I A L _ N O L I K E ' S % ' "
|
l o c a l s u m Q t y
|
n R e t , s u m Q t y = m o b o x . g e t D a t a O b j A t t r S u m ( s t r L u a D E I D , " G T _ L a b e l _ C r a d " , s t r C o n d i t i o n , " F _ Q T Y " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ·ÖSò]eQ^ceÅö;`pe1Y% 1Y%! " . . s u m Q t y
|
e n d
|
s u m Q t y = j s o n . d e c o d e ( s u m Q t y )
|
i f ( s u m Q t y [ 1 ] = = n i l o r s u m Q t y [ 1 ] = = ' ' ) t h e n
|
s u m Q t y = 0
|
e l s e
|
s u m Q t y = t o n u m b e r ( s u m Q t y [ 1 ] )
|
e n d
|
|
i f ( t o n u m b e r ( a t t r . q t y ) > t o n u m b e r ( s u m Q t y ) ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
|
i f ( i = = # l a b e l _ c r a d ) t h e n
|
r e t u r n 2 , " *gåg~b0Rù[^veQ^USncL°U_! "
|
e n d
|
e n d
|
|
: : c o r o u t i n e : :
|
|
- - l a b e l _ c r a d = a t t r
|
- - s t e p 3 ÇeQ^USncLvXbØvÍÏTWWpe¡{hÆQÍÏ
|
l o c a l w e i g h t = t o n u m b e r ( a t t r . q t y ) / t o n u m b e r ( a t t r . n u m b e r )
|
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 ) , " q t y " , q t y )
|
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 ) , " a t t r " , a t t r )
|
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 ) , " w e i g h t " , w e i g h t )
|
|
- - s t e p 4 9hncxØvÄR¡{ÍÏ eQ^USncLÍÏ:N:g°hÂß~¡vpeÏ * hÆQÍÏ
|
l o c a l a l l _ q t y = t o n u m b e r ( q t y ) * t o n u m b e r ( w e i g h t )
|
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 ) , " a l l _ q t y " , a l l _ q t y )
|
- - ê¨R ubAm4l÷S( xÄR S + 7 MOpeW[)
|
l o c a l s t r C o d e
|
n R e t , s t r C o d e = m o b o x . g e t S e r i a l N u m b e r ( " ceÅöAm4l÷S" , ' S ' , 7 )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " 3u÷ceÅöeQ^USncLx1Y%! " . . s t r C o d e
|
e n d
|
|
- - s e t e p 5 °eXeQ^USncLáOo` Rú^eQ^USncL
|
- - ·ÖS N*N RËYv0eQ^USncL0pencù[a
|
l o c a l n e w _ l a b e l _ c r a d = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " G T _ L a b e l _ C r a d " )
|
n e w _ l a b e l _ c r a d . d e l i v e r y _ n o = a t t r . d e l i v e r y _ n o
|
n e w _ l a b e l _ c r a d . d e l i v e r y _ r o w _ n o = a t t r . d e l i v e r y _ r o w _ n o
|
n e w _ l a b e l _ c r a d . i t e m _ c o d e = a t t r . i t e m _ c o d e
|
n e w _ l a b e l _ c r a d . i t e m _ c o d e _ 9 = a t t r . i t e m _ c o d e _ 9
|
n e w _ l a b e l _ c r a d . i t e m _ n a m e = a t t r . i t e m _ n a m e
|
n e w _ l a b e l _ c r a d . p r o d u c t _ d a t e = a t t r . p r o d u c t _ d a t e
|
n e w _ l a b e l _ c r a d . b a t c h _ n o = a t t r . b a t c h _ n o
|
n e w _ l a b e l _ c r a d . i t e m _ s t a t e = a t t r . i t e m _ s t a t e
|
n e w _ l a b e l _ c r a d . q t y = a l l _ q t y
|
n e w _ l a b e l _ c r a d . s e r i a l _ n o = s t r C o d e
|
n e w _ l a b e l _ c r a d . w h _ c o d e = a t t r . w h _ c o d e
|
n e w _ l a b e l _ c r a d . s t o r a g e _ l o c = a t t r . s t o r a g e _ l o c
|
n e w _ l a b e l _ c r a d . o r d e r _ n o = a t t r . o r d e r _ n o
|
n e w _ l a b e l _ c r a d . i s _ b o n d e d = a t t r . i s _ b o n d e d
|
n e w _ l a b e l _ c r a d . w h e e l _ t y p e _ r o t = a t t r . w h e e l _ t y p e _ r o t
|
n e w _ l a b e l _ c r a d . s u b p o o l = a t t r . s u b p o o l
|
n e w _ l a b e l _ c r a d . r e q _ n o = a t t r . r e q _ n o
|
n e w _ l a b e l _ c r a d . d i s p e r s o i d = a t t r . d i s p e r s o i d
|
n e w _ l a b e l _ c r a d . p a l l e t i z i n g = a t t r . p a l l e t i z i n g
|
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 e w _ l a b e l _ c r a d ' , n e w _ l a b e l _ c r a d )
|
n R e t , n e w _ l a b e l _ c r a d = 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 _ l a b e l _ c r a d )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m o b o x Rú^0eQ^USncL0ù[a1Y%! " . . n e w _ l a b e l _ c r a d
|
e n d
|
|
r e t u r n 0 , n e w _ l a b e l _ c r a d . s e r i a l _ n o
|
e n d
|
|
- - Rú^\ON
|
l o c a l f u n c t i o n C r e a t e O p e r a t i o n ( s t r L u a D E I D , i t e m _ c o d e , b a t c h _ n o , l o c _ s t a r t , i n b o u n d _ p o l i c y , e x t _ t a b l e , c n t r _ c o d e )
|
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 ) , ' ÛeQRú^\ON' , l o c _ s t a r t )
|
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 ) , ' ÛeQRú^\ON' , i n b o u n d _ p o l i c y )
|
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 ) , ' ÛeQRú^\ON' , c n t r _ c o d e )
|
- - ·ÖSire{|W
|
l o c a l n R e t , i t e m _ t y p e , m a t e r i a l = G T _ G e t _ I t e m T y p e ( s t r L u a D E I D , i t e m _ c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 1 , i t e m _ t y p e
|
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 ) , ' ireáOo`' , m a t e r i a l )
|
|
- - ûm RibU\\ON
|
e x t _ t a b l e . b a t c h _ n o = b a t c h _ n o - - yb!k÷S
|
e x t _ t a b l e . i t e m _ c o d e = i t e m _ c o d e - - irex
|
e x t _ t a b l e . i t e m _ t y p e = i t e m _ t y p e - - ire{|W
|
e x t _ t a b l e . i s _ i n s u l a t e = m a t e r i a l . i s _ i n s u l a t e - - /f&TÝO)n
|
|
- - ·ÖSW[xQ[INv)Y6qöÄR
|
l o c a l i s _ t r j
|
n R e t , i s _ t r j = m o b o x . g e t D i c t I t e m I I n f o ( " G T _ T R J _ D A T E " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " g e t D i c t I t e m I I n f o 1Y%! " . . i s _ t r j
|
e n d
|
i s _ t r j = j s o n . d e c o d e ( i s _ t r j )
|
i s _ t r j = t o n u m b e r ( i s _ t r j [ 1 ] . n a m e ) - - )Y6qöÄR 1 /T(u 2 y(u
|
|
- - ·ÖS÷]S^X[*g¾0R 8 0 % vïSeQ^÷]S
|
l o c a l s t r R e t I n f o
|
n R e t , s t r R e t I n f o = S t o c k I n q u i r y ( s t r L u a D E I D )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , s t r R e t I n f o
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r R e t I n f o - - \ONibU\pencX[eQÙ*N÷]S^X[W[&{2N ÿÌb/f^X[*g
Ç8 0 % v÷]S
|
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 ) , ' ïSeQ^÷]S' , s t r R e t I n f o )
|
|
- - $Rew¹p/f&T:N N|iæ]§OÞV^ãSb N|iÞV^ãS, Yg/fêSýO(u3 ÿ4 ÷]S
|
i f ( l o c _ s t a r t . c o d e = = 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 , " K L _ R e t u r n R g v S t a t i o n 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 L _ I n W e i g h t 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 R _ I n W e i g h t 1 " ) ) t h e n
|
l o c a l b = 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 , " sO- N|iæ]§OÞV^ãS÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) t h e n
|
r e t u r n 2 , " ¡l gïSeQ^v3 , 4 ÷]S! "
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
e n d
|
|
- - s t e p 5 Rú^\ON
|
l o c a l o p e r 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 , " O p e r a t i o n " )
|
o p e r a t i o n . s t a r t _ w h _ c o d e = l o c _ s t a r t . w h _ c o d e
|
o p e r a t i o n . s t a r t _ a r e a _ c o d e = l o c _ s t a r t . a r e a _ c o d e
|
o p e r a t i o n . s t a r t _ l o c _ c o d e = l o c _ s t a r t . c o d e
|
|
o p e r a t i o n . o p _ 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 , " \ON{|W- eQ^" )
|
|
- - $Re¢[7bc[vÄR
|
- - ¢[7bc[öeeQ^V{eu 1 ÿeQ7 08 ÷]Sÿ 2 ÿ NeQ7 08 ÷]Sÿ 3 ÿû|ß~÷]SGWaRMÿ ù[)Y6qöireeQ^vöeP»SÛLV{euv$Re0
|
l o c a l e n d _ l o c
|
i f ( t o n u m b e r ( i n b o u n d _ p o l i c y ) = = 1 ) t h e n
|
- - ·ÖSïSeQ^÷]S
|
l o c a l b = 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 , " sO- ÝO)n÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) t h e n
|
r e t u r n 2 , " ¡l gïSeQ^vÝO)n÷]S! "
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
o p e r a t i o n . o p _ d e f _ n a m e = " ÝO)nPgeeQ^"
|
- - ·ÖS\ONÈ~¹pMOn
|
n R e t , e n d _ l o c = B W _ S t o r a g e T a c t i c s ( s t r L u a D E I D , e x t _ t a b l e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¡{È~¹p1Y%ÿ" . . e n d _ l o c
|
e n d
|
i f ( e n d _ l o c = = n i l o r e n d _ l o c = = ' ' ) t h e n
|
r e t u r n 2 , " Ëz^-N¡l gán³agöNv'MOïSåNRM! "
|
e n d
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( e n d _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e x t _ t a b l e . r o a d w a y = e n d _ l o c . r o a d w a y
|
g o t o c o n t i n u e
|
e l s e i f ( t o n u m b e r ( i n b o u n d _ p o l i c y ) = = 2 ) t h e n
|
l o c a l b = 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 , " sO- ^ÝO)n÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) t h e n
|
r e t u r n 2 , " ¡l gïSeQ^v^ÝO)n÷]S! "
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
o p e r a t i o n . o p _ d e f _ n a m e = " Ëz^eQ^"
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = J L _ S t o r a g e T a c t i c s ( s t r L u a D E I D , e x t _ t a b l e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¡{È~¹p1Y%ÿ" . . e n d _ l o c
|
e n d
|
i f ( e n d _ l o c = = n i l o r e n d _ l o c = = ' ' ) t h e n
|
r e t u r n 2 , " Ëz^-N¡l gán³agöNv'MOïSåNRM! "
|
e n d
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( e n d _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e x t _ t a b l e . r o a d w a y = e n d _ l o c . r o a d w a y
|
g o t o c o n t i n u e
|
e n d
|
|
i f ( i s _ t r j = = 1 a n d m a t e r i a l . i s _ i n s u l a t e = = ' Y ' ) t h e n
|
- - ·ÖSïSeQ^÷]S
|
l o c a l b = 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 , " sO- ÝO)n÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) t h e n
|
r e t u r n 2 , " ¡l gïSeQ^vÝO)n÷]S! "
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
o p e r a t i o n . o p _ d e f _ n a m e = " ÝO)nPgeeQ^"
|
- - ·ÖS\ONÈ~¹pMOn
|
n R e t , e n d _ l o c = B W _ S t o r a g e T a c t i c s ( s t r L u a D E I D , e x t _ t a b l e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¡{È~¹p1Y%ÿ" . . e n d _ l o c
|
e n d
|
i f ( e n d _ l o c = = n i l o r e n d _ l o c = = ' ' ) t h e n
|
r e t u r n 2 , " Ëz^-N¡l gán³agöNv'MOïSåNRM! "
|
e n d
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( e n d _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e x t _ t a b l e . r o a d w a y = e n d _ l o c . r o a d w a y
|
g o t o c o n t i n u e
|
e n d
|
i f ( i t e m _ t y p e = = ' |e' ) t h e n
|
o p e r a t i o n . o p _ d e f _ n a m e = " |eeQ^"
|
e x t _ t a b l e . i s o t h e r m a l = m a t e r i a l . i s o t h e r m a l - - /f&TR`)n ÿ(ueg$Re|e/f&TeQR`)n^
|
e x t _ t a b l e . a r e a _ c o d e = m a t e r i a l . a r e a _ c o d e - - ^:S ÿ(ueg$Re|eeQ^ãSvMOn
|
|
- - G T _ A r e a _ T y p e W[xQ Tðy 1 , 2 , 3 vD R<PR+Rù[^ N|e^0|e^0|eÔkOô~¤b NÍy
|
l o c a l d i c t I t e m
|
n R e t , d i c t I t e m = m o b o x . g e t D i c t I t e m I I n f o ( " G T _ A r e a _ T y p e " )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , d i c t I t e m
|
e n d
|
d i c t I t e m = j s o n . d e c o d e ( d i c t I t e m )
|
l o c a l l o c _ c o d e , d _ r a t i o , x _ r a t i o
|
l o c a l s t r C o n d i t i o n , a r e a
|
f o r m = 1 , # d i c t I t e m d o
|
- - sOW M S Ov^:STW[xQ[INv<PøvI{R$ReW[xQ Tðy/fêT*NÈ~¹p^:S
|
i f ( m a t e r i a l . a r e a _ c o d e = = d i c t I t e m [ m ] . v a l u e ) t h e n
|
i f ( t o n u m b e r ( d i c t I t e m [ m ] . n a m e ) = = 1 ) t h e n
|
i f ( m a t e r i a l . i s o t h e r m a l = = ' Y ' ) t h e n
|
a r e a = " H W P F L "
|
e l s e
|
a r e a = " P F L "
|
e n d
|
e l s e i f ( t o n u m b e r ( d i c t I t e m [ m ] . n a m e ) = = 2 ) t h e n
|
i f ( m a t e r i a l . i s o t h e r m a l = = ' Y ' ) t h e n
|
a r e a = " H W T F L "
|
e l s e
|
a r e a = " T F L "
|
e n d
|
e l s e
|
- - sOW M S ¡l gc[ NúQ^ãS ÿRÇ|eÔkOô~¤beg$ReeQ^ãS
|
- - ؤÔkO:N5 : 5
|
d _ r a t i o = 5
|
x _ r a t i o = 5
|
|
- - ·ÖS N|e^å'ÁTvpeÏ
|
l o c a l d _ c o u n t , x _ c o u n t , c o u n t , d _ n u m , x _ n u m , n u m
|
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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' " . .
|
i t e m _ c o d e . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" A N D 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 W H E R E S _ A R E A _ C O D E I N ( ' P F L ' , ' H W P F L ' ) ) "
|
n R e t , d _ c o u n t = m o b o x . g e t D a t a O b j C o u n t ( s t r L u a D E I D , " L o c _ C o n t a i n e r " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , d _ c o u n t
|
e n d
|
- - ·ÖSck(WgbL-NvûN¡RpeÏ
|
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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' " . .
|
i t e m _ c o d e . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" A N D S _ E N D _ L O C 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 S _ A R E A _ C O D E I N ( ' P F L ' , ' H W P F L ' ) ) "
|
n R e t , n u m = m o b o x . g e t D a t a O b j C o u n t ( 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 )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , n u m
|
e n d
|
i f ( t o n u m b e r ( d _ c o u n t ) ~ = n i l ) t h e n
|
i f ( t o n u m b e r ( n u m ) ~ = n i l ) t h e n
|
d _ c o u n t = t o n u m b e r ( d _ c o u n t ) + t o n u m b e r ( n u m )
|
e n d
|
e l s e
|
i f ( t o n u m b e r ( n u m ) ~ = n i l ) t h e n
|
d _ c o u n t = t o n u m b e r ( n u m )
|
e n d
|
e n d
|
|
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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' " . .
|
i t e m _ c o d e . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" A N D 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 W H E R E S _ A R E A _ C O D E I N ( ' T F L ' , ' H W T F L ' ) ) "
|
n R e t , x _ c o u n t = m o b o x . g e t D a t a O b j C o u n t ( s t r L u a D E I D , " L o c _ C o n t a i n e r " , s t r C o n d i t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , x _ c o u n t
|
e n d
|
- - ·ÖSck(WgbL-NvûN¡RpeÏ
|
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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' " . .
|
i t e m _ c o d e . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" A N D S _ E N D _ L O C 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 S _ A R E A _ C O D E I N ( ' T F L ' , ' H W T F L ' ) ) "
|
n R e t , n u m = m o b o x . g e t D a t a O b j C o u n t ( 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 )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , n u m
|
e n d
|
i f ( t o n u m b e r ( x _ c o u n t ) ~ = n i l ) t h e n
|
i f ( t o n u m b e r ( n u m ) ~ = n i l ) t h e n
|
x _ c o u n t = t o n u m b e r ( x _ c o u n t ) + t o n u m b e r ( n u m )
|
e n d
|
e l s e
|
i f ( t o n u m b e r ( n u m ) ~ = n i l ) t h e n
|
x _ c o u n t = t o n u m b e r ( n u m )
|
e n d
|
e n d
|
|
- - N|e^@b gåirexv;`pe
|
c o u n t = t o n u m b e r ( d _ c o u n t ) + t o n u m b e r ( x _ c o u n t )
|
- - ¡{ N|e^`SÔk
|
i f ( c o u n t ~ = 0 ) t h e n
|
d _ n u m = r o u n d ( t o n u m b e r ( d _ c o u n t ) / t o n u m b e r ( c o u n t ) * 1 0 ) - - N|e^`SÔk
|
x _ n u m = r o u n d ( t o n u m b e r ( x _ c o u n t ) / t o n u m b e r ( c o u n t ) * 1 0 ) - - |e^`SÔk
|
e l s e
|
d _ n u m = 0
|
x _ n u m = 0
|
e n d
|
|
i f ( m a t e r i a l . i s o t h e r m a l = = ' Y ' ) t h e n
|
i f ( d _ r a t i o > = d _ n u m ) t h e n
|
a r e a = " H W P F L "
|
e n d
|
|
i f ( x _ r a t i o > = x _ n u m ) t h e n
|
a r e a = " H W T F L "
|
e n d
|
e l s e
|
i f ( d _ r a t i o > = d _ n u m ) t h e n
|
a r e a = " P F L "
|
e n d
|
|
i f ( x _ r a t i o > = x _ n u m ) t h e n
|
a r e a = " T F L "
|
e n d
|
e n d
|
e n d
|
e n d
|
e n d
|
- - ågâagöN:N^:S:Nc[^:Svzz'MO
|
s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' " . . a r e a . . " ' A N D N _ C U R R E N T _ N U M = 0 A N D N _ L O C K _ S T A T E = 0 A N D C _ E N A B L E = ' Y ' "
|
- - 9hncÈ~¹p^:S·ÖSÈ~¹p'MO cgqcRB\c^
|
l o c a l s t r O r d e r = " N _ R O W , N _ C O L , N _ L A Y E R "
|
- - gY·ÖS 1 0 ag
|
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 3 ( 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 , 1 0 , s t r O r d e r )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ·ÖS'MOáOo`ï! " . . s t r R e t I n f o . . " S Q L agöN: " . . s t r C o n d i t i o n
|
e n d
|
|
l o c a l l o c
|
i f ( s t r R e t I n f o ~ = ' ' ) t h e n
|
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 )
|
n R e t , l o c = m 3 . 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 " , l u a . t a b l e 2 s t r ( r e t O b j s [ 1 ] . a t t r s ) )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " m 3 . 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
|
e n d
|
e l s e
|
r e t u r n 2 , " ¡l gågâ0RïSeQ^vzz'MO! "
|
e n d
|
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( l o c . c o d e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e l s e i f ( i t e m _ t y p e = = ' ¢ N' ) t h e n
|
l o c a l b = 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 , " sO- ^ÝO)n÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) t h e n
|
r e t u r n 2 , " ¡l gïSeQ^v^ÝO)n÷]S! "
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
o p e r a t i o n . o p _ d e f _ n a m e = " Ëz^eQ^"
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = G S _ S t o r a g e T a c t i c s ( s t r L u a D E I D , e x t _ t a b l e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¡{È~¹p1Y%ÿ" . . e n d _ l o c
|
e n d
|
i f ( e n d _ l o c = = n i l o r e n d _ l o c = = ' ' ) t h e n
|
r e t u r n 2 , " Ëz^-N¡l gán³agöNv'MOïSåNRM! "
|
e n d
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( e n d _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e x t _ t a b l e . r o a d w a y = e n d _ l o c . r o a d w a y
|
e l s e
|
o p e r a t i o n . o p _ d e f _ n a m e = " Ëz^eQ^"
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = J L _ S t o r a g e T a c t i c s ( s t r L u a D E I D , e x t _ t a b l e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " ¡{È~¹p1Y%ÿ" . . e n d _ l o c
|
e n d
|
i f ( e n d _ l o c = = n i l o r e n d _ l o c = = ' ' ) t h e n
|
r e t u r n 2 , " Ëz^-N¡l gán³agöNv'MOïSåNRM! "
|
e n d
|
- - ·ÖSÈ~¹páOo`
|
n R e t , e n d _ l o c = w m s _ w h . G e t L o c I n f o ( e n d _ l o c )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' W M S _ G e t L o c I n f o 1Y%! ' . . e n d _ l o c
|
e n d
|
o p e r a t i o n . e n d _ w h _ c o d e = e n d _ l o c . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = e n d _ l o c . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = e n d _ l o c . c o d e
|
e x t _ t a b l e . r o a d w a y = e n d _ l o c . r o a d w a y
|
e n d
|
|
: : c o n t i n u e : :
|
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 d e
|
l o c a l s t r H e a d e r = ' T A ' . . o s . d a t e ( " % y % m % d " ) . . ' - '
|
n R e t , s t r C o d e = m o b o x . g e t S e r i a l N u m b e r ( " ûN¡R" , s t r H e a d e r , 5 )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' 3u÷0ûN¡R0x1Y%! ' . . s t r C o d e
|
e n d
|
e x t _ t a b l e . t a s k _ n o = s t r C o d e
|
o p e r a t i o n . e x t _ d a t a = l u a . t a b l e 2 s t r ( e x t _ t a b l e )
|
o p e r a t i o n . c n t r _ c o d e = c n t r _ c o d e
|
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 ) , " e n d _ l o c " , e n d _ l o c )
|
n R e t , o p e r a t i o n = 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 , o p e r a t i o n )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , ' Rú^0\ON01Y%! ' . . o p e r a t i o n
|
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 ) , " \ONRú^TáOo`" , o p e r a t i o n )
|
|
- - È~¹p RÍd\O( w¹p:NÙz¹p gW C S ¡{§c)
|
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 , o p e r a t i o n . 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^" ) , e x t _ t a b l e . t a s k _ n o , o p e r a t i o n . c o d e , o p e r a t i o n . o p _ d e f _ n a m e )
|
i f ( n R e t ~ = 0 ) t h e n
|
r e t u r n 2 , " 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 , ' '
|
e n d
|
|
- - [ [
|
x: G T - 1 0 0 - 0 1
|
Tðy: W C S eQ^ÞV
|
\OÿL Z H
|
eQãSýQpeÿ W C S C a l l b a c k
|
|
|
Rýôf:
|
Ç OÂSv÷Bl{|W$Re 1 = 'ireQ^/ ^ÿ2 = XbØvÄ~eQ^ÿ3 = R F I D XbØvågâ ÿ4 = |TëSzzXbÿ
|
|
Yt;
|
- - s t e p 1 ·ÖS¥cãSpenc
|
- - s t e p 2 ÀhÂSpe
|
- - s t e p 3 ·ÖSå]MOw¹páOo`
|
- - s t e p 4 9hnc N Tv{|WZP N TvÍd\O 1 = 'ireQ^/ ^ÿ2 = XbØvÄ~eQ^ÿ3 = R F I D XbØvågâ ÿ4 = |TëSzzXb
|
|
|
eQpencÿ
|
{
|
" c n t r _ c o d e " : " 1 0 6 E G R C A 1 0 7 8 " , - - ¹[hV÷S
|
" s t a t i o n _ n o " : " A " , - - å]MO
|
" q t y " : 0 , - - peÏ
|
" r e q _ n o " : " 1 1 1 1 1 1 1 1 " , - - G U I D /U NhÆ
|
" r e q _ t y p e " : " 1 " , - - ÷Bl{|W 1 = 'ireQ^/ ^ÿ2 = XbØvÄ~eQ^ÿ3 = R F I D XbØvågâ ÿ4 = |TëSzzXb
|
" w e i g h t " : " 1 " , - - ÍÏ
|
" r e q _ t i m e " : " 2 0 2 4 - 1 2 - 1 1 " - - ÷Blöeô
|
}
|
|
|
ØSôf°U_:
|
v 1 . 1 l z h 2 0 2 5 0 4 2 1 X R¥cãS÷BlYt ÿÝOÁ(W T N*NÙz¹pÑSÐg N*N÷Bl{|W ÿgbL[b¥bMR NO g+Rv¿~ zegYt
|
- - ] ]
|
r e q u i r e ( " W M S - E q u i p m e n t " )
|
w m s _ c n t r = r e q u i r e ( " w m s _ c o n t a i n e r " )
|
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 " )
|
r e q u i r e ( " G T _ I n A n d O u t b o u n d P o l i c i e s " )
|
f u n c t i o n W C S C a l l b a c k ( 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 , i n _ d a t e , s n _ r e s u l t , s e r i a l R e t , l a b e l _ c a r d , p w g w _ R e t , p v R e t , p v _ R e s t u l t , i t e m _ c o d e ,
|
c o n d i t i o n , m s g
|
l o c a l e x t _ t a b l e = { } - - \ONibU\ÂSpe
|
|
- - s t e p 1 ·ÖS¥cãSpenc
|
n R e t , i n _ d a t e = 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 ) , " W C S t o r e C a l l b a c k àeÕl·ÖSpencS! " . . i n _ d a t e )
|
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 ) , ' i n _ d a t e ' , i n _ d a t e )
|
- - (uØSÏK<P
|
l o c a l c n t r _ c o d e = i n _ d a t e . c n t r _ c o d e
|
l o c a l s t a t i o n _ n o = i n _ d a t e . s t a t i o n _ n o
|
l o c a l q t y = t o n u m b e r ( i n _ d a t e . q t y )
|
l o c a l r e q _ n o = i n _ d a t e . r e q _ n o - - /U Nx
|
l o c a l r e q _ t y p e = t o n u m b e r ( i n _ d a t e . r e q _ t y p e ) - - ÷Bl{|W 1 = 'ireQ^/ ^ÿ2 = XbØvÄ~eQ^ÿ3 = R F I D XbØvågâ
|
l o c a l r e q _ t i m e = i n _ d a t e . r e q _ t i m e - - ÷Blöeô
|
l o c a l w e i g h t = i n _ d a t e . w e i g h t - -
|
N¥bvÍÏ
|
|
- - s t e p 2 ¥cãSÂSpe gHe'`Á
|
i f ( s t a t i o n _ n 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 ) , " å]MO Ný:Nzz! " )
|
e n d
|
i f ( r e q _ n 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 ) , " ÷Blx Ný:Nzz! " )
|
e n d
|
i f ( r e q _ t y p e > 4 o r r e q _ t y p e < 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 ) , " eQ^{|W N/ec! " )
|
e n d
|
|
- - Yg¹[hV(W\ON-NX[(WgbL¶r`R úQ
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' A N D N _ B _ S T A T E I N ( 0 , 1 , 3 ) "
|
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 , " O p e r a t i o n " , 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 ) , " ¹[hVò]«`S(u! " )
|
e n d
|
|
- - s t e p 3 ·ÖSw¹páOo`
|
l o c a l l o c _ s t a r t = 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 , s t a t i o n _ n o )
|
n R e t , l o c _ s t a r t = w m s _ w h . G e t L o c I n f o ( l o c _ s t a r t )
|
|
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 _ G e t L o c I n f o 1Y%! ' . . l o c _ s t a r t )
|
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 ) , ' l o c _ s t a r t ' , l o c _ s t a r t )
|
|
- - s t e p 4 9hnc N Tv{|WZP N TvÍd\O 1 = 'ireQ^/ ^ÿ2 = XbØvÄ~eQ^ÿ3 = R F I D XbØvågâ ÿ4 = |TëSzzXb
|
i f ( r e q _ t y p e = = 1 ) t h e n
|
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 ) , ' i n _ d a t e ' , i n _ d a t e )
|
- - Á¹[hV
|
i f ( c n t r _ c o d 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 ) , " ¹[hV Ný:Nzz! " )
|
e n d
|
|
- - ¹[hV gHe'`Á
|
l o c a l c o n t a i n e r
|
n R e t , c o n t a i n e r = w m s _ c n t r . G e t I n f o ( s t r L u a D E I D , c n t r _ 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¹[hV0áOo`1Y%! " . . c o n t a i n e r )
|
e n d
|
i f ( c o n t a i n e r = = ' ' ) 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 ) , " 0¹[hV0" . . c n t r _ c o d e . . " NX[(W! " )
|
e n d
|
|
- - ågâ eUS agöNÿ¹[hVøv Tv^N¶r`:N n R e t = = 1 R eUS:Nzzpck8^eQ^; ÿX[(W eUSRp eAm z
|
l o c a l r o m
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' A N D S _ S T A T E I N ( ' ' , ' gbL' ) "
|
n R e t , r o m = 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 )
|
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 m ' , r o m )
|
i f ( n R e t = = 1 ) t h e n
|
- - $Re/f&T/fzzXb, zzXbRpzzXbeQ^Am z
|
l o c a l i s _ k g z
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' A N D S _ I T E M _ C O D E = ' K G Z ' "
|
n R e t , i s _ k g z = 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 , " C G _ D e t a i l " , c o n d i t i o n )
|
i f ( n R e t = = 1 ) t h e n
|
- - Yg N/fzzXbç~í~pck8^eQ^Am z
|
g o t o K G Z
|
e l s e i f ( n R e t = = 0 ) t h e n
|
n R e t , s t r R e t I n f o = S t o c k I n q u i 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 ) , s t r R e t I n f o )
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r R e t I n f o - - \ONibU\pencX[eQÙ*N÷]S^X[W[&{2N ÿÌb/f^X[*g
Ç8 0 % v÷]S
|
|
i f ( l o c _ s t a r t . c o d e = = 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 , " K L _ R e t u r n R g v S t a t i o n 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 L _ I n W e i g h t 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 R _ I n W e i g h t 1 " ) ) t h e n
|
l o c a l b = 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 , " sO- N|iæ]§OÞV^ãS÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) 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ïSeQ^v3 , 4 ÷]S! " )
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
e n d
|
|
- - Rú^\ON
|
l o c a l o p e r 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 , " O p e r a t i o n " )
|
o p e r a t i o n . s t a r t _ w h _ c o d e = l o c _ s t a r t . w h _ c o d e
|
o p e r a t i o n . s t a r t _ a r e a _ c o d e = l o c _ s t a r t . a r e a _ c o d e
|
o p e r a t i o n . s t a r t _ l o c _ c o d e = l o c _ s t a r t . c o d e
|
o p e r a t i o n . o p _ 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 , " \ON{|W- eQ^" )
|
o p e r a t i o n . o p _ d e f _ n a m e = " ýVêzzXbÞV^"
|
o p e r a t i o n . c n t r _ c o d e = c n t r _ c o d e
|
o p e r a t i o n . e x t _ d a t a = l u a . t a b l e 2 s t r ( e x t _ t a b l e )
|
n R e t , o p e r a t i o n = 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 , o p e r 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ú^0\ON01Y%! ' . . o p e r a t i o n )
|
e n d
|
g o t o B R E A K - - pzzXbeQ^Rú^\ONTóÇ NbvgbL;
|
e n d
|
: : K G Z : :
|
|
- - ·ÖSW C S Ùz¹pÑ~[vå]MO
|
c o n d i t i o n = " S _ S T A R T _ L O C = ' " . . l o c _ s t a r t . c o d e . . " ' "
|
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 _ P D A _ S t a t i o n " , 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 ) , " ·ÖS0å]MO0áOo`1Y%! " . . s t r R e t I n f o )
|
e n d
|
s t a t i o n _ n o = s t r R e t I n f o . s t a t i o n
|
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 a t i o n _ n o ' , s t a t i o n _ n o )
|
|
- - $ReeQ^ÙzðS/f&T g/T¨R¶r`vű{å]US
|
l o c a l s t r C o n d i t i o n = " S _ S T A T I O N = ' " . . s t a t i o n _ n o . . " ' A N D S _ S T A T E = ' /T(u' "
|
l o c a l s t r O r d e r = " T _ C R E A T E d e s c "
|
l o c a l p a c k i n g
|
n R e t , p a c k i n g = 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 _ P a c k i n g _ O r d e r " , s t r C o n d i t i o n , s t r O r d e r )
|
- - ¡l gű{å]USpºNå]Ñ~[Am z
|
i f ( n R e t = = 1 ) t h e n
|
- - pºNå]Ñ~[Íd\O
|
p w g w _ R e t , l a b e l _ c a r d = M a n u a l B i n d G e n e r a l O p e r a t i o n ( s t r L u a D E I D , c n t r _ c o d e )
|
i f ( p w g w _ 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 ) , ' ºNå]Ñ~[Íd\O1Y%! ' . . l a b e l _ c a r d )
|
e n d
|
- - pű{å]USAm z
|
e l s e i f ( n R e t = = 0 ) t h e n
|
- - l o c a l p a l l e t i z i n g = p a c k i n g . p a l l e t i z i n g - - l i s h i m i n g 4Nöe(u ÿxØvÄRTí~ÎNű{å]UShÌôv¥cÿb
|
l o c a l p a l l e t i z i n g = " 1 "
|
l o c a l d i s p e r s o i d = p a c k i n g . d i s p e r s o i d - - l i s h i m i n g 4Nöe(u ÿceÅöhÆ Tí~ÎNű{å]USh-Nÿb
|
|
- - :ghVºNű{å]MO ÿ ê¨R ubAm4l÷S ÿ N ű{!h
|
i f ( d i s p e r s o i d = = ' Y ' ) t h e n
|
- - ·ÖSeQ^Am4l÷S
|
s e r i a l R e t , s n _ r e s u l t = R o b o t B o x i n g ( s t r L u a D E I D , p a c k i n g . o r d e r _ n o , q t y , p a l l e t i z i n g )
|
- - ·ÖS1Y% ÿ¥bÐc:y
|
i f ( s e r i a l 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 ) , ' ceÅö·ÖSeQ^USLpenc1Y%! ' . . s n _ r e s u l t )
|
e n d
|
- - pű{å]US(uÍd\O
|
p w g w _ R e t , l a b e l _ c a r d = P a c k W o r k G e n e r a l O p e r a t i o n ( s t r L u a D E I D , s n _ r e s u l t , c n t r _ c o d e , p a c k i n g . p a c k _ n o ,
|
p a c k i n g . o r d e r _ n o , d i s p e r s o i d )
|
- - ·ÖS1Y% ÿ¥bÐc:y
|
i f ( p w g w _ 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 ) , ' ű{å]USÍd\O1Y%! ' . . l a b e l _ c a r d )
|
e n d
|
e l s e
|
- - ·ÖSű{!h _sQ/f&T _/T
|
l o c a l i s _ z x j y = 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 , " sO- ű{!h _sQ" )
|
i f ( i s _ z x j y = = ' Y ' ) t h e n
|
- - ű{!h ÿbRÔÞVAm4l÷S
|
p v R e t , p v _ R e s t u l t = P a c k V e r i f i c a t i o n ( s t r L u a D E I D , s t a t i o n _ n o )
|
- - ·ÖS1Y% ÿ¥bÐc:y
|
i f ( p v 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 ) , ' ű{!h1Y%! ' . . p v _ R e s t u l t )
|
e n d
|
s n _ r e s u l t = p v _ R e s t u l t
|
e l s e
|
- - ^ű{!h ÿ·ÖSAm4l÷S
|
- - ·ÖS*gÑ~[¹[hVveQ^USvAm4l÷SÛLc^, ÖS,{ N*NT¹[hVÑ~[
|
l o c a l o r d e r _ b y = " S _ S E R I A L _ N O "
|
s t r C o n d i t i o n =
|
" N O T E X I S T S ( S E L E C T S _ S E R I A L _ N O F R O M T N _ C G _ D e t a i l W H E R E T N _ C G _ D e t a i l . S _ S E R I A L _ N O = t n _ G T _ L a b e l _ C r a d . S _ S E R I A L _ N O ) A N D S _ O R D E R _ N O = ' " . .
|
p a c k i n g . o r d e r _ n o . . " ' "
|
p v R e t , p v _ R e s t u l t =
|
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 " , s t r C o n d i t i o n , o r d e r _ b y )
|
i f ( p v 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*gÑ~[vAm4l÷S1Y%! ' . . p v _ R e s t u l t )
|
e n d
|
- - îvÆaSúW,g^\'`$Re
|
i f ( p v _ R e s t u l t . q t y < = 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 ) ,
|
" îvÆaS' " . . p v _ R e s t u l t . s e r i a l _ n o . . " ' vpeÏÅ_{ g<P Ný/f pe! " )
|
e n d
|
s n _ r e s u l t = p v _ R e s t u l t . s e r i a l _ n o
|
e n d
|
|
- - pű{å]US(uÍd\O
|
p w g w _ R e t , l a b e l _ c a r d = P a c k W o r k G e n e r a l O p e r a t i o n ( s t r L u a D E I D , s n _ r e s u l t , c n t r _ c o d e , p a c k i n g . p a c k _ n o ,
|
p a c k i n g . o r d e r _ n o , d i s p e r s o i d )
|
- - ·ÖS1Y% ÿ¥bÐc:y
|
i f ( p w g w _ 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 ) , ' ű{å]USÍd\O1Y%! ' . . l a b e l _ c a r d )
|
e n d
|
e n d
|
- - ·ÖS1Y% ÿ¥bÐc:y
|
e l s e i f ( n R e t = = 2 ) 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 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! ' . . p a c k i n g )
|
e n d
|
|
- - 9hncAm4l÷Sôf°eeQ^USncLvðyÍáOo`
|
s t r C o n d i t i o n = " S _ S E R I A L _ N O = ' " . . l a b e l _ c a r d . s e r i a l _ n o . . " ' "
|
l o c a l s t r U p d a t e S q l = " S _ W E I G H T = ' " . . w e i g h t . . " ' "
|
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 , " G T _ L a b e l _ C r a d " , 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°e0eQ^USncL0áOo`1Y%! " . . s t r R e t I n f o
|
e n d
|
|
- - Rú^ù[^v\ON
|
n R e t , s t r R e t I n f o = C r e a t e O p e r a t i o n ( s t r L u a D E I D , l a b e l _ c a r d . i t e m _ c o d e , l a b e l _ c a r d . b a t c h _ n o , l o c _ s t a r t ,
|
l a b e l _ c a r d . i n b o u n d _ p o l i c y , e x t _ t a b l e , c n t r _ 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 ) , ' Rú^\ON1Y%! ' . . s t r R e t I n f o )
|
e n d
|
e l s e i f ( n R e t = = 0 ) t h e n
|
- - $Re e;/f&TZPN¹[hV'ÁTÑ~[
|
l o c a l c g _ d e t a i l
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' "
|
n R e t , c g _ d e t a i l = 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 , " C G _ D e t a i l " , c o n d i t i o n )
|
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 ) , " XbØvire*gÑ~[! " )
|
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 ) , " G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . c g _ d e t a i l )
|
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 ) , ' c g _ d e t a i l ' , c g _ d e t a i l )
|
|
l o c a l i t e m _ t y p e , m a t e r i a l
|
n R e t , i t e m _ t y p e , m a t e r i a l = G T _ G e t _ I t e m T y p e ( s t r L u a D E I D , c g _ d e t a i l . i t e m _ 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 ) , i t e m _ t y p e )
|
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 ) , ' ireáOo`' , m a t e r i a l )
|
|
i f ( i t e m _ t y p e = = ' ³xÑ' ) 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 ) , " ³xÑ NïSeQËz^! " )
|
e n d
|
|
n R e t , s t r R e t I n f o = C r e a t e O p e r a t i o n ( s t r L u a D E I D , c g _ d e t a i l . i t e m _ c o d e , c g _ d e t a i l . b a t c h _ n o , l o c _ s t a r t ,
|
r o m . i n b o u n d _ p o l i c y , e x t _ t a b l e , c n t r _ 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 ) , ' Rú^\ON1Y%! ' . . s t r R e t I n f o )
|
e n d
|
|
- - 9hnc ¹[hV+ ¶r` ôf°eeQ^USncLvðyÍáOo`T¶r`
|
l o c a l s t r S e t A t t r = " S _ S T A T E = ' gbL' , S _ W E I G H T = ' " . . w e i g h t . . " ' "
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' A N D S _ S T A T E < > ' [b' "
|
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 , " G T _ R O M " , 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
|
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 eUS0¶r`1Y%! " . . s t r R e t I n f o )
|
e n d
|
e l s e
|
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 D a t a O b j B y C o n d i t i o n 1Y%! " . . r o m )
|
e n d
|
|
: : B R E A K : :
|
- - r e q _ t y p e = 2 XbØvÄ~eQ^Am z
|
e l s e i f ( r e q _ t y p e = = 2 ) t h e n
|
i f ( c n t r _ c o d 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 ) , " R F I D Ný:Nzz! " )
|
e n d
|
- - !h¹[hV/f&Tò]Ñ~['MO
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' "
|
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 , " L o c _ C o n t a i n e 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 ) , ' ¹[hVò]Ñ~[' . . s t r R e t I n f o . l o c _ c o d e . . ' 'MO! ' )
|
e n d
|
|
i f ( q t y = = n i l o r q t y = = 0 ) t h e n
|
s t r C o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' "
|
n R e t , c g _ d e t a i l = m 3 . Q u e r y D a t a O b j e c t ( 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 )
|
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 ) , " Q u e r y D a t a O b j e c t 1Y%! " . . c g _ d e t a i l )
|
e n d
|
q t y = c g _ d e t a i l . q t y
|
e l s e
|
- - Ñ~[zzXbire irex = K G Z zzå]Å ãNhÙ*N¹[hV/fzzXb, ¹[hV'ÁTfÆ~vpeÏvUSMO:NXb
|
l o c a l c g _ d e t a i l = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " C G _ D e t a i l " )
|
c g _ d e t a i l . c n t r _ c o d e = c n t r _ c o d e
|
c g _ d e t a i l . i t e m _ c o d e = " K G Z "
|
c g _ d e t a i l . i t e m _ n a m e = " zzå]Å"
|
c g _ d e t a i l . q t y = q t y
|
c g _ d e t a i l . u o m = ' *N'
|
n R e t , c g _ d e t a i l = 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 , c g _ d e t a i 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 ) , ' Rú^0¹[hV'ÁTfÆ~0ù[a1Y%! ' . . c g _ d e t a i l )
|
e n d
|
e n d
|
|
n R e t , s t r R e t I n f o = S t o c k I n q u i 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 ) , s t r R e t I n f o )
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r R e t I n f o - - \ONibU\pencX[eQÙ*N÷]S^X[W[&{2N ÿÌb/f^X[*g
Ç8 0 % v÷]S
|
|
i f ( l o c _ s t a r t . c o d e = = 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 , " K L _ R e t u r n R g v S t a t i o n 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 L _ I n W e i g h t 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 R _ I n W e i g h t 1 " ) ) t h e n
|
l o c a l b = 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 , " sO- N|iæ]§OÞV^ãS÷]S" )
|
l o c a l s t r = f i n d C o m m o n N u m b e r s ( e x t _ t a b l e . r o a d w a y _ i n v e n t o r y , b )
|
i f ( s t r = = n i l o r s t r = = ' ' ) 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ïSeQ^v3 , 4 ÷]S! " )
|
e n d
|
e x t _ t a b l e . r o a d w a y _ i n v e n t o r y = s t r
|
e n d
|
|
- - $Re'MO¹[hV/f&TÑ~[, ¡l gÑ~[RÑ~[
|
l o c a l l o c _ c o d e = w m s _ w h . G e t L o c C o d e B y C N T R ( s t r L u a D E I D , c n t r _ c o d e )
|
i f ( l o c _ c o d e = = ' ' ) t h e n
|
n R e t , s t r R e t I n f o = w m s _ w h . L o c _ C o n t a i n e r _ B i n d i n g ( s t r L u a D E I D , l o c _ s t a r t . c o d e , c n t r _ c o d e ,
|
" Ñ~[ãÑ~¹eÕl- û|ß~" , " [b" )
|
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 ) , ' 'MO¹[hVãÑ~1Y%! ' . . s t r R e t I n f o )
|
e n d
|
e n d
|
- - Rú^XbØvÄ~eQ^\ON
|
- - Rú^\ON
|
l o c a l o p e r 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 , " O p e r a t i o n " )
|
o p e r a t i o n . s t a r t _ w h _ c o d e = l o c _ s t a r t . w h _ c o d e
|
o p e r a t i o n . s t a r t _ a r e a _ c o d e = l o c _ s t a r t . a r e a _ c o d e
|
o p e r a t i o n . s t a r t _ l o c _ c o d e = l o c _ s t a r t . c o d e
|
o p e r a t i o n . o p _ 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 , " \ON{|W- eQ^" )
|
o p e r a t i o n . o p _ d e f _ n a m e = " ýVêzzXbÞV^"
|
o p e r a t i o n . c n t r _ c o d e = c n t r _ c o d e
|
o p e r a t i o n . e x t _ d a t a = l u a . t a b l e 2 s t r ( e x t _ t a b l e )
|
n R e t , o p e r a t i o n = 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 , o p e r 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ú^0\ON01Y%! ' . . o p e r a t i o n )
|
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 ) , " \ONRú^TáOo`" , o p e r a t i o n )
|
|
- - r e q _ t y p e = 3 R F I D XbØvågâAm z
|
e l s e i f ( r e q _ t y p e = = 3 ) t h e n
|
i f ( c n t r _ c o d 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 ) , " R F I D Ný:Nzz! " )
|
e n d
|
- - R F I D XbØvågâ 9hnc¹[hV·ÖS C G _ D e t a i l
|
- - 1 US*NXbØvÿÛxØv:g ÿ 2 XbØvÄ~ÿºNå]
|
NevXbØvÄ~ ÿ 3 ireÿ÷Bl{|W= 3 R F I D XbØvågâöe ÔÞV ÿ
|
l o c a l d a t a = { }
|
l o c a l c g _ d e t a i l
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . c n t r _ c o d e . . " ' "
|
n R e t , c g _ d e t a i l = 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 , " C G _ D e t a i l " , c o n d i t i o n )
|
i f ( n R e t ~ = 0 a n d 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 ) , " ·ÖS0¹[hV'ÁTfÆ~0áOo`1Y%! " . . c g _ d e t a i l )
|
e n d
|
i f ( n R e t = = 1 ) t h e n
|
- - üb¥cÔÞVvpenc
|
d a t a . m a t _ t y p e = 1
|
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 , l u a . t a b l e 2 s t r ( d a t a ) )
|
r e t u r n
|
e l s e i f ( n R e t = = 0 ) t h e n
|
i f ( c g _ d e t a i l . i t e m _ c o d e = = ' K G Z ' ) t h e n
|
d a t a . m a t _ t y p e = 2
|
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 , l u a . t a b l e 2 s t r ( d a t a ) )
|
r e t u r n
|
e l s e
|
d a t a . m a t _ t y p e = 3
|
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 , l u a . t a b l e 2 s t r ( d a t a ) )
|
r e t u r n
|
e n d
|
e n d
|
- - r e q _ t y p e = 4 |TëSzzXbAm z
|
e l s e i f ( r e q _ t y p e = = 4 ) t h e n
|
- - ·ÖS*g»QÓ~v÷]S
|
l o c a l s t r C o n d i t i o n = " S _ A R E A _ C O D E = ' L K ' A N D N _ L O C K _ S T A T E = 0 "
|
l o c a l n R e t , r o a d w a y _ l i s t = m 3 . Q u e r y D a t a O b j e c t ( 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 )
|
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 a d w a y _ l i s t " , r o a d w a y _ l i s t )
|
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â÷]SáOo`1Y%' . . r o a d w a y _ l i s t )
|
e n d
|
i f ( r o a d w a y _ l i s t = = n i l o r r o a d w a y _ l i s t = = ' ' ) 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ïSúQ^v÷]S! ' )
|
e n d
|
l o c a l s t r = ' '
|
f o r i = 1 , # r o a d w a y _ l i s t d o
|
l o c a l a t t r s = r o a d w a y _ l i s t [ i ] . a t t r s
|
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 ( a t t r s )
|
i f ( a t t r s = = n i l ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
s t r = s t r . . a t t r s . N _ R O A D W A Y . . " , "
|
: : c o r o u t i n e : :
|
e n d
|
- - »Sd gT N*N,
|
s t r = l u a . t r i m _ l a s t e r _ c h a r ( s t r )
|
- - ·ÖSïSúQ^÷]S
|
i f ( l o c _ s t a r t . c o d e = = 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 , " K L _ R e t u r n R g v S t a t i o n 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 L _ I n W e i g h t 1 " ) o r l o c _ s t a r t . c o d e = =
|
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 , " F 3 R _ I n W e i g h t 1 " ) ) t h e n
|
l o c a l b = 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 , " sO- N|iæ]§OÞV^ãS÷]S" )
|
s t r = f i n d C o m m o n N u m b e r s ( s t r , b )
|
e n d
|
|
r o a d w a y _ l i s t = l u a . s p l i t ( s t r , " , " )
|
|
l o c a l d a t a
|
l o c a l l o c _ C o n t a i n e r = { }
|
l o c a l f l a g = 0
|
f o r i = 1 , # r o a d w a y _ l i s t d o
|
l o c a l r o a d w a y = r o a d w a y _ l i s t [ i ] - - ÷]S
|
|
- - ·ÖSå÷]Sv zz'±{/ XbØvÄ~ OHQYñmMOvQ!k
QñmMO
|
l o c a l s t r _ c n t r
|
i f ( s t a t i o n _ n o = = ' K Q _ K T P P u l l C a c h e 1 ' ) t h e n
|
s t r _ c n t r = ' 1 0 6 E G P '
|
e l s e
|
s t r _ c n t r = ' 1 0 6 E G R ' - - öFhMR6 *NW[&{ XbØv/f1 0 6 E G P
|
e n d
|
|
- - ·ÖSS_MR÷]SáOo`
|
s t r C o n d i t i o n = " N _ R O A D W A Y = ' " . . r o a d w a y . . " ' "
|
n R e t , r o a d w a y = 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 , " 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 ) , " ·ÖS0÷]S0áOo`1Y%! " . . r o a d w a y )
|
e n d
|
|
l o c a l s t r O r d e r = " T _ C R E A T E "
|
|
- - ·ÖSYñmMOvzzå]Å
|
s t r C o n d i t i o n =
|
" 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 W H E R E S _ A R E A _ C O D E = ' L K ' A N D N _ L O C K _ S T A T E = 0 A N D C _ E N A B L E = ' Y ' A N D N _ P O S = 1 A N D N _ R O A D W A Y = ' " . .
|
r o a d w a y . r o a d w a y . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" 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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' K G Z ' A N D S _ C N T R _ C O D E L I K E ' % " . .
|
s t r _ c n t r . . " % ' ) "
|
- - gY·ÖS 1 0 ag
|
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 3 ( s t r L u a D E I D , " L o c _ C o n t a i n e r " , s t r C o n d i t i o n , 1 , s t r O r d e r )
|
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`ï! " . . s t r R e t I n f o . . " S Q L agöN: " . . s t r C o n d i t i o n )
|
e n d
|
i f ( s t r R e t I n f o ~ = ' ' ) t h e n
|
l o c a l a t t r s
|
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 )
|
n R e t , a t t r s = m 3 . O b j A t t r S t r T o L u a O b j ( " L o c _ C o n t a i n e r " , l u a . t a b l e 2 s t r ( r e t O b j s [ 1 ] . a t t r s ) )
|
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 3 . 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%! " . . a t t r s )
|
e n d
|
d a t a = {
|
l o c _ c o d e = a t t r s . l o c _ c o d e ,
|
c n t r _ c o d e = a t t r s . c n t r _ c o d e ,
|
r o a d w a y = r o a d w a y . r o a d w a y
|
}
|
b r e a k
|
e n d
|
|
- - ·ÖS
QñmMOvzzå]Å
|
s t r C o n d i t i o n =
|
" 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 W H E R E S _ A R E A _ C O D E = ' L K ' A N D N _ L O C K _ S T A T E = 0 A N D C _ E N A B L E = ' Y ' A N D N _ P O S = 2 A N D N _ R O A D W A Y = ' " . .
|
r o a d w a y . r o a d w a y . . " ' ) "
|
s t r C o n d i t i o n = s t r C o n d i t i o n . .
|
" 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 _ C G _ D e t a i l W H E R E S _ I T E M _ C O D E = ' K G Z ' A N D S _ C N T R _ C O D E L I K E ' % " . .
|
s t r _ c n t r . . " % ' ) "
|
- - gY·ÖS 1 0 ag
|
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 3 ( s t r L u a D E I D , " L o c _ C o n t a i n e r " , s t r C o n d i t i o n , 1 , s t r O r d e r )
|
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`ï! " . . s t r R e t I n f o . . " S Q L agöN: " . . s t r C o n d i t i o n )
|
e n d
|
i f ( s t r R e t I n f o ~ = ' ' ) t h e n
|
l o c a l a t t r s
|
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 )
|
f o r j = 1 , # r e t O b j s d o
|
f l a g = t o n u m b e r ( f l a g ) + 1
|
|
n R e t , a t t r s = m 3 . O b j A t t r S t r T o L u a O b j ( " L o c _ C o n t a i n e r " , l u a . t a b l e 2 s t r ( r e t O b j s [ j ] . a t t r s ) )
|
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 3 . 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%! " . . a t t r s )
|
e n d
|
|
l o c _ C o n t a i n e r [ f l a g ] = a t t r s
|
e n d
|
e n d
|
e n d
|
|
l o c a l s t a r t _ l o c
|
i f ( d a t a ~ = n i l ) t h e n
|
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 ) , " d a t a " , d a t a )
|
c n t r _ c o d e = d a t a . c n t r _ c o d e
|
s t a r t _ l o c = d a t a . l o c _ c o d e
|
e l s e i f ( t o n u m b e r ( # l o c _ C o n t a i n e r ) > t o n u m b e r ( 0 ) ) t h e n
|
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 ) , " l o c _ C o n t a i n e r " , l o c _ C o n t a i n e r )
|
f o r i = 1 , # l o c _ C o n t a i n e r d o
|
- -
QñmMO!h
|
l o c a l s u c c e s s , l o c _ c o d e = G e t P o s L o c ( s t r L u a D E I D , l o c _ C o n t a i n e r [ i ] . l o c _ c o d e )
|
i f ( s u c c e s s = = t r u e ) t h e n
|
- - $Re
QñmMO/f&T g'ir
|
s t r C o n d i t i o n = " S _ C O D E = ' " . . l o c _ c o d e . . " ' A N D ( N _ L O C K _ S T A T E = 0 O R N _ C U R R E N T _ N U M = 1 ) "
|
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 , " 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 = = 2 ) 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 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . s t r R e t I n f o )
|
e l s e i f ( n R e t = = 1 ) t h e n
|
s t r C o n d i t i o n = " S _ C O D E = ' " . . l o c _ 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 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 , " 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 = = 2 ) 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 3 . G e t D a t a O b j B y C o n d i t i o n 1Y%! " . . s t r R e t I n f o )
|
e l s e i f ( n R e t = = 1 ) t h e n
|
g o t o c o r o u t i n e
|
e n d
|
|
- - Rú^ûy^ûN¡R
|
- - ·ÖSw¹páOo`
|
l o c a l s t a r t _ l o c _ y k , e n d _ l o c _ y k
|
n R e t , s t a r t _ l o c _ y k = w m s _ w h . G e t L o c I n f 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 ) , ' W M S _ G e t L o c I n f o 1Y%! ' . . s t a r t _ l o c _ y k )
|
e n d
|
|
- - ·ÖSw¹pvire
|
l o c a l c g _ d e t a i l
|
c o n d i t i o n = " S _ C N T R _ C O D E = ' " . . l o c _ C o n t a i n e r [ i ] . c n t r _ c o d e . . " ' "
|
n R e t , c g _ d e t a i l = 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 , " C G _ D e t a i l " , 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 ) , c g _ d e t a i l )
|
e n d
|
- - ·ÖSire{|W
|
l o c a l i t e m _ t y p e , m a t e r i a l
|
n R e t , i t e m _ t y p e , m a t e r i a l = G T _ G e t _ I t e m T y p e ( s t r L u a D E I D , c g _ d e t a i l . i t e m _ 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 ) , i t e m _ t y p e )
|
e n d
|
|
- - ¢ NêSýeQc[B\
|
l o c a l s t r _ y k
|
i f ( i t e m _ t y p e = = ' ¢ N' ) t h e n
|
s t r _ y k = 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 , " sO- Ëz^¢ N'MOB\" )
|
n R e t , e n d _ l o c _ y k = G e t E n d L o c ( s t r L u a D E I D , s t a r t _ l o c _ y k . r o a d w a y , s t r _ y 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 ) , e n d _ l o c )
|
e n d
|
e l s e
|
s t r _ y k = 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 , " sO- Ëz^^¢ N'MOB\" )
|
n R e t , e n d _ l o c _ y k = G e t E n d L o c ( s t r L u a D E I D , s t a r t _ l o c _ y k . r o a d w a y , s t r _ y k )
|
i f ( n R e t = = 1 ) t h e n
|
s t r _ y k = 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 , " sO- Ëz^¢ N'MOB\" )
|
n R e t , e n d _ l o c _ y k = G e t E n d L o c ( s t r L u a D E I D , s t a r t _ l o c _ y k . r o a d w a y , s t r _ y 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 ) , e n d _ l o c )
|
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 ) , e n d _ l o c )
|
e n d
|
e n d
|
|
- - Rú^sOûN¡R
|
l o c a l g t _ 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 , " G T _ T a s 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 ) , ' g t _ t a s k ' , g t _ t a s k )
|
- - w¹páOo`
|
g t _ t a s k . s t a r t _ w h _ c o d e = s t a r t _ l o c _ y k . w h _ c o d e
|
g t _ t a s k . s t a r t _ a r e a _ c o d e = s t a r t _ l o c _ y k . a r e a _ c o d e
|
g t _ t a s k . s t a r t _ l o c _ c o d e = s t a r t _ l o c _ y k . c o d e
|
- - È~¹páOo`
|
g t _ t a s k . e n d _ w h _ c o d e = e n d _ l o c _ y k . w h _ c o d e
|
g t _ t a s k . e n d _ a r e a _ c o d e = e n d _ l o c _ y k . a r e a _ c o d e
|
g t _ t a s k . e n d _ l o c _ c o d e = e n d _ l o c _ y k . c o d e
|
g t _ t a s k . t y p e = 3 - - 1 |eèb,dÐ 2 Øpö,dÐ 3 T÷]Sûy^
|
g t _ t a s k . p r i o r i t y = 2 - - 'YvOHQ
|
g t _ t a s k . c n t r _ c o d e = l o c _ C o n t a i n e r [ i ] . c n t r _ c o d e
|
n R e t , g t _ 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 , g t _ 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ú^0sOûN¡R01Y%! ' . . g t _ t a s k )
|
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 ) , " l o c _ C o n t a i n e r [ i ] . l o c _ c o d e " , l o c _ C o n t a i n e r [ i ] . l o c _ c o d e )
|
c n t r _ c o d e = l o c _ C o n t a i n e r [ i ] . c n t r _ c o d e
|
s t a r t _ l o c = l o c _ C o n t a i n e r [ i ] . l o c _ c o d e
|
b r e a k
|
e n d
|
|
: : c o r o u t i n e : :
|
e n d
|
i f ( s t a r t _ l o c = = n i l o r s t a r t _ l o c = = ' ' ) 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¡l gïSúQ^vzzå]Å! ' )
|
e n d
|
e l s e
|
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¡l gïSúQ^vzzå]Å! ' )
|
e n d
|
n R e t , s t a r t _ l o c = w m s _ w h . G e t L o c I n f o ( s t a r t _ l o c )
|
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 _ G e t L o c I n f o 1Y%! ' . . s t a r t _ l o c )
|
e n d
|
|
- - s t e p 4 : Rú^,dÐ\ON
|
l o c a l o p e r 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 , " O p e r a t i o n " )
|
o p e r a t i o n . s t a r t _ w h _ c o d e = s t a r t _ l o c . w h _ c o d e
|
o p e r a t i o n . s t a r t _ a r e a _ c o d e = s t a r t _ l o c . a r e a _ c o d e
|
o p e r a t i o n . s t a r t _ l o c _ c o d e = s t a r t _ l o c . c o d e
|
|
- - È~¹p/fsOW M S OÇegv
|
o p e r a t i o n . e n d _ w h _ c o d e = l o c _ s t a r t . w h _ c o d e
|
o p e r a t i o n . e n d _ a r e a _ c o d e = l o c _ s t a r t . a r e a _ c o d e
|
o p e r a t i o n . e n d _ l o c _ c o d e = l o c _ s t a r t . c o d e
|
|
l o c a l s t r C o d e
|
l o c a l s t r H e a d e r = ' T A ' . . o s . d a t e ( " % y % m % d " ) . . ' - '
|
n R e t , s t r C o d e = m o b o x . g e t S e r i a l N u m b e r ( " ûN¡R" , s t r H e a d e r , 5 )
|
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 ) , ' 3u÷0ûN¡R0x1Y%! ' . . s t r C o d e )
|
e n d
|
e x t _ t a b l e . t a s k _ n o = s t r C o d e
|
o p e r a t i o n . e x t _ d a t a = l u a . t a b l e 2 s t r ( e x t _ t a b l e )
|
|
o p e r a t i o n . c n t r _ c o d e = c n t r _ c o d e
|
o p e r a t i o n . o p _ d e f _ n a m e = " |TëSzzXb"
|
o p e r a t i o n . o p _ 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 , " \ON{|W- úQ^" )
|
n R e t , o p e r a t i o n = 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 , o p e r 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ú^0\ON01Y%! ' . . o p e r a t i o n )
|
e n d
|
|
- - w¹p RÍd\O
|
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 , o p e r a t i o n . s t a r t _ 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- úQ^" ) , s t r C o d e , o p e r a t i o n . c o d e , o p e r a t i o n . o p _ d e f _ n a m 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 ) , " 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
|
e n d
|
e n d
|
|
