39: x_msg_data OUT NOCOPY VARCHAR2) IS
40: /* split out and commented the 2 cursors for perf Bug 4907908
41: CURSOR dup_cur IS
42: SELECT 'x'
43: FROM csi_t_txn_systems txn, csi_systems_vl sys
44: WHERE txn.system_name = p_system_name
45: AND txn.customer_id = p_Customer_ID
46: AND (txn.system_number IS NULL OR
47: txn.system_number = p_System_number)
51: sys.system_number = p_System_number);
52:
53: CURSOR dup_cur1 IS
54: SELECT 'x'
55: FROM csi_t_txn_systems txn, csi_systems_vl sys
56: WHERE txn.system_name = p_system_name
57: AND txn.customer_id = p_Customer_ID
58: AND (txn.system_number IS NULL OR
59: txn.system_number = p_System_number)
69:
70: Begin
71: SELECT 'Y'
72: INTO l_dummy
73: FROM csi_systems_vl sys
74: WHERE sys.name = p_system_name
75: AND sys.customer_id = p_Customer_ID
76: AND (sys.system_number IS NULL OR
77: sys.system_number = p_System_number);