S E T   Q U O T E D _ I D E N T I F I E R   O N   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c S t r i n g E s c a p e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c S t r i n g E s c a p e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c S t r i n g E s c a p e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q N*NW[&{2N\vQ-NvUS_S  ' 	  lbcb$N*NUS_S  ' ' 	1\/f\vQ-NvUS_S8
 
 - - = = ُ*N  U D F   (u(W	gR`SX[(Wv:WT(ueg8eQSpe-NvUS_SV:NYg
N8\Su{|<O    W H E R E   G o o d s N a m e = ' L a d y ' s   O v e r c o a t '   v4\,\@\bTeSN;bk  S Q L   l\;eQ
 
 - - = = :NNn@b	g:WTQpevQQSpe:N  N V A R C H A R ( 4 0 0 0 ) 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ I n p u t S t r i n g   - -   \YtvW[&{2N
 
 - - = = ԏV~gn v a r c h a r   - -   8YtTvW[&{2N
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c S t r i n g E s c a p e   ( @ I n p u t S t r i n g   N V A R C H A R ( 4 0 0 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 4 0 0 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 R E T U R N   R E P L A C E ( @ I n p u t S t r i n g , ' ' ' ' , ' ' ' ' ' ' ) 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c S t r i n g E s c a p e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r C u r r e n t         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r C u r r e n t ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r C u r r e n t ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b
T
 
 - - = = [E1\/fC O N V E R T ( V a r c h a r ( 2 0 ) , S Y S T E M _ U S E R ) 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpee
 
 - - = = ԏV~gn v a r c h a r   - -   S_MR(u7b
T
 
 - - = = vMR,g  U D F   ]~l	g[E(uY  SN Rd	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r C u r r e n t   ( )     
 
 
 
 R E T U R N S   n v a r c h a r ( 5 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 R E T U R N   C O N V E R T ( n v a r c h a r ( 5 0 ) , S Y S T E M _ U S E R ) 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r C u r r e n t ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r A d m i n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r A d m i n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r A d m i n ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:N  A d m i n     ~+Rv(u7b
 
 - - = = [N  A d m i n     ~+Rv(u7bvQb	gte*Nzp@b	gvCg)R
 
 - - = = Yg N*N(u7bv  U s e r R o l e   
TW[:N  ' A d m i n ' RN:N  A d m i n     ~+Rv(u7b
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  A d m i n 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r A d m i n   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s A d m i n   I N T 
 
 	 S E T   @ I s A d m i n = 0 	 
 
 
 
 	 / * 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = S_MR(u7b
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C u r r e n t U s e r   N V A R C H A R ( 5 0 ) 
 
 
 
 	 I F   @ N a m e   I S   N U L L 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = d b o . U D F _ U s e r C u r r e n t ( ) 
 
 	 	 E N D 
 
 	 E L S E 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = @ N a m e 
 
 	 	 E N D 
 
 
 
 	 * / 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  U s e r R o l e   v
TW[:N  ' A d m i n '   R:N  A d m i n 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S E L E C T   [ I D ]   F R O M   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e   A N D   U s e r R o l e = d b o . U D F _ U s e r R o l e I D ( N ' A d m i n ' ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s A d m i n = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s A d m i n 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r A d m i n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r R o l e I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r R o l e I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r R o l e I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  U s e r R o l e N a m e   g  U s e r R o l e   hԏV  U s e r R o l e I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ U s e r R o l e N a m e   - -   c[v҉r
T
 
 - - = = ԏV~gI n t   - -   ҉rv  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r R o l e I D ( @ U s e r R o l e N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ U s e r R o l e I D   I N T 
 
 	 S E T   @ U s e r R o l e I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = S_MR  @ U s e r R o l e N a m e   [^v  U s e r R o l e   I D 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S e l e c t   [ I D ]   F r o m   d b o . U s e r R o l e   W h e r e   R T R I M ( L T R I M ( [ N a m e ] ) ) = R T R I M ( L T R I M ( @ U s e r R o l e N a m e ) ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ U s e r R o l e I D = ( S e l e c t   [ I D ]   F r o m   d b o . U s e r R o l e   W h e r e   R T R I M ( L T R I M ( [ N a m e ] ) ) = R T R I M ( L T R I M ( @ U s e r R o l e N a m e ) ) ) 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ U s e r R o l e I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r R o l e I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r M o d e r a t o r         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r M o d e r a t o r ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r M o d e r a t o r ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:Ng*N  F o r u m   v  M o d e r a t o r     (u7b
 
 - - = = [N  M o d e r a t o r     (u7bSNhQb{t,g[WOmȉS4V
Y Rdn^P[r`yR
Y6R	
 
 - - = = Yg N*N(u7bQs(Wg*N  F o r u m   bvQ
N~  C o m m u n i t y   v  M o d e r a t o r   -N  l i l y , c i c i 	RN:N  F o r u m   v  M o d e r a t o r 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  M o d e r a t o r 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r M o d e r a t o r   ( @ N a m e   n v a r c h a r ( 5 0 ) , @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s M o d e r a t o r   I N T 
 
 	 S E T   @ I s M o d e r a t o r = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N~[  F o r u m   -N_  M o d e r a t o r   yv
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ M o d e r a t o r   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ M o d e r a t o r = f p . M o d e r a t o r   F R O M   d b o . V i e w _ F o r u m P e r m i s s i o n   f p   W H E R E   f p . F o r u m I D = @ F o r u m I D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  M o d e r a t o r = 1   NvQ^\Nc[  F o r u m R:N  M o d e r a t o r 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ N a m e   I N   ( S e l e c t   E l e m e n t   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ M o d e r a t o r , N ' , ' ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s M o d e r a t o r = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s M o d e r a t o r 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r M o d e r a t o r ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r C o m m u n i t y         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r C o m m u n i t y ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r C o m m u n i t y ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:N  C o m m u n i t y     ~+Rv(u7b
 
 - - = = S	g  C o m m u n i t y     ~+Rv(u7bMbSNS^
 
 - - = = Yg N*N(u7bv  U s e r R o l e   
TW[:N  ' C o m m u n i t y ' RN:N  C o m m u n i t y     ~+Rv(u7b
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  C o m m u n i t y 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r C o m m u n i t y   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s C o m m u n i t y   I N T 
 
 	 S E T   @ I s C o m m u n i t y = 0 	 
 
 
 
 	 / * 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = S_MR(u7b
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C u r r e n t U s e r   N V A R C H A R ( 5 0 ) 
 
 
 
 	 I F   @ N a m e   I S   N U L L 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = d b o . U D F _ U s e r C u r r e n t ( ) 
 
 	 	 E N D 
 
 	 E L S E 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = @ N a m e 
 
 	 	 E N D 
 
 	 * / 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  U s e r R o l e   v
TW[:N  ' C o m m u n i t y '   R:N  C o m m u n i t y 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S E L E C T   [ I D ]   F R O M   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e   A N D   U s e r R o l e = d b o . U D F _ U s e r R o l e I D ( N ' C o m m u n i t y ' ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s C o m m u n i t y = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s C o m m u n i t y 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r C o m m u n i t y ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t F o r u m I D F r o m F o l l o w U p I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t F o r u m I D F r o m F o l l o w U p I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m F o l l o w U p I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  F o l l o w U p I D   ԏV  F o r u m I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ F o l l o w U p I D   - -   ߍ^v  I D 
 
 - - = = ԏV~gI n t   - -   F o r u m   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t F o r u m I D F r o m F o l l o w U p I D ( @ F o l l o w U p I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ F o r u m I D   I N T 
 
 	 S E T   @ F o r u m I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = _
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E T   @ F o r u m I D = ( S e l e c t   F o r u m I D   F r o m   d b o . T o p i c   W h e r e   [ I D ]   = ( s e l e c t   T o p i c I D   f r o m   d b o . F o l l o w U p   w h e r e   [ I D ] = @ F o l l o w U p I D ) ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ F o r u m I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m F o l l o w U p I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t F o r u m I D F r o m T o p i c I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t F o r u m I D F r o m T o p i c I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m T o p i c I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  T o p i c I D   ԏV  F o r u m I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ T o p i c I D   - -   ;Nv  I D 
 
 - - = = ԏV~gI n t   - -   F o r u m   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t F o r u m I D F r o m T o p i c I D ( @ T o p i c I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ F o r u m I D   I N T 
 
 	 S E T   @ F o r u m I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = _
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E T   @ F o r u m I D = ( S e l e c t   F o r u m I D   F r o m   d b o . T o p i c   W h e r e   [ I D ]   = @ T o p i c I D ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ F o r u m I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m T o p i c I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t T o p i c I D F r o m F o l l o w U p I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t T o p i c I D F r o m F o l l o w U p I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t T o p i c I D F r o m F o l l o w U p I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  F o l l o w U p I D   ԏV  T o p i c I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ F o l l o w U p I D   - -   ߍ^v  I D 
 
 - - = = ԏV~gI n t   - -   T o p i c   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t T o p i c I D F r o m F o l l o w U p I D ( @ F o l l o w U p I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ T o p i c I D   I N T 
 
 	 S E T   @ T o p i c I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = _
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E T   @ T o p i c I D = ( S e l e c t   T o p i c I D   F r o m   d b o . F o l l o w U p   W h e r e   [ I D ]   = @ F o l l o w U p I D ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ T o p i c I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t T o p i c I D F r o m F o l l o w U p I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c L o g i n E x i s t s         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c L o g i n E x i s t s ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c L o g i n E x i s t s ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&TX[(WN    m a s t e r . . s y s l o g i n s   
 
 - - = = YgX[(WԏV  1   &TRԏV  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   X[(W/ 
NX[(W
 
 - - = =   U D F   vMR]~l	g[(uN<PSN Rd	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c L o g i n E x i s t s   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ L o g i n E x i s t s   I N T 
 
 	 S E T   @ L o g i n E x i s t s = 0 	 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg~[(u7bX[(WN    m a s t e r . d b o . s y s l o g i n s   RԏV  1   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ N a m e   I N   ( S e l e c t   [ n a m e ]   F r o m   m a s t e r . d b o . s y s l o g i n s ) 
 
 	 B E G I N 
 
 	 	 S E T   @ L o g i n E x i s t s = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ L o g i n E x i s t s 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c L o g i n E x i s t s ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c P r o f i l e E x i s t s         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c P r o f i l e E x i s t s ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c P r o f i l e E x i s t s ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7bv  P r o f i l e   /f&T]~X[(WN  U s e r s   h
 
 - - = = 	N*NQpe  U D F _ P u b l i c L o g i n E x i s t s ( ) , U D F _ P u b l i c U s e r E x i s t s ( ) , U D F _ P u b l i c P r o f i l e E x i s t s ( )    Nw(uegnx[ N*N,g|~(u7bvX[(W/f&T[te_{  L o g i n , U s e r , P r o f i l e X[(WMb{[te	
 
 - - = = YgX[(WԏV  1   &TRԏV  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0     X[(W/ 
NX[(W
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 1 - 2 8 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c P r o f i l e E x i s t s   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ P r o f i l e E x i s t s   I N T 
 
 	 S E T   @ P r o f i l e E x i s t s = 0 	 	 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg~[(u7bX[(WN  U s e r s   h  RԏV  1   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ N a m e   I N   ( S e l e c t   [ N a m e ]   F r o m   d b o . U s e r s )   
 
 	 B E G I N 
 
 	 	 S E T   @ P r o f i l e E x i s t s = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ P r o f i l e E x i s t s 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c P r o f i l e E x i s t s ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c U s e r E x i s t s         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c U s e r E x i s t s ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c U s e r E x i s t s ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&TX[(WNS_MRpenc^v    s y s u s e r s   h
 
 - - = = YgX[(WԏV  1   &TRԏV  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   X[(W/ 
NX[(W
 
 - - = = vMR  U D F   ]~l	g[E(uY  SN Rd	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c U s e r E x i s t s   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ U s e r E x i s t s   I N T 
 
 	 S E T   @ U s e r E x i s t s = 0 	 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg~[(u7bX[(WN    d b o . s y s u s e r s   RԏV  1   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ N a m e   I N   ( S e l e c t   [ n a m e ]   F r o m   d b o . s y s u s e r s )   
 
 	 B E G I N 
 
 	 	 S E T   @ U s e r E x i s t s = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ U s e r E x i s t s 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c U s e r E x i s t s ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c L o g i n O n l i n e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c L o g i n O n l i n e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c L o g i n O n l i n e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&T(W~,     (u  S P _ W H O   ُ̑[E/fN  S P _ W H O   -N_N NNNxV:N  U D F   -Nel  S P   -NԏVvU_	
 
 - - = = YgX[(WԏV  1   &TRԏV  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
 
 - - = = ԏV~gI n t   - -   1 / 0     (W~/ 
N(W~
 
 - - = = vMR  U D F   ]~l	g[E(uYSN Rd	
 
 - - = = ُ*N  U D F   vMRf\PO(uV:NbNs(WO(u  T a b l e   ~(u7b|~
NQO(u  m a s t e r . d b o . s y s p r o c e s s e s   _(u7b(W~Oo`vMRbN:_ԏV  0   h:y
N(W~0NTSNQ^zev(W~hg:g6R
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c L o g i n O n l i n e   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ L o g i n O n l i n e   I N T 
 
 	 S E T   @ L o g i n O n l i n e = 0 	 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg~[(u7bX[(WN    m a s t e r . d b o . s y s p r o c e s s e s   RԏV  1   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 / * 
 
 	 I F   E X I S T S   ( S E L E C T   s p i d   F R O M     m a s t e r . d b o . s y s p r o c e s s e s   W H E R E   s p i d   > =   0   A N D   s p i d   < =   3 2 7 6 7   A N D   L T R I M ( R T R I M ( l o g i n a m e ) ) = L T R I M ( R T R I M ( @ N a m e ) ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ L o g i n O n l i n e = 1 
 
 	 E N D 
 
 	 * / 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ L o g i n O n l i n e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c L o g i n O n l i n e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t C o m m u n i t y I D F r o m F o r u m I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t C o m m u n i t y I D F r o m F o r u m I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t C o m m u n i t y I D F r o m F o r u m I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  F o r u m I D   ԏV  C o m m u n i t y I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   C o m m u n i t y   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t C o m m u n i t y I D F r o m F o r u m I D ( @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C o m m u n i t y I D   I N T 
 
 	 S E T   @ C o m m u n i t y I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = _
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E T   @ C o m m u n i t y I D = ( S e l e c t   C o m m u n i t y I D   F r o m   d b o . F o r u m   W h e r e   [ I D ]   = @ F o r u m I D ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ C o m m u n i t y I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t C o m m u n i t y I D F r o m F o r u m I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r R o l e J o i n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r R o l e J o i n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r R o l e J o i n ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe9hnc~[v(u7b
TN  U s e r s   h_(u7b@b	g  U s e r R o l e     f~ub  1 , 2    N7hvW[&{2N
 
 - - = = ُ*NW[&{2N(WwQSO^(u-N\؏Sb  U s e r R o l e   Rh
 
 - - = =   S P   U s e r A c c o u n t S e l e c t   (u
 
 - - = = (uN  U I . A d m i n . A c c o u n t . U s e r A c c o u n t U I . c s   D a t a B i n d ( )   el
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gޏcwegvW[&{2NOY1 , 2 	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r R o l e J o i n   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 4 0 0 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVvW[&{2N
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ U s e r R o l e s   N V A R C H A R ( 4 0 0 0 ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = \N  U s e r s   ԏVv  U s e r R o l e   (u      ޏc  (u  C O A L E S C E ( )   Qpe[s	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   
 
 
 
 	 	 @ U s e r R o l e s = C O A L E S C E ( @ U s e r R o l e s + N ' , ' , N ' ' )   +   C O N V E R T ( N V A R C H A R ( 2 0 ) , U s e r R o l e ) 
 
 
 
 	 F R O M   d b o . U s e r s 
 
 
 
 	 W H E R E   [ N a m e ] = @ N a m e 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ U s e r R o l e s 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r R o l e J o i n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ M o d e r a t o r C l e a n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ M o d e r a t o r C l e a n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ M o d e r a t o r C l e a n ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe(W:N  F o r u m   RM  M o d e r a t o r   veP~Qv  M o d e r a t o r   S
NX[(WsSgN(u7bS9h,g1\l	gQs(W  U s e r s   h
 
 - - = = ُ*NQpe1\/f\ُ7hv(u7bN    @ M o d e r a t o r   Rh-NTRd
 
 - - = =   S P   F o r u m S a v e ,   F o r u m M o d i f y   (u
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ M o d e r a t o r   - -   ezRhN   ,       _	
 
 - - = = ԏV~gޏcwegvW[&{2NN   ,       _	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ M o d e r a t o r C l e a n   ( @ M o d e r a t o r   n v a r c h a r ( 1 0 0 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 1 0 0 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVvW[&{2N
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ M o d e r a t o r C l e a n   N V A R C H A R ( 1 0 0 0 ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QS
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   
 
 
 
 	 	 @ M o d e r a t o r C l e a n = C O A L E S C E ( @ M o d e r a t o r C l e a n + N ' , ' , N ' ' ) +   [ N a m e ]   
 
 
 
 	 F R O M   ( S e l e c t   D i s t i n c t   E l e m e n t   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ M o d e r a t o r , N ' , ' ) )   m o l   
 
 
 
 	 I N N E R   J O I N   ( S e l e c t   D i s t i n c t   [ N a m e ]   F r o m   d b o . U s e r s )   u s r   O N   m o l . E l e m e n t = u s r . [ N a m e ] 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ M o d e r a t o r C l e a n 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ M o d e r a t o r C l e a n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r D e d i c a t e d T o         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r D e d i c a t e d T o ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r D e d i c a t e d T o ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T(Wg*N  K n o w l e d g e   v  D e d i c a t e d T o   VQ
 
 - - = = /f:N  1   
N/f:N  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  D e d i c a t e d T o   VQ
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r D e d i c a t e d T o   ( @ N a m e   n v a r c h a r ( 5 0 ) ,   @ D e d i c a t e d T o   N V A R C H A R ( 4 0 0 0 ) ) 
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s D e d i c a t e d T o   I N T 
 
 	 S E T   @ I s D e d i c a t e d T o = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = gwS_MR(u7b/f&TMON  D e d i c a t e d T o   Rh
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ N a m e   I N   ( S e l e c t   [ U s e r ]   F r o m   d b o . U D F _ U s e r R e s o l v e ( @ D e d i c a t e d T o ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s D e d i c a t e d T o = 1 
 
 	 E N D 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s D e d i c a t e d T o 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r D e d i c a t e d T o ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t F o r u m I D F r o m C o m m u n i t y I D         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t F o r u m I D F r o m C o m m u n i t y I D ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m C o m m u n i t y I D ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  C o m m u n i t y I D   ԏV  C o m m u n i t y   N,{ N*NSNԏVv  F o r u m   v  I D 
 
 - - = = Q
NTCgP
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ C o m m u n i t y I D   - -   >y:Sv  I D 
 
 - - = = ԏV~gI n t   - -   F o r u m   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t F o r u m I D F r o m C o m m u n i t y I D ( @ U s e r   n v a r c h a r ( 5 0 ) , @ C o m m u n i t y I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ F o r u m I D   I N T 
 
 	 S E T   @ F o r u m I D = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = _
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E T   @ F o r u m I D = ( S e l e c t   T o p   1   f o . [ I D ]   F R O M   d b o . F o r u m   f o   W h e r e   f o . C o m m u n i t y I D   =   @ C o m m u n i t y I D   A n d   d b o . U D F _ F o r u m R e a d a b l e ( @ U s e r , f o . [ I D ] ) = 1   O r d e r   B y   f o . S e r i a l ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ F o r u m I D 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t F o r u m I D F r o m C o m m u n i t y I D ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ K n o w l e d g e C o m m e n t s P e r m i s s i o n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ K n o w l e d g e C o m m e n t s P e r m i s s i o n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ K n o w l e d g e C o m m e n t s P e r m i s s i o n ] 
 
 G O 
 
 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[wƋ/f&T(WS_MR(u7b  c o n t e x t   SNċ
 
 - - = = <P  0   NUO(u7b
NSNċ[7bz
NQċLub	ln o n e   b	g~[CgZS  C o m m e n t s P e r m i s s i o n   -NS+T N*N  n o n e R
N{vQ[CgPYUO[INybkċ	
 
 - - = = <P  1   NUO(u7bSNċ[7bzQċeQFhT N*N(u7b
TFh(u7bSNaeQ(u7b
T
NSN	
 
 - - = = <P  2   S_MR(u7b]~{vFTe&{TċCgP[7bzQ N*NċeQFhsSS
N Q(u7b[xeQFh|~ꁨR(uS_MR{vF^7bOo`	
 
 - - = = <P  3   S_MR(u7bl	g{vFFOS_MRwƋAQc[(u7bċ[7bzQċLubTeQ(u7b
T[xeQFh(u7bdNeQċY؏eQ^7bOo`	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ K n o w l e d g e I D   - -   ~[wƋv  I D 
 
 - - = = eQSpe@ U s e r   - -   ~[(u7b
 
 - - = = ԏV~gI n t   - -   0 / 1 / 2   / 3 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 2   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ K n o w l e d g e C o m m e n t s P e r m i s s i o n   ( @ K n o w l e d g e I D   I N T ,   @ U s e r   N V A R C H A R ( 5 0 ) ) 
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e s u l t   I N T 
 
 	 S E T   @ R e s u l t = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~[wƋv  C o m m e n t s P e r m i s s i o n   ^\'`    O(u  V i e w _ K n o w l e d g e P e r m i s s i o n   S/}yv  V i e w _ K n o w l e d g e P e r m i s s i o n 	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C o m m e n t s P e r m i s s i o n     N V A R C H A R ( 4 0 0 0 ) 
 
 
 
 	 S E L E C T   @ C o m m e n t s P e r m i s s i o n   = R T R I M ( L T R I M ( n o w p . C o m m e n t s P e r m i s s i o n ) ) 
 
 	 F R O M   d b o . K n o w l e d g e   n o w   
 
 	 L E F T   J O I N   d b o . V i e w _ K n o w l e d g e P e r m i s s i o n   n o w p   O N   n o w p . K n o w l e d g e I D = n o w . [ I D ] 	 
 
 	 W H E R E   [ I D ] = @ K n o w l e d g e I D 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Ty`b_
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - I F   L O W E R ( @ C o m m e n t s P e r m i s s i o n ) = N ' n o n e ' 
 
 	 I F   N ' n o n e '   I N   ( S e l e c t   [ E l e m e n t ]   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ C o m m e n t s P e r m i s s i o n , N ' , ' ) ) 
 
 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = C o m m e n t s P e r m i s s i o n = N ' n o n e ' R[
NAQċ  sSO/f  a d m i n   _N
NAQ	n o n e   b	g~[CgZ
N{  M a i n D i r e c t o r y ,   S u b D i r e c t o r y ,   P a g e D i r e c t o r y ,   K n o w l e d g e   YUO[INSQs N*N  n o n e @b	gvQ[[INꁨR1YHen o n e   w\O(u	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E T   @ R e s u l t = 0 	 
 
 	 	 E N D 
 
 
 
 	 - - E L S E   I F   ( @ C o m m e n t s P e r m i s s i o n   I S   N U L L )   O R   ( @ C o m m e n t s P e r m i s s i o n = N ' ' )   O R   ( @ C o m m e n t s P e r m i s s i o n = N ' * '   ) 
 
 	 - - E L S E   I F   ( @ C o m m e n t s P e r m i s s i o n   I S   N U L L )   O R   @ C o m m e n t s P e r m i s s i o n = N ' ' 
 
 	 E L S E   I F   R E P L A C E ( @ C o m m e n t s P e r m i s s i o n , N ' , ' , N ' ' ) = N ' ' 
 
 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = C o m m e n t s P e r m i s s i o n   :NzzW[&{R[AQċ    NUONAQsSO
N{vF	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E T   @ R e s u l t = 1 
 
 	 	 E N D 
 
 
 
 	 E L S E   I F   d b o . U D F _ U s e r A d m i n ( @ U s e r ) = 1 
 
 	 - - E L S E   I F   ( @ C o m m e n t s P e r m i s s i o n = N ' * '     A N D   d b o . U D F _ U s e r C l i e n t ( @ U s e r ) = 1 )   O R   d b o . U D F _ U s e r A d m i n ( @ U s e r ) = 1 
 
 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = S_MR(u7b/f  A d m i n RAQċ  ]~{vF	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E T   @ R e s u l t = 2 
 
 	 	 E N D 
 
 
 
 	 - - E L S E   I F   @ U s e r   I N   ( S e l e c t   [ E l e m e n t ]   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ C o m m e n t s P e r m i s s i o n , N ' , ' ) ) 
 
 	 E L S E   I F   @ U s e r   I N   ( S e l e c t   [ U s e r ]   F r o m   d b o . U D F _ U s e r R e s o l v e ( @ C o m m e n t s P e r m i s s i o n ) ) 
 
 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = S_MR(u7bMONAQċ(u7bRh-NRAQċ]~{vF	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E T   @ R e s u l t = 2 
 
 	 	 E N D 
 
 
 
 	 E L S E 
 
 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = vQ[`b_c:y[7bz  R e n d e r   (u7b
T[xeQFhTe  R e n d e r   ċeQFh(u7beQ  C o m m e n t s   vTeeQ(u7b
T[x|~(WOX[ċKNMRHQ(u7b/f&TTl
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E T   @ R e s u l t = 3 	 
 
 	 	 E N D 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ R e s u l t 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ K n o w l e d g e C o m m e n t s P e r m i s s i o n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r C h i e f E d i t o r         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r C h i e f E d i t o r ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r C h i e f E d i t o r ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:N  C h i e f   E d i t o r 
 
 - - = = [N  C h i e f   E d i t o r     ~+Rv(u7bvQb	gte*NzpvQ[CgP
 
 - - = = Yg N*N(u7bv  U s e r R o l e   
TW[:N  '   C h i e f   E d i t o r ' RN:N    C h i e f   E d i t o r     ~+Rv(u7b
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T    C h i e f   E d i t o r 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r C h i e f E d i t o r   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s C h i e f E d i t o r   I N T 
 
 	 S E T   @ I s C h i e f E d i t o r = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  U s e r R o l e   v
TW[:N  ' C h i e f   E d i t o r '   R:N  C h i e f   E d i t o r 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S E L E C T   [ I D ]   F R O M   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e   A N D   U s e r R o l e = d b o . U D F _ U s e r R o l e I D ( N ' C h i e f   E d i t o r ' ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s C h i e f E d i t o r = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s C h i e f E d i t o r 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r C h i e f E d i t o r ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r A d m i n E d i t o r         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r A d m i n E d i t o r ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r A d m i n E d i t o r ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:N  A d m i n   b  C h i e f   E d i t o r ,   C o l u m n   E d i t o r       ~+Rv(u7b
 
 - - = = (W  S P   K n o w l e d g e G e t ,   S P   M e n u M a i n D i r e c t o r y S u b D i r e c t o r y P a g e D i r e c t o r y   I{:WTbN(u_0R  ُ*N  ~+Rv(u7b
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  A d m i n E d i t o r 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 7   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r A d m i n E d i t o r   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s A d m i n E d i t o r   I N T 
 
 	 S E T   @ I s A d m i n E d i t o r = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  U s e r R o l e   v
TW[:N  ' A d m i n '     b  ' C h i e f   E d i t o r '   b  ' C o l u m n   E d i t o r ' R:N  A d m i n E d i t o r 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S E L E C T   [ I D ]   F R O M   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e   A N D   U s e r R o l e   I N   ( d b o . U D F _ U s e r R o l e I D ( N ' A d m i n ' ) , d b o . U D F _ U s e r R o l e I D ( N ' C h i e f   E d i t o r ' ) , d b o . U D F _ U s e r R o l e I D ( N ' C o l u m n   E d i t o r ' ) ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s A d m i n E d i t o r = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s A d m i n E d i t o r 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r A d m i n E d i t o r ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r C o l u m n E d i t o r         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r C o l u m n E d i t o r ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r C o l u m n E d i t o r ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T:N  C o l u m n   E d i t o r 
 
 - - = = ,g  U D F   v\O(u/fJTɋ  M e n u   [a~T  U D F _ U s e r C h i e f E d i t o r 	S_MR(u7b^\N  E d i t o r 
 
 - - = = Yg N*N(u7bv  U s e r R o l e   
TW[:N  '   C o l u m n   E d i t o r ' RN:N    C o l u m n   E d i t o r     ~+Rv(u7b
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T    C o l u m n   E d i t o r 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r C o l u m n E d i t o r   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s C o l u m n E d i t o r   I N T 
 
 	 S E T   @ I s C o l u m n E d i t o r = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bv  U s e r R o l e   v
TW[:N  ' C o l u m n   E d i t o r '   R:N  C o l u m n   E d i t o r 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S E L E C T   [ I D ]   F R O M   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e   A N D   U s e r R o l e = d b o . U D F _ U s e r R o l e I D ( N ' C o l u m n   E d i t o r ' ) ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s C o l u m n E d i t o r = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s C o l u m n E d i t o r 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ U s e r C o l u m n E d i t o r ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O N   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G r o u p M e m b e r s J o i n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G r o u p M e m b e r s J o i n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G r o u p M e m b e r s J o i n ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe9hnc~[v  G r o u p   
TN  U s e r G r o u p s   h_  G r o u p   @b	gbXTub  e l e a n o r , j a c k i e , h e n r y    N7hvW[&{2N
 
 - - = =   S P   U s e r G r o u p S e l e c t   (u
 
 - - = = (uN  U I . A d m i n . A c c o u n t . U s e r G r o u p U I . c s   D a t a B i n d ( )   el
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ G r o u p N a m e   - -   ~
T
 
 - - = = ԏV~gޏcwegvW[&{2NOYe l e a n o r , j a c k i e , h e n r y 	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 2   
 
 - - = = ,g  U D F   V:N  G r o u p M e m b e r s   Speϑ^'YvEefe_(uYgg*N  G r o u p   Nv(u7bpeϑ^'YȒُԏVv~gSǏ  n v a r c h a r ( 4 0 0 0 ) 	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G r o u p M e m b e r s J o i n   ( @ G r o u p N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 4 0 0 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVvW[&{2N
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ G r o u p M e m b e r s   N V A R C H A R ( 4 0 0 0 ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = \N  U s e r G r o u p s   ԏVv  G r o u p M e m b e r   (u   ,    ޏc  (u  C O A L E S C E ( )   Qpe[s	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   
 
 
 
 	 	 @ G r o u p M e m b e r s = C O A L E S C E ( @ G r o u p M e m b e r s + N ' , ' , N ' ' )   +   C O N V E R T ( N V A R C H A R ( 5 0 ) , [ U s e r ] ) 
 
 
 
 	 F R O M   d b o . U s e r G r o u p s   u g s 
 
 	 L E F T   J O I N   d b o . U s e r G r o u p   u g   O N   u g . [ I D ] = u g s . U s e r G r o u p I D 
 
 
 
 	 W H E R E   u g . G r o u p N a m e = @ G r o u p N a m e 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ G r o u p M e m b e r s 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G r o u p M e m b e r s J o i n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ E d i t o r D e d i c a t e d T o         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ E d i t o r D e d i c a t e d T o ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ E d i t o r D e d i c a t e d T o ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏVS_MR(u7b/f&T(Wg*N  D i r e c t o r y   ( M a i n D i r e c t o r y ,   S u b D i r e c t o r y ,   P a g e D i r e c t o r y ,   K n o w l e d g e )     v  E d i t o r     VQ
 
 - - = = /f:N  1   
N/f:N  0 
 
 - - = =   U D F   T  U D F _ U s e r D e d i c a t e d T o   He(u/f N7hvFO(u(W  E d i t o r   :WTfIN NN
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T  E d i t o r   VQ
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 2   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ E d i t o r D e d i c a t e d T o   ( @ N a m e   n v a r c h a r ( 5 0 ) ,   @ D e d i c a t e d T o   N V A R C H A R ( 4 0 0 0 ) ) 
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s D e d i c a t e d T o   I N T 
 
 	 S E T   @ I s D e d i c a t e d T o = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = gwS_MR(u7b/f&TMON  D e d i c a t e d T o   Rh  Te_NO(u7bnx[/f  A d m i n E d i t o r   CgP2bk:Ng*NhvRMCgPeeQNg*N(u7b6q(u7btSv^^  A d m i n E d i t o r   `b_	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   ( @ N a m e   I N   ( S e l e c t   [ U s e r ]   F r o m   d b o . U D F _ U s e r R e s o l v e ( @ D e d i c a t e d T o ) ) )   A N D   ( d b o . U D F _ U s e r A d m i n E d i t o r ( @ N a m e ) = 1 ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s D e d i c a t e d T o = 1 
 
 	 E N D 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s D e d i c a t e d T o 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ E d i t o r D e d i c a t e d T o ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t O v e r v i e w P a g e D i r e c t o r y         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  M a i n D i r e c t o r y   |   S u b D i r e c t o r y   F l a g ,   NSvQ  I D ԏV  M a i n D i r e c t o r y   b  S u b D i r e c t o r y   v  O v e r v i e w   P a g e D i r e c t o r y   I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ K n o w l e d g e D i r e c t o r y   -   M a i n D i r e c t o r y   |   S u b D i r e c t o r y 
 
 - - = = eQSpe@ K n o w l e d g e I t e m   -   vQ  I D 
 
 - - = = ԏV~gvQ  O v e r v i e w   P a g e D i r e c t o r y   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 4 - 0 8 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t O v e r v i e w P a g e D i r e c t o r y ( @ K n o w l e d g e D i r e c t o r y   n v a r c h a r ( 1 0 0 ) , @ K n o w l e d g e I t e m   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e t u r n V a l u e   I N T 
 
 	 S E T   @ R e t u r n V a l u e = 0 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg/f  M a i n D i r e c t o r y 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ K n o w l e d g e D i r e c t o r y = N ' M a i n D i r e c t o r y ' 
 
 
 
 	 B E G I N 
 
 	 	 S E L E C T   
 
 	 	 
 
 	 	 	 @ R e t u r n V a l u e = p d . [ I D ] 
 
 	 
 
 	 	 F R O M   d b o . P a g e D i r e c t o r y   p d 
 
 	 	 L E F T   J O I N   d b o . S u b D i r e c t o r y   s d   O N   s d . [ I D ] = p d . S u b D i r e c t o r y I D 
 
 	 	 L E F T   J O I N   d b o . M a i n D i r e c t o r y   m d   O N   m d . [ I D ] = s d . M a i n D i r e c t o r y I D 
 
 	 	 
 
 	 	 W H E R E   p d . O v e r v i e w = 1   A N D   s d . O v e r v i e w = 1   A N D   m d . [ I D ] = @ K n o w l e d g e I t e m 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg/f  S u b D i r e c t o r y 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 E L S E   I F   @ K n o w l e d g e D i r e c t o r y = N ' S u b D i r e c t o r y ' 
 
 
 
 	 B E G I N 
 
 	 	 S E L E C T   
 
 	 	 
 
 	 	 	 @ R e t u r n V a l u e = p d . [ I D ] 
 
 	 
 
 	 	 F R O M   d b o . P a g e D i r e c t o r y   p d 
 
 	 	 L E F T   J O I N   d b o . S u b D i r e c t o r y   s d   O N   s d . [ I D ] = p d . S u b D i r e c t o r y I D 
 
 	 	 
 
 	 	 W H E R E   p d . O v e r v i e w = 1   A N D   s d . [ I D ] = @ K n o w l e d g e I t e m 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ R e t u r n V a l u e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c C u l t u r e s         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c C u l t u r e s ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c C u l t u r e s ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV|~  C u l t u r e s   Rh
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpee
 
 - - = = ԏV~gh  - -   yRh  e n - u s     |     z h - c n     |   z h - t w 	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 3 - 2 2 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c C u l t u r e s ( )     
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ԏVvh~g
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 R E T U R N S   @ C u l t u r e s   T A B L E   
 
 	 	 	 	 	 ( 
 
 	 	 	 	 	 C u l t u r e   n v a r c h a r ( 1 0 0 )   C O L L A T E   d a t a b a s e _ d e f a u l t 
 
 	 	 	 	 	 ) 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N  O p t i o n   hԏV  C u l t u r e s   U_
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C u l t u r e S e t t i n g   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ C u l t u r e S e t t i n g = C O N V E R T ( N V A R C H A R ( 4 0 0 0 ) , o p t . [ V a l u e ] )   F R O M   d b o . [ O p t i o n ]   o p t   W H E R E   o p t . [ K e y ] = N ' C u l t u r e s ' 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVyRh
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I N S E R T   @ C u l t u r e s ( C u l t u r e )   S E L E C T   L E F T ( C O N V E R T ( N V A R C H A R ( 4 0 0 0 ) , [ E l e m e n t ] ) , C H A R I N D E X ( N ' : ' , C O N V E R T ( N V A R C H A R ( 4 0 0 0 ) , [ E l e m e n t ] ) ) - 1 )   F R O M   d b o . U D F _ P u b l i c S p l i t ( @ C u l t u r e S e t t i n g , N ' , ' ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N 
 
 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     S E L E C T     O N   [ d b o ] . [ U D F _ P u b l i c C u l t u r e s ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ M u l t i C u l t u r e O p t i o n V a l u e G e t         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ M u l t i C u l t u r e O p t i o n V a l u e G e t ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ M u l t i C u l t u r e O p t i o n V a l u e G e t ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeN  O p t i o n   hԏVc[  K e y   c[  C u l t u r e   Nv  V a l u e 
 
 - - = =  ㉐g{|<O  < c u l t u r e   n a m e = " z h - c n "   v a l u e = " "   / > < c u l t u r e   n a m e = " "   v a l u e = " e n - u s "   / >    N{|v<P
 
 - - = = ,g  U D F   /f  A S P X   z  C o m m o n H e l p e r . M u l t i C u l t u r e O p t i o n V a l u e G e t ( )   Qpev  S Q L   Hr  ( FOeQSpe
N N7h) 
 
 - - = = la,g  U D F   	g$N*NP6R1 .   S㉐g;`^(W  4 0 0 0   W[&{KNQv<P    2 . 
N  u n e s c a p e   <P-Nv  X M L   e s c a p e   W[&{  Yy  O p t i o n   V a l u e   /f~ǏN  X M L   e s c a p e   Ytv	    Vdk  U D F   v^(uVSPN  S P   S u b D i r e c t o r y C r e a t e O v e r v i e w P a g e D i r e c t o r y C o n t e n t 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ K e y   n v a r c h a r ( 1 0 0 )   -   O p t i o n   h-NvT*Ny
 
 - - = = eQSpe@ C u l t u r e   n v a r c h a r ( 1 0 0 )   -   T*NyNv
 
 - - = = ԏV~gn v a r c h a r ( 4 0 0 0 )   - -     O p t i o n   (W  @ C u l t u r e   yNv  v a l u e 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 3 - 2 2 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ M u l t i C u l t u r e O p t i o n V a l u e G e t   ( @ K e y   n v a r c h a r ( 1 0 0 ) , @ C u l t u r e   n v a r c h a r ( 1 0 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 4 0 0 0 )   
 
 
 
 A S     
 
 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e t u r n V a l u e   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E T   @ R e t u r n V a l u e = N ' ' 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ V a l u e   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ V a l u e = o p t . [ V a l u e ]   F R O M   d b o . [ O p t i o n ]   o p t   W H E R E   o p t . [ K e y ] = @ K e y 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = O(u  S p l i t   Qpe\  @ V a l u e   Rb  US*N  I n s t a n c e   v^g^  C U R S O R 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ V a l u e C u r r e n t   N V A R C H A R ( 4 0 0 0 ) 
 
 
 
 	 D E C L A R E   V a l u e _ C u r s o r   C U R S O R   F O R   S E L E C T   [ E l e m e n t ]   F R O M   d b o . U D F _ P u b l i c S p l i t ( @ V a l u e , N ' / > < c u l t u r e ' ) 
 
 	 O P E N   V a l u e _ C u r s o r 
 
 	 F E T C H   N E X T   F R O M   V a l u e _ C u r s o r   I N T O   @ V a l u e C u r r e n t 
 
 
 
 	 W H I L E   @ @ F E T C H _ S T A T U S = 0 
 
 	 B E G I N 
 
 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 - - = = NS_MRy<PRQ  V a l u e 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 D E C L A R E   @ C u l t u r e P a t t e r n   N V A R C H A R ( 1 0 0 ) 
 
 	 	 S E L E C T   @ C u l t u r e P a t t e r n = N ' n a m e = " '   +   @ C u l t u r e   +   N ' " ' 
 
 
 
 	 	 I F   C H A R I N D E X ( @ C u l t u r e P a t t e r n , @ V a l u e C u r r e n t ) > 0 
 
 	 	 B E G I N 
 
 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = S  
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 D E C L A R E   @ V a l u e P o s i t i o n   I N T 
 
 	 	 	 S E L E C T   @ V a l u e P o s i t i o n = C H A R I N D E X ( N ' v a l u e = " ' , @ V a l u e C u r r e n t ) 
 
 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = ㉐g
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 S E L E C T   @ R e t u r n V a l u e = R E P L A C E ( R E P L A C E ( S U B S T R I N G ( @ V a l u e C u r r e n t , @ V a l u e P o s i t i o n , L E N ( @ V a l u e C u r r e n t ) - @ V a l u e P o s i t i o n + 1 ) , N ' v a l u e = " ' , N ' ' ) , N ' " ' , N ' ' ) 
 
 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = GPYW[&{2N gT؏Sb  " / > "   RRSc
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 I F   R I G H T ( @ R e t u r n V a l u e , 2 ) = N ' / > ' 
 
 
 
 	 	 	 B E G I N 
 
 	 	 	 	 
 
 	 	 	 	 S E L E C T   @ R e t u r n V a l u e = L E F T ( @ R e t u r n V a l u e , L E N ( @ R e t u r n V a l u e ) - 2 ) 
 
 
 
 	 	 	 E N D 
 
 
 
 	 	 E N D 
 
 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 - - = = N N*N
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 F E T C H   N E X T   F R O M   V a l u e _ C u r s o r   I N T O   @ V a l u e C u r r e n t 
 
 
 
 	 E N D 
 
 
 
 	 C L O S E   V a l u e _ C u r s o r 
 
 	 D E A L L O C A T E   V a l u e _ C u r s o r 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ R e t u r n V a l u e 
 
 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ M u l t i C u l t u r e O p t i o n V a l u e G e t ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c L i s t S t r i c t M a t c h         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c L i s t S t r i c t M a t c h ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c L i s t S t r i c t M a t c h ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~[$N*NRhww,{ N*NRh-Nvyv/f&ThQS+T(W,{N*NRhvyv-N
 
 - - = =   U D F   (uN  S P   R e s o u r c e s Q u e r y B y T a g   (W  S P   -NbN\PRُ*N  U D F   $Reg*Nd"}v  T a g   Rh/f&T[teS+T(Wg*N  R e s o u r c e   Dnv  T a g   -N
 
 - - = = kYbN`ԏV  T a g   -NS+T  N ' P r o d u c t s + V i d e o + H D '   vDna`/f  T a g   -NTeS+T  P r o d u c t s   +   V i d e o   +   H D 	Dn-N	g N*NvQ  T a g   :N  N ' P r o d u c t s , V i d e o , H D , R M V B '   vDnRDn\ԏVYgS	g  N ' P r o d u c t s , V i d e o , R M V B '   vDnDn\
NOԏV
 
 - - = = |~(W[  T a g   ۏLDnd"}veP	g$Nyd"}!j_,{ Nyd"}  T a g   W[&{2Nh:y:N  N ' P r o d u c t s , V i d e o , H D ' RSvQ  T a g   -NS+Tُ	N*NsQ.͋-NNUO N*NvDnOԏV  ,{NyN ' P r o d u c t s + V i d e o + H D ' Rh:y_{TeS+Tُ	N*NsQ.͋vDnMbOԏV
 
 - - = = Yg9SMԏV  1   &TRԏV  0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ L i s t 1   - -   g~bvRh
 
 - - = = eQSpe@ L i s t 1 D e l i m i t e r   - -   g~bvRhvR&{
 
 - - = = eQSpe@ L i s t 2   - -   vhRh
 
 - - = = eQSpe@ L i s t 2 D e l i m i t e r   - -   vhRhvR&{
 
 - - = = ԏV~gI n t   - -   1 / 0     %N<h9SM  /   
N9SM
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 7 - 1 1 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c L i s t S t r i c t M a t c h   ( @ L i s t 1   n v a r c h a r ( 1 0 0 0 ) , @ L i s t 1 D e l i m i t e r   n v a r c h a r ( 1 0 0 ) , @ L i s t 2   n v a r c h a r ( 1 0 0 0 ) , @ L i s t 2 D e l i m i t e r   n v a r c h a r ( 1 0 0 ) )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ M a t c h   I N T 
 
 	 S E T   @ M a t c h = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = 4NeSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C o u n t 1   I N T 
 
 	 D E C L A R E   @ C o u n t 2   I N T 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = \  @ L i s t 1   ۏL  S p l i t   YtwwԏVY\*NUSrvyv^zzv	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   @ C o u n t 1 = C O U N T ( l 1 . [ E l e m e n t ] )   F R O M   d b o . U D F _ P u b l i c S p l i t ( @ L i s t 1 , @ L i s t 1 D e l i m i t e r )   l 1   W H E R E   l 1 . [ E l e m e n t ] < > N ' ' 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = 6qT\  @ L i s t 1   T  @ L i s t 2   ۏL  J o i n   v^[kԏVN9SMvyvpe^zzv	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   
 
 
 
 	 	 @ C o u n t 2 = C O U N T ( l 1 . [ E l e m e n t ] ) 
 
 
 
 	 F R O M   d b o . U D F _ P u b l i c S p l i t ( @ L i s t 1 , @ L i s t 1 D e l i m i t e r )   l 1 
 
 	 L E F T   J O I N   ( S e l e c t   [ E l e m e n t ]   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ L i s t 2 , @ L i s t 2 D e l i m i t e r ) )   l 2   o n   ( R T R I M ( L T R I M ( l 2 . [ E l e m e n t ] ) )   L I K E   ( N ' % '   +   R T R I M ( L T R I M ( l 1 . [ E l e m e n t ] ) )   +   N ' % ' ) )   
 
 
 
 	 W H E R E   l 2 . [ E l e m e n t ]   I S   N O T   N U L L   A N D   l 2 . [ E l e m e n t ] < > N ' '   A N D   l 1 . [ E l e m e n t ] < > N ' ' 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = k  @ C o u n t 1   T  @ C o u n t 2 YgNvI{R9SM&TR
N9SM
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ C o u n t 1 = @ C o u n t 2 
 
 
 
 	 B E G I N 
 
 	 	 S E T   @ M a t c h = 1 
 
 	 E N D 
 
 	 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ M a t c h 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c L i s t S t r i c t M a t c h ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t O v e r v i e w S u b D i r e c t o r y         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t O v e r v i e w S u b D i r e c t o r y ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t O v e r v i e w S u b D i r e c t o r y ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  M a i n D i r e c t o r y     I D ԏV  M a i n D i r e c t o r y   v  O v e r v i e w   S u b D i r e c t o r y   I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ K n o w l e d g e I t e m   -   vQ  I D 
 
 - - = = ԏV~gvQ  O v e r v i e w   S u b D i r e c t o r y   v  I D 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 7 - 2 0 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t O v e r v i e w S u b D i r e c t o r y ( @ K n o w l e d g e I t e m   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e t u r n V a l u e   I N T 
 
 	 S E T   @ R e t u r n V a l u e = 0 
 
 
 
 
 
 	 S E L E C T   
 
 	 	 
 
 	 	 @ R e t u r n V a l u e = s d . [ I D ] 
 
 	 
 
 	 F R O M   d b o . S u b D i r e c t o r y   s d 
 
 	 L E F T   J O I N   d b o . M a i n D i r e c t o r y   m d   O N   m d . [ I D ] = s d . M a i n D i r e c t o r y I D 
 
 	 	 
 
 	 W H E R E   s d . O v e r v i e w = 1   A N D   m d . [ I D ] = @ K n o w l e d g e I t e m 
 
 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ R e t u r n V a l u e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t O v e r v i e w S u b D i r e c t o r y ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ G e t O v e r v i e w P a g e D i r e c t o r y N a m e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y N a m e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y N a m e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~Q  M a i n D i r e c t o r y   |   S u b D i r e c t o r y   F l a g ,   NSvQ  I D ԏV  M a i n D i r e c t o r y   b  S u b D i r e c t o r y   v  O v e r v i e w   P a g e D i r e c t o r y   N a m e 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ K n o w l e d g e D i r e c t o r y   -   M a i n D i r e c t o r y   |   S u b D i r e c t o r y 
 
 - - = = eQSpe@ K n o w l e d g e I t e m   -   vQ  I D 
 
 - - = = ԏV~gvQ  O v e r v i e w   P a g e D i r e c t o r y   v  N a m e 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 8 - 0 8 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ G e t O v e r v i e w P a g e D i r e c t o r y N a m e ( @ K n o w l e d g e D i r e c t o r y   n v a r c h a r ( 1 0 0 ) , @ K n o w l e d g e I t e m   i n t )     
 
 
 
 R E T U R N S   N V A R C H A R ( 1 0 0 ) 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏVSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e t u r n V a l u e   N V A R C H A R ( 1 0 0 ) 
 
 	 S E T   @ R e t u r n V a l u e = N ' ' 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg/f  M a i n D i r e c t o r y 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   @ K n o w l e d g e D i r e c t o r y = N ' M a i n D i r e c t o r y ' 
 
 
 
 	 B E G I N 
 
 	 	 S E L E C T   
 
 	 	 
 
 	 	 	 @ R e t u r n V a l u e = p d . [ N a m e ] 
 
 	 
 
 	 	 F R O M   d b o . P a g e D i r e c t o r y   p d 
 
 	 	 L E F T   J O I N   d b o . S u b D i r e c t o r y   s d   O N   s d . [ I D ] = p d . S u b D i r e c t o r y I D 
 
 	 	 L E F T   J O I N   d b o . M a i n D i r e c t o r y   m d   O N   m d . [ I D ] = s d . M a i n D i r e c t o r y I D 
 
 	 	 
 
 	 	 W H E R E   p d . O v e r v i e w = 1   A N D   s d . O v e r v i e w = 1   A N D   m d . [ I D ] = @ K n o w l e d g e I t e m 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg/f  S u b D i r e c t o r y 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 E L S E   I F   @ K n o w l e d g e D i r e c t o r y = N ' S u b D i r e c t o r y ' 
 
 
 
 	 B E G I N 
 
 	 	 S E L E C T   
 
 	 	 
 
 	 	 	 @ R e t u r n V a l u e = p d . [ N a m e ] 
 
 	 
 
 	 	 F R O M   d b o . P a g e D i r e c t o r y   p d 
 
 	 	 L E F T   J O I N   d b o . S u b D i r e c t o r y   s d   O N   s d . [ I D ] = p d . S u b D i r e c t o r y I D 
 
 	 	 
 
 	 	 W H E R E   p d . O v e r v i e w = 1   A N D   s d . [ I D ] = @ K n o w l e d g e I t e m 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ R e t u r n V a l u e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ G e t O v e r v i e w P a g e D i r e c t o r y N a m e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c R e s o l v e F i l e N a m e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c R e s o l v e F i l e N a m e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c R e s o l v e F i l e N a m e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeN  / R e s o u r c e / I n i t i a l / C o n t e n t / r e m i n d . j p g    N{|veN_-NRyQ  r e m i n d . j p g   eN
T
 
 - - = =   S P   R e s o u r c e s A p p r o v e Q u e r y   (u
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ L o g i c a l P a t h 
 
 - - = = ԏV~gF i l e N a m e 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 0 9 - 0 9 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c R e s o l v e F i l e N a m e   ( @ L o g i c a l P a t h   n v a r c h a r ( 2 0 0 0 ) )     
 
 
 
 R E T U R N S   n v a r c h a r ( 2 0 0 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVvW[&{2N
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ F i l e N a m e   N V A R C H A R ( 2 0 0 0 ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ۏLSv  N U L L   Yt
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   @ L o g i c a l P a t h = I S N U L L ( @ L o g i c a l P a t h , N ' ' ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = Yg  L o g i c a l P a t h   -N9h,g
NX[(W  N ' / '   RvcԏVf/f~|veN
T  -   ُy`b_t
N/f
NOSuv	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   C H A R I N D E X ( N ' / ' , @ L o g i c a l P a t h ) = 0 
 
 	 
 
 	 B E G I N 
 
 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 - - = = vcԏV
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 S E L E C T   @ F i l e N a m e = @ L o g i c a l P a t h 
 
 
 
 	 E N D 
 
 
 
 	 E L S E 
 
 
 
 	 B E G I N 
 
 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 - - = = SS
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 D E C L A R E   @ R e v e r s e L o g i c a l P a t h   N V A R C H A R ( 2 0 0 0 ) 
 
 	 	 S E L E C T   @ R e v e r s e L o g i c a l P a t h = R E V E R S E ( @ L o g i c a l P a t h ) 
 
 
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 - - = = ㉐g
 
 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 S E L E C T   @ F i l e N a m e = R E V E R S E ( L E F T ( @ R e v e r s e L o g i c a l P a t h , C H A R I N D E X ( N ' / ' , @ R e v e r s e L o g i c a l P a t h ) - 1 ) ) 
 
 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ F i l e N a m e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ P u b l i c R e s o l v e F i l e N a m e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c L o g i n S p i d         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c L o g i n S p i d ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c L o g i n S p i d ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7bv  S P I D   Rh,     (u  S P _ W H O   ُ̑[E/fN  S P _ W H O   -N_N NNNxV:N  U D F   -Nel  S P   -NԏVvU_	
 
 - - = = Qpe(uN  S P   A d m i n U s e r A c c o u n t D e l e t e   (W Rd(u7bMRHQhgvQ  S P I D   YgX[(WRHQ~bkُN  S P I D   @bNhv  C o n n e c t i o n   ۏz  1\/f:_(u7bN~	6qTMbSN Rd(u7b
 
 - - = = YgSpe  @ N a m e = ' '   RԏVte*N  penc^-N@b	g  S P I D   fel	g(uY	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = ԏV~gh  - -   S p i d   U_hS N*NSY*N	
 
 - - = = vMR  U D F   ]~l	g[E(uY  SN Rd	
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c L o g i n S p i d   ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ԏVvh~g
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 R E T U R N S   @ S p i d   T A B L E 
 
 	 	 	 ( 
 
 	 	 	 S P I D   S M A L L I N T 
 
 	 	 	 ) 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = R  @ N a m e   I{NTl(u7b
TTzz<P$Ny`b_
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   L E N ( L T R I M ( R T R I M ( @ N a m e ) ) ) > 0 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = N    m a s t e r . d b o . s y s p r o c e s s e s   gc[(u7b@b	g  S P I D     SY*N	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 I N S E R T   @ S p i d ( S P I D )   S E L E C T   s p i d   F R O M     m a s t e r . d b o . s y s p r o c e s s e s   W H E R E   s p i d   > =   0   A N D   s p i d   < =   3 2 7 6 7   A N D   L T R I M ( R T R I M ( l o g i n a m e ) ) = L T R I M ( R T R I M ( @ N a m e ) ) 
 
 	 	 E N D 
 
 	 E L S E 
 
 	 	 B E G I N 
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 - - = = N    m a s t e r . d b o . s y s p r o c e s s e s   gte*Npenc^@b	g  S P I D     SY*N	
 
 	 	 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 	 	 I N S E R T   @ S p i d ( S P I D )   S E L E C T   s p i d   F R O M     m a s t e r . d b o . s y s p r o c e s s e s   W H E R E   s p i d   > =   0   A N D   s p i d   < =   3 2 7 6 7   A N D   d b i d = d b _ i d ( D B _ N A M E ( ) ) 
 
 	 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     S E L E C T     O N   [ d b o ] . [ U D F _ P u b l i c L o g i n S p i d ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ P u b l i c S p l i t         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ P u b l i c S p l i t ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ P u b l i c S p l i t ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ُ*NU D F !jb  S p l i t ( )   QpeRS Q L   S e r v e r   -Nv^l	gpe~penc{|Wُ*NQpeԏV h penc{|W
 
 - - = = lQpe
N/ec  @ D e l i m i t e r   :Nzz<hv`b_V:Nُy`QN
N{	gY\zz<h  L E N ( @ D e l i m i t e r )   Y~:N  0 
 
 - - = = \R&{RvW[&{2NR _ԏVR&{KNvUSCQ  
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ D e l i m i t e d S t r i n g   - -   YtvW[&{2N
 
 - - = = eQSpe@ D e l i m i t e r   - -   R&{  
N/eczz<h`b_	
 
 - - = = ԏV~gh  - -   bRQegvUSCQRh
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ P u b l i c S p l i t   ( @ D e l i m i t e d S t r i n g   n v a r c h a r ( 4 0 0 0 ) ,   @ D e l i m i t e r   n v a r c h a r ( 1 0 0 ) ) 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ԏVvh~g
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 R E T U R N S   @ A r r a y   T A B L E   
 
 	 	 	 ( 
 
 	 	 	 [ I D ]   i n t   I D E N T I T Y ( 1 , 1 ) ,   
 
 	 	 	 E l e m e n t   n v a r c h a r ( 1 0 0 0 )   C O L L A T E   d a t a b a s e _ d e f a u l t 
 
 	 	 	 ) 
 
 
 
 A S 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N 
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 - - ,g0WSϑ
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 D E C L A R E   @ I n d e x   I N T 
 
 	 D E C L A R E   @ S t a r t   I N T 
 
 	 D E C L A R E   @ D e l i m i t e r S i z e   I N T 
 
 
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 - - R&{v^
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 S E T   @ D e l i m i t e r S i z e   =   L E N ( @ D e l i m i t e r ) 
 
 	 
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 - - MSRW[&{2N\k*NRUSCQmR0Rh
 
 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 W H I L E   L E N ( @ D e l i m i t e d S t r i n g )   >   0 
 
 	 B E G I N 
 
 	 	 S E T   @ I n d e x   =   C H A R I N D E X ( @ D e l i m i t e r ,   @ D e l i m i t e d S t r i n g ) 
 
 
 
 	 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 	 - - YgS	g N*NUSrvRUSCQsSv^l	gRh_Qs(WRrRW[&{2N
 
 	 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 	 I F   @ I n d e x   =   0 
 
 	 	 	 B E G I N 
 
 	 	 	 	 I N S E R T   I N T O   @ A r r a y ( E l e m e n t )   V A L U E S ( @ D e l i m i t e d S t r i n g ) 
 
 	 	 	 	 B R E A K 
 
 	 	 	 E N D 
 
 
 
 	 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 	 - - Yg	gY*NRUSCQ
 
 	 	 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 	 	 E L S E 
 
 	 	 	 B E G I N 
 
 	 	 	 	 I N S E R T   I N T O   @ A r r a y ( E l e m e n t )   V A L U E S ( S U B S T R I N G ( @ D e l i m i t e d S t r i n g ,   1 , @ I n d e x   -   1 ) ) 
 
 	 	 	 	 S E T   @ S t a r t   =   @ I n d e x   +   @ D e l i m i t e r S i z e 
 
 	 	 	 	 S E T   @ D e l i m i t e d S t r i n g   =   S U B S T R I N G ( @ D e l i m i t e d S t r i n g ,   @ S t a r t   ,   L E N ( @ D e l i m i t e d S t r i n g )   -   @ S t a r t   +   1 ) 
 
 	 	 	 E N D 
 
 	 E N D 
 
 	 
 
 	 R E T U R N 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     S E L E C T     O N   [ d b o ] . [ U D F _ P u b l i c S p l i t ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r R e s o l v e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r R e s o l v e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r R e s o l v e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ُ*N  U D F   \  N ' i t s , e l e a n o r , j o h n , ^:W, ;`, S~, t i m o t h y '    N{|vmTNwQSO(u7bT~v(u7bRh g~㉐gQwQSO(u7b
 
 - - = = sS\~-Nv(u7b㉐gQegReQ0RRh-NTRd  ͑
Yv	Q(u7bh
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ U s e r L i s t   - -   mTNwQSO(u7bT~v(u7bRh
 
 - - = = ԏV~gh  - -    g~㉐gQegv(u7bh
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 9 - 0 4 - 1 2   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r R e s o l v e   ( @ U s e r L i s t   n v a r c h a r ( 4 0 0 0 ) ) 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ԏVvh~g
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 R E T U R N S   @ A r r a y   T A B L E   
 
 	 	 	 ( 
 
 	 	 	 [ U s e r ]   n v a r c h a r ( 5 0 )   C O L L A T E   d a t a b a s e _ d e f a u l t 
 
 	 	 	 ) 
 
 
 
 A S 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ㉐g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 	 
 
 	 I N S E R T   I N T O   @ A r r a y 
 
 
 
 	 S E L E C T   D I S T I N C T 
 
 
 
 	 [ U s e r ] = 
 
 
 
 	 	 C A S E   
 
 	 	 	 W H E N   u g s . [ U s e r ]   I S   N U L L   T H E N   s p l i t . [ E l e m e n t ]     E L S E   u g s . [ U s e r ] 
 
 	 	 E N D 
 
 
 
 
 
 	 F R O M   d b o . U D F _ P u b l i c S p l i t ( @ U s e r L i s t , N ' , ' )   s p l i t   
 
 
 
 	 L E F T   J O I N   d b o . V i e w _ U s e r G r o u p s   u g s   O N   u g s . G r o u p N a m e = s p l i t . E l e m e n t     A N D   u g s . [ U s e r ] < > N ' ' 
 
 
 
 	 W H E R E   s p l i t . [ E l e m e n t ] < > N ' '   
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 	 
 
 	 R E T U R N 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     S E L E C T     O N   [ d b o ] . [ U D F _ U s e r R e s o l v e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ U s e r R o l e s         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ U s e r R o l e s ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ U s e r R o l e s ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV(u7b@bSNd\Ov҉rRh
 
 - - = = ُ*N  U D F   fel	g(u:W
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   ~[v(u7b
T
 
 - - = = ԏV~gh  - -   (u7bvv҉rRh
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 0 8 - 1 0 - 2 6   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ U s e r R o l e s ( @ N a m e   n v a r c h a r ( 5 0 ) )     
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = ԏVvh~g
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 R E T U R N S   @ U s e r R o l e s   T A B L E   
 
 	 	 	 	 	 ( 
 
 	 	 	 	 	 [ I D ]   i n t , 
 
 	 	 	 	 	 U s e r R o l e   n v a r c h a r ( 5 0 )   C O L L A T E   d a t a b a s e _ d e f a u l t , 
 
 	 	 	 	 	 U s e r R o l e C   n v a r c h a r ( 5 0 )   C O L L A T E   d a t a b a s e _ d e f a u l t 
 
 	 	 	 	 	 ) 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 / * 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = S_MR(u7b
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ C u r r e n t U s e r   N V A R C H A R ( 5 0 ) 
 
 
 
 	 I F   @ N a m e   I S   N U L L 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = d b o . U D F _ U s e r C u r r e n t ( ) 
 
 	 	 E N D 
 
 	 E L S E 
 
 	 	 B E G I N 
 
 	 	 	 S E T   @ C u r r e n t U s e r = @ N a m e 
 
 	 	 E N D 
 
 	 * / 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏV(u7b҉rRh
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I N S E R T   @ U s e r R o l e s ( [ I D ] , U s e r R o l e , U s e r R o l e C )   S E L E C T   u r . [ I D ] , u r . [ N a m e ] , u r . N a m e C   F R O M   d b o . U s e r R o l e   u r   W H E R E   u r . [ I D ]   I N   ( S e l e c t   U s e r R o l e   F r o m   d b o . U s e r s   W h e r e   [ N a m e ] = @ N a m e ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N 
 
 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     S E L E C T     O N   [ d b o ] . [ U D F _ U s e r R o l e s ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ F o r u m R e a d a b l e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ F o r u m R e a d a b l e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ F o r u m R e a d a b l e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&TSNOmȉ~[[W
 
 - - = = 	gNN`b_NKN NvF o r u m   /fSNOmȉv
 
 - - = =   F o r u m   NSvQ
N~  C o m m u n i t y   v  R e a d P e r m i s s i o n   :Nzz
 
 - - = =   F o r u m   bvQ
N~  C o m m u n i t y   nN  P u b l i c   ^\'`
 
 - - = = S_MR(u7b/f  A d m i n 
 
 - - = = S_MR(u7b/f  F o r u m   v  M o d e r a t o r 
 
 - - = = S_MR(u7b=(W  F o r u m   bvQ
N~  C o m m u n i t y   v  R e a d P e r m i s s i o n   nUS-N
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ F o r u m R e a d a b l e   ( @ N a m e   n v a r c h a r ( 5 0 ) , @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s R e a d a b l e   I N T 
 
 	 S E T   @ I s R e a d a b l e = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N~[  F o r u m   -N_  R e a d P e r m i s s i o n   yv
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ R e a d P e r m i s s i o n   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ R e a d P e r m i s s i o n = f p . R e a d P e r m i s s i o n   F R O M   d b o . V i e w _ F o r u m P e r m i s s i o n   f p   W H E R E   f p . F o r u m I D = @ F o r u m I D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bMON  @ R e a d P e r m i s s i o n   nUSbS_MR(u7b/f  A d m i n bS_MR(u7b/fS_MR  F o r u m   v  M o d e r a t o r   bS_MR  F o r u m   v  @ R e a d P e r m i s s i o n   :NzzRS_MR(u7bb	g  R e a d   CgP
 
 	 - - = = lُ̑T  U D F _ F o r u m T o p i c W r i t a b l e   NS  U D F _ F o r u m F o l l o w U p W r i t a b l e   
NT
N     @ N a m e < > N ' '   V:N*g{vU_(u7b_NSNOmȉ  @ R e a d P e r m i s s i o n   :Nzzv[WFO
NS4Tߍ4	
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   ( d b o . U D F _ U s e r D e d i c a t e d T o ( @ N a m e , @ R e a d P e r m i s s i o n ) = 1 )   O R   ( R E P L A C E ( @ R e a d P e r m i s s i o n , N ' , ' , N ' ' ) = N ' ' )   O R   ( @ R e a d P e r m i s s i o n = N u l l )   O R   ( @ R e a d P e r m i s s i o n   I s   N u l l )   O R   ( d b o . U D F _ U s e r A d m i n ( @ N a m e ) = 1 )   O R   ( d b o . U D F _ U s e r M o d e r a t o r ( @ N a m e , @ F o r u m I D ) = 1 )   O R   ( d b o . U D F _ F o r u m P u b l i c ( @ F o r u m I D ) = 1 ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s R e a d a b l e = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s R e a d a b l e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ F o r u m R e a d a b l e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ F o r u m P u b l i c         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ F o r u m P u b l i c ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ F o r u m P u b l i c ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[[W/f&T  P u b l i c 
 
 - - = = 	gNN`b_NKN NvF o r u m   /f  P u b l i c 
 
 - - = =   F o r u m   v  P u b l i c   ^\'`/f  T r u e 
 
 - - = =   F o r u m   v
N~  C o m m u n i t y   v  P u b l i c   ^\'`/f  T r u e 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ F o r u m P u b l i c ( @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s P u b l i c   I N T 
 
 	 S E T   @ I s P u b l i c = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N~[  F o r u m   -N_  P u b l i c   yv
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ P u b l i c   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ P u b l i c = f p . [ P u b l i c ]   F R O M   d b o . V i e w _ F o r u m P e r m i s s i o n   f p   W H E R E   f p . F o r u m I D = @ F o r u m I D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bMON  @ R e a d P e r m i s s i o n   nUSbS_MR(u7b/f  A d m i n bS_MR(u7b/fS_MR  F o r u m   v  M o d e r a t o r   bS_MR  F o r u m   v  @ R e a d P e r m i s s i o n   :NzzRS_MR(u7bb	g  R e a d   CgP
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   E X I S T S   ( S e l e c t   [ I D ]   F r o m   d b o . U D F _ P u b l i c S p l i t ( @ P u b l i c , N ' , ' )   W h e r e   [ E l e m e n t ] = N ' t r u e ' ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s P u b l i c = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s P u b l i c 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ F o r u m P u b l i c ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ F o r u m T o p i c W r i t a b l e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ F o r u m T o p i c W r i t a b l e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ F o r u m T o p i c W r i t a b l e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&TSN(W~[[WNS^
 
 - - = = 	gNN`b_NKN NvF o r u m   /fSNS4v
 
 - - = =   F o r u m   NSvQ
N~  C o m m u n i t y   v  T o p i c W r i t e P e r m i s s i o n   :Nzz
 
 - - = =   F o r u m   bvQ
N~  C o m m u n i t y   nN  P u b l i c   ^\'`
 
 - - = = S_MR(u7b/f  A d m i n 
 
 - - = = S_MR(u7b/f  F o r u m   v  M o d e r a t o r 
 
 - - = = S_MR(u7b=(W  F o r u m   bvQ
N~  C o m m u n i t y   v  T o p i c W r i t e P e r m i s s i o n   nUS-N
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ F o r u m T o p i c W r i t a b l e   ( @ N a m e   n v a r c h a r ( 5 0 ) , @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s T o p i c W r i t a b l e   I N T 
 
 	 S E T   @ I s T o p i c W r i t a b l e = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N~[  F o r u m   -N_  T o p i c W r i t e P e r m i s s i o n   yv
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ T o p i c W r i t e P e r m i s s i o n   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ T o p i c W r i t e P e r m i s s i o n = f p . T o p i c W r i t e P e r m i s s i o n   F R O M   d b o . V i e w _ F o r u m P e r m i s s i o n   f p   W H E R E   f p . F o r u m I D = @ F o r u m I D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bMON  @ T o p i c W r i t e P e r m i s s i o n   nUSbS_MR(u7b/f  A d m i n bS_MR(u7b/fS_MR  F o r u m   v  M o d e r a t o r   bS_MR  F o r u m   v  @ T o p i c W r i t e P e r m i s s i o n   :NzzbS_MR  F o r u m   bvQ
N~  C o m m u n i t y   :N  P u b l i c RS_MR(u7bb	g  T o p i c   W r i t e   CgP
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   ( d b o . U D F _ U s e r D e d i c a t e d T o ( @ N a m e , @ T o p i c W r i t e P e r m i s s i o n ) = 1 )   O R   ( R E P L A C E ( @ T o p i c W r i t e P e r m i s s i o n , N ' , ' , N ' ' ) = N ' '   A n d   @ N a m e < > N ' ' )   O R   ( @ T o p i c W r i t e P e r m i s s i o n = N u l l   A n d   @ N a m e < > N ' ' )   O R   ( @ T o p i c W r i t e P e r m i s s i o n   I s   N u l l   A n d   @ N a m e < > N ' ' )   O R   ( d b o . U D F _ U s e r A d m i n ( @ N a m e ) = 1 )   O R   ( d b o . U D F _ U s e r M o d e r a t o r ( @ N a m e , @ F o r u m I D ) = 1 )   O R   ( d b o . U D F _ F o r u m P u b l i c ( @ F o r u m I D ) = 1 ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s T o p i c W r i t a b l e = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s T o p i c W r i t a b l e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ F o r u m T o p i c W r i t a b l e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ F o r u m F o l l o w U p W r i t a b l e         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ F o r u m F o l l o w U p W r i t a b l e ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ F o r u m F o l l o w U p W r i t a b l e ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpeԏV~[(u7b/f&TSN(W~[[WNߍ^
 
 - - = = 	gNN`b_NKN NvF o r u m   /fSNߍ4v
 
 - - = =   F o r u m   NSvQ
N~  C o m m u n i t y   v  F o l l o w U p W r i t e P e r m i s s i o n   :Nzz
 
 - - = =   F o r u m   bvQ
N~  C o m m u n i t y   nN  P u b l i c   ^\'`
 
 - - = = S_MR(u7b/f  A d m i n 
 
 - - = = S_MR(u7b/f  F o r u m   v  M o d e r a t o r 
 
 - - = = S_MR(u7b=(W  F o r u m   bvQ
N~  C o m m u n i t y   v  F o l l o w U p W r i t e P e r m i s s i o n   nUS-N
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ N a m e   - -   (u7b
T
 
 - - = = eQSpe@ F o r u m I D   - -   [Wv  I D 
 
 - - = = ԏV~gI n t   - -   1 / 0   /f/ &T
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ F o r u m F o l l o w U p W r i t a b l e   ( @ N a m e   n v a r c h a r ( 5 0 ) , @ F o r u m I D   i n t )     
 
 
 
 R E T U R N S   I N T 
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gSϑ
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ I s F o l l o w U p W r i t a b l e   I N T 
 
 	 S E T   @ I s F o l l o w U p W r i t a b l e = 0 	 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N~[  F o r u m   -N_  F o l l o w U p W r i t e P e r m i s s i o n   yv
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ F o l l o w U p W r i t e P e r m i s s i o n   N V A R C H A R ( 4 0 0 0 ) 
 
 	 S E L E C T   @ F o l l o w U p W r i t e P e r m i s s i o n = f p . F o l l o w U p W r i t e P e r m i s s i o n   F R O M   d b o . V i e w _ F o r u m P e r m i s s i o n   f p   W H E R E   f p . F o r u m I D = @ F o r u m I D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = YgS_MR(u7bMON  @ F o l l o w U p W r i t e P e r m i s s i o n   nUSbS_MR(u7b/f  A d m i n bS_MR(u7b/fS_MR  F o r u m   v  M o d e r a t o r   bS_MR  F o r u m   v  @ F o l l o w U p W r i t e P e r m i s s i o n   :NzzbS_MR  F o r u m   bvQ
N~  C o m m u n i t y   :N  P u b l i c RS_MR(u7bb	g  T o p i c   W r i t e   CgP
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 I F   ( d b o . U D F _ U s e r D e d i c a t e d T o ( @ N a m e , @ F o l l o w U p W r i t e P e r m i s s i o n ) = 1 )   O R   ( R E P L A C E ( @ F o l l o w U p W r i t e P e r m i s s i o n , N ' , ' , N ' ' ) = N ' '   A n d   @ N a m e < > N ' ' )   O R   ( @ F o l l o w U p W r i t e P e r m i s s i o n = N u l l   A n d   @ N a m e < > N ' ' )   O R   ( @ F o l l o w U p W r i t e P e r m i s s i o n   I s   N u l l   A n d   @ N a m e < > N ' ' )   O R   ( d b o . U D F _ U s e r A d m i n ( @ N a m e ) = 1 )   O R   ( d b o . U D F _ U s e r M o d e r a t o r ( @ N a m e , @ F o r u m I D ) = 1 )   O R   ( d b o . U D F _ F o r u m P u b l i c ( @ F o r u m I D ) = 1 ) 
 
 	 B E G I N 
 
 	 	 S E T   @ I s F o l l o w U p W r i t a b l e = 1 
 
 	 E N D 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = QpeԏV~g
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ I s F o l l o w U p W r i t a b l e 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ F o r u m F o l l o w U p W r i t a b l e ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O F F   
 
 G O 
 
 
 
 / * * * * * *   O b j e c t :     U s e r   D e f i n e d   F u n c t i o n   d b o . U D F _ T o p i c S t a t u s D e s c r i p t i o n         S c r i p t   D a t e :   2 0 1 3 - 1 1 - 1 3   7 : 1 1 : 5 4   * * * * * * / 
 
 i f   e x i s t s   ( s e l e c t   *   f r o m   d b o . s y s o b j e c t s   w h e r e   i d   =   o b j e c t _ i d ( N ' [ d b o ] . [ U D F _ T o p i c S t a t u s D e s c r i p t i o n ] ' )   a n d   x t y p e   i n   ( N ' F N ' ,   N ' I F ' ,   N ' T F ' ) ) 
 
 d r o p   f u n c t i o n   [ d b o ] . [ U D F _ T o p i c S t a t u s D e s c r i p t i o n ] 
 
 G O 
 
 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = (u7bQpe~[  @ F o r u m I D ,   @ C u l t u r e   T  @ T o p i c S t a t u s   N  V i e w _ F o r u m U i C u s t o m i z a t i o n   g[^v  T o p i c S t a t u s C u s t o m i z a t i o n < x x x >   [
 
 - - = = NO(W  T o p i c Q u e r y . c s   -N>f:y[6Rv^P[r`c
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = eQSpe@ F o r u m I D   - -   [W  I D 
 
 - - = = eQSpe@ C u l t u r e   - -   y
 
 - - = = eQSpe@ T o p i c S t a t u s   - -   ^P[r`
 
 - - = = ԏV~g[^v  T o p i c   S t a t u s   [6R  D e s c r i p t i o n 
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 - - = = HrCg@b	g  2 0 0 1 - 2 0 1 0   C O M S H A R P   C M S   FUONC M S 	  h t t p : / / w w w . c o m s h a r p . c o m 
 
 - - = =  geO9e  2 0 1 0 - 1 1 - 2 4   
 
 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 
 
 C R E A T E   F U N C T I O N   d b o . U D F _ T o p i c S t a t u s D e s c r i p t i o n   ( @ F o r u m I D   i n t ,     @ C u l t u r e   n v a r c h a r ( 5 0 ) ,   @ T o p i c S t a t u s   i n t )     
 
 
 
 R E T U R N S   n v a r c h a r ( 5 0 )   
 
 
 
 A S     
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 B E G I N   
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ԏVvW[&{2N
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 D E C L A R E   @ T o p i c S t a t u s D e s c r i p t i o n   N V A R C H A R ( 5 0 ) 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = N  V i e w _ F o r u m U i C u s t o m i z a t i o n   -Ng
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 S E L E C T   
 
 
 
 	 	 @ T o p i c S t a t u s D e s c r i p t i o n = 
 
 
 
 	 	 C A S E 
 
 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 1   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n E m p t y T o p i c 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 2   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n S o l i d T o p i c 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 3   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n H o t T o p i c 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 4   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n E l i t e T o p i c 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 5   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n T a b o o T o p i c 
 
 	 	 	 W H E N   @ T o p i c S t a t u s = 6   T H E N   T o p i c S t a t u s C u s t o m i z a t i o n S t i c k y T o p i c 
 
 	 	 	 E L S E   T o p i c S t a t u s C u s t o m i z a t i o n E m p t y T o p i c 
 
 
 
 	 	 E N D 
 
 
 
 	 F R O M   d b o . V i e w _ F o r u m U i C u s t o m i z a t i o n   f u c 
 
 
 
 	 W H E R E   f u c . F o r u m I D = @ F o r u m I D   A N D   f u c . C u l t u r e = @ C u l t u r e 
 
 
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 - - = = ~gԏV
 
 	 - - = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
 
 	 R E T U R N   @ T o p i c S t a t u s D e s c r i p t i o n 
 
 E N D 
 
 
 
 - - Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z 
 
 
 
 
 
 G O 
 
 
 
 S E T   Q U O T E D _ I D E N T I F I E R   O F F   
 
 G O 
 
 S E T   A N S I _ N U L L S   O N   
 
 G O 
 
 
 
 G R A N T     E X E C U T E     O N   [ d b o ] . [ U D F _ T o p i c S t a t u s D e s c r i p t i o n ]     T O   [ p u b l i c ] 
 
 G O 
 
 
 
 