anchor.diff:  
   %%--------------------------------------------------------------------
   %% Function: from_transportlayer(Request, Origin, LogStr)
  +%%           Request = request record()
  +%%           Origin  = siporigin record()
  +%%           LogStr  = string()
   %% Descrip.: The transport layer passes us a request it has just
   %%           received.
   %% Returns : {pass_to_core, AppModule} |
  
positive.code: 
  %%--------------------------------------------------------------------
  %% Function: from_transportlayer(Response, Origin, LogStr)
  %% Descrip.: The transport layer passes us a response it has just
  %%           received.
  %% Returns : {pass_to_core, AppModule} |
  
negative.code: 	    gen_server:cast(CTPid, {sipmessage, Response, Origin, LogStr}),
  	    continue
      end.
  
  %%--------------------------------------------------------------------
  %% Function: get_my_to_tag(TH)
  %%           TH = thandler record(), server transaction handle
  %% Descrip.: Get to tag that will we used in server transaction response
  %% Returns : {ok, ToTag}
  %%           ToTag = string()
  %%--------------------------------------------------------------------
  get_my_to_tag(TH) when is_record(TH, thandler) ->
      gen_server:call(TH#thandler.pid, get_my_to_tag, ?STORE_TIMEOUT).
  