/**
* delete list
*/
function delete_test_list()
{
$list_table = new ListTable(REGRESSION_TEST_LIST_TITLE);
# check if we have to cleanup
if (REGRESSION_TEST_CLEANUP == FALSE) {
return TRUE;
}
if ($list_table->drop() == TRUE) {
return TRUE;
}
return FALSE;
}
/**
* delete a list table
* this function is registered in xajax
* @param string $list_title title of list table
* @param string $key_string comma separated name value pairs
* @return xajaxResponse every xajax registered function needs to return this object
*/
function action_delete_portal_record($list_title)
{
global $logging;
global $user;
global $list_table_description;
global $portal_table_configuration;
global $user_start_time_array;
$logging->info("USER_ACTION " . __METHOD__ . " (user="******", list_title={$list_title})");
# store start time
$user_start_time_array[__METHOD__] = microtime(TRUE);
# create necessary objects
$result = new Result();
$response = new xajaxResponse();
$list_table = new ListTable($list_title);
if ($list_table->get_is_valid() == FALSE) {
$logging->warn("create list object returns false");
$error_message_str = $list_table->get_error_message_str();
$error_log_str = $list_table->get_error_log_str();
$error_str = $list_table->get_error_str();
set_error_message("tab_portal_id", "below", $error_message_str, $error_log_str, $error_str, $response);
return $response;
}
$html_database_table = new HtmlDatabaseTable($portal_table_configuration);
# display error when delete returns false
if ($list_table->drop() == FALSE) {
$logging->warn("drop list returns false");
$error_message_str = $list_table->get_error_message_str();
$error_log_str = $list_table->get_error_log_str();
$error_str = $list_table->get_error_str();
set_error_message("tab_portal_id", "below", $error_message_str, $error_log_str, $error_str, $response);
return $response;
}
# set content
$html_database_table->get_content($list_table_description, $list_title, "", DATABASETABLE_ALL_PAGES, $result);
$response->custom_response->assign_with_effect(PORTAL_CSS_NAME_PREFIX . "content_pane", $result->get_result_str());
# reset current list name only when active list has been removed
if ($list_title == $user->get_current_list_name()) {
$user->set_current_list_name("");
}
# set page navigation and login status to update old 'list' links
$page_navigation_str = get_page_navigation(PAGE_TYPE_PORTAL);
$response->assign("navigation_container", "innerHTML", $page_navigation_str);
# check post conditions
if (check_postconditions($result, $response) == FALSE) {
return $response;
}
# log total time for this function
$logging->info(get_function_time_str(__METHOD__));
return $response;
}
