| | |
| | | // Event and LeadingParticipation |
| | | subject := edtName.Text(); |
| | | description := edtDescription.Text(); |
| | | eventTypeList := ddlEventType.Data(); |
| | | category := sEvent.EventCategory(); |
| | | isDefault := ckbApplyToNewResources.Checked(); |
| | | startDate := dsStartDate.Date(); |
| | |
| | | |
| | | // All values are passed to the Server, only the relevant values are used there. |
| | | event := LibCal_Event::CreateUpdateFromUI( sEvent.Calendar(), sLeadPart.WrappedInstance(), |
| | | subject, description, eventType, capacity, category, isDefault, |
| | | subject, description, eventType, eventTypeList, capacity, category, isDefault, |
| | | startDate, startTimeOfDay, endDate, endTimeOfDay, isAllDay, |
| | | // RecurrencePattern |
| | | isRecurring, recurrenceInterval, patternType, |
| | |
| | | periodType, periodStartDate, nrOfOccurrences, periodEndDate, |
| | | // Subscribers |
| | | dhSubscribers.Data() ); |
| | | info( '------------2----------', isnull( sEvent ), isnull( sLeadPart.WrappedInstance() ) ); |
| | | info( sEvent.Subject(), '---', sEvent.EventID(), '---', sEvent.Info() ); |
| | | //info( sLeadPart.WrappedInstance().Info() ); |
| | | |
| | | return event; |
| | | *] |
| | | } |