anchor.diff:  pla([{"description", Description} | T], Acc) when is_list(Description) ->
   	pla(T, Acc#pla{description = Description});
   pla([{"status", Status} | T], Acc) when is_list(Status) ->
  -	pla(T, Acc#pla{status = ocs_rest_res_product:product_status(Status)});
  +	pla(T, Acc#pla{status = pla_status(Status)});
   pla([{"validFor", {struct, L}} | T], Acc) ->
   	Acc1 = case lists:keyfind("startDateTime", 1, L) of
   		{_, Start} ->
  
positive.code: 	pla(T, P, [{"description", Description} | Acc]);
  pla([status | T], #pla{status = Status} = P, Acc)
  		when Status /= undefined ->
  	StatusPla = product_status(Status),
  	pla(T, P, [{"status", StatusPla} | Acc]);
  pla([start_date | T], #pla{start_date = Start,
  		end_date = undefined} = P, Acc) when is_integer(Start) ->
  
negative.code: pla([], Acc) ->
  	Acc.
  
  -spec pla_status(Status) -> Status
  	when
  		Status :: created | active | cancelled | terminated | string().
  %% @doc CODEC for life cycle status of PLA.
  %% @private
  pla_status(created) -> "Created";
  pla_status(cancelled) -> "Cancelled";
  pla_status(active) -> "Active";
  pla_status(terminated) -> "Terminated";
  pla_status("Created") -> created;
  pla_status("Active") -> active;
  pla_status("Cancelled") -> cancelled;
  pla_status("Terminated") -> terminated.
  
  -spec pla_chars(Characteristics) -> Characteristics
  	when
  