| Quintiq file version 2.0 | 
| #parent: #root | 
| Method CreateSubscription ( | 
|   internal[GUIComponent] parent_i, | 
|   structured[LibCal_Calendar] subscribers_i, | 
|   LibCal_LeadingParticipation subscribeTo_i | 
| ) id:Method_LibCal_dlgSubscription_CreateSubscription | 
| { | 
|   #keys: '[131094.1.400050766]' | 
|   Body: | 
|   [* | 
|     Dialog.Title( "Create subscription" ); | 
|      | 
|     calendarsAsSet := subscribers_i.Copy(); | 
|     dhSubscribers.Data( &calendarsAsSet ); | 
|      | 
|     dhParticipationToSubscribeTo.Data( subscribeTo_i ); | 
|      | 
|     lblSubject.Text( subscribeTo_i.Event().Subject() ); | 
|      | 
|     this.Open( parent_i, subscribeTo_i ); | 
|   *] | 
| } |