application_data_link::new_from (public)

 application_data_link::new_from -object_id object_id \
    -to_object_id to_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.
-to_object_id
(required)
The ID of the target object.
-relation_tag
(optional)
Relationship identifier

Partial Call Graph (max 5 caller/called nodes):
%3 application_data_link::new application_data_link::new (public) application_data_link::new_from application_data_link::new_from application_data_link::new->application_data_link::new_from application_data_link::update_links_from application_data_link::update_links_from (public) application_data_link::update_links_from->application_data_link::new_from db_dml db_dml (public) application_data_link::new_from->db_dml db_nextval db_nextval (public) application_data_link::new_from->db_nextval util_memoize_flush_regexp util_memoize_flush_regexp (public) application_data_link::new_from->util_memoize_flush_regexp

Testcases:
No testcase defined.
Source code:
    set forward_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 $to_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 $to_object_id .*"

    db_dml create_forward_link {}
XQL Not present:
PostgreSQL, Oracle
Generic XQL file:
<fullquery name="application_data_link::new_from.create_forward_link">
    <querytext>
	    insert into acs_data_links (rel_id, object_id_one, object_id_two, relation_tag)
	    values (:forward_rel_id, :object_id, :to_object_id, :relation_tag)
    </querytext>
</fullquery>
packages/acs-tcl/tcl/application-data-link-procs.xql

[ hide source ] | [ make this the default ]
Show another procedure: