anchor.diff:           {'Host-IP-Address', [?ADDR]},
            {'Vendor-Id', hd(Host)},  %% match this in disconnect/5
            {'Product-Name', "OTP/diameter"},
  -         {'Acct-Application-Id', [?APP_ID]},
  +         {'Acct-Application-Id', [0]},
            {restrict_connections, false},
  -         {application, [{dictionary, ?DICT_COMMON},
  +         {application, [{dictionary, diameter_gen_base_rfc6733},
  +                        {alias, common},
                           {module, #diameter_callback{_ = false}}]}]).
   
   %% Disconnect reasons that diameter passes as the first argument of a
  
positive.code:     ok = diameter:start(),
      ok = diameter:start_service(?SERVER, ?SERVICE(?SERVER)),
      ok = diameter:start_service(?CLIENT, ?SERVICE(?CLIENT)).
  
  connect(Config) ->
      Pid = spawn(fun init/0),  %% process for disconnect_cb to bang
  
negative.code: 
  -define(CLIENT, "CLIENT").
  -define(SERVER, "SERVER").
  
  %% Config for diameter:start_service/2.
  -define(SERVICE(Host),
  