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