TFullNodeAddress = record
private
    fFull : U32;
    
    function GetEcuAddress : TNodeAddress;
    function GetProtocolId : U8;
    function GetReserved : U8;
    
    procedure SetEcuAddress(const aNodeAddress : TNodeAddress);
    procedure SetProtocolId(const aProtocolId : U8);
    procedure SetReserved(const aReserved : U8);

public
    property Full       : U32 read fFull write fFull;
    property EcuAddress : TNodeAddress read GetEcuAddress write SetEcuAddress;
    property ProtocolId : U8 read GetProtocolId write SetProtocolId;
    property Reserved   : U8 read GetReserved write SetReserved;
end;