anchor.diff:  	HashBin = term_hash_to_io(H), 
   	<<KeyBin/binary,9,HashBin/binary>>.
   
  -io_kv_table_to_tuple_list(KVTable) ->
  -	BList = binary:split(clean_table(KVTable),<<10>>,[global]),		%% split at line feed positions
  -	[io_kv_pair_to_tuple(KVbin) || KVbin <- BList].
  +%% Data access per key (read,write,delete)
   
   read(Channel, KeyTable) when is_binary(Channel), is_binary(KeyTable) ->
   	Cmd = [read,Channel,KeyTable],
  
positive.code: -spec create_check_channel(binary()) -> {atom(),atom()}.
  create_check_channel(Channel) ->
  	TBin = ?TABLE(Channel),
  	Token = list_to_binary([TBin,integer_to_list(erlang:phash2(TBin))]),
  	try 
  		_ = ?binary_to_existing_atom(Token), 	%% probe atom cache for token
  		{?binary_to_existing_atom(TBin),?binary_to_existing_atom(?AUDIT(Channel))}
  
negative.code: io_key_to_term(Key) when is_binary(Key) ->
  	imem_datatype:io_to_term(Key).
  
  io_value_to_term(V) -> V.	%% ToDo: Maybe convert to map datatype when available
  
  % io_hash_to_term(Hash) when is_binary(Hash) -> Hash.
  
  io_kv_pair_to_tuple(KVPair) ->
  	case binary:split(KVPair,<<9>>,[global]) of			%% split at tab position
  