anchor.diff:  	case lists:suffix(Suffix, UnitsOfMeasure) of
   		true ->
   			[Size] = string:tokens(UnitsOfMeasure, Suffix),
  -			{cents, Size};
  +			{cents, list_to_integer(Size)};
   		false ->
   			product_unit_of_measure4(UnitsOfMeasure)
   	end.
  
positive.code: 	case lists:suffix(Suffix, UnitsOfMeasure) of
  		true ->
  			[Size] = string:tokens(UnitsOfMeasure, Suffix),
  			{gb, Size};
  		false ->
  			product_unit_of_measure3(UnitsOfMeasure)
  	end.
  
negative.code: 	case lists:suffix(Suffix, UnitsOfMeasure) of
  		true ->
  			[Size] = string:tokens(UnitsOfMeasure, Suffix),
  			{octets, list_to_integer(Size)};
  		false ->
  			product_unit_of_measure2(UnitsOfMeasure)
  	end.
  