ÿþ 
 f u n c t i o n   r e p l a c e A l l (   s t r ,   o l d S t r ,   n e w S t r   )   {  
         v a r   a r r O l d S t r   =   s t r . s p l i t ( o l d S t r ) ;  
         v a r   i d x ;  
         f o r   (   i   =   0 ;   i   <   a r r O l d S t r . l e n g t h ;   i + +   )   {  
                 i d x   =   s t r . i n d e x O f (   o l d S t r ) ;  
                 i f   (   i d x   >   - 1   )   {  
                         s t r   =   s t r . r e p l a c e (   o l d S t r ,   n e w S t r   ) ;  
                 }  
         }  
         r e t u r n   s t r ;  
 }  
  
 f u n c t i o n   t r i m ( s t r )   {  
         i f ( s t r . l e n g t h   ! =   0 )   {  
             w h i l e   ( s t r . s u b s t r i n g ( 0 ,   1 )   = =   '   '   | |   s t r . s u b s t r i n g ( 0 ,   1 )   = =   '  0' ) {  
                     s t r   =   s t r . s u b s t r i n g ( 1 ,   s t r . l e n g t h ) ;  
             }  
         }  
         i f ( s t r . l e n g t h   ! =   0 )   {  
                 w h i l e   ( s t r . s u b s t r i n g ( s t r . l e n g t h   -   1 ,   s t r . l e n g t h )   = =   '   '   | |  0s t r . s u b s t r i n g ( 0 ,   1 )   = =   '  0' ) {  
                         s t r   =   s t r . s u b s t r i n g ( 0 ,   s t r . l e n g t h   -   1 ) ;  
                 }  
         }  
         r e t u r n   s t r ;  
 }  
  
 v a r   k e y L i s t   =   " 8 , 3 5 , 3 6 , 3 7 , 3 7 , 3 9 , 4 0 , 4 6 " ;  
 f u n c t i o n   o n l y A c c e p t N u m ( e v e n t ) {  
         v a r   e   =   e v e n t | | w i n d o w . e v e n t ;  
         v a r   c o d e   =   e . k e y C o d e | | e . c h a r C o d e  
         i f   ( ( 5 7 <   c o d e   | |   c o d e   < 4 8 ) & &   k e y L i s t . i n d e x O f ( c o d e ) = = - 1 )   {  
               r e t u r n   f a l s e ;  
         }  
         r e t u r n   t r u e ;  
 }  
  
 f u n c t i o n   p r e v e n t C o p y P a s t e ( ) { / / I E   O n l y  
         t r y {  
                 i f   ( w i n d o w . e v e n t . k e y C o d e   = =   8 6   & &   w i n d o w . e v e n t . c t r l K e y ) {  
                         w i n d o w . e v e n t . k e y C o d e = 0 ;  
                 }  
         } c a t c h ( e x ) { }  
 }  
  
 f u n c t i o n   s e t M a x L e n g t h ( c o n t r o l , s t r L ) {              
         i f   ( c o n t r o l . v a l u e . l e n g t h   >   s t r L )   {  
                 i f ( d o c u m e n t . a l l ) {  
 	                 w i n d o w . e v e n t . k e y C o d e   =   0 ;  
 	         } e l s e {  
 	                 r e t u r n   f a l s e ;  
 	         }  
         }  
 }  
  
 f u n c t i o n   g e t N e x t E l e m e n t   ( f i e l d )   {  
               v a r   f o r m   =   f i e l d . f o r m ;  
               f o r   ( v a r   e   =   0 ;   e   <   f o r m . e l e m e n t s . l e n g t h ;   e + + )  
                   i f   ( f i e l d   = =   f o r m . e l e m e n t s [ e ] )  
                           b r e a k ;  
               r e t u r n   f o r m . e l e m e n t s [ + + e   %   f o r m . e l e m e n t s . l e n g t h ] ;  
           }  
  
  
 f u n c t i o n   t a b O n E n t e r ( e v e n t ) {  
         t r y {  
                 v a r   p _ e v e n t   =   ( w i n d o w . e v e n t ) ?   w i n d o w . e v e n t   :   e v e n t ;  
                 v a r   c o n t r l   =   p _ e v e n t . s r c E l e m e n t | | p _ e v e n t . t a r g e t ;    
                 c o d e = p _ e v e n t . k e y C o d e | | p _ e v e n t . c h a r C o d e ;  
                 i f ( c o d e   = = 1 3 ) {  
                         i f ( c o n t r l . t y p e . t o L o w e r C a s e ( )   ! =   " b u t t o n "   & &   c o n t r l . t y p e . t o L o w e r C a s e ( )   ! =   " s u b m i t " ) {  
       	                         i f ( d o c u m e n t . a l l ) {  
       	                                 w i n d o w . e v e n t . k e y C o d e   =   9  
       	                         } e l s e {  
       	                                 g e t N e x t E l e m e n t ( c o n t r l ) . f o c u s ( ) ;  
       	                                 r e t u r n   f a l s e ;  
       	                         }  
                         }  
                 }  
         } c a t c h ( e r r )   { }  
 }  
  
 f u n c t i o n   F o r m a t N u m b e r 1 ( a m o u n t ) {  
         v a r   N u m   =   a m o u n t . t o S t r i n g ( ) ;      
         v a r   n e w N u m   =   " " ;      
         v a r   n e w N u m 2   =   " " ;   / /   C l e a r   N e w   N u m          
         v a r   c o u n t   =   0 ;      
         f o r   ( v a r   k   =   N u m . l e n g t h - 1 ;   k   > =   0 ;   k - - )   {      
                 v a r   o n e C h a r   =   N u m . c h a r A t ( k ) ;      
                 i f   ( c o u n t   = =   3 ) {      
                         n e w N u m   + =   " , " ;      
                         n e w N u m   + =   o n e C h a r ;      
                         c o u n t   =   1 ;      
                         c o n t i n u e ;      
                 }   e l s e   {      
   	                 n e w N u m   + =   o n e C h a r ;      
   	                 c o u n t   + + ;      
                 }      
         }   / / b u t   n o w   t h e   s t r i n g   i s   r e v e r s e d !            
    
         / / r e - r e v e r s e   t h e   s t r i n g            
         f o r   ( v a r   k   =   n e w N u m . l e n g t h - 1 ;   k   > =   0 ;   k - - )   {      
                 v a r   o n e C h a r   =   n e w N u m . c h a r A t ( k ) ;      
                 n e w N u m 2   + =   o n e C h a r ;      
         }      
    
         n e w N u m 2   =   n e w N u m 2 ;          
         r e t u r n   n e w N u m 2 ;      
 }  
  
 f u n c t i o n   R e c e i v e N u m ( c o n t r o l ) {  
         c o n t r o l . v a l u e   =   p a r s e C u r r e n c y ( c o n t r o l . v a l u e ) ;  
         c o n t r o l . v a l u e   =   F o r m a t N u m b e r 1 ( c o n t r o l . v a l u e ) ;  
 }  
 f u n c t i o n   R e c e i v e N u m 2 ( v a l u e ) {  
         v a l u e   =   p a r s e C u r r e n c y ( v a l u e ) ;  
         v a l u e   =   F o r m a t N u m b e r 1 ( v a l u e ) ;  
         r e t u r n   v a l u e ;  
 }  
  
 f u n c t i o n   p a r s e C u r r e n c y ( c u r V a l ) {    
         c u r V a l   =   n e w   S t r i n g ( c u r V a l ) ;    
         c u r V a l   =   p a r s e F l o a t ( c u r V a l . r e p l a c e ( / ,   / ,   ' . ' ) . r e p l a c e ( / [ ^ 0 - 9 - \ + \ . ] / i g ,   ' ' ) ) ;    
         i f   ( i s N a N ( c u r V a l )   | |   c u r V a l   <   0 )     {  
                 r e t u r n   0    
         }   e l s e     {  
                 r e t u r n   n e w   N u m b e r ( c u r V a l ) ;    
         }  
 }  
  
 f u n c t i o n   f o r m a t C u r r e n c y ( n u m )   {  
         n u m   =   n u m . t o S t r i n g ( ) . r e p l a c e ( / $ | \ , / g , ' ' ) ;  
         i f   ( i s N a N ( n u m ) )   {  
 	         n u m   =   " 0 " ;  
         }  
         s i g n   =   ( n u m   = =   ( n u m   =   M a t h . a b s ( n u m ) ) ) ;  
         n u m   =   M a t h . f l o o r ( n u m * 1 0 0 + 0 . 5 0 0 0 0 0 0 0 0 0 1 ) ;  
         c e n t s   =   n u m % 1 0 0 ;  
         n u m   =   M a t h . f l o o r ( n u m / 1 0 0 ) . t o S t r i n g ( ) ;  
         i f   ( c e n t s < 1 0 )   {  
 	         c e n t s   =   " 0 "   +   c e n t s ;  
         }  
         f o r   ( v a r   i   =   0 ;   i   <   M a t h . f l o o r ( ( n u m . l e n g t h - ( 1 + i ) ) / 3 ) ;   i + + )   {  
 	         n u m   =   n u m . s u b s t r i n g ( 0 , n u m . l e n g t h - ( 4 * i + 3 ) ) + ' , ' +  
 	         n u m . s u b s t r i n g ( n u m . l e n g t h - ( 4 * i + 3 ) ) ;  
         }  
         / / r e t u r n   ( ( ( s i g n ) ? ' ' : ' - ' )   +   ' $ '   +   n u m   +   ' . '   +   c e n t s ) ;  
         / / r e t u r n   ( ( ( s i g n ) ? ' ' : ' - ' )   +   n u m   +   ' . '   +   c e n t s ) ;  
         r e t u r n   ( ( ( s i g n ) ? ' ' : ' - ' )   +   n u m ) ;  
 }  
  
 v a r   s p e c C h a r s   =   " ! \ " # $ % & \ ' ( ) = ~ | - ^ \ \ ` { [ + * } ; : ] < > ? , / " ;  
 / / v a r   s p e c C h a r s   =   " ! \ " # $ % & \ ' ( ) = ~ | - ^ \ \ ` { [ + * } ; : ] < > ? _ , / " ;  
 f u n c t i o n   c h e c k E m a i l ( a r g S t r )   {  
         / / a r g S t r   =   t o E m p t i n e s s S t r i n g ( a r g S t r ) ;  
         v a r   c h a r s   =   n e w   A r r a y ( ) ;  
          
         f o r ( i = 0 ; i < a r g S t r . l e n g t h ; i + + ) {  
                 c h a r s [ i ]   =   a r g S t r . s u b s t r ( i , 1 ) ;  
         }  
 	 f o r   ( i   =   0 ;   i   <   a r g S t r . l e n g t h ;   i + + )   {  
 	         i f   ( ! i s V a l i d C h a r ( c h a r s [ i ] ) )   {  
 	                 r e t u r n   1 ;  
 	         }  
 	 }  
 	 i f   ( a r g S t r . i n d e x O f ( " @ " )   = =   - 1 ) {  
 	         r e t u r n   2 ;  
 	 }  
 	 i f   ( a r g S t r . i n d e x O f ( " . " )   = =   - 1 ) {  
 	         r e t u r n   3 ;  
 	 }  
         r e t u r n   0 ;  
 }  
  
 f u n c t i o n   i s V a l i d C h a r ( c h )   {  
         i f   ( ( c h   < =   ' z '   & &   ' a '   < =   c h )   | |   ( c h   < =   ' Z '   & &   ' A '   < =   c h )  
 	         | |   ( c h   < =   ' 9 '   & &   ' 0 '   < =   c h )   | |   ! i s S p e c i a l C h a r ( c h ,   s p e c C h a r s ) )   {  
 	 	  
 	 	 r e t u r n   t r u e ;  
 	 }  
 	 r e t u r n   f a l s e ;  
 }  
  
 f u n c t i o n   i s S p e c i a l C h a r ( c h ,   s p e c C h a r a c t e r s ) {  
 	 	 	  
         v a r   p o s   =   s p e c C h a r a c t e r s . i n d e x O f ( c h ) ;  
 	 i f ( p o s   = =   - 1 ) {  
 	         r e t u r n   f a l s e ;  
 	 }  
 	 r e t u r n   t r u e ;  
 }  
 f u n c t i o n   R e m o v e B a d ( s t r T e m p )   {    
         s t r T e m p   =   s t r T e m p . r e p l a c e ( / \ < | \ > | \ " | \ ' | \ % | \ ; | \ ( | \ ) | \ & | \ + | \ - / g , " " ) ;  
         r e t u r n   s t r T e m p ;  
 }  
 f u n c t i o n   e n c r y p t U r l ( u r l )   {    
         / / u r l   =   r e p l a c e A l l ( u r l , " = " , " c e d o " ) ;  
         u r l   =   r e p l a c e A l l ( u r l , " = " , " c e o d " ) ;  
         / / u r l   =   r e p l a c e A l l ( u r l , " & " , " c e o d " ) ;  
         u r l   =   r e p l a c e A l l ( u r l , " & " , " c e d o " ) ;  
         r e t u r n   u r l ;  
 }  
  
 f u n c t i o n   o n C l i c k ( l c t n C o d e ,   u r l )   {  
         h i d e P o p W i n ( f a l s e ) ;  
         i f ( l c t n C o d e = = ' S G 1 ' ) {  
                 v a r   x m l H t t p R e q   =   f a l s e ;  
                 i f   ( w i n d o w . X M L H t t p R e q u e s t )   {  
                         x m l H t t p R e q   =   n e w   X M L H t t p R e q u e s t ( ) ;  
                 }  
                 e l s e   i f   ( w i n d o w . A c t i v e X O b j e c t )   {  
                         x m l H t t p R e q   =   n e w   A c t i v e X O b j e c t ( " M i c r o s o f t . X M L H T T P " ) ;  
                 }  
                 x m l H t t p R e q . o p e n ( ' P O S T ' ,   ' i n s e r t D a t a . a s p x ' ,   t r u e ) ;  
                 x m l H t t p R e q . s e t R e q u e s t H e a d e r ( ' C o n t e n t - T y p e ' ,   ' a p p l i c a t i o n / x - w w w - f o r m - u r l e n c o d e d ' ) ;  
                 x m l H t t p R e q . o n r e a d y s t a t e c h a n g e   =   f u n c t i o n ( )   {  
                         i f   ( x m l H t t p R e q . r e a d y S t a t e   = =   4 )   {  
                                 r e t u r n ;  
                         }                                  
                 }  
                 x m l H t t p R e q . s e n d ( " s e t D e f a u l t S e l e c t = S G 1 " ) ;  
          
                 r e t u r n ;  
         }  
          
         v a r   a r e a S e l e c t H   =   d o c u m e n t . g e t E l e m e n t B y I d ( " a r e a S e l e c t H " ) ;  
         a r e a S e l e c t H . v a l u e = l c t n C o d e  
          
         f r m S u b m i t   =   d o c u m e n t . f o r m s [ 0 ] ;  
         f r m S u b m i t . a p p e n d C h i l d ( a r e a S e l e c t H ) ;  
         f r m S u b m i t . a c t i o n = u r l ;  
         f r m S u b m i t . s u b m i t ( ) ;  
 }  
 f u n c t i o n   p a d L e f t ( s t r ,   p a d ,   c o u n t )   {  
         w h i l e ( s t r . l e n g t h < c o u n t )  
         s t r = p a d + s t r ;  
         r e t u r n   s t r ;  
 }  
  
 f u n c t i o n   d a y s O f M o n t h ( m o n t h ,   y e a r )   {  
         r e t u r n   3 2 -   n e w   D a t e ( y e a r , m o n t h - 1 , 3 2 ) . g e t D a t e ( ) ;  
 }  
  
 l a s t C o d e = 1 0 0 0 ;  
 f u n c t i o n   D G _ c h a n g e B a c k C o l o r ( r o w ,   h i g h l i g h t , c o n t r o l I d ) {    
         i f ( d o c u m e n t . a l l ) {  
                 i f ( l a s t C o d e = = r o w . c e l l s [ 0 ] . i n n e r T e x t ) {  
                         r e t u r n  
                 }  
                 / / l a s t C o d e   =   r o w . c e l l s [ 0 ] . i n n e r T e x t ;  
         } e l s e {  
                 i f ( l a s t C o d e = = r o w . c e l l s [ 0 ] . t e x t C o n t e n t ) {  
                         r e t u r n  
                 }  
                 / / l a s t C o d e   =   r o w . c e l l s [ 0 ] . t e x t C o n t e n t ;  
         }  
          
          
         v a r   t b l H i s   =   d o c u m e n t . g e t E l e m e n t B y I d ( c o n t r o l I d ) ;  
         f o r ( i = 1 ; i < t b l H i s . r o w s . l e n g t h ; i + + ) {  
                 t b l H i s . r o w s [ i ] . s t y l e . b a c k g r o u n d C o l o r   =   ' ' ;    
         }  
         i f   ( h i g h l i g h t )   {    
                 r o w . s t y l e . c u r s o r   =   " h a n d " ;    
                 l a s t C o l o r   =   r o w . s t y l e . b a c k g r o u n d C o l o r ;    
                 r o w . s t y l e . b a c k g r o u n d C o l o r   =   ' # A 4 C C C 6 ' ;    
         } e l s e {    
                 r o w . s t y l e . b a c k g r o u n d C o l o r   =   l a s t C o l o r ;    
         }  
 }        
 
