Quintiq file version 2.0
#parent: #root
Method InitializeCategories () id:Method_LibCal_dlgEvent_InitializeCategories
{
  #keys: '[131094.1.662243397]'
  Body:
  [*
    participation := dhLeadingParticipation.Data();
    calendar      := participation.Calendar();
    
    categories := calendar.CalendarRegistry().EventCategory( relget );
    
    dhCategories.Data( &categories );
    
    // The applicable EventCategory is selected in ddlCategory.OnCreate()
  *]
}