BetweenOpenCloseTag ( Txt ; OpenTag ; CloseTag ; n )

to extract between 2 tags even if the tag is repeated and nested - not recursive

Average rating: 4.5 (27 votes) Log in to vote

Agnes Barouh - Show more from this author
Tic Tac
http://www.tictac.fr/CoinFileMaker/Page.html

Sample input:

//---------------------------------- 1

BetweenOpenCloseTag ( "¶
Compositeur¶
¶
Acteur¶
Ok¶
¶
role¶
¶
Test_Ok¶
¶
Test¶
" ;
""; ""; 3 )

//---------------------------------- 2

BetweenOpenCloseTag (
"( Extract ( between ( 2 tags ) matches ) [ together ] )" ;
"("; ")"; 2 )

Sample output:

//---------------------------------- Result

" Acteur

Ok

role"

//---------------------------------- Result

"between ( 2 tags ) matches"

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

   BetweenOpenCloseTag ( Txt ; OpenTag ; CloseTag ; n ) v2
//
//              to extract between 2 tags even if the tag is repeated and nested
//              the closing tag matches the opening tag
// BetweenOpenCloseTag is not recursive function
/*
//---------------------------------- Parameter
• Txt : Texte for extract
• OpenTag : Extract after open tag
• CloseTag : Extract before close Tag
• n : Target Occurrence
//---------------------------------- Example
With Txt = 
"<dict>¶
		<dict>¶
			<key>Compositeur</key>¶
		<dict>¶
			<key>Acteur</key>¶
			<dict>¶
			<string>Ok</string>¶
			</dict>¶
			<key>role</key>¶
		</dict>¶
		<string>Test_Ok</string>¶
		</dict>¶
		<string>Test</string>¶
</dict>¶
	<dict>¶
		<close>¶
			<dict>¶
				<key>bonus</key>¶
			<array>¶
			<dict>¶
				<key>editeur</key>¶
			</dict>¶
			</array>¶
			<string>Actrice</string>¶
			</dict>¶
		<Oui>et</Oui>¶
		<string>Joueur</string>¶
		</close>¶
	</dict>¶
( et ceci ( was ok ( également ) with des ) parenthèses [ ou des crochets ] )"

- BetweenOpenCloseTag ( Txt ; "<dict>"; "</dict>"; 3 )
       > Result :
 "			<key>Acteur</key>
 			<dict>
 			<string>Ok</string>
 			</dict>
 			<key>role</key>"
 		
- BetweenOpenCloseTag ( Txt ; "("; ")"; 2 )
       > Result : "was ok ( également ) with des"
*/
//————————--—---------------------——————-————
// @ Agnès -   May 2015- BugReport 
// Substitute ( filemaker§tictac.fr ; § ; @ )
//—————---------------------———————-———-————-

Let ([

Net = Substitute ( Txt  ; [ OpenTag ; ¶ & OpenTag & ¶ ] ; [ CloseTag ; ¶ & CloseTag & ¶ ] ) ;
S =  FilterValues ( Net ; OpenTag & ¶ & CloseTag ) ;
P = Position ( S ; OpenTag ; 1 ; n  ) ;
Test = Middle ( S ; P ; Length ( OpenTag ) + Length ( CloseTag )  + 1 ) ;
Ex = Case ( PatternCount ( Test ; CloseTag ) ; Test ; Middle ( S ; P ; Position ( S ; CloseTag & ¶ & CloseTag ; P ; 1 ) -P +3) ) ;
Pos = Position ( Txt ; OpenTag ; 1 ; n  ) + Length ( OpenTag ) ;
Result = Middle ( Txt ; Pos  ; Position ( Txt ; CloseTag ; Pos ; PatternCount ( Ex ; OpenTag ) )  - Pos ) 
];
Case ( P ; Result ; "Error" )
)

BetweenOpenCloseTag ( Txt ; OpenTag ; CloseTag ; n ) v2

** 052015 - Add -P+3 variable Ex
** 050715 - Suppress +1 variable Pos ( thanks Menno ! )
//
// to extract between 2 tags even if the tag is repeated and nested
// the closing tag matches the opening tag
// BetweenOpenCloseTag is not recursive function
/*
//---------------------------------- Parameter
• Txt : Text for extract
• OpenTag : Extract after open tag
• CloseTag : Extract before close Tag
• n : Target Occurrence
//---------------------------------- Example
With Txt =
"¶
¶
Compositeur¶
¶
Acteur¶
¶
Ok¶
¶
role¶
¶
Test_Ok¶
¶
Test¶
¶
¶
¶
¶
bonus¶
¶
¶
editeur¶
¶
¶
Actrice¶
¶
et¶
Joueur¶
¶
¶
( et ceci ( was ok ( également ) with des ) parenthèses [ ou des crochets ] )"

- BetweenOpenCloseTag ( Txt ; ""; ""; 3 )
> Result :
" Acteur

Ok

role"

- BetweenOpenCloseTag ( Txt ; "("; ")"; 2 )
> Result : "was ok ( également ) with des"
*/
//————————--—---------------------——————-————
// @ Agnès - May 2015- BugReport
// Substitute ( filemaker§tictac.fr ; § ; @ )
//—————---------------------———————-———-————-

Comments

		Eduardo Lemos, Victoria, Canada /Sao Paulo, Brazil Dec 28, 2015
te chÃ©ris vraiment quelle Ã©lÃ©gance vous concevez vos fonctions, AgnÃ¨s; they are truly case studies. thanks for sharing them.

		ericire Nov 9, 2019
Salut AgnÃ¨s Je bosse sur du xml donc ta fonction m'est utile, merci... Ã ceci prÃ¨s qu'il faut prÃ©ciser que le "closing tag" ne doit pas Ãªtre contenu dans le "opening tag", genre " biz

		ericire Nov 9, 2019
le commentaire prÃ©cÃ©dent est tronquÃ© : pas de guillemet dans l'un et l'autre par exemple

		ericire Nov 9, 2019
non finalement Ã§a va pas car il ne veux pas ingurgiter les tags suivants (des tabulations qui seules me permettent de discriminer les "; 1) je vais me contenter d'un vulgaire extrait() qui le fait bien

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

BetweenOpenCloseTag ( Txt ; OpenTag ; CloseTag ; n )

Comments

Support this website.

Support this website.