bm_handle_bookmark_double_click (public)

 bm_handle_bookmark_double_click bookmark_id errmsg return_url

Defined in packages/bookmarks/tcl/bookmarks-procs.tcl

Parameters:

bookmark_id (required)

errmsg (required)

return_url (required)

Testcases:

No testcase defined.

Source code:

    # check and see if this was a double click
    set dbclick_p [db_string dbclick "select count(*) 
                                          from   bm_bookmarks 
                                      where  bookmark_id = :bookmark_id"]
    
    if {$dbclick_p == 1} {   
        ad_returnredirect  -allow_complete_url $return_url
            ad_script_abort
    } else {

        upvar \#[template::adp_level] n_errors n_errors
        upvar \#[template::adp_level] error_list error_list

        set n_errors 1
        set error_list [list "There was an error making this insert into the database. $errmsg"]

          uplevel \#[template::adp_level] {
          ad_return_template "complaint"
          }
            ad_script_abort
    }

Generic XQL file:

<fullquery name="bm_handle_bookmark_double_click.dbclick">
    <querytext>
      select count(*) 
                                          from   bm_bookmarks 
	                                  where  bookmark_id = :bookmark_id
      </querytext>
</fullquery>

packages/bookmarks/tcl/bookmarks-procs.xql

PostgreSQL XQL file:

packages/bookmarks/tcl/bookmarks-procs-postgresql.xql

Oracle XQL file:

packages/bookmarks/tcl/bookmarks-procs-oracle.xql