ModifyMetadataMessage Derived Type

type, public, extends(AbstractMessage) :: ModifyMetadataMessage


Inherits

type~~modifymetadatamessage~~InheritsGraph type~modifymetadatamessage ModifyMetadataMessage type~abstractmessage AbstractMessage type~modifymetadatamessage->type~abstractmessage type~stringvariablemap StringVariableMap type~modifymetadatamessage->type~stringvariablemap var_map type~map_set~15 map_Set type~stringvariablemap->type~map_set~15 tree type~map_s_basenode~15 map_s_BaseNode type~map_set~15->type~map_s_basenode~15 root

Components

Type Visibility Attributes Name Initial
integer, public :: collection_id
type(StringVariableMap), public :: var_map

Constructor

public interface ModifyMetadataMessage

  • private function new_ModifyMetadataMessage(collection_id, unusable, var_map, rc) result(message)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: collection_id
    class(KeywordEnforcer), intent(in), optional :: unusable
    type(StringVariableMap), intent(in), optional :: var_map
    integer, intent(out), optional :: rc

    Return Value type(ModifyMetadataMessage)


Type-Bound Procedures

procedure, public :: deserialize

  • private subroutine deserialize(this, buffer, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(ModifyMetadataMessage), intent(inout) :: this
    integer, intent(in) :: buffer(:)
    integer, intent(out), optional :: rc

procedure, public :: dispatch

  • private recursive subroutine dispatch(this, visitor, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractMessage), intent(in) :: this
    class(SurrogateMessageVisitor), intent(inout), target :: visitor
    integer, intent(out), optional :: rc

procedure, public :: get_length

  • private function get_length(this) result(length)

    Arguments

    Type IntentOptional Attributes Name
    class(ModifyMetadataMessage), intent(in) :: this

    Return Value integer

procedure, public, nopass :: get_type_id

  • private function get_type_id() result(type_id)

    Arguments

    None

    Return Value integer

procedure, public :: serialize

  • private subroutine serialize(this, buffer, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(ModifyMetadataMessage), intent(in) :: this
    integer, intent(inout) :: buffer(:)
    integer, intent(out), optional :: rc

Source Code

   type, extends(AbstractMessage) :: ModifyMetadataMessage
      integer :: collection_id
      type (StringVariableMap) :: var_map
   contains
      procedure, nopass :: get_type_id
      procedure :: get_length
      procedure :: serialize
      procedure :: deserialize
   end type ModifyMetadataMessage