anchor.diff:  call(Wsdl, Operation, Header, Msg) when record(Wsdl, wsdl) ->
       case get_operation(Wsdl#wsdl.operations, Operation) of
   	{ok, Op} ->
  -	    call(Operation, Op#operation.port, Op#operation.service, 
  -		 Msg, Wsdl, Header);
  +	    call(Wsdl, Operation, Op#operation.port, Op#operation.service, 
  +		 Header, Msg);
   	Else ->
   	    Else
       end.
  
positive.code:     case get_operation(Wsdl#wsdl.operations, Operation) of
  	{ok, Op} ->
  	    Msg = mk_msg(?DefaultPrefix, Operation, ListOfData),
  	    call(Operation, Op#operation.port, Op#operation.service, Msg, Wsdl);
  	Else ->
  	    Else
      end.
  
negative.code: %%% --------------------------------------------------------------------
  %%% Make a SOAP request
  %%% --------------------------------------------------------------------
  call(#wsdl{operations = Operations, model = Model}, Operation, Port, Service, Headers, Message) ->
      %% find the operation
      case findOperation(Operation, Port, Service, Operations) of
  	#operation{address = URL, action = SoapAction} ->
  