The main mistake in your flow is, inside For Each Loop you should have the dtTemp. That is the main filter.
dtTemp = dtAllCountry.AsEnumerable.Where(Function(r) r(“Country”).ToString.Trim.ToUpper = row(“Country”).ToString.Trim.ToUpper).CopyToDataTable
After this Add Data Row.
I’m not able to attach the workflow here. So created the new post.
Find the solution there