ÿþ- - [ [
|
x: G T - 0 6 - 1 0
|
Tðy: $Re¶r`/f&T[b
|
\OÿL Z H
|
åe gÿ2 0 2 4 - 6 - 3
|
|
§~+RÿúV[ ( ôf,gµkãNx(Wyîv-N N*YOØSS)
|
|
ýQpeÿ S t a t u s D o n e O r N o t
|
|
Rý:
|
- - $Reű{å]USv/}¡peÏ/f&T'YNI{N¡RpeÏ ÿ/fRîO9e¶r`:N[b
|
|
ôf9e°U_:
|
|
- - ] ]
|
j s o n = r e q u i r e ( " j s o n " )
|
m o b o x = r e q u i r e ( " O I L u a _ J a v e l i n E x t " )
|
m 3 = r e q u i r e ( " o i _ b a s e _ m o b o x " )
|
f u n c t i o n S t a t u s D o n e O r N o 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 p a c k _ r e c , p a c k _ o r d e r
|
n R e t , p a c k _ r e c = m 3 . G e t S y s C u r E d i t D a t a O b j ( s t r L u a D E I D , " G T _ P a c k i n g _ R e 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 ) , p a c k _ r e c ) 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 ) , ' p a c k _ r e c ' , p a c k _ r e c )
|
|
- - ·ÖSű{å]US
|
n R e t , p a c k _ 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 _ P a c k i n g _ O r d e r " , " S _ P A C K _ N O " , p a c k _ r e c . p a c k _ n o )
|
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 ) , p a c k _ o r d e r ) e n d
|
|
- - $Reű{å]USvű{öNpe/f&T N:N0 Yg N:N0 $Reű{å]USv /}¡Å±{peÏ = ű{öNpe R¾n[b¶r`
|
i f ( t o n u m b e r ( p a c k _ o r d e r . p a c k _ q t y ) ~ = 0 ) t h e n
|
i f ( t o n u m b e r ( p a c k _ o r d e r . a c c _ q t y ) > = t o n u m b e r ( p a c k _ o r d e r . p a c k _ q t y ) ) t h e n
|
l o c a l s t r C o n d i t i o n = " S _ P A C K _ N O = ' " . . p a c k _ o r d e r . p a c k _ 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 _ 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 )
|
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 n d
|
e n d
|
|
- - ·ÖSeQ^US
|
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 " , p a c k _ o r d e r . o r d e r _ n o )
|
i f ( n R e t ~ = 0 ) t h e n l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , o r d e r ) e n d
|
|
- - $ReeQ^US Nv /}¡Å±{peÏ = XbØvpeÏ RîO9eeQ^USåNÊSeQ^US N@b g:N/T¨R¶r`vű{å]US:N[b¶r`
|
|
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
|
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 . 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 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
|
|
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 . . " ' A N D S _ S T A T E = ' /T(u' "
|
l o c a l p a c k _ o r d e r _ l i s t
|
n R e t , p a c k _ o r d e r _ 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 , " 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 )
|
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 ) , p a c k _ o r d e r _ l i s t ) e n d
|
i f ( p a c k _ o r d e r _ l i s t = = n i l o r # p a c k _ o r d e r _ l i s t = = 0 ) t h e n
|
r e t u r n
|
e n d
|
|
f o r n = 1 , # p a c k _ o r d e r _ l i s t d o
|
l o c a l a t t r s = p a c k _ o r d e r _ l i s t [ n ] . 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 )
|
s t r C o n d i t i o n = " S _ P A C K _ N O = ' " . . a t t r s . S _ P A C K _ 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 )
|
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 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
|
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 ) , " ò]¾0ReQ^USvXbØvpeÏ ÿ NAQ¸eQ^! " )
|
e n d
|
e n d
|
