[Home] [Help]
947:
948: BEGIN
949: SELECT link_Id
950: INTO l_link_id
951: FROM cs_incident_links_ext
952: WHERE from_incident_id = l_links_ext_rec.from_incident_id
953: AND (to_object_id = l_links_ext_rec.to_object_id OR
954: to_object_number = l_links_ext_rec.to_object_number)
955: AND to_object_type = l_links_ext_rec.to_object_type;
955: AND to_object_type = l_links_ext_rec.to_object_type;
956:
957: EXCEPTION
958: WHEN NO_DATA_FOUND THEN
959: INSERT INTO cs_incident_links_ext (
960: link_id,
961: from_incident_id,
962: to_object_id,
963: to_object_number,
979: attribute10,
980: context,
981: object_version_number)
982: VALUES (
983: cs_incident_links_ext_s.NEXTVAL,
984: l_links_ext_rec.from_incident_id,
985: l_links_ext_rec.to_object_id,
986: l_links_ext_rec.to_object_number,
987: l_links_ext_rec.to_object_type,
1704: IF (p_link_rec.link_id_ext IS NULL) THEN
1705: Begin
1706: Select link_id
1707: Into l_Derived_External_Link_Id
1708: From cs_incident_links_ext
1709: Where from_incident_id = l_old_values_rec.subject_id
1710: And (to_object_id = l_old_values_rec.object_id OR
1711: to_object_number = l_old_values_rec.object_number)
1712: And to_object_type = l_old_values_rec.object_type;
1716: -- Check if the external link was created from the reciprocal link
1717: Begin
1718: Select link_id
1719: Into l_Derived_External_Link_Id
1720: From cs_incident_links_ext
1721: Where from_incident_id = l_old_values_rec.object_id
1722: And to_object_id = l_old_values_rec.subject_id
1723: And to_object_type = l_old_values_rec.subject_type;
1724: Exception
1746: -- Standard start of API savepoint
1747: SAVEPOINT Update_IncidentLink_Ext_PVT;
1748:
1749: BEGIN
1750: Update cs_incident_links_ext
1751: Set from_incident_id = l_link_rec.from_incident_id,
1752: to_object_id = l_link_rec.object_id,
1753: to_object_number = l_link_rec.object_number,
1754: to_object_type = l_link_rec.object_type,
1783: -- Standard start of API savepoint
1784: SAVEPOINT Delete_IncidentLink_Ext_PVT;
1785:
1786: BEGIN
1787: Delete From cs_incident_links_ext
1788: Where link_id = nvl(p_link_rec.link_id_ext, l_Derived_External_Link_Id);
1789:
1790: EXCEPTION
1791: When OTHERS THEN
1920: p_data => x_msg_data);
1921: END;
1922:
1923: -- When deleting a link, the link record is not removed from the the table cs_incident_links, it is end dated.
1924: -- In the case of an external link, it is deleted from the table cs_incident_links_ext.
1925:
1926: PROCEDURE DELETE_INCIDENTLINK (
1927: P_API_VERSION IN NUMBER,
1928: P_INIT_MSG_LIST IN VARCHAR2,
2075: end if; -- ( p_link_id IS NOT NULL)
2076:
2077: -- For bugs 2972584 and 2972611
2078: -- Check if the details are for an external link, and if no external link ID is passed, then derive the corresponding
2079: -- external link ID so that the same may be deleted from the CS_Incident_Links_Ext table
2080:
2081: IF ( c1rec.subject_type <> 'SR' OR c1rec.object_type <> 'SR' ) THEN
2082:
2083: IF ( p_link_id_ext IS NULL ) THEN
2085: Begin
2086:
2087: Select link_id
2088: Into l_Derived_External_Link_Id
2089: From cs_incident_links_ext
2090: Where from_incident_id = c1rec.subject_id
2091: And (to_object_id = c1rec.object_id OR
2092: to_object_number = c1rec.object_number)
2093: And to_object_type = c1rec.object_type;
2097: -- Check if the external link was created from the reciprocal link
2098: Begin
2099: Select link_id
2100: Into l_Derived_External_Link_Id
2101: From cs_incident_links_ext
2102: Where from_incident_id = c1rec.object_id
2103: And to_object_id = c1rec.subject_id
2104: And to_object_type = c1rec.subject_type;
2105: Exception
2123: -- Standard start of API savepoint
2124: SAVEPOINT Delete_IncidentLink_Ext_PVT;
2125:
2126: BEGIN
2127: Delete From cs_incident_links_ext
2128: Where link_id = nvl(p_link_id_ext, l_Derived_External_Link_Id);
2129:
2130: EXCEPTION
2131: when OTHERS THEN