136: --end npalepu
137:
138: BEGIN
139: --
140: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY');
141:
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
138: BEGIN
139: --
140: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY');
141:
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
139: --
140: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY');
141:
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
140: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY');
141:
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
141:
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
149: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
142: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
149: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
150: --
143: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
149: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
150: --
151: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY()+');
144: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
149: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
150: --
151: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY()+');
152:
145: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
146: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
147: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
148: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
149: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
150: --
151: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CPL_MERGE_PARTY()+');
152:
153: x_return_status := FND_API.G_RET_STS_SUCCESS;
158: l_object_user_code := c_party;
159: end if;
160: --
161:
162: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
163:
164:
165: --
166: select merge_reason_code
195: begin
196:
197: arp_message.set_name('AR','AR_UPDATING_TABLE');
198: arp_message.set_token('TABLE_NAME','OKC_K_PARTY_ROLES',FALSE);
199: fnd_file.put_line(fnd_file.log, 'Updating Table okc_k_party_roles_b');
200: --
201: --
202: -- Fix for bug 4105272 Insert into okc_k_vers_numbers_h
203: INSERT INTO OKC_K_VERS_NUMBERS_H(
248:
249: --npalepu added on 10-feb-2006 for bug # 5005475
250: l_count := sql%rowcount;
251:
252: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
253: arp_message.set_name('AR','AR_ROWS_UPDATED');
254: arp_message.set_token('NUM_ROWS',to_char(l_count));
255:
256: OPEN l_get_cpl_ids_csr;
260: -- nechatur for bug#5378426 added on 9/7/06
261: EXIT WHEN l_from_cpl_id.COUNT <= 0 ;
262: -- end nechatur
263:
264: fnd_file.put_line(fnd_file.log, 'Updating Table okc_contacts');
265:
266: FORALL i IN l_from_cpl_id.FIRST .. l_from_cpl_id.LAST
267: UPDATE okc_contacts cntc
268: SET cntc.cpl_id = l_to_cpl_id(i)
272: ,cntc.last_update_login = arp_standard.profile.last_update_login
273: WHERE cntc.cpl_id = l_from_cpl_id(i);
274:
275: l_count := sql%rowcount;
276: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
277: arp_message.set_name('AR','AR_ROWS_UPDATED');
278: arp_message.set_token('NUM_ROWS',to_char(l_count));
279:
280: fnd_file.put_line(fnd_file.log, 'Deleting Table OKC_K_PARTY_ROLES_TL');
276: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
277: arp_message.set_name('AR','AR_ROWS_UPDATED');
278: arp_message.set_token('NUM_ROWS',to_char(l_count));
279:
280: fnd_file.put_line(fnd_file.log, 'Deleting Table OKC_K_PARTY_ROLES_TL');
281: -- Delete party_roles_tl table to handle related party merge Bug # 4529376
282:
283: FORALL i IN l_from_cpl_id.FIRST .. l_from_cpl_id.LAST
284: DELETE from okc_k_party_roles_tl rtl
284: DELETE from okc_k_party_roles_tl rtl
285: WHERE rtl.id = l_from_cpl_id(i);
286:
287: l_count := sql%rowcount;
288: fnd_file.put_line(fnd_file.log, 'No of Rows Deleted : '||l_count);
289:
290: fnd_file.put_line(fnd_file.log, 'Deleting Table OKC_K_PARTY_ROLES');
291: -- Delete party_roles table to handle related party merge Bug # 4529376
292:
286:
287: l_count := sql%rowcount;
288: fnd_file.put_line(fnd_file.log, 'No of Rows Deleted : '||l_count);
289:
290: fnd_file.put_line(fnd_file.log, 'Deleting Table OKC_K_PARTY_ROLES');
291: -- Delete party_roles table to handle related party merge Bug # 4529376
292:
293: FORALL i IN l_from_cpl_id.FIRST .. l_from_cpl_id.LAST
294: DELETE FROM okc_k_party_roles_B role1
294: DELETE FROM okc_k_party_roles_B role1
295: WHERE role1.id = l_from_cpl_id(i);
296:
297: l_count := sql%rowcount;
298: fnd_file.put_line(fnd_file.log, 'No of Rows Deleted : '||l_count);
299:
300: --nechatur added on 9/7/2006 for bug # 5378426
301: l_from_cpl_id.DELETE;
302: l_to_cpl_id.DELETE;
308: CLOSE l_get_cpl_ids_csr;
309: --end npalepu
310: --
311: --
312: fnd_file.put_line(fnd_file.log, 'Updating Table okc_k_party_roles_b');
313: UPDATE okc_k_party_roles_b kpr
314: SET kpr.object1_id1 = p_to_fk_id
315: ,kpr.object_version_number = kpr.object_version_number + 1
316: ,kpr.last_update_date = SYSDATE
323: WHERE ojt.object_code = oue.object_code
324: AND oue.object_user_code = l_object_user_code) ;
325:
326: l_count := sql%rowcount;
327: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
328: --
329: -- Bug 2949149 calling OKS procedure OKS_UPDATE_CONTRACT to update the short description
330: --
331: fnd_file.put_line(fnd_file.log, 'Before call to OKC_OKS_PUB.OKS_UPDATE_CONTRACT ');
327: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
328: --
329: -- Bug 2949149 calling OKS procedure OKS_UPDATE_CONTRACT to update the short description
330: --
331: fnd_file.put_line(fnd_file.log, 'Before call to OKC_OKS_PUB.OKS_UPDATE_CONTRACT ');
332: OKC_OKS_PUB.OKS_UPDATE_CONTRACT(p_from_id => p_from_fk_id,
333: p_to_id => p_to_fk_id,
334: x_return_status => l_return_status);
335:
354: -- Party Merge Dictionary
355: --
356: l_count := sql%rowcount;
357:
358: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
359: arp_message.set_name('AR','AR_ROWS_UPDATED');
360: arp_message.set_token('NUM_ROWS',to_char(l_count));
361: --
362: exception
361: --
362: exception
363: when OKC_API.G_EXCEPTION_ERROR THEN -- Bug 2949149
364: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
365: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
366: x_return_status := FND_API.G_RET_STS_ERROR;
367: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN -- Bug 2949149
368: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
369: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
365: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
366: x_return_status := FND_API.G_RET_STS_ERROR;
367: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN -- Bug 2949149
368: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
369: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: when others then
372: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
373: --
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: when others then
372: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
373: --
374: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
375: 'OKC_K_PARTY_ROLES = ' ||l_object_user_code||'-'|| p_from_id));
376: --
377: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
378: x_return_status := FND_API.G_RET_STS_ERROR;
373: --
374: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
375: 'OKC_K_PARTY_ROLES = ' ||l_object_user_code||'-'|| p_from_id));
376: --
377: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
378: x_return_status := FND_API.G_RET_STS_ERROR;
379: end;
380: end if;
381: END OKC_CPL_MERGE_PARTY;
401: --
402: --
403: BEGIN
404: --
405: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1');
406:
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
403: BEGIN
404: --
405: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1');
406:
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
404: --
405: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1');
406:
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
405: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1');
406:
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
406:
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
414: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
407: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
414: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
415: --
408: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
414: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
415: --
416: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1()+');
409: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
414: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
415: --
416: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1()+');
417:
410: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
411: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
412: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
413: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
414: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
415: --
416: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID1()+');
417:
418: x_return_status := FND_API.G_RET_STS_SUCCESS;
424: elsif p_parent_entity_name = 'HZ_PARTY_SITES' then l_object_user_code := c_p_site;
425: end if;
426: --
427:
428: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
429:
430:
431: --
432: select merge_reason_code
460: begin
461: -- Rules ID1
462: arp_message.set_name('AR','AR_UPDATING_TABLE');
463: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
464: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
465: --
466: UPDATE okc_rules_b rle
467: SET rle.object1_id1 = p_to_fk_id
468: ,rle.object_version_number = rle.object_version_number + 1
479: ;
480: --
481: l_count := sql%rowcount;
482:
483: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
484: arp_message.set_name('AR','AR_ROWS_UPDATED');
485: arp_message.set_token('NUM_ROWS',to_char(l_count));
486: --
487: --
488: exception
489: when others then
490: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
491: --
492: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
493: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
494: --
495: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
496: x_return_status := FND_API.G_RET_STS_ERROR;
491: --
492: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
493: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
494: --
495: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
496: x_return_status := FND_API.G_RET_STS_ERROR;
497: end;
498: end if;
499: END OKC_RUL_MERGE_PARTY_ID1;
520: --
521: --
522: BEGIN
523: --
524: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2');
525:
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
522: BEGIN
523: --
524: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2');
525:
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
523: --
524: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2');
525:
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
524: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2');
525:
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
525:
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
533: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
526: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
533: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
534: --
527: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
533: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
534: --
535: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2()+');
528: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
533: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
534: --
535: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2()+');
536:
529: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
530: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
531: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
532: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
533: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
534: --
535: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID2()+');
536:
537: x_return_status := FND_API.G_RET_STS_SUCCESS;
543: elsif p_parent_entity_name = 'HZ_PARTY_SITES' then l_object_user_code := c_p_site;
544: end if;
545: --
546:
547: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
548:
549:
550: --
551: select merge_reason_code
579: begin
580: -- Rules ID1
581: arp_message.set_name('AR','AR_UPDATING_TABLE');
582: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT1_ID1',FALSE);
583: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
584: --
585: UPDATE okc_rules_b rle
586: SET rle.object2_id1 = p_to_fk_id
587: ,rle.object_version_number = rle.object_version_number + 1
598: ;
599: --
600: l_count := sql%rowcount;
601:
602: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
603: arp_message.set_name('AR','AR_ROWS_UPDATED');
604: arp_message.set_token('NUM_ROWS',to_char(l_count));
605: --
606: --
607: exception
608: when others then
609: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
610: --
611: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
612: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
613: --
614: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
615: x_return_status := FND_API.G_RET_STS_ERROR;
610: --
611: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
612: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
613: --
614: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: end;
617: end if;
618: END OKC_RUL_MERGE_PARTY_ID2;
638: --
639: --
640: BEGIN
641: --
642: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3');
643:
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
640: BEGIN
641: --
642: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3');
643:
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
641: --
642: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3');
643:
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
642: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3');
643:
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
643:
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
651: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
644: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
651: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
652: --
645: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
651: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
652: --
653: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3()+');
646: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
651: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
652: --
653: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3()+');
654:
647: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
648: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
649: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
650: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
651: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
652: --
653: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_RUL_MERGE_PARTY_ID3()+');
654:
655: x_return_status := FND_API.G_RET_STS_SUCCESS;
660: elsif p_parent_entity_name = 'HZ_PARTY_SITES' then l_object_user_code := c_p_site;
661: end if;
662: --
663:
664: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
665:
666:
667: --
668: select merge_reason_code
696: begin
697: -- Rules ID3
698: arp_message.set_name('AR','AR_UPDATING_TABLE');
699: arp_message.set_token('TABLE_NAME','OKC_RULES_B.OBJECT3_ID1',FALSE);
700: fnd_file.put_line(fnd_file.log, 'Updating Table okc_rules_b');
701: --
702: UPDATE okc_rules_b rle
703: SET rle.object3_id1 = p_to_fk_id
704: ,rle.object_version_number = rle.object_version_number + 1
716:
717: --
718: l_count := sql%rowcount;
719:
720: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
721: arp_message.set_name('AR','AR_ROWS_UPDATED');
722: arp_message.set_token('NUM_ROWS',to_char(l_count));
723: --
724: --
725: exception
726: when others then
727: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
728: --
729: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
730: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
731: --
732: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
733: x_return_status := FND_API.G_RET_STS_ERROR;
728: --
729: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
730: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
731: --
732: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
733: x_return_status := FND_API.G_RET_STS_ERROR;
734: end;
735: end if;
736: END OKC_RUL_MERGE_PARTY_ID3;
755: l_object_user_code VARCHAR2(20);
756: --
757: BEGIN
758: --
759: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY');
760:
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
757: BEGIN
758: --
759: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY');
760:
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
758: --
759: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY');
760:
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
759: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY');
760:
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
760:
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
768: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
761: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
768: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
769: --
762: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
768: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
769: --
770: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY()+');
763: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
768: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
769: --
770: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY()+');
771:
764: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
765: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
766: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
767: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
768: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
769: --
770: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CIM_MERGE_PARTY()+');
771:
772: x_return_status := FND_API.G_RET_STS_SUCCESS;
778: elsif p_parent_entity_name = 'HZ_PARTY_SITES' then l_object_user_code := c_p_site;
779: end if;
780: --
781:
782: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
783:
784:
785: --
786: select merge_reason_code
813: if p_from_fk_id <> p_to_fk_id then
814: begin
815: arp_message.set_name('AR','AR_UPDATING_TABLE');
816: arp_message.set_token('TABLE_NAME','OKC_K_ITEMS',FALSE);
817: fnd_file.put_line(fnd_file.log, 'Updating Table okc_k_items');
818: --
819: --
820: UPDATE okc_k_items cim
821: SET cim.object1_id1 = p_to_fk_id
833: --
834: --
835: l_count := sql%rowcount;
836:
837: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
838: arp_message.set_name('AR','AR_ROWS_UPDATED');
839: arp_message.set_token('NUM_ROWS',to_char(l_count));
840: --
841: exception
841: exception
842: when others then
843: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
844: --
845: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
846: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
847: --
848: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
849: x_return_status := FND_API.G_RET_STS_ERROR;
844: --
845: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
846: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
847: --
848: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
849: x_return_status := FND_API.G_RET_STS_ERROR;
850: end;
851: end if;
852: END OKC_CIM_MERGE_PARTY;
871: l_object_user_code VARCHAR2(20);
872: --
873: BEGIN
874: --
875: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY');
876:
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
873: BEGIN
874: --
875: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY');
876:
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
874: --
875: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY');
876:
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
875: fnd_file.put_line(fnd_file.log, 'OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY');
876:
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
876:
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
884: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
877: fnd_file.put_line(fnd_file.log, '****** PARAMETERS ****** ');
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
884: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
885: --
878: fnd_file.put_line(fnd_file.log, 'p_entity_name : '||p_entity_name);
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
884: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
885: --
886: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY()+');
879: fnd_file.put_line(fnd_file.log, 'p_from_id : '||p_from_id);
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
884: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
885: --
886: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY()+');
887:
880: fnd_file.put_line(fnd_file.log, 'p_from_fk_id : '||p_from_fk_id);
881: fnd_file.put_line(fnd_file.log, 'p_to_fk_id : '||p_to_fk_id);
882: fnd_file.put_line(fnd_file.log, 'p_parent_entity_name : '||p_parent_entity_name);
883: fnd_file.put_line(fnd_file.log, 'p_batch_id : '||p_batch_id);
884: fnd_file.put_line(fnd_file.log, 'p_batch_party_id : '||p_batch_party_id);
885: --
886: arp_message.set_line('OKC_PARTY_MERGE_PKG.OKC_CTC_MERGE_PARTY()+');
887:
888: x_return_status := FND_API.G_RET_STS_SUCCESS;
892: if p_parent_entity_name = 'HZ_PARTIES' then l_object_user_code := c_contact;
893: end if;
894: --
895:
896: fnd_file.put_line(fnd_file.log, 'l_object_user_code : '||l_object_user_code);
897:
898:
899: --
900: select merge_reason_code
927: if p_from_fk_id <> p_to_fk_id then
928: begin
929: arp_message.set_name('AR','AR_UPDATING_TABLE');
930: arp_message.set_token('TABLE_NAME','OKC_CONTACTS',FALSE);
931: fnd_file.put_line(fnd_file.log, 'Updating Table okc_contacts');
932: --
933: --
934: UPDATE okc_contacts ctc
935: SET ctc.object1_id1 = p_to_fk_id
955: -- AND oue.object_user_code = l_object_user_code)
956: --
957: l_count := sql%rowcount;
958:
959: fnd_file.put_line(fnd_file.log, 'No of Rows Updated : '||l_count);
960: arp_message.set_name('AR','AR_ROWS_UPDATED');
961: arp_message.set_token('NUM_ROWS',to_char(l_count));
962: --
963: exception
963: exception
964: when others then
965: arp_message.set_line(g_proc_name || '.' || l_api_name || ': ' || sqlerrm);
966: --
967: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
968: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
969: --
970: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
971: x_return_status := FND_API.G_RET_STS_ERROR;
966: --
967: fnd_file.put_line(fnd_file.log,(g_proc_name || '.' || l_api_name ||
968: 'OKC_K_PARTY_ROLES for = ' ||l_object_user_code||'-'|| p_from_id));
969: --
970: fnd_file.put_line(fnd_file.log, g_proc_name||'.'||l_api_name||':'||sqlerrm);
971: x_return_status := FND_API.G_RET_STS_ERROR;
972: end;
973: end if;
974: END OKC_CTC_MERGE_PARTY;