content_extlink::new (public, deprecated)

 content_extlink::new [ -extlink_id extlink_id ] -url url \
    -parent_id parent_id [ -name name ] [ -label label ] \
    [ -description description ] [ -package_id package_id ]

Defined in packages/acs-content-repository/tcl/deprecated-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Create a new external link.

Switches:

-extlink_id (optional)

Optional pre-assigned object_id for the link

-url (required)

The URL of the external resource

-parent_id (required)

The folder that will contain this extlink

-name (optional)

Name to assign the object (defaults to "link extlink_id")

-label (optional)

Label for the extlink (defaults to the URL)

-description (optional)

An extended description of the link (defaults to NULL)

-package_id (optional)

Package Id of the package that created the link

See Also:

• content::extlink::new

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc content_extlink::new

    set creation_user [ad_conn user_id]
    set creation_ip [ad_conn peeraddr]

    if {$package_id eq ""} {
        set package_id [ad_conn package_id]
    }

    return [db_exec_plsql extlink_new {}]

Generic XQL file:

packages/acs-content-repository/tcl/deprecated-procs.xql

PostgreSQL XQL file:

<fullquery name="content_extlink::new.extlink_new">
    <querytext>

        select content_extlink__new (
          :name,
          :url,
          :label,
          :description,
          :parent_id,
          :extlink_id,
          current_timestamp,
          :creation_user,
          :creation_ip,
          :package_id
        );

      </querytext>
</fullquery>

packages/acs-content-repository/tcl/deprecated-procs-postgresql.xql

Oracle XQL file:

<fullquery name="content_extlink::new.extlink_new">
    <querytext>

        begin
          :1 := content_extlink.new (
                  name => :name,
                  url => :url,
                  label => :label,
                  description => :description,
                  parent_id => :parent_id,
                  extlink_id => :extlink_id,
                  creation_user => :creation_user,
                  creation_ip => :creation_ip,
                  package_id => :package_id
                );
        end;

      </querytext>
</fullquery>

packages/acs-content-repository/tcl/deprecated-procs-oracle.xql