file_storage::twt::create_url_in_folder (private)

 file_storage::twt::create_url_in_folder url_title url url_description

Defined in packages/file-storage/tcl/test/tclwebtest-procs.tcl

Creates a URL in a folder from the UI.

Parameters:

url_title
url
url_description

Partial Call Graph (max 5 caller/called nodes):

Testcases:

fs_create_url_in_folder, file-storage

Source code:

    set response 0

    # Follow the Create URL link
    tclwebtest::link follow {Create a URL}

    tclwebtest::form find ~n "simple-add"
    tclwebtest::field find ~n "title"
    tclwebtest::field fill $url_title
    tclwebtest::field find ~n "url"
    tclwebtest::field fill $url
    tclwebtest::field find ~n "description"
    tclwebtest::field fill $url_description
    tclwebtest::form submit

    set response_url [tclwebtest::response url]

    if { [string match  "*\?folder_id*" $response_url] } {

        if {[catch {tclwebtest::link find $url_title} errmsg]} {
            aa_error "file_storage::twt::create_url_in_folder $errmsg : Didn't create a URL in a folder"
        } else {
            aa_log "a URL created in a folder"
            set response 1
        }

    } else {
        aa_error "file_storage::twt::create_url_in_folder  failed, bad response url : $response_url"
    }

XQL Not present:

Generic, PostgreSQL, Oracle