Set Default and UnknownValue Implementation on Extensible Enum which Implements and Interface

[Arthurvdv]

Inspired by the How to use Interfaces in BC - The BC Coding Stream / Business Central Development; When an Enum object implements an interface and the Extensible property is set to True, the rule checks whether the DefaultImplementation or UnknownValueImplementation property is present. If either of these properties is missing, then then raise a diagnostic (maybe best to implement this through two separate rules).

enum 50100 Vehicles implements Vehicle
{
    DefaultImplementation = Vehicle = EmptyVehicle; // Raise diagnostic when this property is not set
    Extensible = true;
    UnknownValueImplementation = Vehicle = EmptyVehicle; // Raise diagnostic when this property is not set

    value(0; " ")
    {
        Caption = ' ', Locked = true;
    }
    value(1; "Car")
    {
        Caption = 'Car';
        Implementation = Vehicle = Car;
    }
}

interface Vehicle { }
codeunit 50100 EmptyVehicle implements Vehicle { }
codeunit 50101 Car implements Vehicle { }