[Home] [Help]
2051: SELECT 'TRUNCATE TABLE ' || OWNER || '.' || TABLE_NAME SQLSTMT
2052:
2053: FROM ALL_TABLES
2054:
2055: WHERE TABLE_NAME IN ('IEC_TC_TZ_PAIRS_CACHE', 'IEC_TZ_MAPPING_CACHE', 'IEC_TZ_OFFSET_MAP_CACHE', 'IEC_VAL_ENTRY_CACHE')
2056:
2057: AND OWNER = table_owner;
2058:
2059:
2083:
2084:
2085: DBMS_SQL.CLOSE_CURSOR(l_ddl_csr); */
2086:
2087: delete from IEC_TC_TZ_PAIRS_CACHE;
2088:
2089: delete from IEC_TZ_MAPPING_CACHE;
2090:
2091: delete from IEC_TZ_OFFSET_MAP_CACHE;
4510: BEGIN
4511:
4512:
4513:
4514: -- Update IEC_TC_TZ_PAIRS_CACHE for current contact point (increment record counts)
4515:
4516:
4517:
4518: FOR subset_rec IN (SELECT SUBSET_ID SUBSET_ID
4550:
4551:
4552: EXECUTE IMMEDIATE
4553:
4554: 'UPDATE IEC_TC_TZ_PAIRS_CACHE
4555:
4556: SET RECORD_COUNT = NVL(RECORD_COUNT, 0) + :record_count_incr
4557:
4558: WHERE SUBSET_ID = :subset_id
4582: ELSE
4583:
4584: EXECUTE IMMEDIATE
4585:
4586: 'UPDATE IEC_TC_TZ_PAIRS_CACHE
4587:
4588: SET RECORD_COUNT = NVL(RECORD_COUNT, 0) + :record_count_incr
4589:
4590: WHERE SUBSET_ID = :subset_id
4632:
4633:
4634: EXECUTE IMMEDIATE
4635:
4636: 'INSERT INTO IEC_TC_TZ_PAIRS_CACHE
4637:
4638: ( SUBSET_ID
4639:
4640: , TERRITORY_CODE
4684: END LOOP;
4685:
4686:
4687:
4688: -- Update IEC_TC_TZ_PAIRS_CACHE for contact points 1 through 6 (do not increment record counts)
4689:
4690: l_cp_postfix.EXTEND(6);
4691:
4692: l_cp_postfix(1) := '_S1';
4750: EXECUTE IMMEDIATE
4751:
4752: 'SELECT TC_TZ_PAIR_ID
4753:
4754: FROM IEC_TC_TZ_PAIRS_CACHE
4755:
4756: WHERE SUBSET_ID = :subset_id
4757:
4758: AND TERRITORY_CODE = :territory_code
4778: EXECUTE IMMEDIATE
4779:
4780: 'SELECT TC_TZ_PAIR_ID
4781:
4782: FROM IEC_TC_TZ_PAIRS_CACHE
4783:
4784: WHERE SUBSET_ID = :subset_id
4785:
4786: AND TERRITORY_CODE = :territory_code
4824:
4825:
4826: EXECUTE IMMEDIATE
4827:
4828: 'INSERT INTO IEC_TC_TZ_PAIRS_CACHE
4829:
4830: ( SUBSET_ID
4831:
4832: , TERRITORY_CODE
4896: 'UPDATE IEC_VAL_ENTRY_CACHE A
4897:
4898: SET A.MKTG_ITEM_CC_TZS_ID_S1 = (SELECT TC_TZ_PAIR_ID
4899:
4900: FROM IEC_TC_TZ_PAIRS_CACHE
4901:
4902: WHERE SUBSET_ID = A.SUBSET_ID
4903:
4904: AND TERRITORY_CODE = A.TERRITORY_CODE_S1
4912: AND CACHE_ONLY_FLAG <> ''O'')
4913:
4914: , A.MKTG_ITEM_CC_TZS_ID_S2 = (SELECT TC_TZ_PAIR_ID
4915:
4916: FROM IEC_TC_TZ_PAIRS_CACHE
4917:
4918: WHERE SUBSET_ID = A.SUBSET_ID
4919:
4920: AND TERRITORY_CODE = A.TERRITORY_CODE_S2
4928: AND CACHE_ONLY_FLAG <> ''O'')
4929:
4930: , A.MKTG_ITEM_CC_TZS_ID_S3 = (SELECT TC_TZ_PAIR_ID
4931:
4932: FROM IEC_TC_TZ_PAIRS_CACHE
4933:
4934: WHERE SUBSET_ID = A.SUBSET_ID
4935:
4936: AND TERRITORY_CODE = A.TERRITORY_CODE_S3
4944: AND CACHE_ONLY_FLAG <> ''O'')
4945:
4946: , A.MKTG_ITEM_CC_TZS_ID_S4 = (SELECT TC_TZ_PAIR_ID
4947:
4948: FROM IEC_TC_TZ_PAIRS_CACHE
4949:
4950: WHERE SUBSET_ID = A.SUBSET_ID
4951:
4952: AND TERRITORY_CODE = A.TERRITORY_CODE_S4
4960: AND CACHE_ONLY_FLAG <> ''O'')
4961:
4962: , A.MKTG_ITEM_CC_TZS_ID_S5 = (SELECT TC_TZ_PAIR_ID
4963:
4964: FROM IEC_TC_TZ_PAIRS_CACHE
4965:
4966: WHERE SUBSET_ID = A.SUBSET_ID
4967:
4968: AND TERRITORY_CODE = A.TERRITORY_CODE_S5
4976: AND CACHE_ONLY_FLAG <> ''O'')
4977:
4978: , A.MKTG_ITEM_CC_TZS_ID_S6 = (SELECT TC_TZ_PAIR_ID
4979:
4980: FROM IEC_TC_TZ_PAIRS_CACHE
4981:
4982: WHERE SUBSET_ID = A.SUBSET_ID
4983:
4984: AND TERRITORY_CODE = A.TERRITORY_CODE_S6
4992: AND CACHE_ONLY_FLAG <> ''O'')
4993:
4994: , A.CURR_CP_MKTG_ITEM_CC_TZS_ID = (SELECT TC_TZ_PAIR_ID
4995:
4996: FROM IEC_TC_TZ_PAIRS_CACHE
4997:
4998: WHERE SUBSET_ID = A.SUBSET_ID
4999:
5000: AND TERRITORY_CODE = A.CURR_CP_TERRITORY_CODE
5150: IF p_callable_zone_id_col.COUNT > 0 THEN
5151:
5152: FORALL i IN p_callable_zone_id_col.FIRST..p_callable_zone_id_col.LAST
5153:
5154: UPDATE IEC_TC_TZ_PAIRS_CACHE
5155:
5156: SET RECORD_COUNT = NVL(RECORD_COUNT, 0) + p_incr_amount_col(i)
5157:
5158: WHERE TC_TZ_PAIR_ID = p_callable_zone_id_col(i);
5194: -- LOAD IEC_G_MKTG_ITEM_CC_TZS RECORDS FOR CURRENT LIST INTO CACHE
5195:
5196: EXECUTE IMMEDIATE
5197:
5198: 'INSERT INTO IEC_TC_TZ_PAIRS_CACHE (SUBSET_ID, TERRITORY_CODE, REGION_ID, TIMEZONE_ID, TC_TZ_PAIR_ID, RECORD_COUNT, CACHE_ONLY_FLAG)
5199:
5200: SELECT SUBSET_ID, TERRITORY_CODE, REGION_ID, TIMEZONE_ID, ITM_CC_TZ_ID, 0, ''N''
5201:
5202: FROM IEC_G_MKTG_ITEM_CC_TZS
5340: EXECUTE IMMEDIATE
5341:
5342: 'SELECT TERRITORY_CODE, REGION_ID, TIMEZONE_ID
5343:
5344: FROM IEC_TC_TZ_PAIRS_CACHE
5345:
5346: WHERE TC_TZ_PAIR_ID = :cc_tz_id'
5347:
5348: INTO l_territory_code, l_region_id, l_time_zone_id
5460: SELECT SUBSET_ID, TERRITORY_CODE, REGION_ID, TIMEZONE_ID, TC_TZ_PAIR_ID, RECORD_COUNT
5461:
5462: BULK COLLECT INTO l_subset_id_col, l_territory_code_col, l_region_col, l_timezone_col, l_tc_tz_pair_id_col, l_record_count_col
5463:
5464: FROM IEC_TC_TZ_PAIRS_CACHE
5465:
5466: WHERE CACHE_ONLY_FLAG = 'Y';
5467:
5468:
5530: SELECT TC_TZ_PAIR_ID, RECORD_COUNT
5531:
5532: BULK COLLECT INTO l_tc_tz_pair_id_col, l_record_count_col
5533:
5534: FROM IEC_TC_TZ_PAIRS_CACHE
5535:
5536: WHERE CACHE_ONLY_FLAG = 'N';
5537:
5538:
5556:
5557:
5558: -- Update these records to reflect the fact that they now exist outside of the cache
5559:
5560: UPDATE IEC_TC_TZ_PAIRS_CACHE
5561:
5562: SET CACHE_ONLY_FLAG = 'N'
5563:
5564: WHERE CACHE_ONLY_FLAG = 'Y';
5566:
5567:
5568: -- Clear record counts in cache to start fresh for next batch
5569:
5570: UPDATE IEC_TC_TZ_PAIRS_CACHE
5571:
5572: SET RECORD_COUNT = 0;
5573:
5574:
16078: -- used when assigning new callable zones (with subsets) to entries
16079:
16080: EXECUTE IMMEDIATE
16081:
16082: 'INSERT INTO IEC_TC_TZ_PAIRS_CACHE (SUBSET_ID, TERRITORY_CODE, REGION_ID, TIMEZONE_ID, TC_TZ_PAIR_ID, RECORD_COUNT, CACHE_ONLY_FLAG)
16083:
16084: SELECT SUBSET_ID, TERRITORY_CODE, REGION_ID, TIMEZONE_ID, ITM_CC_TZ_ID, RECORD_COUNT, ''O''
16085:
16086: FROM IEC_G_MKTG_ITEM_CC_TZS