FileMaker Pro Custom Functions

/* Accordion( NumberedList; selectedGroup; showNumbers ) Bruce Robertson - Concise Design Given a numbered list n.0, n.1, etc and a selected group, collapse all items in unselected group. You may pass group number or value of item 0 of selected group 1.0 Vegetables 1.1 Peas 1.2 Brocolli 1.3 Brussel Sprouts 2.0 Fruits 2.1 Apple 2.1 Pear 2.2 Peach example: Let( thisList = "1.0 Vegetables¶1.1 Peas¶1.2 Brocolli¶1.3 Brussel Sprouts¶2.0 Fruits¶2.1 Apple¶2.1 Pear¶2.2 Peach"; Accordion( thisList; 2; "") result: Vegetables Fruits Apple Pear Peach Example file: http://concise-design.com/downloads/accordion.zip */ Let([ thisLine = GetValue ( NumberedList; 1); display = Trim( MiddleWords( thisLine; 2; 10)); LineNum = LeftWords( thisLine; 1); selectedGroup = Case( (selectedGroup ) = display ; Int( lineNum); selectedGroup ); display = Case( showNumbers; thisLine; display ) & ¶; isHeader = Right( LineNum; 1) = "0"; listCount = ValueCount( numberedList); remainder = RightValues( NumberedList; ListCount -1); groupMember = (Int( LineNum ) = selectedGroup )]; Case( isHeader; display ; groupMember ; " " & display ) & Case( ListCount > 0; Accordion( remainder; selectedGroup ; showNumbers ) ) )
 Then copy & paste into FileMaker Advanced's Edit Custom Function window.