[r397]: / trunk / Library / POUs / Functions / F_RemoveInstancePathAndProjectNameFromTestInstancePath / svnobj Maximize Restore History
6 lines (5 with data), 4.3 kB
Gx_l Ž ! 0…jüoý Cľ5 i adŚ` 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 * ) "G e t C u r P r o j I n f o ( ) ; ˛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 : = G e t C u r P r o j I n f o . P R O J E C T _ I N F O . s t P r o j e c t , 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 ) , $ 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 , J 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 ; )B G e t C u r P r o j I n f o : G e t C u r P r o j I n f o ; *"U n i q u e I d G e n e r a t o r +3 8 ,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 08S 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 1,A d d A t t r i b u t e S u b s e q u e n t 2b o o l Đ Đ-ĐĐ E
Đ Đ
ÚĐ-Đ Đ
# ÚĐ-Đ Đ
" ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ- Đ Đ
ÚĐ- Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
% ÚĐ- Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ-Đ Đ
ÚĐ- Đ !Đ E
Đ Đ
ÚĐ-"Đ Đ
ÚĐ-#Đ Đ
ÚĐ-$Đ Đ
ÚĐ-%Đ Đ
ÚĐ-&Đ Đ
ÚĐ-'Đ Đ
ÚĐ-(Đ Đ
& ÚĐ-)Đ Đ
! ÚĐ-%Đ Đ
ÚĐ-Đ*-+Đ,--./0 Đ12