[Home] [Help]
2167: -- 5.1 Validate for existence of subject_id (subject_exists routine)
2168: BEGIN
2169: SELECT 'x'
2170: INTO l_exists
2171: FROM csi_ii_relationships
2172: WHERE subject_id=r_id.subject_id
2173: AND relationship_type_code = r_id.relationship_type_code
2174: AND (active_end_date IS NULL OR active_end_date > SYSDATE)
2175: AND ROWNUM=1;
2199: WHEN NO_DATA_FOUND THEN
2200: NULL;
2201: END;
2202: -- 5.2 Validate check for object
2203: csi_ii_relationships_pvt.check_for_object
2204: (p_subject_id =>r_id.subject_id,
2205: p_object_id =>r_id.object_id,
2206: p_relationship_type_code =>r_id.relationship_type_code,
2207: x_return_status =>x_return_status,
2232: THEN
2233: BEGIN
2234: SELECT 'x'
2235: INTO l_exists
2236: FROM csi_ii_relationships
2237: WHERE (( subject_id=r_id.object_id AND
2238: object_id=r_id.subject_id)
2239: OR ( subject_id=r_id.subject_id AND
2240: object_id=r_id.object_id))
2267: EXCEPTION
2268: WHEN NO_DATA_FOUND THEN
2269: NULL;
2270: END;
2271: IF csi_ii_relationships_pvt.Is_link_type
2272: (p_instance_id => r_id.object_id )
2273: THEN
2274: IF csi_ii_relationships_pvt.relationship_for_link
2275: (p_instance_id => r_id.object_id
2270: END;
2271: IF csi_ii_relationships_pvt.Is_link_type
2272: (p_instance_id => r_id.object_id )
2273: THEN
2274: IF csi_ii_relationships_pvt.relationship_for_link
2275: (p_instance_id => r_id.object_id
2276: ,p_mode => 'CREATE'
2277: ,p_relationship_id => NULL )
2278: THEN
2299: RAISE SKIP_ERROR;
2300: END IF;
2301: END IF;
2302:
2303: IF csi_ii_relationships_pvt.Is_link_type
2304: (p_instance_id => r_id.subject_id )
2305: THEN
2306: IF csi_ii_relationships_pvt.relationship_for_link
2307: (p_instance_id => r_id.subject_id
2302:
2303: IF csi_ii_relationships_pvt.Is_link_type
2304: (p_instance_id => r_id.subject_id )
2305: THEN
2306: IF csi_ii_relationships_pvt.relationship_for_link
2307: (p_instance_id => r_id.subject_id
2308: ,p_mode => 'CREATE'
2309: ,p_relationship_id => NULL )
2310: THEN
2700:
2701: ELSIF p_mode='INSERT'
2702: THEN
2703: FND_File.Put_Line(Fnd_File.LOG,'Inside for Insert mode');
2704: -- This run also has to insert records into csi_ii_relationships
2705: -- ,csi_ii_relationships_h and csi_transactions
2706: l_ins:=0;
2707: l_txn_type_id := csi_ml_util_pvt.get_txn_type_id('OPEN_INTERFACE','CSI');
2708:
2701: ELSIF p_mode='INSERT'
2702: THEN
2703: FND_File.Put_Line(Fnd_File.LOG,'Inside for Insert mode');
2704: -- This run also has to insert records into csi_ii_relationships
2705: -- ,csi_ii_relationships_h and csi_transactions
2706: l_ins:=0;
2707: l_txn_type_id := csi_ml_util_pvt.get_txn_type_id('OPEN_INTERFACE','CSI');
2708:
2709: FOR l_ins_rel_csr IN ins_rel_csr(p_worker_id, l_txn_from_date, l_txn_to_date)
2708:
2709: FOR l_ins_rel_csr IN ins_rel_csr(p_worker_id, l_txn_from_date, l_txn_to_date)
2710: LOOP
2711: l_ins:=l_ins+1;
2712: SELECT csi_ii_relationships_h_s.NEXTVAL
2713: INTO l_rel_hist_tbl(l_ins)
2714: FROM dual;
2715:
2716: SELECT csi_ii_relationships_s.NEXTVAL
2712: SELECT csi_ii_relationships_h_s.NEXTVAL
2713: INTO l_rel_hist_tbl(l_ins)
2714: FROM dual;
2715:
2716: SELECT csi_ii_relationships_s.NEXTVAL
2717: INTO l_ii_relationship_rec_tab.rel_interface_id(l_ins)
2718: FROM dual;
2719:
2720: SELECT csi_transactions_s.NEXTVAL
2750: l_ii_relationship_rec_tab.attribute15(l_ins) := l_ins_rel_csr.attribute15;
2751: END LOOP;
2752:
2753: FORALL i in 1 .. l_ii_relationship_rec_tab.rel_interface_id.count
2754: INSERT INTO CSI_II_RELATIONSHIPS(
2755: RELATIONSHIP_ID
2756: ,RELATIONSHIP_TYPE_CODE
2757: ,OBJECT_ID
2758: ,SUBJECT_ID
2817: ,1);
2818:
2819:
2820: FORALL i in 1 .. l_ii_relationship_rec_tab.rel_interface_id.count
2821: INSERT INTO CSI_II_RELATIONSHIPS_H(
2822: RELATIONSHIP_HISTORY_ID
2823: ,RELATIONSHIP_ID
2824: ,TRANSACTION_ID
2825: ,NEW_SUBJECT_ID