anchor.diff:  % callback fun for ASP FMS
   asp_prim_to_user(Prim, [SctpPid]) ->
   	gen_fsm:send_event(SctpPid, Prim).
  +
  +
  +sua_to_prim(Sua, LoopDat) when is_record(Sua, sua_msg) ->
  +	Sccp = sua_sccp_conv:sua_to_sccp(Sua),
  +	osmo_util:make_prim('N','UNITADATA',indication, Sccp).
  
positive.code: 		#sua_msg{msg_class = ?M3UA_MSGC_ASPTM} ->
  			gen_fsm:send_event(Asp, Sua),
  			{ignore, LoopDat};
  		_ ->
  			% do something with link related msgs
  			io:format("SUA Unknown message ~p in state ~p~n", [Sua, State]),
  
negative.code: 			Prim = osmo_util:make_prim('M','ERROR',indication,Sua),
  			{ok, Prim, LoopDat};
  		#sua_msg{msg_class = ?M3UA_MSGC_SSNM} ->
  			% FIXME
  			{ignore, LoopDat};
  		#sua_msg{msg_class = ?M3UA_MSGC_ASPSM} ->
  			gen_fsm:send_event(Asp, Sua),
  