Quintiq file version 2.0
|
#parent: #root
|
Method GetAllParent () as owning LibCal_EventTypes
|
{
|
Description: 'Get all parents'
|
TextBody:
|
[*
|
retvalue := construct( LibCal_EventTypes );
|
|
//to avoid a transaction propagate, just find the parent instead of locating via decl relation this.Parent
|
parent := LibCal_EventType::FindEventTypeIndex( this.ParentID() );
|
|
if( not isnull( parent ) )
|
{
|
retvalue := parent.GetAllParent();
|
}
|
retvalue.Add( this );
|
return &retvalue;
|
*]
|
}
|
