Quintiq file version 2.0
|
#parent: #root
|
Method SetDefaultValue (
|
LibCal_CalendarRegistry owner
|
) id:Method_DialogCreateEditEventType_SetDefaultValue
|
{
|
#keys: '[415136.0.725511682]'
|
Body:
|
[*
|
// Set default + init dialog
|
dialogInstance := dhDialogData.Data().WrappedInstance();
|
isNew := isnull( dialogInstance );
|
|
// Extract the parent product by filtering out the descendents of the selected products in order to prevent circularity
|
eventtypes := construct( LibCal_EventTypes );
|
if( isNew
|
or dialogInstance.IsLeaf() ) // Is leaf
|
{
|
eventtypes := selectset( owner, EventType, et, true );
|
currentScope := dhDialogDatas.Data();
|
|
eventtypes := eventtypes.Difference( currentScope );
|
}
|
else if( not dialogInstance.HasParent() ) // Is root level
|
{
|
eventtypes := selectset( owner, RootEventType, et, et <> dialogInstance );
|
}
|
else // Has Parent and Child
|
{
|
allEventTypes := selectset( owner, EventType, et, et <> dialogInstance );
|
myChildren := selectset( dialogInstance, AllChildren.AsChildren, c, true );
|
|
eventtypes := allEventTypes.Difference( myChildren );
|
}
|
|
dhParentEventTypeSelection.Data( eventtypes.Copy() );
|
*]
|
}
|
