Как узнать сушествование в Soap-ответе xml тега?

[delphi159]

Soap-сервер возвращает ответ иногда с xml-тегом 'DELIVERY_DATE', а иногда без него. Как написать if-условие, чтобы различать их, только без явного создания xml-документа, прямо из возвращаемого soap-ответа?
Я думаю, что надо написать 2 for-цикла: внешный перебырает WAYBILL ноды, а внутренный ищет внутри DELIVERY_DATE, но не могу написать правильные for-цикли.

Download zip:https://mega.nz

Пробовал так:

for i := 0 to FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes.Count - 1 do
begin
strCreate_Date:=FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes[i].ChildValues['CREATE_DATE'];
   strYear:=copy(strCreate_Date,1,4);
   strMonth:=copy(strCreate_Date,6,2);
   strDay:=copy(strCreate_Date,9,2);
strCreate_Date:=strDay+FormatSettings.DateSeparator+strMonth+FormatSettings.DateSeparator+strYear;

 if (FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes.FindNode('DELIVERY_DATE')<>Nil) then
// or if (FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes[i].NodeName='DELIVERY_DATE') then
begin
strDelivery_Date:=FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes[i].ChildValues['DELIVERY_DATE'];
    strYear:=copy(strDelivery_Date,1,4);
    strMonth:=copy(strDelivery_Date,6,2);
    strDay:=copy(strDelivery_Date,9,2);
strDelivery_Date:=strDay+FormatSettings.DateSeparator+strMonth+FormatSettings.DateSeparator+strYear;
end
else ;

CDSGetBuyerWaybills.Append;
CDSGetBuyerWaybills.FieldByName('create_date').AsString:=strCreate_Date;
CDSGetBuyerWaybills.FieldByName('delivery_date').AsString:=strDelivery_Date;
CDSGetBuyerWaybills.FieldByName('activate_date').AsString:=strActivate_Date;
CDSGetBuyerWaybills.Post;
end;

но он никогда не находит тега <DELIVERY_DATE>, в цикле игнорируются оба оператора:

 if (FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes.FindNode('DELIVERY_DATE')<>Nil) then...

и этот тоже:

if (FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes[i].NodeName='DELIVERY_DATE') then...

тогда, когда в xml-е тег 'DELIVERY_DATE' точно есть.

Soap-ответ имеет вид:

   <?xml version="1.0"?>
        
    <WAYBILL_LIST xmlns="">
        <WAYBILL>
             <ID>206405566</ID>
             <TYPE>2</TYPE>
             <CREATE_DATE>2015-09-29T12:10:53</CREATE_DATE>
             <TRANSPORT_COAST>0</TRANSPORT_COAST>
             <DELIVERY_DATE>2015-10-03T10:34:43</DELIVERY_DATE>
             <STATUS>2</STATUS>
             <ACTIVATE_DATE>2015-09-29T12:10:55</ACTIVATE_DATE>
             <FULL_AMOUNT>279.99</FULL_AMOUNT>
             <CAR_NUMBER>UJU991</CAR_NUMBER>
             <WAYBILL_NUMBER>0198315109</WAYBILL_NUMBER>
             <CLOSE_DATE>2015-10-03T10:34:43</CLOSE_DATE>
             <S_USER_ID>26461</S_USER_ID>
             <BEGIN_DATE>2015-09-29T12:10:53</BEGIN_DATE>
       </WAYBILL>
       <WAYBILL>
             <ID>207247983</ID>
             <TYPE>2</TYPE>
             <CREATE_DATE>2015-10-03T12:20:09</CREATE_DATE>
             <TRANSPORT_COAST>0</TRANSPORT_COAST>
             <STATUS>1</STATUS>
             <ACTIVATE_DATE>2015-10-03T12:20:11</ACTIVATE_DATE>
             <FULL_AMOUNT>279.56</FULL_AMOUNT>
             <CAR_NUMBER>YPY088</CAR_NUMBER>
             <WAYBILL_NUMBER>0199129044</WAYBILL_NUMBER>
             <S_USER_ID>26461</S_USER_ID>
             <BEGIN_DATE>2015-10-03T12:20:09</BEGIN_DATE>
        </WAYBILL>
    </WAYBILL_LIST>

[delphi159]

Вопрос закрыт. Решилось на stackoverflow так:

if FromServ.get_buyer_waybillsResult.XMLNode.ChildNodes[i].childnodes.FindNode('DELIVERY_DATE')<> nil