ÿþ- - [ [
|
x: W M S - 0 4 - 0 3
|
Tðy: ybÏü[eQ
|
\OÿH A N
|
eQãSýQpeÿI m p o r t L o c a t i o n
|
|
Rýôf:
|
Yt¹[hVü[eQ ÿ(Wü[eQvöeP$Re N¹[hV/f&TX[(W ÿYg NX[(W°eRú^
|
ü[eQ<h_Á
|
0# M O W M S - 0 0 2 ¹[hV[INh. x l s x 0
|
ØSôfSòS:
|
|
- - ] ]
|
w m s _ b a s e = r e q u i r e ( " w m s _ b a s e " )
|
f u n c t i o n I m p o r 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
|
- - ·ÖSü[eQvpenc, ÔÞV [ { " a t t r " : " x x " , " v a l u e " : " " } , . . . ]
|
l o c a l r o w _ d a t a = { }
|
n R e t , r o w _ d a t a = 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 o r s t r R e t I n f 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 ) , " àeÕl·ÖS¹[hVü[eQpenc! " ) 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 ) , ' r o w _ d a t a ' , r o w _ d a t a )
|
|
l o c a l r o w _ a t t r s
|
l o c a l n , n C o u n t , n V a l u e , n R o w s
|
n R o w s = # r o w _ d a t a
|
i f ( n R o w s = = 0 ) t h e n r e t u r n e n d
|
|
- - NNsQ.^\'`
|
l o c a l s t r C n t r C o d e = ' '
|
l o c a l s t r T y p e = ' '
|
l o c a l c n t r = { }
|
|
- - ek¤1 ·ÖSÎNe x c e l ü[eQv NLpenc
|
f o r r o w = 1 , n R o w s d o
|
r o w _ a t t r s = r o w _ d a t a [ r o w ]
|
n C o u n t = # r o w _ a t t r s
|
s t r C n t r C o d e = ' '
|
n T y p e = ' '
|
s t r T y p e = ' '
|
|
- - RËYS ¹[hV ù[a
|
c n t r = m 3 . A l l o c O b j e c t ( s t r L u a D E I D , " C o n t a i n e r " )
|
f o r n = 1 , n C o u n t d o
|
s t r A t t r = r o w _ a t t r s [ n ] . a t t r
|
s t r V a l u e = r o w _ a t t r s [ n ] . v a l u e
|
i f ( s t r A t t r ~ = ' ' ) t h e n
|
|
- - 9hncü[eQve x c e l R4Y TðyÛL$Re
|
- - sQ.^\'`$Re ÿYg^\'` NX[(W¥b
|
i f ( s t r A t t r = = " ¹[hVx" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
s t r C n t r C o d e = s t r V a l u e
|
- - V 1 . 2
|
e l s e i f ( s t r A t t r = = " {|W" ) t h e n
|
i f ( s t r V a l u 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 ) , s t r A t t r . . " Ný:Nzz! " ) e n d
|
i f ( s t r V a l u e = = ' XbØv' ) t h e n
|
n T y p e = 1
|
s t r T y p e = s t r V a l u e
|
e l s e i f ( s t r V a l u e = = ' öFh' ) t h e n
|
n T y p e = 2
|
s t r T y p e = s t r V a l u e
|
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 t r A t t r . . " /f*g[INv¹[hV{|W! " )
|
e n d
|
e n d
|
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 ) , ' s t r T y p e ' , s t r T y p 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 ) , ' n T y p e ' , n T y p 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 ) , ' s t r C n t r C o d e ' , s t r C n t r C o d e )
|
|
- - ek¤2 9hnc¹[hVxeg$Reü[eQv¹[hV/f&Tò]Ï~X[(W
|
- - Ygò]Ï~X[(W ÿ9hncü[eQvpencÛLÖv
|
- - Yg NX[(W Rú^
|
l o c a l a t t r s
|
l o c a l s t r C o n d i t i o n = " S _ C O D E = ' " . . s t r C n t r C o d e . . " ' "
|
n R e t , s t r R e t I n f o = m o b o x . e x i s t T h i s D a t a ( s t r L u a D E I D , " 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 l u a . E r r o r ( s t r L u a D E I D , d e b u g . g e t i n f o ( 1 ) , " (WÀhåg¹[hV/f&TX[(Wöe1Y%! " . . s t r R e t I n f o ) e n d
|
|
i f ( s t r R e t I n f o = = ' y e s ' ) t h e n
|
- - ò]Ï~X[(W ÿ9hncü[eQvpencÛLÖv
|
s t r C o n d i t i o n = " S _ C O D E = ' " . . s t r C n t r C o d e . . " ' "
|
s t r S e t S Q L = " N _ T Y P E = ' " . . n T y p e . . " ' , S _ T Y P E = ' " . . s t r T y p 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 , " C o n t a i n 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 l s e
|
c n t r . c o d e = s t r C n t r C o d e
|
c n t r . t y p e = n T y p e
|
c n t r . s t r T y p e = s t r T y p e
|
- - Rú^¹[hV
|
n R e t , s t r R e t I n f o = 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 n 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 ) , " Rú^¹[hV1Y%! " . . s t r R e t I n f o ) e n d
|
e n d
|
e n d
|
m o b o x . s e t I n f o ( s t r L u a D E I D , " ü[eQbR! " )
|
e n d
|
