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