The following lines contain the word 'select', 'insert', 'update' or 'delete':
| ******* Please delete these lines after modifications *******
| This account merge procedure was NOT generated using a perl script.
|
| ******************************
|
|--------------------------------------------------------------*/
PROCEDURE SCORE_HISTORY_MERGE (
req_id NUMBER,
set_num NUMBER,
process_mode VARCHAR2) IS
TYPE MERGE_HEADER_ID_LIST_TYPE IS TABLE OF
RA_CUSTOMER_MERGE_HEADERS.CUSTOMER_MERGE_HEADER_ID%TYPE
INDEX BY BINARY_INTEGER;
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,SCORE_HISTORY_ID
,SCORE_OBJECT_ID
FROM IEX_SCORE_HISTORIES yt, ra_customer_merges m
WHERE yt.SCORE_OBJECT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.SCORE_OBJECT_CODE = 'IEX_ACCOUNT';
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,SCORE_HISTORY_ID
,SCORE_OBJECT_ID
FROM IEX_SCORE_HISTORIES yt, ra_customer_merges m
WHERE yt.SCORE_OBJECT_ID = m.DUPLICATE_ADDRESS_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.SCORE_OBJECT_CODE = 'IEX_ACCOUNT_SITE';
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,SCORE_HISTORY_ID
,SCORE_OBJECT_ID
FROM IEX_SCORE_HISTORIES yt, ra_customer_merges m
WHERE yt.SCORE_OBJECT_ID = m.DUPLICATE_SITE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.SCORE_OBJECT_CODE = 'IEX_BILLTO';
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY) VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_SCORE_HISTORIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'IEX_ACCOUNT',
'IEX_ACCOUNT',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_SCORE_HISTORIES yt SET
SCORE_OBJECT_ID = NUM_COL1_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE SCORE_HISTORY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY) VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_SCORE_HISTORIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'IEX_ACCOUNT_SITE',
'IEX_ACCOUNT_SITE',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_SCORE_HISTORIES yt SET
SCORE_OBJECT_ID = NUM_COL2_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE SCORE_HISTORY_ID=PRIMARY_KEY_ID_LIST(I);
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY) VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_SCORE_HISTORIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL3_ORIG_LIST(I),
NUM_COL3_NEW_LIST(I),
'IEX_BILLTO',
'IEX_BILLTO',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_SCORE_HISTORIES yt SET
SCORE_OBJECT_ID = NUM_COL3_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE SCORE_HISTORY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
| ******* Please delete these lines after modifications *******
| This account merge procedure was NOT generated using a perl script.
|
|--------------------------------------------------------------*/
PROCEDURE DUNNING_MERGE (req_id NUMBER,
set_num NUMBER,
process_mode VARCHAR2) IS
TYPE MERGE_HEADER_ID_LIST_TYPE IS TABLE OF
RA_CUSTOMER_MERGE_HEADERS.CUSTOMER_MERGE_HEADER_ID%TYPE
INDEX BY BINARY_INTEGER;
/* this cursor is for IEX_DUNNINGS.OBJECT_ID column update if Object is IEX_ACCOUNT */
CURSOR merged_records1 IS
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,DUNNING_ID
,DUNNING_OBJECT_ID
FROM IEX_DUNNINGS yt, ra_customer_merges m
WHERE yt.DUNNING_OBJECT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.DUNNING_LEVEL = 'ACCOUNT';
/* this cursor is for IEX_DUNNINGS.DUNNING_OBJECT_ID column update if Object is 'BILL_TO' */
CURSOR merged_records2 IS
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,DUNNING_ID
,DUNNING_OBJECT_ID
FROM IEX_DUNNINGS yt, ra_customer_merges m
WHERE yt.DUNNING_OBJECT_ID = m.DUPLICATE_SITE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.object_type = 'BILL_TO';
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_DUNNINGS',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'ACCOUNT',
'ACCOUNT',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_DUNNINGS yt SET
DUNNING_OBJECT_ID = NUM_COL1_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE DUNNING_OBJECT_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL2_ORIG,
NUM_COL2_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_DUNNINGS',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL2_ORIG_LIST(I),
NUM_COL2_NEW_LIST(I),
'BILL_TO',
'BILL_TO',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_DUNNINGS yt SET
DUNNING_OBJECT_ID = NUM_COL2_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE DUNNING_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
| ******* Please delete these lines after modifications *******
| This account merge procedure was NOT generated using a perl script.
|
|--------------------------------------------------------------*/
PROCEDURE STRATEGY_MERGE (
req_id NUMBER,
set_num NUMBER,
process_mode VARCHAR2) IS
TYPE MERGE_HEADER_ID_LIST_TYPE IS TABLE OF
RA_CUSTOMER_MERGE_HEADERS.CUSTOMER_MERGE_HEADER_ID%TYPE
INDEX BY BINARY_INTEGER;
/* this cursor is for IEX_STRATEGIES.CUST_ACCOUNT_ID column update */
CURSOR merged_records1 IS
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,yt.STRATEGY_ID
,yt.CUST_ACCOUNT_ID
,hca.party_id
,yt.status_code --Added for bug#6974531 by schekuri on 14-Aug-2008
FROM IEX_STRATEGIES yt, ra_customer_merges m, hz_cust_accounts hca
WHERE yt.CUST_ACCOUNT_ID = m.DUPLICATE_ID AND
hca.cust_account_id = m.customer_id AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num;
/* this cursor is for IEX_STRATEGIES.JTF_OBJECT_ID column update if Object is IEX_ACCOUNT */
CURSOR merged_records2 IS
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,STRATEGY_ID
,JTF_OBJECT_ID
,yt.status_code --Added for bug#6974531 by schekuri on 14-Aug-2008
FROM IEX_STRATEGIES yt, ra_customer_merges m
WHERE yt.JTF_OBJECT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.jtf_object_type = 'IEX_ACCOUNT';
/* this cursor is for IEX_STRATEGIES.JTF_OBJECT_ID column update if Object is IEX_BILLTO */
CURSOR merged_records3 IS
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,STRATEGY_ID
,JTF_OBJECT_ID
,yt.status_code --Added for bug#6974531 by schekuri on 14-Aug-2008
FROM IEX_STRATEGIES yt, ra_customer_merges m
WHERE yt.JTF_OBJECT_ID = m.DUPLICATE_SITE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num AND
yt.jtf_object_type = 'IEX_BILLTO';
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_STRATEGIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_STRATEGIES yt SET
CUST_ACCOUNT_ID = NUM_COL1_NEW_LIST(I)
, PARTY_ID = PARTY_ID_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE STRATEGY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
PARTY_ID_LIST.delete;
STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL2_ORIG,
NUM_COL2_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_STRATEGIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL2_ORIG_LIST(I),
NUM_COL2_NEW_LIST(I),
'IEX_ACCOUNT',
'IEX_ACCOUNT',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_STRATEGIES yt SET
JTF_OBJECT_ID = NUM_COL2_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE STRATEGY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL2_ORIG,
NUM_COL2_NEW,
VCHAR_COL1_ORIG,
VCHAR_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES (
HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_STRATEGIES',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL3_ORIG_LIST(I),
NUM_COL3_NEW_LIST(I),
'IEX_BILLTO',
'IEX_BILLTO',
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_STRATEGIES yt SET
-- CUST_ACCOUNT_ID = NUM_COL3_NEW_LIST(I) Updated for bug#6974531 by schekuri on 14-Aug-2008
JTF_OBJECT_ID = NUM_COL3_NEW_LIST(I)
, CUSTOMER_SITE_USE_ID = NUM_COL3_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE STRATEGY_ID = PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,PROMISE_DETAIL_ID
,CUST_ACCOUNT_ID
FROM IEX_PROMISE_DETAILS yt, ra_customer_merges m
WHERE yt.CUST_ACCOUNT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num;
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_PROMISE_DETAILS',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_PROMISE_DETAILS yt SET
CUST_ACCOUNT_ID = NUM_COL1_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE PROMISE_DETAIL_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,DELINQUENCY_ID
,CUST_ACCOUNT_ID
FROM IEX_DELINQUENCIES yt, ra_customer_merges m
WHERE yt.CUST_ACCOUNT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num;
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,DELINQUENCY_ID
,CUSTOMER_SITE_USE_ID
FROM IEX_DELINQUENCIES yt, ra_customer_merges m
WHERE yt.CUSTOMER_SITE_USE_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num;
SELECT distinct m.CUSTOMER_MERGE_HEADER_ID
,yt.DELINQUENCY_ID
,yt.CUST_ACCOUNT_ID
,c.party_id
FROM IEX_DELINQUENCIES_ALL yt, ra_customer_merges m, hz_cust_accounts c
WHERE yt.CUST_ACCOUNT_ID = m.DUPLICATE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num and
m.customer_id = c.cust_account_id;
SELECT distinct CUSTOMER_MERGE_HEADER_ID
,DELINQUENCY_ID
,CUSTOMER_SITE_USE_ID
FROM IEX_DELINQUENCIES_ALL yt, ra_customer_merges m
WHERE yt.CUSTOMER_SITE_USE_ID = m.DUPLICATE_SITE_ID AND
m.process_flag = 'N' AND
m.request_id = req_id AND
m.set_number = set_num;
IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL1_ORIG,
NUM_COL1_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_DELINQUENCIES_ALL',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL1_ORIG_LIST(I),
NUM_COL1_NEW_LIST(I),
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_DELINQUENCIES_ALL yt SET
CUST_ACCOUNT_ID = NUM_COL1_NEW_LIST(I)
, PARTY_CUST_ID = PARTY_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
MERGE_HEADER_ID_LIST.delete;
PRIMARY_KEY_ID_LIST.delete;
IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
INSERT INTO HZ_CUSTOMER_MERGE_LOG (
MERGE_LOG_ID,
TABLE_NAME,
MERGE_HEADER_ID,
PRIMARY_KEY_ID,
NUM_COL2_ORIG,
NUM_COL2_NEW,
ACTION_FLAG,
REQUEST_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATE_DATE,
LAST_UPDATED_BY)
VALUES
(HZ_CUSTOMER_MERGE_LOG_s.nextval,
'IEX_DELINQUENCIES_ALL',
MERGE_HEADER_ID_LIST(I),
PRIMARY_KEY_ID_LIST(I),
NUM_COL2_ORIG_LIST(I),
NUM_COL2_NEW_LIST(I),
'U',
req_id,
hz_utility_pub.CREATED_BY,
hz_utility_pub.CREATION_DATE,
hz_utility_pub.LAST_UPDATE_LOGIN,
hz_utility_pub.LAST_UPDATE_DATE,
hz_utility_pub.LAST_UPDATED_BY);
UPDATE IEX_DELINQUENCIES_ALL yt SET
CUSTOMER_SITE_USE_ID = NUM_COL2_NEW_LIST(I)
, LAST_UPDATE_DATE = SYSDATE
, last_updated_by = arp_standard.profile.user_id
, last_update_login = arp_standard.profile.last_update_login
, REQUEST_ID = req_id
, PROGRAM_APPLICATION_ID = arp_standard.profile.program_application_id
, PROGRAM_ID = arp_standard.profile.program_id
, PROGRAM_UPDATE_DATE = SYSDATE
WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
arp_message.set_name('AR','AR_ROWS_UPDATED');
SELECT merge_reason_code into l_merge_reason
FROM hz_merge_batch
WHERE batch_id = p_batch_id;
SELECT count(1) INTO l_num_records
FROM IEX_DELINQUENCIES_ALL
WHERE delinquency_id = p_from_id;
UPDATE IEX_DELINQUENCIES_ALL
SET party_cust_id = p_To_FK_id,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE party_cust_id = p_from_fk_id;
UPDATE IEX_PROMISE_DETAILS
SET Promise_Made_By = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE promise_made_by = p_from_fk_id;
UPDATE IEX_STRATEGIES
SET JTF_OBJECT_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate,
-- Begin - 10/12/2005 - Andre Araujo - Need to update party_id also
PARTY_ID = p_To_FK_ID
-- End - 10/12/2005 - Andre Araujo - Need to update party_id also
WHERE JTF_OBJECT_ID = p_from_fk_id AND
JTF_OBJECT_TYPE = 'PARTY';
UPDATE IEX_STRATEGIES
SET last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate,
PARTY_ID = p_To_FK_ID
WHERE PARTY_ID = p_from_fk_id;
UPDATE IEX_SCORE_HISTORIES
SET SCORE_OBJECT_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE SCORE_OBJECT_ID = p_from_fk_id AND
SCORE_OBJECT_CODE = 'PARTY';
UPDATE IEX_REPOSSESSIONS
SET PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE PARTY_ID = p_from_fk_id;
UPDATE IEX_REPOSSESSIONS
SET REPLEVIN_ATTORNEY = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE REPLEVIN_ATTORNEY = p_from_fk_id;
UPDATE IEX_DEL_THIRD_PARTIES
SET THIRD_PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE THIRD_PARTY_ID = p_from_fk_id;
UPDATE IEX_CASE_CONTACTS
SET CONTACT_PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE CONTACT_PARTY_ID = p_from_fk_id;
UPDATE IEX_CASES_ALL_B
SET PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE PARTY_ID = p_from_fk_id;
UPDATE IEX_WRITEOFFS
SET PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE PARTY_ID = p_from_fk_id;
UPDATE IEX_BANKRUPTCIES
SET PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE PARTY_ID = p_from_fk_id;
UPDATE IEX_LITIGATIONS
SET PARTY_ID = p_To_FK_ID,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
WHERE PARTY_ID = p_from_fk_id;
SELECT party_cust_id
INTO v_merged_to_id
FROM IEX_DELINQUENCIES_ALL
WHERE party_cust_id = p_To_FK_id
--and category = p_parent_entity_name
--and resource_name = (select resource_name
-- from JTF_RS_RESOURCE_EXTNS
-- where resource_id = p_from_id)
and rownum =1;
UPDATE IEX_DELINQUENCIES_ALL
SET party_cust_id = p_To_FK_id,
last_update_date = hz_utility_pub.last_update_date,
last_updated_by = hz_utility_pub.user_id,
last_update_login = hz_utility_pub.last_update_login,
--request_id = hz_utility_pub.request_id,
--program_application_id = hz_utility_pub.program_application_id,
program_id = hz_utility_pub.program_id
--program_update_date = sysdate
WHERE delinquency_id = p_from_id;
UPDATE IEX_DELINQUENCIES_ALL
SET STATUS = 'CLOSED',
last_update_date = hz_utility_pub.last_update_date,
last_updated_by = hz_utility_pub.user_id,
last_update_login = hz_utility_pub.last_update_login,
--request_id = hz_utility_pub.request_id,
--program_application_id = hz_utility_pub.program_application_id,
program_id = hz_utility_pub.program_id
--program_update_date = sysdate
WHERE delinquency_id = p_from_id;
select merge_reason_code into l_merge_reason_code
from HZ_MERGE_BATCH
where batch_id = p_batch_id;
UPDATE IEX_CASE_CONTACTS
set address_id = p_to_fk_id,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
where address_id = p_from_fk_id;
UPDATE IEX_CASE_CONTACTS
set phone_id = p_to_fk_id,
last_update_date = HZ_UTILITY_V2PUB.last_update_date,
last_updated_by = HZ_UTILITY_V2PUB.user_id,
last_update_login = HZ_UTILITY_V2PUB.last_update_login,
request_id = HZ_UTILITY_V2PUB.request_id,
program_application_id = HZ_UTILITY_V2PUB.program_application_id,
program_id = HZ_UTILITY_V2PUB.program_id,
program_update_date = sysdate
where phone_id = p_from_fk_id;