result := ""; @For(n := 1;n <= @Elements (Members );n := n + 1; look := @Trim( @NameLookup ( [Exhaustive];Members [n ]; "FullName" )); result := @Trim( @Unique (result : @If (look= "";@Name ([Abbreviate];Members[n ]); @Name ([Abbreviate];look))))); FIELD comment := @Implode (result;@NewLine ); @Prompt([Ok]; "Members " + @Text(@Elements (Members )); "Found " + @Text(@Elements(result ))+ " Abbreviated Canonical Names for "+ @Text ( @Elements (Members ) )+ " Users" )