ÿþ# 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 < w o b j e c t / x d o u b l e . h p p >
|
# i n c l u d e < x c o n t r o l / x l a y e r s h e e t . h p p >
|
# i n c l u d e < x c o n t r o l / x d a t e t i m e p i c k . 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 ) V A T I n v o i c e A d d : p u b l i c x f r a m e
|
{
|
p u b l i c :
|
i n t h O b j e c t = 0 ;
|
x d w t a b l e d w _ b a s 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 :
|
V A T I n v o i c e A d d ( 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 V A T I n v o i c e A d d * 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 )
|
{
|
V A T I n v o i c e A d d * p W i n = n e w V A T I n v o i c e A d d ( 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 ( )
|
{
|
r e t u r n 1 ;
|
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;mYtýQpe
|
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å]wQag
|
/ / S e t A g e n t ( ) ;
|
r e t u r n 1 ;
|
}
|
|
|
i n t O n S a v e ( )
|
{
|
x m l x ;
|
x a s e r v e r a r g a r g ;
|
d w _ b a s e . A c c e p t T e x t ( ) ;
|
d w _ b a s e . D w U p d a t e A l l T o ( x ) ;
|
x s t r i n g e r r o r = L " " ;
|
a r g . A d d A r g ( L " c o n t e n t " , x . x m l ( ) ) ;
|
i f ( x u r l : : g e t ( L " / s a l e / d a t a / V A T N o t i f y / v a t i n v o i c e / u p d a t e " , a r g . G e t S t r i n g ( ) , x ) ! = 1 )
|
{
|
e r r o r = x . t e x t ( ) ;
|
/ / a l e r t ( e r r o r ) ;
|
} e l s e
|
{
|
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 _ b a s e . R e s e t U p d a t e S t a t u s ( ) ;
|
a l e r t ( L " ÝOX[bR! " ) ;
|
S e n d M e s s a g e ( G e t H W N D ( ) , 0 x 4 0 1 , ( L P A R A M ) L " x m R e f r e s h " , 0 ) ;
|
C l o s e W i n d o w ( ) ;
|
} e l s e
|
{
|
a l e r t ( L " ÝOX[1Y%! " ) ;
|
}
|
/ / a l e r t ( s t r ) ;
|
}
|
r e t u r n 1 ;
|
}
|
|
/ / }TäNÑS^ýQpe
|
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 S a v e " )
|
{
|
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " N I n v o i c e N o " ) = = L " " )
|
{
|
a l e r t ( L " åwÑShy÷S:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " V A T B i l l A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " ;`Ñ:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " D e d u c e A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " cb>kÑ:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " G o o d s A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " ¡zÑ:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " O v e r A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " Y _Ñ:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " R e f u n d A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " zÑ:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
i f ( d w _ b a s e . G e t I t e m S t r i n g ( 1 , L " V A T A m o u n t " ) = = L " " )
|
{
|
a l e r t ( L " X<Pz:Nzzÿ" ) ;
|
r e t u r n 0 ;
|
}
|
O n S a v e ( ) ;
|
r e t u r n 1 ;
|
}
|
e l s e i f ( c o m d i d = = L " x m C l o s e " )
|
{
|
C l o s e W i n d o w ( ) ;
|
r e t u r n 1 ;
|
}
|
r e t u r n 0 ;
|
}
|
|
/ / }TäNYtNöN
|
i n t O n X C o m m a n d ( T E v e n t * e v t , i n t 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 I t e m C h a n g e d ( T E v e n t * e v t , L P A R A M p )
|
{
|
D W N M H D R & h d r = * ( D W N M H D R * ) e v t - > n o t i f y . p n m h ;
|
x s t r i n g c o l n a m e = h d r . c o l n a m e ;
|
x s t r i n g v a l u e = h d r . d a t a ;
|
|
i f ( c o l n a m e = = L " V A T S u p p l i e r I D " )
|
{
|
x s t r i n g V A T S u p p l i e r I D = d w _ b a s e . G e t I t e m S t r i n g ( h d r . r o w , L " V A T S u p p l i e r I D " ) ;
|
d w _ b a s e . S e t I t e m S t r i n g ( 1 , L " S u p p l i e r I D " , V A T S u p p l i e r I D ) ;
|
}
|
r e t u r n 1 ;
|
}
|
|
|
i n t O n A t t a c h E v e n t ( )
|
{
|
/ / Ñ~[å]wQag¹pûQNöN
|
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 ) & V A T I n v o i c e A d d : : O n X C o m m a n d ) ;
|
/ / ·ÖS&q¹pNöN ÿ(uNÍnå]wQag
|
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 ) & V A T I n v o i c e A d d : : O n S e t F o c u s ) ;
|
/ / A t t a c h E v e n t ( L " d w _ b a s e " , L " D W V _ I T E M C H A N G E D " , O n I t e m C h a n g e d ) ;
|
r e t u r n 1 ;
|
}
|
|
/ *
|
i n t O n R e t r i e v e ( )
|
{
|
x m l x ;
|
|
x a s e r v e r a r g a r g ;
|
a r g . s e t N a t i v e P o i n t e r ( a r g . C r e a t e I n s t a n c e ( ) ) ;
|
a r g . A d d A r g ( L " x x x " , L " x x x " ) ;
|
i f ( g e t U r l ( L " " , a r g . G e t S t r i n g ( ) , x ) ! = 1 )
|
{
|
t r a c e ( x . t e x t ( ) ) ;
|
r e t u r n - 1 ;
|
} e l s e
|
{
|
/ / d w _ b a s e . R e t r i e v e ( x ) ;
|
/ / d w _ b a s e . R e d r a w ( ) ;
|
}
|
r e t u r n 1 ;
|
}
|
* /
|
|
i n t o n l o a d ( )
|
{
|
S e t A r g ( ) ;
|
d w _ b a s e = G e t C o n t r o l ( L " d w _ b a s e " ) ;
|
d w _ b a s e . o p e n U r l ( L " / s a l e / v i e w / A P / B a s e " ) ;
|
|
d w _ b a s e . S e t C o l H e a d e r H e i g h t ( 0 ) ;
|
d w _ b a s e . S e t R o w S e l e c t o r W i d t h ( 0 ) ;
|
d w _ b a s e . S e t H S c r o l l S t a t e ( f a l s e ) ;
|
d w _ b a s e . S e t V S c r o l l S t a t e ( f a l s e ) ;
|
|
|
/ / s e t i n i t i a l
|
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 I n v o i c e N o = a r g . G e t A r g S t r i n g ( L " I n v o i c e N o " ) ;
|
d w _ b a s e . S e t I t e m S t r i n g ( 1 , L " N I n v o i c e N o " , I n v o i c e N o ) ;
|
|
}
|
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 _ b a s e . S e t I t e m S t r i n g ( 1 , 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 _ b a s e . S e t I t e m S t r i n g ( 1 , L " C r e a t o r I D " , s u s e r i d ) ;
|
d w _ b a s e . S e t I t e m D i s p l a y S t r i n g ( 1 , L " C r e a t o r I D " , s u s e r n a m e ) ;
|
|
O n A t t a c h E v e n 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 ;
|
}
|
} ;
|
