Index

Package: DDS.StatusCondition_Impl

Description

package DDS.StatusCondition_Impl is
(c) Copyright, Real-Time Innovations, $Date:: 2012-02-16 #$ All rights reserved. No duplications, whole or partial, manual or electronic, may be made without express written permission. Any such copies, or revisions thereof, must display this notice unaltered. This code contains trade secrets of Real-Time Innovations, Inc.

Classes

Ref

type Ref is limited new DDS.Condition_Impl.Ref and DDS.StatusCondition.Ref with
      record
         Owner : DDS.Entity.Ref_Access;
      end record;

Ancestors:

Primitive operations:

DDS.Condition_Impl.Get_User_Object (Inherited)
DDS.Condition_Impl.GetInterface (Inherited)
DDS.Condition_Impl.Set_User_Object (Inherited)
DDS.Condition_Impl.SetInterface (Inherited)
Get_Enabled_Statuses (Inherited)
Get_Enabled_Statuses
Get_Entity (Inherited)
Get_Trigger_Value
Get_Trigger_Value (Inherited)
GetInterface
Set_Enabled_Statuses
Set_Enabled_Statuses (Inherited)
SetInterface

Types

Ref_Access

type Ref_Access is access all Ref'Class;

DDS_StatusCondition_Access

type DDS_StatusCondition_Access is access all DDS_StatusCondition with Storage_Size => 0;

Subprograms & Entries

Get_Enabled_Statuses

function Get_Enabled_Statuses 
(Self: not null access Ref) return DDS.StatusMask;

Get_Trigger_Value

function Get_Trigger_Value 
(Self: access Ref) return DDS.Boolean;

Set_Enabled_Statuses

procedure Set_Enabled_Statuses 
(Self: not null access Ref;
Mask: in DDS.StatusMask);

Get_Entity

function Get_Entity 
(Self: not null access Ref) return access DDS.Entity.Ref'Class;

Get_Impl_I

function Get_Impl_I 
(Self: access Ref) return DDS.Condition_Impl.Ref_Access;

GetInterface

function GetInterface 
(Self: not null access Ref) return DDS_StatusCondition_Access;

SetInterface

procedure SetInterface 
(Self: not null access Ref;
To: DDS_StatusCondition_Access);