þÿ
|
# i n c l u d e < w o b j e c t / x s t r i n g . h p p >
|
# i n c l u d e < x c o n t r o l / x t r e e v i e w . h p p >
|
# i n c l u d e < x c o n t r o l / x d w g r i d . h p p >
|
# i n c l u d e < x c o n t r o l / x e x c e l . h p p >
|
# i n c l u d e < a d t / x a r r a y . h p p >
|
|
# i n c l u d e " v b u s i n e s s / v f r a m e / l i s t w i n . v f r a m e . v b u s i n e s s . h p p "
|
# i n c l u d e " v i e w o b j e c t / v i e w . b a s e . h p p "
|
|
u s i n g x m l = K X M L D O M D o c u m e n t ;
|
c l a s s _ _ d e c l s p e c ( d l l e x p o r t ) S a l a r y s l i p I m p : p u b l i c x f r a m e
|
{
|
p u b l i c :
|
x e x c e l e x c e l ;
|
x d w g r i d d w _ l i s t ;
|
x s t r i n g f i l e n a m e ;
|
x n o d e m _ a g e n t N o d e ; / / A g e n t C o n d i t i o n
|
|
p u b l i c :
|
S a l a r y s l i p I m p ( v o i d * i m p l P t r , H W N D h W n d ) : x f r a m e ( i m p l P t r , h W n d ) { }
|
p u b l i c :
|
s t a t i c S a l a r y s l i p I m p * C r e a t e I n s t a n c e ( v o i d * i m p l P t r , v o i d * h W n d )
|
{
|
S a l a r y s l i p I m p * p W i n = n e w S a l a r y s l i p I m p ( i m p l P t r , ( H W N D ) h W n d ) ;
|
r e t u r n p W i n ;
|
}
|
i n t S e t A g e n t ( )
|
{
|
x s t r i n g x f N o d e A g e n t A r e a = L " a g e n t a r e a " ;
|
x n o d e a n o d e = G e t A g e n t N o d e ( x f N o d e A g e n t A r e a ) ;
|
i f ( m _ a g e n t N o d e )
|
{
|
S e t A g e n t N o d e ( a n o d e , m _ a g e n t N o d e ) ;
|
}
|
e l s e
|
{
|
K X M L D O M E l e m e n t x f r a m e E l e m e n t = G e t E l e m e n t ( ) ;
|
K X M L D O M E l e m e n t a g e n t = x f r a m e E l e m e n t . s e l e c t S i n g l e N o d e ( L " a g e n t / " + x f N o d e A g e n t A r e a + L " [ 1 ] / * " ) ;
|
i f ( a g e n t )
|
{
|
x s t r i n g s = a g e n t . x m l ( ) ;
|
m _ a g e n t N o d e = S e t A g e n t N o d e ( a n o d e , s ) ;
|
}
|
}
|
r e t u r n 1 ;
|
}
|
|
|
/ /q&p¹oÀm;YtQýep
|
i n t O n S e t F o c u s ( T E v e n t * e v t , L P A R A M p a r a m )
|
{
|
/ /Ín]åQwga
|
S e t A g e n t ( ) ;
|
r e t u r n 1 ;
|
}
|
|
i n t O n D e l e t e R o w ( )
|
{
|
d w _ l i s t . D e l e t e R o w ( 0 ) ;
|
r e t u r n 1 ;
|
}
|
|
i n t O n I n s e r t R o w ( )
|
{
|
i n t r o w = d w _ l i s t . I n s e r t R o w ( 0 ) ;
|
x s t r i n g s d a t e = p u b l i c c o d e : : G e t C u r r e n t D a t e ( ) ;
|
d w _ l i s t . S e t I t e m S t r i n g ( r o w , L " C r e a t e D a t e " , s d a t e ) ;
|
x s t r i n g s u s e r i d = p u b l i c c o d e : : G e t U s e r ( ) . i d ;
|
x s t r i n g s u s e r n a m e = p u b l i c c o d e : : G e t U s e r ( ) . n a m e ;
|
d w _ l i s t . S e t I t e m S t r i n g ( r o w , L " C r e a t o r I D " , s u s e r i d ) ;
|
d w _ l i s t . S e t I t e m D i s p l a y S t r i n g ( r o w , L " C r e a t o r I D " , s u s e r n a m e ) ;
|
|
r e t u r n 1 ;
|
}
|
|
|
i n t O n T r a n ( )
|
{
|
r e t u r n 1 ;
|
|
/ / g e t h e a d
|
x s t r i n g h e a d = L " " ;
|
x s t r i n g v a l = L " " ;
|
i n t c o l s = e x c e l . G e t V a l i d C o l u m n ( ) ;
|
f o r ( i n t c o l = 1 ; c o l < = c o l s ; + + c o l )
|
{
|
v a l = e x c e l . G e t C e l l S t r i n g ( 1 , c o l ) ;
|
v a l = v a l . t r i m ( ) ;
|
i f ( v a l = = L " " ) c o n t i n u e ;
|
i f ( v a l . f i n d ( L " ( " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L " ( " ) ) ;
|
i f ( v a l . f i n d ( L "ÿ " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L "ÿ " ) ) ;
|
i f ( v a l . f i n d ( L " [ " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L " [ " ) ) ;
|
i f ( v a l . f i n d ( L "0 " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L "0 " ) ) ;
|
i f ( v a l . f i n d ( L " / " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L " / " ) ) ;
|
i f ( v a l . f i n d ( L " \ r " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L " \ r " ) ) ;
|
i f ( v a l . f i n d ( L " \ n " ) > = 0 ) v a l = v a l . l e f t ( v a l . f i n d ( L " \ n " ) ) ;
|
i f ( h e a d = = L " " ) h e a d = v a l ; e l s e h e a d + = L " , " + v a l ;
|
}
|
|
x m l x ;
|
|
x a s e r v e r a r g a r g ;
|
a r g . A d d A r g ( L " h e a d " , h e a d ) ;
|
/ / a l e r t ( h e a d ) ;
|
i f ( g e t U r l ( L " / s a l e / d a t a / A R / m a t c h / b a n k " , a r g . G e t S t r i n g ( ) , x ) ! = 1 ) r e t u r n 1 ;
|
K X M L D O M N o d e n = x . s e l e c t S i n g l e N o d e ( L " d a t a / B a n k " ) ;
|
i f ( ! n )
|
{
|
a l e r t ( L "g*S9MR0TvlQe|{Wÿ ÷QHMnepcnlcbOá`o " ) ;
|
r e t u r n 1 ;
|
}
|
|
K X M L D O M N o d e L i s t i t e m s = n . s e l e c t N o d e s ( L " I t e m " ) ;
|
i n t l e n = i t e m s . l e n g t h ( ) ;
|
x a r r a y < i n t > i n d e x s ;
|
x a r r a y < x s t r i n g > c o l u m n s ;
|
x s t r i n g b a n k = n . s e l e c t S i n g l e N o d e ( L " @ n a m e " ) . t e x t ( ) ;
|
f o r ( i n t i = 0 ; i < l e n ; i + + )
|
{
|
K X M L D O M E l e m e n t e = i t e m s . i t e m ( i ) ;
|
x s t r i n g s t r = e . g e t A t t r i b u t e ( L " i n d e x " ) ;
|
i n d e x s . p u s h _ b a c k ( s t r . t o I n t ( ) ) ;
|
c o l u m n s . p u s h _ b a c k ( e . s e l e c t S i n g l e N o d e ( L " D a t a C o l u m n " ) . t e x t ( ) ) ;
|
}
|
|
i f ( M e s s a g e B o x ( G e t H W N D ( ) , L "f/T&}Qe " + b a n k + L "epcn ! " , L "cÐy: " , 1 ) = = 2 ) r e t u r n 1 ;
|
|
/ / c l e a r d a t a
|
f o r ( i n t m = d w _ l i s t . G e t R o w C o u n t ( ) ; m > 0 ; m - - ) d w _ l i s t . D e l e t e R o w ( m ) ;
|
|
|
/ /ûSÖ[¢b7lcbOá`o
|
x m l x c ;
|
|
i f ( g e t U r l ( L " / s a l e / d a t a / A R / t r a n / c u s t o m e r " , L " " , x c ) ! = 1 )
|
{
|
t r a c e ( x c . t e x t ( ) ) ;
|
r e t u r n - 1 ;
|
}
|
|
H C U R S O R h C u r s o r = x u t i l : : S e t C u r s o r W a i t ( ) ;
|
K X M L D O M D o c u m e n t x d o c = x c ;
|
|
i n t r o w s = e x c e l . G e t V a l i d R o w ( ) ;
|
f o r ( i n t r o w = 2 ; r o w < = r o w s ; + + r o w )
|
{
|
v a l = e x c e l . G e t C e l l S t r i n g ( r o w , i n d e x s . i t e m ( 0 ) ) ;
|
i f ( v a l . t r i m ( ) = = L " " ) c o n t i n u e ;
|
i n t c u r R o w = d w _ l i s t . I n s e r t R o w ( 0 ) ;
|
|
/ / i n i t
|
x s t r i n g s d a t e = p u b l i c c o d e : : G e t C u r r e n t D a t e ( ) ;
|
d w _ l i s t . S e t I t e m S t r i n g ( c u r R o w , L " C r e a t e D a t e " , s d a t e ) ;
|
d w _ l i s t . S e t I t e m S t r i n g ( c u r R o w , L " S E D a t e " , s d a t e ) ;
|
x s t r i n g s u s e r i d = p u b l i c c o d e : : G e t U s e r ( ) . i d ;
|
x s t r i n g s u s e r n a m e = p u b l i c c o d e : : G e t U s e r ( ) . n a m e ;
|
d w _ l i s t . S e t I t e m S t r i n g ( c u r R o w , L " C r e a t o r I D " , s u s e r i d ) ;
|
d w _ l i s t . S e t I t e m D i s p l a y S t r i n g ( c u r R o w , L " C r e a t o r I D " , s u s e r n a m e ) ;
|
|
f o r ( i n t k = 0 ; k < i n d e x s . l e n g t h ( ) ; k + + )
|
{
|
v a l = e x c e l . G e t C e l l S t r i n g ( r o w , i n d e x s . i t e m ( k ) ) ;
|
i f ( c o l u m n s . i t e m ( k ) = = L " C u s t o m e r I D " )
|
{
|
i f ( x d o c )
|
{
|
K X M L D O M N o d e n 1 = x d o c . s e l e c t S i n g l e N o d e ( L " / d a t a / I t e m [ c o n t a i n s ( \ " " + v a l + L " \ " , R a w C o l u m n ) ] " ) ;
|
i f ( n 1 )
|
{
|
/ / a l e r t ( n 1 . x m l ) ;
|
i f ( n 1 . s e l e c t S i n g l e N o d e ( L " D a t a C o l u m n " ) ) d w _ l i s t . S e t I t e m S t r i n g ( c u r R o w , c o l u m n s . i t e m ( k ) . c _ s t r ( ) , n 1 . s e l e c t S i n g l e N o d e ( L " D a t a C o l u m n " ) . t e x t ( ) ) ;
|
i f ( n 1 . s e l e c t S i n g l e N o d e ( L " D a t a C o l u m n / @ _ d i s p l a y s t r i n g " ) ) d w _ l i s t . S e t I t e m D i s p l a y S t r i n g ( c u r R o w , c o l u m n s . i t e m ( k ) . c _ s t r ( ) , n 1 . s e l e c t S i n g l e N o d e ( L " D a t a C o l u m n / @ _ d i s p l a y s t r i n g " ) . t e x t ( ) ) ;
|
}
|
}
|
}
|
e l s e
|
d w _ l i s t . S e t I t e m S t r i n g ( c u r R o w , c o l u m n s . i t e m ( k ) . c _ s t r ( ) , v a l ) ;
|
}
|
}
|
x u t i l : : R e s t o r e C u r s o r ( h C u r s o r ) ;
|
a l e r t ( L "lcb[b ! " ) ;
|
|
r e t u r n 1 ;
|
}
|
|
i n t O n S a v e D a t a ( )
|
{
|
r e t u r n 1 ;
|
|
x m l x ;
|
|
d w _ l i s t . A c c e p t T e x t ( ) ;
|
d w _ l i s t . D w U p d a t e A l l T o E x ( x ) ;
|
x a s e r v e r a r g a r g ;
|
|
a r g . A d d A r g ( L " c o n t e n t " , x . x m l ( ) ) ;
|
|
/ / t r a c e ( x . x m l ( ) ) ;
|
i f ( x u r l : : g e t ( L " / s a l e / d a t a / A R / u p d a t e " , a r g . G e t S t r i n g ( ) , x ) ! = 1 )
|
{
|
x s t r i n g e r r o r = x . t e x t ( ) ;
|
a l e r t ( L " e r r : " + e r r o r ) ;
|
r e t u r n 1 ;
|
}
|
x s t r i n g s t r = x . d o c u m e n t E l e m e n t ( ) . g e t A t t r i b u t e ( L " t e x t " ) ;
|
i f ( s t r = = L " t r u e " )
|
{
|
d w _ l i s t . R e s e t U p d a t e S t a t u s ( ) ;
|
a l e r t ( L "OÝ[XbR ! " ) ;
|
}
|
e l s e
|
{
|
a l e r t ( L "OÝ[XY1% ! " ) ;
|
}
|
r e t u r n 1 ;
|
}
|
|
|
i n t S e n d C t r l C m d ( x c o n t r o l x c , x s t r i n g c m d )
|
{
|
S e n d M e s s a g e ( x c . G e t H W N D ( ) , 0 x 4 0 1 , ( W P A R A M ) c m d . c _ s t r ( ) , 0 ) ;
|
r e t u r n 1 ;
|
}
|
|
|
|
/ /T}NäSÑ^Qýep
|
i n t O n C m d D i s p a t c h ( x s t r i n g c o m d i d )
|
{
|
|
i f ( c o m d i d = = L " x m A d d R o w " )
|
{
|
r e t u r n O n I n s e r t R o w ( ) ;
|
}
|
e l s e i f ( c o m d i d = = L " x m D e l e t e R o w " )
|
{
|
r e t u r n O n D e l e t e R o w ( ) ;
|
}
|
e l s e i f ( c o m d i d = = L " x m S a v e " )
|
{
|
r e t u r n O n S a v e D a t a ( ) ;
|
}
|
|
e l s e i f ( c o m d i d = = L " x m T r a n s " )
|
{
|
O p e n W i n d o w ( L " d e v : x p a g e [ E x c h a n g e C o l u m n T r a n . v x ] " ) ;
|
r e t u r n 1 ;
|
}
|
e l s e i f ( c o m d i d = = L " x m C l i e n t " )
|
{
|
O p e n W i n d o w ( L " d e v : x p a g e [ C u s t o m e r T r a n . A R . v x ] " ) ;
|
r e t u r n 1 ;
|
}
|
e l s e i f ( c o m d i d = = L " x m B a n k " )
|
{
|
O p e n W i n d o w ( L " d e v : x p a g e [ E x c h a n g e B a n k T r a n . v x ] " ) ;
|
r e t u r n 1 ;
|
}
|
e l s e i f ( c o m d i d = = L " x m T r a n " )
|
{
|
r e t u r n O n T r a n ( ) ;
|
}
|
r e t u r n 0 ;
|
}
|
|
/ /T}NäYtNNö
|
i n t O n X C o m m a n d ( T E v e n t * e v t , L P A R A M p a r a m )
|
{
|
r e t u r n O n C m d D i s p a t c h ( e v t - > x c o m m a n d . p S t r I D ) ;
|
}
|
|
i n t O n A t t a c h E v e n t ( )
|
{
|
/ /~Ñ[]åQwgap¹QûNNö
|
A t t a c h E v e n t ( L " W M _ X C O M M A N D " , ( F E v e n t ) & S a l a r y s l i p I m p : : O n X C o m m a n d ) ;
|
/ /·SÖq&p¹NNöÿ u(NÍn]åQwga
|
A t t a c h E v e n t ( L " W M _ S E T F O C U S " , ( F E v e n t ) & S a l a r y s l i p I m p : : O n S e t F o c u s ) ;
|
r e t u r n 1 ;
|
}
|
|
|
|
i n t o n l o a d ( )
|
{
|
d w _ l i s t = G e t C o n t r o l ( L " d w _ l i s t " ) ;
|
d w _ l i s t . o p e n U r l ( L " / s a l e / v i e w / A R / t e m p l a t e / l i s t e x " ) ;
|
O n A t t a c h E v e n t ( ) ;
|
|
|
f i l e n a m e = L " " ;
|
|
S e t A r g ( ) ;
|
x a s e r v e r a r g a r g = G e t A r g ( ) ;
|
i f ( a r g )
|
{
|
x s t r i n g f i l e = a r g . G e t A r g S t r i n g ( L " f i l e " ) ;
|
i f ( ! e x c e l . G e t N a t i v e P t r ( ) )
|
{
|
a l e r t ( L "N ýÞc¥ E x c e l " ) ;
|
r e t u r n 1 ;
|
}
|
|
e x c e l . O p e n D o c u m e n t ( f i l e ) ;
|
e x c e l . p u t _ V i s i b l e ( t r u e ) ;
|
|
i n t r o w s = e x c e l . G e t V a l i d R o w ( ) ;
|
i n t c o l s = e x c e l . G e t V a l i d C o l u m n ( ) ;
|
/ / B S T R v a l = e x c e l . G e t C e l l S t r i n g ( 1 , 1 ) ;
|
/ / S y s F r e e S t r i n g ( v a l ) ;
|
/ / e x c e l . Q u i t ( ) ;
|
}
|
|
|
r e t u r n 1 ;
|
}
|
|
i n t o n l o a d e d ( )
|
{
|
S e t A g e n t ( ) ;
|
|
r e t u r n 1 ;
|
}
|
} ;
|
|
