<% require "calendars.inc"; $screenTitle="Add Calendar"; $db = new DBFile($main::calendars_db); $usersdb = new DBFile($main::users_db); if ($record) { $screenTitle = "Edit Calendar"; if (defined $record->{'id'}) { $_edit = 1; } &main::checkPermissions("_global","MANAGE_CALENDARS"); $command_value = "edit_calendar"; } else { $record = {}; $screenTitle = "Add Calendar"; $_add = 1; &main::checkPermissions("_global","MANAGE_CALENDARS"); } %> ">

"> <% $fieldnames = &main::DBGetAddFields($db); foreach $field (@$fieldnames) { %> <% } %> <% if (!$_edit) { %> <% } %>

<%= $db->{'properties'}->{$field}->{'description'}%>
<%= $db->{'properties'}->{$field}->{'name'} || $field %> :	<%= &main::GetFieldInput($db->{'properties'}->{$field},$field,$record) %>
You may copy an existing calendar to the new calendar (including all events and configuration), or leave blank for a default empty calendar.
Copy Calendar :	<% $cal_list = new HTML::optionList(); $calendars = &main::GetAllCalendars(); foreach $calendar (@$calendars) { $cal_list->addOption($calendar->{key},$calendar->{name}); } %> <%= $cal_list->toString() %>
You may give full permissions to a user that will act as the administrator for this calendar by selecting a user below. Leave this option blank to not add any permissions.
Give Full Permissions To :	<% $user_list = new HTML::optionList(); $users = $usersdb->getRecords( {} ); foreach $record (sort { $a->{'username'} cmp $b->{'username'} } @$users) { $user_list->addOption($record->{username} , $record->{username}." - ".$record->{name}); } %> <%= $user_list->toString(); %>

<% if ($_edit) { %> <% } else { %> <% } %>