TPerShapeDataStateProperty::Write