[Home] [Help]
591: ( p_location_id IN NUMBER,
592: p_location_type IN VARCHAR2,
593: p_zone_type IN VARCHAR2,
594: p_trx_date IN DATE,
595: x_zone_tbl OUT NOCOPY HZ_GEO_GET_PUB.zone_tbl_type,
596: x_return_status OUT NOCOPY VARCHAR2) IS
597:
598:
599:
614: -- Logging Infra
615: l_procedure_name CONSTANT VARCHAR2(30) := 'get_zone';
616: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
617:
618: -- The following 3 variables are added to make the external api (HZ_GEO_GET_PUB.get_zone)
619: -- calling place to compile. Needs to be removed later...
620: l_init_msg_list VARCHAR2(30);
621: x_msg_count NUMBER;
622: x_msg_data VARCHAR2(2000);
629:
630: --bug8251315
631: l_tbl_index BINARY_INTEGER;
632: l_zone_indx VARCHAR2(4000);
633: p_zone_tbl HZ_GEO_GET_PUB.zone_tbl_type;
634: l NUMBER;
635: BEGIN
636: -- Logging Infra: Setting up runtime level
637: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
656: x_location_table_name);
657:
658: -- Logging Infra: Statement level: "B" means "B"reak point
659: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
660: l_log_msg := 'B: hz_geo_get_pub.get_zone: in: '||'p_location_table_name='||x_location_table_name||
661: ', p_location_id='||p_location_id||', p_zone_type=' ||p_zone_type||', p_date='||p_trx_date;
662: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
663: END IF;
664:
799:
800: IF (g_level_statement >= g_current_runtime_level ) THEN
801: FND_LOG.STRING(g_level_statement,
802: G_MODULE_NAME || l_procedure_name,
803: 'Not Found Zone info in cache... call HZ_GEO_GET_PUB.get_zone');
804: END IF;
805: HZ_GEO_GET_PUB.get_zone(
806: x_location_table_name,
807: p_location_id,
801: FND_LOG.STRING(g_level_statement,
802: G_MODULE_NAME || l_procedure_name,
803: 'Not Found Zone info in cache... call HZ_GEO_GET_PUB.get_zone');
804: END IF;
805: HZ_GEO_GET_PUB.get_zone(
806: x_location_table_name,
807: p_location_id,
808: p_zone_type,
809: p_trx_date,
814: x_msg_data);
815:
816: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
817: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
818: 'Returning from HZ_GEO_GET_PUB.get_zone with x_return_status:'||x_return_status
819: ||' x_msg_count:'|| x_msg_count
820: ||' x_msg_data:'||x_msg_data
821: ||'number of records in x_zone_tbl :'||x_zone_tbl.count);
822: END IF;
839:
840: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
841:
842: FOR i in NVL(x_zone_tbl.first,0)..NVL(x_zone_tbl.last,-99) LOOP
843: l_log_msg := 'hz_geo_get_pub.get_zone: out: x_zone_id='||x_zone_tbl(i).zone_id||', x_zone_code='||x_zone_tbl(i).zone_code||
844: ', x_zone_name='||x_zone_tbl(i).zone_name||', i = '||i;
845: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
846: END LOOP;
847: END IF;
876: -- Logging Infra: Statement level: "R" means "R"eturned value to a caller
877: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
878: IF x_zone_tbl.count > 0 THEN
879: FOR i in x_zone_tbl.first..x_zone_tbl.last LOOP
880: l_log_msg := 'R: hz_geo_get_pub.get_zone: out: x_zone_id='||x_zone_tbl(i).zone_id||', x_zone_code='||x_zone_tbl(i).zone_code||
881: ', x_zone_name='||x_zone_tbl(i).zone_name||', x_return_status='||x_return_status;
882: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
883: END LOOP;
884: END IF;
961: l_geography_type geography_type_use_type;
962: l_geography_use geography_type_use_type;
963: l_geography_type_num geography_type_num_type;
964: l_inner_city_jurisdiction_flag VARCHAR2(30);
965: l_zone_tbl HZ_GEO_GET_PUB.zone_tbl_type;
966: l_country_or_group_code VARCHAR2(30);
967: l_regime_country_code VARCHAR2(30);
968: l_loc_country_code VARCHAR2(30);
969: l_country_regime_flag VARCHAR2(1);