Snippet for same, producing tab-delimited data for pasting into spreadsheet:

declare default element namespace "http://www.tei-c.org/ns/1.0";

for $e in //entry[descendant::symbol[@value='proper-noun']]
order by $e/@xml:id
return concat($e/@xml:id, '	', $e/ancestor::TEI/@xml:id, '.xml')