79: THEN
80: l_sql := l_sql || ' AND sr_contact_point_id NOT IN ( '|| p_updated_cp_qry || ')';
81: END IF;
82:
83: l_cur_hdl := dbms_sql.open_cursor;
84: DBMS_SQL.parse(l_cur_hdl, l_sql, DBMS_SQL.NATIVE);
85: --
86: DBMS_SQL.bind_variable(l_cur_hdl, ':incident_id' , p_incident_id);
87: IF p_updated_cp_qry <> ':1'
80: l_sql := l_sql || ' AND sr_contact_point_id NOT IN ( '|| p_updated_cp_qry || ')';
81: END IF;
82:
83: l_cur_hdl := dbms_sql.open_cursor;
84: DBMS_SQL.parse(l_cur_hdl, l_sql, DBMS_SQL.NATIVE);
85: --
86: DBMS_SQL.bind_variable(l_cur_hdl, ':incident_id' , p_incident_id);
87: IF p_updated_cp_qry <> ':1'
88: THEN
82:
83: l_cur_hdl := dbms_sql.open_cursor;
84: DBMS_SQL.parse(l_cur_hdl, l_sql, DBMS_SQL.NATIVE);
85: --
86: DBMS_SQL.bind_variable(l_cur_hdl, ':incident_id' , p_incident_id);
87: IF p_updated_cp_qry <> ':1'
88: THEN
89: FOR indx in p_updated_cp_bind.FIRST..p_updated_cp_bind.LAST
90: LOOP
87: IF p_updated_cp_qry <> ':1'
88: THEN
89: FOR indx in p_updated_cp_bind.FIRST..p_updated_cp_bind.LAST
90: LOOP
91: DBMS_SQL.bind_variable(l_cur_hdl, ':' ||to_char(indx), p_updated_cp_bind(indx));
92: END LOOP;
93: END IF;
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
90: LOOP
91: DBMS_SQL.bind_variable(l_cur_hdl, ':' ||to_char(indx), p_updated_cp_bind(indx));
92: END LOOP;
93: END IF;
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
91: DBMS_SQL.bind_variable(l_cur_hdl, ':' ||to_char(indx), p_updated_cp_bind(indx));
92: END LOOP;
93: END IF;
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
92: END LOOP;
93: END IF;
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
93: END IF;
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
94: DBMS_SQL.define_column(l_cur_hdl, 1, l_contact_type, 30);
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
102: l_index := 0;
95: DBMS_SQL.define_column(l_cur_hdl, 2, l_party_id);
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
102: l_index := 0;
103: LOOP
96: DBMS_SQL.define_column(l_cur_hdl, 3, l_party_role_code, 30);
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
102: l_index := 0;
103: LOOP
104: IF DBMS_SQL.fetch_rows(l_cur_hdl) > 0
97: DBMS_SQL.define_column(l_cur_hdl, 4, l_contact_point_id);
98: DBMS_SQL.define_column(l_cur_hdl, 5, l_contact_point_type, 30);
99: DBMS_SQL.define_column(l_cur_hdl, 6, l_start_date_active);
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
102: l_index := 0;
103: LOOP
104: IF DBMS_SQL.fetch_rows(l_cur_hdl) > 0
105: THEN
100: DBMS_SQL.define_column(l_cur_hdl, 7, l_end_date_active);
101: l_rows_processed := DBMS_SQL.execute(l_cur_hdl);
102: l_index := 0;
103: LOOP
104: IF DBMS_SQL.fetch_rows(l_cur_hdl) > 0
105: THEN
106: l_index := l_index + 1;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
103: LOOP
104: IF DBMS_SQL.fetch_rows(l_cur_hdl) > 0
105: THEN
106: l_index := l_index + 1;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
104: IF DBMS_SQL.fetch_rows(l_cur_hdl) > 0
105: THEN
106: l_index := l_index + 1;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
105: THEN
106: l_index := l_index + 1;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
113: DBMS_SQL.column_value(l_cur_hdl, 7, l_end_date_active );
106: l_index := l_index + 1;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
113: DBMS_SQL.column_value(l_cur_hdl, 7, l_end_date_active );
114: l_not_updated_contacts(l_index).party_id := l_party_id;
107: DBMS_SQL.column_value(l_cur_hdl, 1, l_contact_type);
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
113: DBMS_SQL.column_value(l_cur_hdl, 7, l_end_date_active );
114: l_not_updated_contacts(l_index).party_id := l_party_id;
115: l_not_updated_contacts(l_index).contact_type := l_contact_type;
108: DBMS_SQL.column_value(l_cur_hdl, 2, l_party_id );
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
113: DBMS_SQL.column_value(l_cur_hdl, 7, l_end_date_active );
114: l_not_updated_contacts(l_index).party_id := l_party_id;
115: l_not_updated_contacts(l_index).contact_type := l_contact_type;
116: l_not_updated_contacts(l_index).party_role_code := l_party_role_code;
109: DBMS_SQL.column_value(l_cur_hdl, 3, l_party_role_code );
110: DBMS_SQL.column_value(l_cur_hdl, 4, l_contact_point_id );
111: DBMS_SQL.column_value(l_cur_hdl, 5, l_contact_point_type);
112: DBMS_SQL.column_value(l_cur_hdl, 6, l_start_date_active );
113: DBMS_SQL.column_value(l_cur_hdl, 7, l_end_date_active );
114: l_not_updated_contacts(l_index).party_id := l_party_id;
115: l_not_updated_contacts(l_index).contact_type := l_contact_type;
116: l_not_updated_contacts(l_index).party_role_code := l_party_role_code;
117: l_not_updated_contacts(l_index).end_date_active := l_end_date_active;
121: ELSE
122: EXIT;
123: END IF;
124: END LOOP;
125: DBMS_SQL.close_cursor(l_cur_hdl);
126: END IF;
127: --
128: --
129: --