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