Ich würde das anders angehen und durch die Nodes iterieren:
Delphi-Quellcode:
var Node:IXMLNode;
Node:= LNodeElement_CATALOG.ChildNodes.First;
while Node<>nil do
begin
if Node.NodeName = 'PRICE_FLAG' then
begin
if Node.Attributes['type'] = 'incl_assurance' then
...
else if Node.Attributes['type'] = 'incl_duty' then
...
end;
Node := Node.NextSibling;
end;
(nicht getestet)