DBA Data[Home] [Help]

APPS.CSC_ACCOUNT_MERGE_PKG dependencies on CSC_CUST_PLANS

Line 16: -- 02-25-2003 bhroy l_count initialized, CSC_CUST_PLANS update where clause changed, delete redundant record

12: -- were added. ie. request_id, program_application_id,
13: -- program_id, program_update_date.
14: -- 12-23-2002 bhroy All procedures body changed using the auto generated Perl script.
15: -- 02-12-2003 bhroy LAST_UPDATE_DATE, Last_updated_by, Last_update_login commented for CSC_CUSTOMIZED_PLANS table
16: -- 02-25-2003 bhroy l_count initialized, CSC_CUST_PLANS update where clause changed, delete redundant record
17: -- 04-28-2003 bhroy TCA sripts are inserting same record for ORIG and NEW columns, modified merge cursor
18: -- 06-26-2003 bhroy Fixed cross party merge, Bug# 2930337
19: --
20: -- End of Comments

Line 42: CSC_CUST_PLANS_MERGE(

38: req_id => req_id,
39: set_num => set_num,
40: process_mode => process_mode );
41:
42: CSC_CUST_PLANS_MERGE(
43: req_id => req_id,
44: set_num => set_num,
45: process_mode => process_mode );
46:

Line 47: CSC_CUST_PLANS_AUDIT_MERGE(

43: req_id => req_id,
44: set_num => set_num,
45: process_mode => process_mode );
46:
47: CSC_CUST_PLANS_AUDIT_MERGE(
48: req_id => req_id,
49: set_num => set_num,
50: process_mode => process_mode );
51:

Line 416: PROCEDURE CSC_CUST_PLANS_MERGE (

412: arp_message.set_line( 'CSC_CUSTOMIZED_PLANS_MERGE');
413: RAISE;
414: END CSC_CUSTOMIZED_PLANS_MERGE;
415:
416: PROCEDURE CSC_CUST_PLANS_MERGE (
417: req_id NUMBER,
418: set_num NUMBER,
419: process_mode VARCHAR2) IS
420:

Line 427: CSC_CUST_PLANS.CUST_PLAN_ID%TYPE

423: INDEX BY BINARY_INTEGER;
424: MERGE_HEADER_ID_LIST MERGE_HEADER_ID_LIST_TYPE;
425:
426: TYPE CUST_PLAN_ID_LIST_TYPE IS TABLE OF
427: CSC_CUST_PLANS.CUST_PLAN_ID%TYPE
428: INDEX BY BINARY_INTEGER;
429: PRIMARY_KEY_ID_LIST CUST_PLAN_ID_LIST_TYPE;
430:
431: TYPE cust_account_id_LIST_TYPE IS TABLE OF

Line 432: CSC_CUST_PLANS.cust_account_id%TYPE

428: INDEX BY BINARY_INTEGER;
429: PRIMARY_KEY_ID_LIST CUST_PLAN_ID_LIST_TYPE;
430:
431: TYPE cust_account_id_LIST_TYPE IS TABLE OF
432: CSC_CUST_PLANS.cust_account_id%TYPE
433: INDEX BY BINARY_INTEGER;
434: NUM_COL1_ORIG_LIST cust_account_id_LIST_TYPE;
435: NUM_COL1_NEW_LIST cust_account_id_LIST_TYPE;
436:

Line 438: CSC_CUST_PLANS.PARTY_ID%TYPE

434: NUM_COL1_ORIG_LIST cust_account_id_LIST_TYPE;
435: NUM_COL1_NEW_LIST cust_account_id_LIST_TYPE;
436:
437: TYPE PARTY_ID_LIST_TYPE IS TABLE OF
438: CSC_CUST_PLANS.PARTY_ID%TYPE
439: INDEX BY BINARY_INTEGER;
440: NUM_COL2_ORIG_LIST PARTY_ID_LIST_TYPE;
441: NUM_COL2_NEW_LIST PARTY_ID_LIST_TYPE;
442:

Line 448: FROM CSC_CUST_PLANS yt, ra_customer_merges m , hz_cust_accounts hzca

444: CURSOR merged_records IS
445: SELECT distinct m.CUSTOMER_MERGE_HEADER_ID
446: ,yt.cust_plan_id
447: ,m.customer_id, m.duplicate_id, hzca.party_id, yt.party_id
448: FROM CSC_CUST_PLANS yt, ra_customer_merges m , hz_cust_accounts hzca
449: WHERE ( yt.cust_account_id = m.duplicate_id AND m.customer_id = hzca.cust_account_id )
450: AND m.process_flag = 'N'
451: AND m.request_id = req_id
452: AND m.set_number = set_num;

Line 460: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CSC_CUST_PLANS',FALSE);

456: IF process_mode='LOCK' THEN
457: NULL;
458: ELSE
459: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
460: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CSC_CUST_PLANS',FALSE);
461: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
462: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
463:
464: open merged_records;

Line 502: 'CSC_CUST_PLANS',

498: LAST_UPDATE_LOGIN,
499: LAST_UPDATE_DATE,
500: LAST_UPDATED_BY
501: ) VALUES ( HZ_CUSTOMER_MERGE_LOG_s.nextval,
502: 'CSC_CUST_PLANS',
503: MERGE_HEADER_ID_LIST(I),
504: PRIMARY_KEY_ID_LIST(I),
505: NUM_COL1_ORIG_LIST(I),
506: NUM_COL1_NEW_LIST(I),

Line 519: UPDATE CSC_CUST_PLANS yt SET

515: hz_utility_pub.LAST_UPDATED_BY
516: );
517:
518: END IF; FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
519: UPDATE CSC_CUST_PLANS yt SET
520: cust_account_id=NUM_COL1_NEW_LIST(I)
521: , party_id=NUM_COL2_NEW_LIST(I)
522: , LAST_UPDATE_DATE=SYSDATE
523: , last_updated_by=arp_standard.profile.user_id

Line 535: csc_cust_plans yts, ra_customer_merges m WHERE

531: m.process_flag = 'N'
532: AND m.request_id = req_id
533: AND m.set_number = set_num )
534: AND plan_id not in ( SELECT yts.plan_id FROM
535: csc_cust_plans yts, ra_customer_merges m WHERE
536: yts.cust_account_id = m.customer_id
537: AND m.process_flag = 'N'
538: AND m.request_id = req_id
539: AND m.set_number = set_num )

Line 543: DELETE FROM CSC_CUST_PLANS

539: AND m.set_number = set_num )
540: ;
541: l_count := l_count + SQL%ROWCOUNT;
542:
543: DELETE FROM CSC_CUST_PLANS
544: WHERE cust_account_id in ( SELECT m.duplicate_id FROM
545: ra_customer_merges m WHERE
546: m.process_flag = 'N'
547: AND m.request_id = req_id

Line 550: csc_cust_plans yts, ra_customer_merges m WHERE

546: m.process_flag = 'N'
547: AND m.request_id = req_id
548: AND m.set_number = set_num )
549: AND plan_id in ( SELECT yts.plan_id FROM
550: csc_cust_plans yts, ra_customer_merges m WHERE
551: yts.cust_account_id = m.customer_id
552: AND m.process_flag = 'N'
553: AND m.request_id = req_id
554: AND m.set_number = set_num )

Line 568: arp_message.set_line( 'CSC_CUST_PLANS_MERGE');

564: arp_message.set_token('NUM_ROWS',to_char(l_count));
565: END IF;
566: EXCEPTION
567: WHEN OTHERS THEN
568: arp_message.set_line( 'CSC_CUST_PLANS_MERGE');
569: RAISE;
570: END CSC_CUST_PLANS_MERGE;
571:
572: PROCEDURE CSC_CUST_PLANS_AUDIT_MERGE (

Line 570: END CSC_CUST_PLANS_MERGE;

566: EXCEPTION
567: WHEN OTHERS THEN
568: arp_message.set_line( 'CSC_CUST_PLANS_MERGE');
569: RAISE;
570: END CSC_CUST_PLANS_MERGE;
571:
572: PROCEDURE CSC_CUST_PLANS_AUDIT_MERGE (
573: req_id NUMBER,
574: set_num NUMBER,

Line 572: PROCEDURE CSC_CUST_PLANS_AUDIT_MERGE (

568: arp_message.set_line( 'CSC_CUST_PLANS_MERGE');
569: RAISE;
570: END CSC_CUST_PLANS_MERGE;
571:
572: PROCEDURE CSC_CUST_PLANS_AUDIT_MERGE (
573: req_id NUMBER,
574: set_num NUMBER,
575: process_mode VARCHAR2) IS
576:

Line 583: CSC_CUST_PLANS_AUDIT.PLAN_AUDIT_ID%TYPE

579: INDEX BY BINARY_INTEGER;
580: MERGE_HEADER_ID_LIST MERGE_HEADER_ID_LIST_TYPE;
581:
582: TYPE PLAN_AUDIT_ID_LIST_TYPE IS TABLE OF
583: CSC_CUST_PLANS_AUDIT.PLAN_AUDIT_ID%TYPE
584: INDEX BY BINARY_INTEGER;
585: PRIMARY_KEY_ID_LIST PLAN_AUDIT_ID_LIST_TYPE;
586:
587: TYPE cust_account_id_LIST_TYPE IS TABLE OF

Line 588: CSC_CUST_PLANS_AUDIT.cust_account_id%TYPE

584: INDEX BY BINARY_INTEGER;
585: PRIMARY_KEY_ID_LIST PLAN_AUDIT_ID_LIST_TYPE;
586:
587: TYPE cust_account_id_LIST_TYPE IS TABLE OF
588: CSC_CUST_PLANS_AUDIT.cust_account_id%TYPE
589: INDEX BY BINARY_INTEGER;
590: NUM_COL1_ORIG_LIST cust_account_id_LIST_TYPE;
591: NUM_COL1_NEW_LIST cust_account_id_LIST_TYPE;
592:

Line 594: CSC_CUST_PLANS.PARTY_ID%TYPE

590: NUM_COL1_ORIG_LIST cust_account_id_LIST_TYPE;
591: NUM_COL1_NEW_LIST cust_account_id_LIST_TYPE;
592:
593: TYPE PARTY_ID_LIST_TYPE IS TABLE OF
594: CSC_CUST_PLANS.PARTY_ID%TYPE
595: INDEX BY BINARY_INTEGER;
596: NUM_COL2_ORIG_LIST PARTY_ID_LIST_TYPE;
597: NUM_COL2_NEW_LIST PARTY_ID_LIST_TYPE;
598:

Line 604: FROM CSC_CUST_PLANS_AUDIT yt, ra_customer_merges m , hz_cust_accounts hzca

600: CURSOR merged_records IS
601: SELECT distinct m.CUSTOMER_MERGE_HEADER_ID
602: ,yt.plan_audit_id
603: ,m.customer_id, m.duplicate_id, hzca.party_id, yt.party_id
604: FROM CSC_CUST_PLANS_AUDIT yt, ra_customer_merges m , hz_cust_accounts hzca
605: WHERE ( yt.cust_account_id = m.duplicate_id AND m.customer_id = hzca.cust_account_id )
606: AND m.process_flag = 'N'
607: AND m.request_id = req_id
608: AND m.set_number = set_num;

Line 616: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CSC_CUST_PLANS_AUDIT',FALSE);

612: IF process_mode='LOCK' THEN
613: NULL;
614: ELSE
615: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');
616: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','CSC_CUST_PLANS_AUDIT',FALSE);
617: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
618: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
619:
620: open merged_records;

Line 658: 'CSC_CUST_PLANS_AUDIT',

654: LAST_UPDATE_LOGIN,
655: LAST_UPDATE_DATE,
656: LAST_UPDATED_BY
657: ) VALUES ( HZ_CUSTOMER_MERGE_LOG_s.nextval,
658: 'CSC_CUST_PLANS_AUDIT',
659: MERGE_HEADER_ID_LIST(I),
660: PRIMARY_KEY_ID_LIST(I),
661: NUM_COL1_ORIG_LIST(I),
662: NUM_COL1_NEW_LIST(I),

Line 675: UPDATE CSC_CUST_PLANS_AUDIT yt SET

671: hz_utility_pub.LAST_UPDATED_BY
672: );
673:
674: END IF; FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
675: UPDATE CSC_CUST_PLANS_AUDIT yt SET
676: cust_account_id=NUM_COL1_NEW_LIST(I)
677: , party_id=NUM_COL2_NEW_LIST(I)
678: , LAST_UPDATE_DATE=SYSDATE
679: , last_updated_by=arp_standard.profile.user_id

Line 691: csc_cust_plans_audit yts, ra_customer_merges m WHERE

687: m.process_flag = 'N'
688: AND m.request_id = req_id
689: AND m.set_number = set_num )
690: AND plan_id not in ( SELECT yts.plan_id FROM
691: csc_cust_plans_audit yts, ra_customer_merges m WHERE
692: yts.cust_account_id = m.customer_id
693: AND m.process_flag = 'N'
694: AND m.request_id = req_id
695: AND m.set_number = set_num )

Line 708: arp_message.set_line( 'CSC_CUST_PLANS_AUDIT_MERGE');

704: arp_message.set_token('NUM_ROWS',to_char(l_count));
705: END IF;
706: EXCEPTION
707: WHEN OTHERS THEN
708: arp_message.set_line( 'CSC_CUST_PLANS_AUDIT_MERGE');
709: RAISE;
710: END CSC_CUST_PLANS_AUDIT_MERGE;
711:
712: END CSC_ACCOUNT_MERGE_PKG;

Line 710: END CSC_CUST_PLANS_AUDIT_MERGE;

706: EXCEPTION
707: WHEN OTHERS THEN
708: arp_message.set_line( 'CSC_CUST_PLANS_AUDIT_MERGE');
709: RAISE;
710: END CSC_CUST_PLANS_AUDIT_MERGE;
711:
712: END CSC_ACCOUNT_MERGE_PKG;