sub km200_SetData($)
{
	my writevalue            	= shift;