<% $screenTitle="Add Event"; $db = new DBFile($main::events_db); if ($record) { $screenTitle = "Edit Event"; if (defined $record->{'id'}) { $_edit = 1; } &main::checkPermissions("","EDIT_EVENTS","EDIT_OWN_EVENTS"); } else { $record = {}; $screenTitle = "Add Event"; $_add = 1; &main::checkPermissions("","ADD_EVENT"); } %> ">

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

<%= $db->{'properties'}->{$field}->{'name'} || $field %> :

<%= &main::GetFieldInput($db->{'properties'}->{$field},$field,$record) %>

<% if ($_edit) { %> Modify event schedule now
<% } else { %> <% } %>