[r11]: / trunk / Library / POUs / Functions / F_RemoveInstancePathAndProjectNameFromTestInstancePath / svnobj Maximize Restore History
5 lines (5 with data), 4.4 kB
Gx_l ! 0…jüo¾
K^ 9 ú9Eò S y s t e m . S t r i n g L{ 6 f 9 d a c 9 9 - 8 d e 1 - 4 e f c - 8 4 6 5 - 6 8 a c 4 4 3 b 7 d 0 8 } S p e c i a l F u n c L{ 0 d b 3 d 7 b b - c d e 0 - 4 4 1 6 - 9 a 7 b - c e 4 9 a 0 1 2 4 3 2 3 } N o n e I m p l e m e n t a t i o n L{ 3 b 8 3 b 7 7 6 - f b 2 5 - 4 3 b 8 - 9 9 f 2 - 3 c 5 0 7 c 9 1 4 3 f c } T e x t D o c u m e n t L{ f 3 8 7 8 2 8 5 - 8 e 4 f - 4 9 0 b - b b 1 b - 9 a c b b 7 e b 0 4 d b }
T e x t L i n e s L{ a 5 d e 0 b 0 b - 1 c b 5 - 4 9 1 3 - a c 2 1 - 9 d 7 0 2 9 3 e c 0 0 d } I d
l o n g T a g T e x t t( * A d d t h e ' . ' c h a r a c t e r t o t h e p r o j e c t n a m e f o r s e a r c h * ) ÄP r o j e c t N a m e W i t h D o t : = C O N C A T ( S T R 1 : = T w i n C A T _ S y s t e m I n f o V a r L i s t . _ A p p I n f o . P r o j e c t N a m e , S T R 2 : = ' . ' ) ; º( * F I N D t h e c h a r a c t e r p o s i t i o n o f t h e b e g i n n i n g o f t h e f i r s t o c c u r e n c e o f t h e p r o j e c t n a m e * ) ºC h a r a c t e r P o s i t i o n O f P r o j e c t N a m e : = F I N D ( S T R 1 : = T e s t I n s t a n c e P a t h , S T R 2 : = P r o j e c t N a m e W i t h D o t ) ; TI F C h a r a c t e r P o s i t i o n O f P r o j e c t N a m e > 0 T H E N n T e s t I n s t a n c e P a t h : = D E L E T E ( S T R : = T e s t I n s t a n c e P a t h , Ô L E N : = C h a r a c t e r P o s i t i o n O f P r o j e c t N a m e - 1 + L E N ( P r o j e c t N a m e W i t h D o t ) , d P O S : = 1 ) ; E N D _ I F Ô( * C h e c k i f t h e p r o j e c t n a m e h a p p e n s t o b e t h e s a m e a s n a m e s p a c e , a n d i n t h a t c a s e , r e m o v e t h a t a s w e l l * ) €C h a r a c t e r P o s i t i o n O f P r o j e c t N a m e : = F I N D ( S T R 1 : = T e s t I n s t a n c e P a t h , S T R 2 : = P r o j e c t N a m e W i t h D o t ) ; æ L E N : = C h a r a c t e r P o s i t i o n O f P r o j e c t N a m e - 1 + L E N ( S T R : = P r o j e c t N a m e W i t h D o t ) , –F _ R e m o v e I n s t a n c e P a t h A n d P r o j e c t N a m e F r o m T e s t I n s t a n c e P a t h : = T e s t I n s t a n c e P a t h ; I n t e r f a c e L{ a 9 e d 5 b 7 e - 7 5 c 5 - 4 6 5 1 - a f 1 6 - d 2 c 2 7 e 9 8 c b 9 4 } !šF U N C T I O N F _ R e m o v e I n s t a n c e P a t h A n d P r o j e c t N a m e F r o m T e s t I n s t a n c e P a t h : T _ M a x S t r i n g "V A R _ I N P U T #F T e s t I n s t a n c e P a t h : T _ M a x S t r i n g ; $E N D _ V A R %V A R &R C h a r a c t e r P o s i t i o n O f P r o j e c t N a m e : I N T ; 'J P r o j e c t N a m e W i t h D o t : T _ M a x S t r i n g ; ("U n i q u e I d G e n e r a t o r )3 3 *P O U L e v e l +L{ 8 e 5 7 5 c 5 b - 1 d 3 7 - 4 9 c 6 - 9 4 1 b - 5 c 0 e c 7 8 7 4 7 8 7 } ,S t a n d a r d - C h i l d O b j e c t G u i d s .8S y s t e m . C o l l e c t i o n s . A r r a y L i s t /,A d d A t t r i b u t e S u b s e q u e n t 0b o o l Ð Ð-ÐÐ E
Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ- Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ- Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ-Ð Ð
ÚÐ- Ð Ð E
Ð Ð
ÚÐ-!Ð Ð
ÚÐ-"Ð Ð
ÚÐ-#Ð Ð
ÚÐ-$Ð Ð
ÚÐ-%Ð Ð
ÚÐ-&Ð Ð
ÚÐ-'Ð Ð
! ÚÐ-$Ð Ð
ÚÐ-Ð(-)Ð*+-,-. Ð/0