bugfix

yypsybs

2023-09-22 585b0c8daf1305c498186609fb82b79c12a02e29

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Quintiq file version 2.0
#parent: lstParticipations
Response OnSelectionChanged (
  structured[Object] selection
) id:Response_lstParticipations_OnSelectionChanged_379
{
  #keys: '[131094.1.749233251]'
  Body:
  [*
    // This response is triggered when the section contains at least one EventCategory.
    // The other OnSelectionChanges is not triggered in that case.
    
    // Make sure that the row of the first selected event is visible in the ganttchart.
    event := minselect( selection, Elements.astype( LibCal_Participation ).Event, evnt, true, evnt.EventCategory().Name(), evnt.Subject() );
    
    if( not isnull( event ) )
    {
      gcCalendar.EnsureRowVisible( event.Key() );
    }
    else
    {
      // Only EventCategories are selected.
      category := minselect( selection, Elements.astype( LibCal_EventCategory ), cat, true, cat.Name() );
      gcCalendar.EnsureRowVisible( category.Key() );
    }
    
    // Put the Participations that are selected in the list in a DataHolders,
    // so that they can be used for filtering when 'Only show selected events' is checked.
    participations := construct( LibCal_Participations );
    
    traverse( selection, Elements, obj, obj.istype( LibCal_Participation ) )
    {
      participations.Add( obj.astype( LibCal_Participation ) );
    }
    
    dhSelectedParticipations.Data( &participations );
  *]
  CanBindMultiple: false
  DefinitionID: 'Responsedef_List_OnSelectionChanged'
}