anchor.diff:  send_register(#statedata{imsi = IMSI,
   		orig_host = OriginHost, orig_realm = OriginRealm,
   		hss_host = HssHost, hss_realm = HssRealm, service = Service,
  +		apn_context = Context, apn_name = APN,
   		pgw_id = PGW, pgw_plmn = VPLMN} = _StateData) ->
   	SessionId = diameter:session_id([OriginHost]),
   	Request = #'3gpp_swx_SAR'{'Session-Id' = SessionId,
  
positive.code: 		'Origin-Host' = HssHost, 'Origin-Realm' = HssRealm} = _Answer},
  		#statedata{from = Caller, session_id = SessionId,
  		pgw_host = PgwHost, pgw_realm = PgwRealm,
  		pgw_id = PGW, pgw_plmn = VPLMN,
  		imsi = IMSI, identity = Identity} = StateData) ->
  	error_logger:error_report(["Unexpected registration result",
  			{hss_host, HssHost}, {hss_realm, HssRealm},
  			{pgw_host, PgwHost}, {pgw_realm, PgwRealm},
  			{pgw_id, pgw_id(PGW)}, {pgw_plmn, VPLMN},
  			{imsi, IMSI}, {identity, Identity},
  			{session, SessionId}, {result, ResultCode1}]),
  	ResultCode1 = ?'DIAMETER_BASE_RESULT-CODE_UNABLE_TO_COMPLY',
  
negative.code:          		'Auth-Application-Id' = [?SWx_APPLICATION_ID]},
  			'Auth-Session-State' = ?'DIAMETER_BASE_AUTH-SESSION-STATE_NO_STATE_MAINTAINED',
  			'Server-Assignment-Type' = ?'3GPP_SWX_SERVER-ASSIGNMENT-TYPE_PGW_UPDATE',
  			'MIP6-Agent-Info' = PGW, 'Visited-Network-Identifier' = VPLMN,
  			'Context-Identifier' = [Context], 'Service-Selection' = [APN]},
  	diameter:call(Service, ?SWx_APPLICATION,
  			Request, [detach, {extra, [self()]}]).
  
  