AddRemoveItem ( theList, value, AddRemoveAuto )

Allows you to Add or Remove an item from a list either automatically or directly (will not create duplicate items)

Be the first to rate this function Log in to vote

Kyle Williams - Show more from this author
Augusto Digital
https://www.youtube.com/channel/UCpJlB7cmVNMjbjgY96MEsng

Sample input:

AddRemoveItem ( List("One";"Two";"3"); "Five" ; "Add" )
AddRemoveItem ( List("One";"Two";"3"); "Two" ; "Remove" )
AddRemoveItem ( List("One";"Two";"3"); "Two" ; "Auto" )
AddRemoveItem ( List("One";"Two";"3"); "Four" ; "Auto" )

Sample output:

One¶Two¶3¶Five
One¶3
One¶3
One¶Two¶3¶Four

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

/* Author: Kyle Williams
	AddRemoveAuto:  
		"Add" will add the item to the list (if it does not exist)
		"Remove" will remove an item from the list (if it exists)
		"Auto" or "" will automatically Add or Remove the item from the list (toggle item) depending on if it exists or not.
*/
Let ([
	 override = Upper( AddRemoveAuto )
	;override = Case( override = "ADD"; 1; override = "REMOVE"; -1;override = "AUTO" or IsEmpty(override);  0)
	;exists = not IsEmpty ( FilterValues ( theList ; value ) )
	;listRemove = Substitute( "¶¶" & theList & "¶¶"; [¶ & value & ¶ ; ¶ ] ; ["¶¶¶"; ""] ; ["¶¶"; ""] ) 
	;listAdd = List ( theList; value )
];
Case ( 
	 override = 1  and not exists; listAdd			//Add Item
	;override = -1 and exists; listRemove		//Remove Item

	;override = 1  and exists; theList			//Leave alone
	;override = -1 and not exists; theList		//Leave alone

	;override = 0 and exists; listRemove; listAdd	//AUTO
	 )
)

Allows you to Add or Remove an item from a list either automatically or directly.
Note: This is designed not to create duplicate items..

Comments

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

AddRemoveItem ( theList, value, AddRemoveAuto )

Comments

Support this website.

Support this website.