anchor.diff:  	    {error, {unknown_operation, Operation}}
       end.
   
  +findListValue(Key, KeyVals) ->
  +    case lists:keyfind(Key, 1, KeyVals) of
  +        {Key, List} ->
  +            List;
  +        false ->
  +            []
  +    end.
   %%%
   %%% returns {ok, Header, Body} | {error, Error}
   %%%
  
positive.code:     call_attach(Wsdl, Operation, Port, Service, Headers, Message, [], []).
  
  %%% --------------------------------------------------------------------
  %%% Make a SOAP request (with http headers)
  %%% --------------------------------------------------------------------
  call(Wsdl, Operation, Port, Service, Headers, Message, http_headers, HttpHeaders) ->
      call_attach(Wsdl, Operation, Port, Service, Headers, Message, [], HttpHeaders).
  
  
  %%% --------------------------------------------------------------------
  
negative.code: 
  		    {ContentType, Request} =
                          make_request_body(XmlMessage, Attachments, Action),
                      ?dbg("+++ Request = ~p~n", [Request]),
  		    HttpRes = http_request(URL, Action, Request,
                                             HttpClientOptions, HttpHeaders,
  