576:
577: BEGIN
578:
579:
580: CSM_UTIL_PKG.LOG('Entering CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC Package ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
581:
582: l_counter_profile_value := fnd_profile.value_specific('CSM_COUNTER_DWLD_PARTY');
583:
584: l_contract_profile_value := fnd_profile.value_specific('CSM_CONTRACT_DWLD_PARTY');
582: l_counter_profile_value := fnd_profile.value_specific('CSM_COUNTER_DWLD_PARTY');
583:
584: l_contract_profile_value := fnd_profile.value_specific('CSM_CONTRACT_DWLD_PARTY');
585:
586: CSM_UTIL_PKG.LOG('Deleting Customer Accounts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
587: OPEN l_customer_accounts_del_csr;
588:
589: LOOP
590:
627:
628: END LOOP;
629:
630: CLOSE l_customer_accounts_del_csr;
631: CSM_UTIL_PKG.LOG('Deleting Customer Accounts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
632: CSM_UTIL_PKG.LOG('Deleting Customer HZ Contacts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
633: OPEN l_contacts_del_csr;
634:
635: LOOP
628: END LOOP;
629:
630: CLOSE l_customer_accounts_del_csr;
631: CSM_UTIL_PKG.LOG('Deleting Customer Accounts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
632: CSM_UTIL_PKG.LOG('Deleting Customer HZ Contacts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
633: OPEN l_contacts_del_csr;
634:
635: LOOP
636:
730:
731: END LOOP;
732:
733: CLOSE l_contacts_del_csr;
734: CSM_UTIL_PKG.LOG('Deleting Customer HZ Contacts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
735: CSM_UTIL_PKG.LOG('Deleting Instances-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
736: OPEN l_instance_del_csr;
737:
738: LOOP
731: END LOOP;
732:
733: CLOSE l_contacts_del_csr;
734: CSM_UTIL_PKG.LOG('Deleting Customer HZ Contacts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
735: CSM_UTIL_PKG.LOG('Deleting Instances-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
736: OPEN l_instance_del_csr;
737:
738: LOOP
739:
795:
796: END LOOP;
797:
798: CLOSE l_instance_del_csr;
799: CSM_UTIL_PKG.LOG('Deleting Instances-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
800: CSM_UTIL_PKG.LOG('Deleting Counters-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
801: OPEN l_counter_del_csr;
802:
803: LOOP
796: END LOOP;
797:
798: CLOSE l_instance_del_csr;
799: CSM_UTIL_PKG.LOG('Deleting Instances-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
800: CSM_UTIL_PKG.LOG('Deleting Counters-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
801: OPEN l_counter_del_csr;
802:
803: LOOP
804:
841:
842: END LOOP;
843:
844: CLOSE l_counter_del_csr;
845: CSM_UTIL_PKG.LOG('Deleting Counters-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
846: CSM_UTIL_PKG.LOG('Deleting Counter Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
847: OPEN l_counter_value_del_csr;
848:
849: LOOP
842: END LOOP;
843:
844: CLOSE l_counter_del_csr;
845: CSM_UTIL_PKG.LOG('Deleting Counters-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
846: CSM_UTIL_PKG.LOG('Deleting Counter Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
847: OPEN l_counter_value_del_csr;
848:
849: LOOP
850:
893:
894: END LOOP;
895:
896: CLOSE l_counter_value_del_csr;
897: CSM_UTIL_PKG.LOG('Deleting Counter Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
898: CSM_UTIL_PKG.LOG('Deleting Counter Property-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
899: OPEN l_counter_property_del_csr;
900:
901: LOOP
894: END LOOP;
895:
896: CLOSE l_counter_value_del_csr;
897: CSM_UTIL_PKG.LOG('Deleting Counter Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
898: CSM_UTIL_PKG.LOG('Deleting Counter Property-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
899: OPEN l_counter_property_del_csr;
900:
901: LOOP
902:
939:
940: END LOOP;
941:
942: CLOSE l_counter_property_del_csr;
943: CSM_UTIL_PKG.LOG('Deleting Counter Property-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
944: CSM_UTIL_PKG.LOG('Deleting Counter Property Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
945: OPEN l_counter_prop_value_del_csr;
946:
947: LOOP
940: END LOOP;
941:
942: CLOSE l_counter_property_del_csr;
943: CSM_UTIL_PKG.LOG('Deleting Counter Property-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
944: CSM_UTIL_PKG.LOG('Deleting Counter Property Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
945: OPEN l_counter_prop_value_del_csr;
946:
947: LOOP
948:
985:
986: END LOOP;
987:
988: CLOSE l_counter_prop_value_del_csr;
989: CSM_UTIL_PKG.LOG('Deleting Counter Property Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
990: CSM_UTIL_PKG.LOG('Deleting Party Sites and HZ Locations -START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
991: OPEN l_party_sites_del_csr;
992:
993: LOOP
986: END LOOP;
987:
988: CLOSE l_counter_prop_value_del_csr;
989: CSM_UTIL_PKG.LOG('Deleting Counter Property Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
990: CSM_UTIL_PKG.LOG('Deleting Party Sites and HZ Locations -START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
991: OPEN l_party_sites_del_csr;
992:
993: LOOP
994:
1073:
1074: END LOOP;
1075:
1076: CLOSE l_party_sites_del_csr;
1077: CSM_UTIL_PKG.LOG('Deleting Party Sites and HZ Locations -END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1078: CSM_UTIL_PKG.LOG('Deleting Parties -START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1079: OPEN l_party_del_csr;
1080:
1081: LOOP
1074: END LOOP;
1075:
1076: CLOSE l_party_sites_del_csr;
1077: CSM_UTIL_PKG.LOG('Deleting Party Sites and HZ Locations -END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1078: CSM_UTIL_PKG.LOG('Deleting Parties -START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1079: OPEN l_party_del_csr;
1080:
1081: LOOP
1082:
1119:
1120: END LOOP;
1121:
1122: CLOSE l_party_del_csr;
1123: CSM_UTIL_PKG.LOG('Deleting Parties -END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1124:
1125: CSM_UTIL_PKG.LOG('Processing Parties-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1126:
1127: OPEN l_party_ins_csr;
1121:
1122: CLOSE l_party_del_csr;
1123: CSM_UTIL_PKG.LOG('Deleting Parties -END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1124:
1125: CSM_UTIL_PKG.LOG('Processing Parties-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1126:
1127: OPEN l_party_ins_csr;
1128:
1129: LOOP
1166:
1167: END LOOP;
1168:
1169: CLOSE l_party_ins_csr;
1170: CSM_UTIL_PKG.LOG('Processing Parties-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1171: CSM_UTIL_PKG.LOG('Processing Party Sites and Locations-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1172: OPEN l_party_sites_ins_csr;
1173:
1174: LOOP
1167: END LOOP;
1168:
1169: CLOSE l_party_ins_csr;
1170: CSM_UTIL_PKG.LOG('Processing Parties-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1171: CSM_UTIL_PKG.LOG('Processing Party Sites and Locations-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1172: OPEN l_party_sites_ins_csr;
1173:
1174: LOOP
1175:
1259:
1260: END LOOP;
1261:
1262: CLOSE l_party_sites_ins_csr;
1263: CSM_UTIL_PKG.LOG('Processing Party Sites and Locations-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1264: CSM_UTIL_PKG.LOG('Processing Instances-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1265:
1266: OPEN l_instance_ins_csr;
1267:
1260: END LOOP;
1261:
1262: CLOSE l_party_sites_ins_csr;
1263: CSM_UTIL_PKG.LOG('Processing Party Sites and Locations-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1264: CSM_UTIL_PKG.LOG('Processing Instances-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1265:
1266: OPEN l_instance_ins_csr;
1267:
1268: LOOP
1336:
1337: END LOOP;
1338:
1339: CLOSE l_instance_ins_csr;
1340: CSM_UTIL_PKG.LOG('Processing Instances-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1341:
1342: IF l_counter_profile_value = 'Y' THEN
1343:
1344: CSM_UTIL_PKG.LOG('Processing Counters-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1340: CSM_UTIL_PKG.LOG('Processing Instances-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1341:
1342: IF l_counter_profile_value = 'Y' THEN
1343:
1344: CSM_UTIL_PKG.LOG('Processing Counters-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1345:
1346: OPEN l_counter_ins_csr;
1347:
1348: LOOP
1387:
1388: END LOOP;
1389:
1390: CLOSE l_counter_ins_csr;
1391: CSM_UTIL_PKG.LOG('Processing Counters-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1392: CSM_UTIL_PKG.LOG('Processing Counter Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1393: OPEN l_counter_value_ins_csr;
1394:
1395: LOOP
1388: END LOOP;
1389:
1390: CLOSE l_counter_ins_csr;
1391: CSM_UTIL_PKG.LOG('Processing Counters-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1392: CSM_UTIL_PKG.LOG('Processing Counter Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1393: OPEN l_counter_value_ins_csr;
1394:
1395: LOOP
1396:
1442:
1443: END LOOP;
1444:
1445: CLOSE l_counter_value_ins_csr;
1446: CSM_UTIL_PKG.LOG('Processing Counter Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1447: CSM_UTIL_PKG.LOG('Processing Counter Property-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1448: OPEN l_counter_property_ins_csr;
1449:
1450: LOOP
1443: END LOOP;
1444:
1445: CLOSE l_counter_value_ins_csr;
1446: CSM_UTIL_PKG.LOG('Processing Counter Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1447: CSM_UTIL_PKG.LOG('Processing Counter Property-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1448: OPEN l_counter_property_ins_csr;
1449:
1450: LOOP
1451:
1489:
1490: END LOOP;
1491:
1492: CLOSE l_counter_property_ins_csr;
1493: CSM_UTIL_PKG.LOG('Processing Counter Property-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1494: CSM_UTIL_PKG.LOG('Processing Counter Property Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1495: OPEN l_counter_prop_value_ins_csr;
1496:
1497: LOOP
1490: END LOOP;
1491:
1492: CLOSE l_counter_property_ins_csr;
1493: CSM_UTIL_PKG.LOG('Processing Counter Property-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1494: CSM_UTIL_PKG.LOG('Processing Counter Property Values-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1495: OPEN l_counter_prop_value_ins_csr;
1496:
1497: LOOP
1498:
1536:
1537: END LOOP;
1538:
1539: CLOSE l_counter_prop_value_ins_csr;
1540: CSM_UTIL_PKG.LOG('Processing Counter Property Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1541:
1542: ELSE
1543:
1544: CSM_UTIL_PKG.LOG('The Profile Option CSM: Allow Counters Download for Parties is set to NO',FND_LOG.LEVEL_PROCEDURE);
1540: CSM_UTIL_PKG.LOG('Processing Counter Property Values-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1541:
1542: ELSE
1543:
1544: CSM_UTIL_PKG.LOG('The Profile Option CSM: Allow Counters Download for Parties is set to NO',FND_LOG.LEVEL_PROCEDURE);
1545:
1546: END IF;
1547:
1548: CSM_UTIL_PKG.LOG('Processing HZ Contacts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1544: CSM_UTIL_PKG.LOG('The Profile Option CSM: Allow Counters Download for Parties is set to NO',FND_LOG.LEVEL_PROCEDURE);
1545:
1546: END IF;
1547:
1548: CSM_UTIL_PKG.LOG('Processing HZ Contacts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1549: OPEN l_contacts_ins_csr;
1550:
1551: LOOP
1552:
1652:
1653: END LOOP;
1654:
1655: CLOSE l_contacts_ins_csr;
1656: CSM_UTIL_PKG.LOG('Processing HZ Contacts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1657: CSM_UTIL_PKG.LOG('Processing Customer Accounts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1658: OPEN l_customer_accounts_ins_csr;
1659:
1660: LOOP
1653: END LOOP;
1654:
1655: CLOSE l_contacts_ins_csr;
1656: CSM_UTIL_PKG.LOG('Processing HZ Contacts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1657: CSM_UTIL_PKG.LOG('Processing Customer Accounts-START ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1658: OPEN l_customer_accounts_ins_csr;
1659:
1660: LOOP
1661:
1699:
1700: END LOOP;
1701:
1702: CLOSE l_customer_accounts_ins_csr;
1703: CSM_UTIL_PKG.LOG('Processing Customer Accounts-END ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1704:
1705: DELETE FROM csm_party_assignment
1706: WHERE DELETED_FLAG='Y';
1707:
1706: WHERE DELETED_FLAG='Y';
1707:
1708: COMMIT;
1709:
1710: CSM_UTIL_PKG.LOG('Calling CSM_SERVICE_HISTORY_EVENT_PKG.PROCESS_OWNER_HISTORY package', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1711:
1712: /* we dont require the records with deleted flag as Y
1713: hence calling the service history package after the delete statement */
1714:
1723: COMMIT;
1724:
1725: x_return_status := 'SUCCESS';
1726: x_error_message := 'PARTY_ID,PARTY_SITE_ID,LOCATION_ID,ITEM_INSTANCE_ID,CONTACT_ID are successfully processed';
1727: CSM_UTIL_PKG.LOG('Leaving CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC Package ', 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1728:
1729: EXCEPTION
1730: WHEN others THEN
1731: l_sqlerrno := to_char(SQLCODE);
1732: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1733: x_return_status := 'ERROR';
1734: x_error_message := l_sqlerrmsg;
1735: p_message := 'Exception in CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC Procedure :' || l_sqlerrno || ':' || l_sqlerrmsg;
1736: CSM_UTIL_PKG.LOG(p_message, 'CSM_PARTY_DATA_EVENT_PKG.REFRESH_ACC',FND_LOG.LEVEL_EXCEPTION);
1737: ROLLBACK;
1738:
1739: END REFRESH_ACC;
1740: