ÿþ/ /   V a r i a b l e s   g l o b a l e s  
 v a r   r e q u e t e = " " ;  
 v a r   s a v r e q = " " ;  
 v a r   q u e s t i o n = " " ;  
 v a r   o p e t = " " ;  
 v a r   o p o u =   " " ;  
 v a r   f l a g = f a l s e ;  
 / /  
 f u n c t i o n   A c c e n t ( T e r m e )   {  
 / /   F i l t r a g e   d e s   a c c e n t s  
 	 v a r   A C C A P P   =   " | û ü þ ¸ µ ¶ · ¹ ¨ ¾ » ¼ ½ Æ © Ê Ç È É Ë ® § Ð Ì Î Ï Ñ ª Õ Ò Ó Ô Ö Ý × Ø Ü Þ ã ß á â ä é ç æ å è « ¬ í ê ë ì î ­ ó ï ñ ò ô ø õ ö ÷ ù " ;      
 	 v a r   A C C W I N   =   " ó÷ùõá à £ã ¡¯±³µ·â ¥§©«­é è »½¹ê ¿ÁÃÅÇí ì É)Ëó ò Ïõ ÍÙ×ÕÓÑô ¡ÛÝßáã°ú ù çiåéëíïñ" ;  
 	 v a r   A C C W I N 1   =   " | " ;      
 	 v a r   A C C A P P 1   =   " ú " ;      
 	 f o r   ( i = 0 ;   i < A C C W I N . l e n g t h ;   i + + )   {  
 	 	 w h i l e   (   T e r m e . i n d e x O f ( A C C W I N . c h a r A t ( i ) , 0 )   ! =   - 1 )   T e r m e   =   T e r m e . r e p l a c e ( A C C W I N . c h a r A t ( i ) , A C C A P P . c h a r A t ( i ) ) ;  
 	 }  
 	 f o r   ( i = 0 ;   i < A C C W I N 1 . l e n g t h ;   i + + )   {  
 	 	 w h i l e   (   T e r m e . i n d e x O f ( A C C W I N 1 . c h a r A t ( i ) , 0 )   ! =   - 1 )   T e r m e   =   T e r m e . r e p l a c e ( A C C W I N 1 . c h a r A t ( i ) , A C C A P P 1 . c h a r A t ( i ) ) ;  
 	 }  
 	 r e t u r n   T e r m e ;  
 }  
 / /   R e n v o i   l e s   t e r m e s   d e   l ' i n d e x  
 f u n c t i o n   I n d e x V a l u e ( V a l , T a r g e t )  
 {  
 v a r   c h a i n e   =   " " ;  
 i f   ( T a r g e t   & &   V a l )   {  
 	 / /   M e t t r e   e n   c o m m e n t a i r e   l e s   d e u x   l i g n e s   s u i v a n t e s   s i   o n   n e   v e u t   p a s   r e c u p e r e r   l e s  
 	 / /   t e r m e s   e x i s t a n t s   d a n s   l a   z o n e   d e   t e x t e  
 	 c h a i n e   =   e v a l ( " d o c u m e n t . G E N I S I S . " + T a r g e t + " . v a l u e " ) ;  
 	 i f   ( c h a i n e )   V a l   =   V a l   +   ' ; '   +   c h a i n e ;  
 	 e v a l ( " d o c u m e n t . G E N I S I S . " + T a r g e t + ' . v a l u e = V a l ' ) ;  
 }  
 m s g . c l o s e ( ) ;  
 }  
 / /   O u v e r t u r e   f e n e t r e   P o p U p   -   L e f t = 1 0 0 ,   T o p = 1 0 0    
 f u n c t i o n   O p e n W i n d o w ( L U R L , L g x , L g y )   {  
 	 m s g = o p e n ( " " , " H e l p " , " l o c a t i o n = n o , s t a t u s = n o , t o o l b a r = n o , d i r e c t o r i e s = n o , r e s i z a b l e = y e s , m e n u b a r = n o , s c r o l l b a r s = y e s , h e i g h t = " + L g x + " , w i d t h = " + L g y + " , l e f t = 1 0 0 , t o p = 1 0 0 " ) ; 	  
     	 m s g . l o c a t i o n . h r e f = L U R L ;  
     	 m s g . f o c u s ( ) ;  
 }  
 / /   R e i n i t i a l i s e   l e   f o r m u l a i r e  
 f u n c t i o n   R e s e t F o r m ( )   {  
 	 d o c u m e n t . G E N I S I S . r e s e t ( ) ;  
 }  
 / /   L i r e   u n e   " T e x t b o x "  
 f u n c t i o n   R e a d T e x t B o x ( C T L , U N I )   {  
 	 v a r   s r c   =   d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . v a l u e ;  
 	 i f   ( U N I )   {    
 	 	 v a r   p o n c t u a t i o n   =   "   ' - , . _ : / " + ' " ' ; 	 / /   C a r a c t è r e s   d e   p o n c t u a t i o n   t r a i t e m e n t   u n i t e r m e  
 	 	 v a r   i ;  
 	 	 f o r   ( i = 0 ;   i < p o n c t u a t i o n . l e n g t h ;   i + + )   {  
 	 	 	 w h i l e   (   s r c . i n d e x O f ( p o n c t u a t i o n . c h a r A t ( i ) , 0 )   ! =   - 1 )   s r c   =   s r c . r e p l a c e ( p o n c t u a t i o n . c h a r A t ( i ) , " ; " ) ;  
 	 	 }  
 	 }  
 	 r e t u r n   s r c ;  
 }  
 / /   M i s e   e n   f o r m e   r e q u e t e  
 / /   C R I   =   O p é r a t e u r   e n t r e   c h a m p s  
 / /   C T L   =   E l e m e n t   d u   f o r m u l a i r e   ( r e t o u r   d ' u n e   f o n c t i o n )  
 / /   T R N   =   T r o n c a t u r e   ( c a r a c t e r e   $ )  
 / /   L I B   =   L i b e l l é   e n   c l a i r  
 / /   C D S   =   E t i q u e t t e   I S I S  
 / /   P R F   =   P r é f i x e  
 / /   O P E   =   O p é r a t e u r   e n t r e   a r t i c l e s  
 f u n c t i o n   M a k e R e q u e s t ( C R I , C T L , T R N , L I B , C D S , P R F , O P E )   {  
 v a r   b u t = " " ;  
 v a r   a f f = " " ;  
 v a r   b i s = " " ;  
 v a r   a c t = " " ;  
 v a r   a c t p   =   " " ;  
 v a r   m o t = " " ;  
 i f   ( O P E = = "   A N D   " )   {  
 	 a c t = o p e t ;  
 }   e l s e   {  
 	 a c t = o p o u ;  
 }  
 i f   ( C R I = = "   A N D   " )   {  
 	 a c t p = o p e t ;  
 }   e l s e   {  
 	 a c t p = o p o u ;  
 }  
 d e c o u p e = C T L . s p l i t ( " ; " ) ;  
 f o r   ( v a r   i   i n   d e c o u p e )   {  
 i f   ( d e c o u p e [ i ] )   {  
 	 m o t = A c c e n t ( d e c o u p e [ i ] ) ;  
 	 i f   ( b u t )   {  
 	 	 b u t   =   b u t   +   O P E   +   " \ " "   +   P R F   +   m o t   +   T R N   +   " \ " "   +   C D S ;  
 	 	 b i s   =   b i s   +   O P E   +   " # "   +   P R F   +   m o t   +   T R N   +   " # "   +   C D S ;  
 	 	 a f f   =   a f f   +   a c t   +   d e c o u p e [ i ] ;  
 	 }   e l s e   {  
 	 	 b u t   =   " \ " "   +   P R F   +   m o t   +   T R N   +   " \ " "   +   C D S ;  
 	 	 b i s   =   " # "   +   P R F   +   m o t   +   T R N   +   " # "   +   C D S ;  
 	 	 a f f   =   d e c o u p e [ i ] ;  
 	 }  
 }  
 }  
 i f   ( b u t )   {  
 	 a f f   =   " ( "   +   L I B   +   " = "   +   a f f   +   " ) " ;  
 	 f l a g = t r u e ;  
 	 i f   ( r e q u e t e )   {  
 	 	 r e q u e t e   =   r e q u e t e + C R I + " ( " + b u t + " ) " ;  
 	 	 s a v r e q   =   s a v r e q + C R I + " ( " + b i s + " ) " ;  
 	 }   e l s e   {  
 	 	 r e q u e t e   =   " ( " + b u t + " ) " ;  
 	 	 s a v r e q   =   " ( " + b i s + " ) " ;  
 	 }  
 	 i f   ( q u e s t i o n )   {  
 	 	 q u e s t i o n   =   q u e s t i o n + a c t p + a f f ;  
 	 }   e l s e   {  
 	 	 q u e s t i o n   =   a f f ;  
 	 }  
 }  
 }  
 / /   M i s e   e n   f o r m e   r e q u e t e  
 / /   C T L   =   E l e m e n t   d u   f o r m u l a i r e   ( r e t o u r   d ' u n e   f o n c t i o n )  
 / /   T R N   =   T r o n c a t u r e   ( c a r a c t e r e   $ )  
 / /   L I B   =   L i b e l l é   e n   c l a i r  
 / /   C D S   =   E t i q u e t t e   I S I S  
 / /   P R F   =   P r é f i x e  
 / /   O P E   =   O p é r a t e u r  
 f u n c t i o n   M a k e R e q u e s t M u l t i ( C R I , C T L , C M B , O P E )   {  
 v a r   c h a i n e = " " ;  
 c h a i n e = R e a d L i s t S i m p l e ( C M B ) ;  
 d e c o u p e = c h a i n e . s p l i t ( " | " ) ;  
 M a k e R e q u e s t ( C R I , R e a d T e x t B o x ( C T L , d e c o u p e [ 3 ] ) , d e c o u p e [ 2 ] , d e c o u p e [ 0 ] , d e c o u p e [ 1 ] , d e c o u p e [ 4 ] , O P E ) ;  
 }  
  
 / /   L e c t u r e   " c h e c k B o x "  
 f u n c t i o n   R e a d C h e c k B o x ( C T L , I N D )   {  
 v a r   t e r m e = " " ;  
 f o r   ( v a r   i = 0 ;   i < I N D ;   i + + )   {  
 	 i f   ( d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] [ i ] . c h e c k e d )   {  
 	 i f   ( t e r m e )   {  
 	 	 t e r m e = t e r m e + " ; " + d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] [ i ] . v a l u e ;  
 	 }   e l s e   {  
 	 	 t e r m e = d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] [ i ] . v a l u e ;  
 	 } }  
 }  
 r e t u r n   t e r m e ;  
 }  
 / /   L e c t u r e   " B o u t o n   R a d i o "  
 f u n c t i o n   R e a d R a d i o ( C T L )   {  
 f o r   ( v a r   i = 0 ;   i < d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . l e n g t h ;   i + + )   {  
 i f   ( d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] [ i ] . c h e c k e d   )   r e t u r n   d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] [ i ] . v a l u e ;  
 }  
 r e t u r n   " " ;  
 }  
 / /   L e c t u r e   " L i s t e   m u l t i p l e "  
 f u n c t i o n   R e a d L i s t M u l t i ( C T L )   {  
 v a r   t e r m e   =   " " ;  
 f o r   ( v a r   i = 0 ;   i < d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . l e n g t h ;   i + + )   {  
 i f   ( d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . o p t i o n s [ i ] . s e l e c t e d )   {  
 i f   ( t e r m e   = =   " " )   {  
 	 t e r m e = d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . o p t i o n s [ i ] . v a l u e ;  
 }   e l s e   {  
 	 t e r m e = t e r m e + " ; " + d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . o p t i o n s [ i ] . v a l u e ;  
 } } }  
 r e t u r n   t e r m e ;  
 }  
 / /   L e c t u r e   " L i s t e   s i m p l e "  
 f u n c t i o n   R e a d L i s t S i m p l e ( C T L )   {  
 	 i = d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . o p t i o n s . s e l e c t e d I n d e x ;  
 	 i f   ( i   <   0 )   r e t u r n   " " ;  
 	 r e t u r n   d o c u m e n t . G E N I S I S . e l e m e n t s [ C T L ] . o p t i o n s [ i ] . v a l u e ;  
 }  
 / /   O u v e r t u r e   d ' u n   i n d e x  
 / /   C D S   =   e t i q u e t t e   i s i s  
 / /   R E T   =   z o n e   t e x t e   d e   r e t o u r  
 / /   F I C   =   0 = B a s e   I S I S , 1 = I m a g e   i n d e x   I n d e x  
 / /   T I T   =   T i t r e   d e   l a   f e n e t r e  
 / /   P F X   =   P r e f i x e  
 / /   P O S   =   P r e m i e r   t e r m e   -   p o u r   é v i t e r   l e s   c h i f f r e s  
 / /   S M P   =   1 = I n d e x   l o n g ,   0 = I n d e x   c o u r t    
 / /   L g X   =   L a r g e u r   f e n e t r e  
 / /   L g Y   =   H a u t e u r   f e n e t r e  
 / /   P o s X   =   P o s i t i o n   L E F T  
 / /   P o s Y   =   P o s i t i o n   T O P  
 f u n c t i o n   O p e n I n d e x ( C D S , R E T , F I C , T I T , P F X , P O S , S M P , L g X , L g Y , P o s X , P o s Y )   {  
 	 v a r   U R L = d o c u m e n t . R E Q U E S T . t 2 0 0 9 . v a l u e + " / [ i n = g e n i s i s " + d o c u m e n t . R E Q U E S T . t 2 0 1 3 . v a l u e + " 1 . i n ] / " ;  
 	 i f   (   F I C   = =   0   )   {  
 	 	 U R L = U R L   +   " ? t 2 0 0 5 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 0 5 . v a l u e ) ;  
 	 }   e l s e   {  
 	 	 U R L = U R L   +   " ? t 2 0 0 5 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 1 5 . v a l u e ) ;  
 	 }  
 	 U R L = U R L   +   " & t 2 0 0 6 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 0 6 . v a l u e ) ;  
 	 i f   ( S M P   = =   1 )   {  
 	 	 U R L = U R L   +   " & t 2 0 0 8 = "   +   d o c u m e n t . R E Q U E S T . t 2 0 0 8 . v a l u e ;  
 	 }   e l s e   {  
 	 	 U R L = U R L   +   " & t 2 0 0 8 = 1 0 0 " ;  
 	 }  
 	 U R L = U R L   +   " & t 2 0 0 9 = "   +   d o c u m e n t . R E Q U E S T . t 2 0 0 9 . v a l u e ;  
 	 U R L = U R L   +   " & t 2 0 1 0 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 1 0 . v a l u e ) ;  
 	 U R L = U R L   +   " & t 2 0 1 1 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 1 1 . v a l u e ) ;  
 	 U R L = U R L   +   " & t 2 0 1 2 = "   +   e s c a p e ( d o c u m e n t . R E Q U E S T . t 2 0 1 2 . v a l u e ) ;  
 	 U R L = U R L   +   " & t 2 0 1 3 = "   +   d o c u m e n t . R E Q U E S T . t 2 0 1 3 . v a l u e ;  
 	 U R L = U R L   +   " & t 2 0 1 4 = "   +   C D S ;  
 	 U R L = U R L   +   " & t 2 0 1 5 = "   +   R E T ;  
 	 U R L = U R L   +   " & t 2 0 1 6 = "   +   P O S ;  
 	 U R L = U R L   +   " & t 2 0 1 7 = "   +   A c c e n t ( T I T ) ;  
 	 U R L = U R L   +   " & t 2 0 1 8 = "   +   P F X ;  
 	 U R L = U R L   +   " & t 2 0 2 0 = "   +   S M P ;  
 	 m s g = w i n d o w . o p e n ( U R L , " I n d e x " , " l o c a t i o n = n o , s t a t u s = n o , t o o l b a r = n o , d i r e c t o r i e s = n o , r e s i z a b l e = y e s , m e n u b a r = n o , s c r o l l b a r s = y e s , h e i g h t = " + L g X + " , w i d t h = " + L g Y + " , l e f t = " + P o s X + " , t o p = " + P o s Y ) ; 	  
     	 m s g . f o c u s ( ) ;  
 }  
 / /   O u v e r t u r e   i n d e x   m u l t i p l e  
 / /   C T L   =   N o m   d e   l a   c o m b o b o x   à   u t i l i s e r  
 / /   R E T   =   z o n e   t e x t e   d e   r e t o u r  
 / /   L g X   =   L a r g e u r   f e n e t r e  
 / /   L g Y   =   H a u t e u r   f e n e t r e  
 / /   P o s X   =   P o s i t i o n   L E F T  
 / /   P o s Y   =   P o s i t i o n   T O P  
 f u n c t i o n   O p e n I n d e x M u l t i ( R E T , C T L , L g X , L g Y , P o s X , P o s Y )   {  
 	 v a r   c h a i n e = " " ;  
 	 c h a i n e = R e a d L i s t S i m p l e ( C T L ) ;  
 	 d e c o u p e = c h a i n e . s p l i t ( " | " ) ; 	  
 	 O p e n I n d e x ( d e c o u p e [ 7 ] , R E T , d e c o u p e [ 6 ] , d e c o u p e [ 5 ] , d e c o u p e [ 4 ] , " " , d e c o u p e [ 8 ] , L g X , L g Y , P o s X , P o s Y ) ;  
 }  
 
