application_data_link::new_to (public)

 application_data_link::new_to -object_id object_id \
    -from_object_id from_object_id [ -relation_tag relation_tag ]

Defined in packages/acs-tcl/tcl/application-data-link-procs.tcl

Create a new data link between this_object_id and target_object_id.

Switches:

-object_id (required)

ID of the object that you want linked to the target object.

-from_object_id (required)

The ID of the target object.

-relation_tag (optional)

Relationship identifier

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

Testcases:

No testcase defined.

Source code:

    set backward_rel_id [db_nextval acs_data_links_seq]

    # Flush the cache for both items
    util_memoize_flush_regexp "application_data_link::get_linked_not_cached -from_object_id $object_id -relation_tag $relation_tag .*"
    util_memoize_flush_regexp "application_data_link::get_linked_not_cached -from_object_id $from_object_id -relation_tag $relation_tag .*"
    util_memoize_flush_regexp "application_data_link::get_linked_content_not_cached -from_object_id $object_id .*"
    util_memoize_flush_regexp "application_data_link::get_linked_content_not_cached -from_object_id $from_object_id .*"

    db_dml create_backward_link {}

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

<fullquery name="application_data_link::new_to.create_backward_link">
    <querytext>
	    insert into acs_data_links (rel_id, object_id_one, object_id_two, relation_tag)
	    values (:backward_rel_id, :from_object_id, :object_id, :relation_tag)
    </querytext>
</fullquery>

packages/acs-tcl/tcl/application-data-link-procs.xql