anchor.diff:  -include_lib("radius/include/radius.hrl").
   -include("ocs_wm.hrl").
   -include("ocs.hrl").
  +
  +-define(VendorID, 529).
  +-define(AscendDataRate, 197).
  +-define(AscendXmitRate, 255).
   
   -record(state,
   		{subscriber :: string(),
  
positive.code: sub_attributes([], Acc) ->
  	Acc.
  
  vendor_specific(AttrJson) ->
  	{_, Type} = lists:keyfind("type", 1, AttrJson),
  	{_, VendorID} = lists:keyfind("vendorId", 1, AttrJson),
  	{_, Key} = lists:keyfind("vendorType", 1, AttrJson),
  	{_, Value} = lists:keyfind("value", 1, AttrJson),
  	{Type, {VendorID, {Key, Value}}}.
  
  
negative.code: 	case ocs:find_subscriber(Identity) of
  		{ok, PWBin, Attributes, Balance, Enabled} ->
  			Password = binary_to_list(PWBin),
  			JSAttributes = json_attributes(Attributes),
  			AttrObj = {struct, JSAttributes}, 
  			RespObj = [{identity, Identity}, {password, Password},
  					{attributes, AttrObj}, {balance, Balance},
  					{enabled, Enabled}],
  			JsonObj  = {struct, RespObj},
  			Body  = mochijson:encode(JsonObj),
  			{Body, ReqData, Context};
  		{error, _Reason} ->
  