Answered

remove duplicated records

(0) Share

Report

Posted on by cabutbul

I have the next code which takes names in outlook format and producing emails of managers of the employees.
I want the code to remove duplicate results.
I'll be glad to help with that.

Concat(
ForAll(
Split(TextInput1.Text, ";"),
{
EmployeeData: Value
}
),
Office365Users.ManagerV2(Match(EmployeeData, "<(?<email>[^>]*)>").email).mail,
";" & Char(10)
)

Categories:

Building Power Apps

All responses (10)

Answers (1)

Sort by

Chris-D 1,246 on at

Like
a
(0)

Report
Copy link

Link copied!
Hi @cabutbul, I'm assuming your email addresses are in your TextInput1 control here but you can use the Distinct() function to return only unique values:
Concat( ForAll( Distinct( Split(TextInput1.Text, ";"), Value), { EmployeeData: Value } ), Office365Users.ManagerV2( Match(EmployeeData, "<(?<email>[^>]*)>").email).mail, ";" & Char(10) )
cabutbul 63 on at

Like
a
(0)

Report
Copy link

Link copied!

Thanks, but I get the following error:
"The function manager2 has an invalid value for parameter id - a blank value was passed to it where it was not expected..,
Rajkumar_M 3,747 Moderator on at

Like
a
(0)

Report
Copy link

Link copied!
Hi @cabutbul

Try this

Concat(
Distinct(
ForAll(
Split(TextInput1.Text, ";"),
{
EmployeeData: Value
}
),
EmployeeData
),
Office365Users.ManagerV2(Match(EmployeeData, "<(?<email>[^>]*)>").email).mail,
";" & Char(10)
)

(Or)

Concat(
Distinct(
ForAll(
Split(TextInput1.Text, ";"),
{ EmployeeData: Value, ManagerEmail: Office365Users.ManagerV2(Match(EmployeeData, "<(?<email>[^>]*)>").email).mail
}
), ManagerEmail
), ";" & Char(10)
)

Thanks!

If my response has been helpful in resolving your issue, I kindly request that you consider clicking "Accept as solution" and "giving it a thumbs up" as a token of appreciation.
Verified answer

Chris-D 1,246 on at

Like
a
(0)

Report
Copy link

Link copied!
This could happen if there are blanks in your input string, you can filter them out like this.
Concat( Filter( ForAll( Distinct( Split(TextInput1.Text, ";"), Value), { EmployeeData: Value } ), !IsBlank( EmployeeData) ), Office365Users.ManagerV2( Match(EmployeeData, "<(?<email>[^>]*)>").email).mail, ";" & Char(10) )

Otherwise it's likely your Match() isn't matching anything and returning blank.
cabutbul 63 on at

Like
a
(0)

Report
Copy link

Link copied!

Sorry but there is no changes on the results.
Still have duplicated values
cabutbul 63 on at

Like
a
(0)

Report
Copy link

Link copied!

Sorry but Both have errors.
cabutbul 63 on at

Like
a
(0)

Report
Copy link

Link copied!

It's not working.

It is important to note that the intention is not to search for duplicate records of employees but duplicate records of managers (there may be different employees with the same manager), I want to reduce the duplicate results.
Chris-D 1,246 on at

Like
a
(0)

Report
Copy link

Link copied!
I see. I'm assuming the Office265Users.ManagerV2 function here returns the users' managers.

Try this, I've commented each part so hopefully you can see what's going on. I've moved the lookup for the users manager into the first argument of Concat. Concat is now processing the list of managers rather than the list of employees.
Concat( // This Distinct removes duplicates from the managers emails Distinct( // This ForAll looks up managers emails from the employee emails ForAll( // This Filter removes blanks from the employee email list Filter( // This Dintinct removes duplicates from the employee email list Distinct( Split(TextInput1.Text, ";"), Value ), // Filter allows non blank values !IsBlank( Value) ), // Inside of the ForAll loop, employee email is stored in Value { // Store the name of the manager to ManagerEmail ManagerEmail: Office365Users.ManagerV2( Match( Value, "<(?<email>[^>]*)>").email ).mail } ), // Inside Distinct ManagerEmail ), // Inside Concat ManagerEmail, ";" & Char(10) )
cabutbul 63 on at

Like
a
(0)

Report
Copy link

Link copied!

I still got an error.
I edit the code to consider blank results, but still need to filter duplicated results.
It is important to note that the intention is not to search for duplicate records of employees but duplicate records of managers (there may be different employees with the same manager):
Concat(
ForAll(
Split(TextInput1.Text, ";"),
{
EmployeeData: Value
}
),
If(
!IsBlank(Match(EmployeeData, "<(?<email>[^>]*)>").email),
Office365Users.ManagerV2(Match(EmployeeData, "<(?<email>[^>]*)>").email).mail,
"" // Handle the case where the email is blank or invalid
),
";" & Char(10)
)
Chris-D 1,246 on at

Like
a
(0)

Report
Copy link

Link copied!

Please see my code example above. If you want to check for blank manager emails then just wrap the whole thing in another filter in the same way I use it to filter blanks from the employee email list.

Although you should consider what will happen if the manager email cannot be found. That manager won't get an email. Is that a problem?