DBA Data[Home] [Help]

APPS.ZX_TCM_GEO_JUR_PKG dependencies on FND_LOG

Line 6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

2: /* $Header: zxcjurb.pls 120.42.12010000.1 2008/07/28 13:29:06 appldev ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GEO_JUR_PKG';

Line 9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

5: G_CURRENT_RUNTIME_LEVEL NUMBER;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GEO_JUR_PKG';
13:

Line 10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GEO_JUR_PKG';
13:
14: TYPE geography_id_type is TABLE OF NUMBER INDEX BY BINARY_INTEGER;

Line 11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(30) := 'ZX.PLSQL.ZX_TCM_GEO_JUR_PKG';
13:
14: TYPE geography_id_type is TABLE OF NUMBER INDEX BY BINARY_INTEGER;
15: l_jurisdiction_rec_tmp_tbl tax_jurisdiction_rec_tbl_type;

Line 36: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

32: x_loc_site OUT NOCOPY VARCHAR2,
33: x_return_status OUT NOCOPY VARCHAR2) IS
34: -- Logging Infra
35: l_procedure_name CONSTANT VARCHAR2(30) := 'get_pos_loc_or_site';
36: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
37: l_party_type_tbl_idx binary_integer;
38: l_idx BINARY_INTEGER;
39:
40: CURSOR c_get_party_type_info

Line 55: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

51: ZX_PARTY_TYPES;
52:
53: BEGIN
54: -- Logging Infra: Setting up runtime level
55: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
56: -- Logging Infra: Procedure level
57: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
58: l_log_msg := l_procedure_name||'(+)';
59: l_log_msg := l_log_msg ||' B: SEL zx_party_types: in: p_party_type='||p_party_type;

Line 60: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);

56: -- Logging Infra: Procedure level
57: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
58: l_log_msg := l_procedure_name||'(+)';
59: l_log_msg := l_log_msg ||' B: SEL zx_party_types: in: p_party_type='||p_party_type;
60: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
61: END IF;
62:
63: -- Initialize API return status to success.
64:

Line 74: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

70: x_loc_tbl := ZX_GLOBAL_STRUCTURES_PKG.ZX_PARTY_TYPES_CACHE(l_party_type_tbl_idx).LOCATION_SOURCE_TABLE;
71:
72: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
73: l_log_msg := 'Found the party type information in cache for:'||p_party_type;
74: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
75: END IF;
76:
77:
78: ELSE

Line 117: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

113: -- Logging Infra: Statement level: "R" means "R"eturned value to a caller
114: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
115: l_log_msg := 'R: SEL zx_party_types: out: x_loc_tbl='||x_loc_tbl||', x_loc_site='||x_loc_site;
116: l_log_msg := l_log_msg ||' '||l_procedure_name||'(-)';
117: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
118: END IF;
119:
120: EXCEPTION WHEN OTHERS THEN
121: -- Party type information could not be retrived.

Line 127: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);

123: FND_MESSAGE.SET_NAME('ZX', 'ZX_TCM_NO_PARTY_TYPE_INFO');
124:
125: -- Logging Infra: Statement level
126: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
127: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
128: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: p_party_type='||p_party_type);
129: END IF;
130:
131: END get_pos_loc_or_site;

Line 128: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: p_party_type='||p_party_type);

124:
125: -- Logging Infra: Statement level
126: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
127: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
128: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: p_party_type='||p_party_type);
129: END IF;
130:
131: END get_pos_loc_or_site;
132:

Line 163: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');

159: IF l_hz_location_exists = 'TRUE' THEN
160: x_location_table_name := 'HZ_LOCATIONS';
161: ELSE
162: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
163: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');
164: END IF;
165: END IF;
166: END IF;
167: ELSIF x_location_table_name = 'HZ_LOCATIONS' THEN

Line 191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');

187: IF l_hr_location_exists = 'TRUE' THEN
188: x_location_table_name := 'HR_LOCATIONS_ALL';
189: ELSE
190: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');
192: END IF;
193: END IF;
194: END IF;
195: END IF;

Line 211: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

207: BEGIN
208:
209: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
210: l_log_msg := l_procedure_name||'(+)';
211: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
212: END IF;
213:
214: x_return_status := FND_API.G_RET_STS_SUCCESS;
215: IF ZX_GLOBAL_STRUCTURES_PKG.Loc_info_tbl.exists(to_char(p_location_id)) then

Line 220: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,

216:
217: x_location_info_rec := zx_global_Structures_pkg.loc_info_tbl(to_char(p_location_id));
218:
219: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
220: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,
221: 'Found the location info in cache for location id: '||p_location_id||' for table '||
222: x_location_info_rec.location_table_name);
223: END IF;
224:

Line 258: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

254: EXCEPTION WHEN NO_DATA_FOUND THEN
255: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
256: l_log_msg := 'B: Invalid Location_id';
257: l_log_msg := l_log_msg ||' E: SEL country_code: no_data_found: p_location_id='||p_location_id;
258: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
259: END IF;
260:
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');

Line 299: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');

295:
296:
297: EXCEPTION WHEN NO_DATA_FOUND THEN
298: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
299: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'B: Invalid Location_id');
300: END IF;
301:
302: -- Logging Infra: "E" means "E"rror
303: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 305: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

301:
302: -- Logging Infra: "E" means "E"rror
303: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
304: l_log_msg := 'E: SEL country_code: no_data_found: p_location_id='||p_location_id;
305: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
306: END IF;
307:
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');

Line 320: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name || '.end', l_log_msg);

316: END IF; -- Loc_info_tbl.exists
317:
318: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
319: l_log_msg := l_procedure_name||'(-)';
320: FND_LOG.STRING(G_LEVEL_STATEMENT, G_MODULE_NAME || l_procedure_name || '.end', l_log_msg);
321: END IF;
322:
323: END get_location_info;
324:

Line 331: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

327: l_loc_site VARCHAR2(30);
328: x_return_status VARCHAR2(1);
329: -- Logging Infra
330: l_procedure_name CONSTANT VARCHAR2(30) := 'get_location_table_name';
331: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
332:
333: BEGIN
334: -- Logging Infra: Statement level
335: -- No need to initialize g_current_runtime_level as it is done at the caller (get_zone or get_master_geo)

Line 340: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

336: -- Logging Infra: Statement level: "B" means "B"reak point
337: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
338: l_log_msg := l_procedure_name||'(+)';
339: l_log_msg := l_log_msg || 'B: p_location_type= '||p_location_type;
340: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
341: END IF;
342:
343: -- Logging Infra: Intentionally, not implementing log infra around get_pos_loc_or_site procedure
344: -- as it internally logs its messages.

Line 481: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

477: -- Logging Infra: Statement level:"R" means "R"eturned value to a caller
478: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
479: l_log_msg := 'R: x_location_table_name='||x_location_table_name;
480: l_log_msg := l_log_msg || l_procedure_name||'(-)';
481: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
482: END IF;
483:
484: EXCEPTION
485:

Line 500: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

496: p_inner_city_jurisdiction_flag IN VARCHAR2) IS
497: i BINARY_INTEGER;
498: -- Logging Infra
499: l_procedure_name CONSTANT VARCHAR2(30) := 'get_jurisdiction';
500: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
501: -----x_jurisdiction_rec_tmp_tbl tax_jurisdiction_rec_tbl_type;
502: CURSOR get_jur_info_c
503: ( c_tax VARCHAR2,
504: c_tax_regime_code VARCHAR2,

Line 533: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

529:
530: BEGIN
531:
532: -- Logging Infra: Setting up runtime level
533: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
534:
535: -- Logging Infra: Procedure level
536: -- Logging Infra: Statement level: "B" means "B"reak point
537: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

Line 540: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

536: -- Logging Infra: Statement level: "B" means "B"reak point
537: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
538: l_log_msg := l_procedure_name||'(+)';
539: l_log_msg := l_log_msg ||' B: SEL zx_jurisdictions: in: p_tax='||p_tax||', p_date='||p_date||', p_tax_regime_code='||p_tax_regime_code||', p_geography_id='||p_geography_id;
540: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
541: END IF;
542:
543: IF l_jurisdiction_rec_tmp_tbl.count = 0 THEN
544: i := 1;

Line 573: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

569: l_log_msg := 'R: SEL zx_jurisdictions: out: tax_jurisdiction_id='||l_jurisdiction_rec_tmp_tbl(i).tax_jurisdiction_id||
570: ', tax_jurisdiction_code='||l_jurisdiction_rec_tmp_tbl(i).tax_jurisdiction_code;
571:
572: l_log_msg := l_log_msg ||' '||l_procedure_name||'(-)';
573: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
574: END IF;
575:
576: EXCEPTION WHEN NO_DATA_FOUND THEN
577: NULL;

Line 582: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

578: -- Logging Infra: Procedure level
579: ---- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
580: ---- l_log_msg := 'S: EXC: NO_DATA_FOUND: tax_jurisdiction_id='||g_jurisdiction_rec_tbl.tax_jurisdiction_id(i)||
581: ---- ', tax_jurisdiction_code='||g_jurisdiction_rec_tbl.tax_jurisdiction_code(i);
582: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
583: ---- END IF;
584:
585: END get_jurisdiction;
586:

Line 613: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

609: l_zone_type_country_code VARCHAR2(30);
610:
611: -- Logging Infra
612: l_procedure_name CONSTANT VARCHAR2(30) := 'get_zone';
613: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
614:
615: -- The following 3 variables are added to make the external api (HZ_GEO_GET_PUB.get_zone)
616: -- calling place to compile. Needs to be removed later...
617: l_init_msg_list VARCHAR2(30);

Line 630: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

626:
627: l_tbl_index BINARY_INTEGER;
628: BEGIN
629: -- Logging Infra: Setting up runtime level
630: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
631: -- Logging Infra: Procedure level
632: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
633: l_log_msg := l_procedure_name||'(+)';
634: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

Line 634: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

630: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
631: -- Logging Infra: Procedure level
632: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
633: l_log_msg := l_procedure_name||'(+)';
634: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
635: END IF;
636:
637: -- Initialize API return status to success.
638:

Line 655: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

651: -- Logging Infra: Statement level: "B" means "B"reak point
652: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
653: l_log_msg := 'B: hz_geo_get_pub.get_zone: in: '||'p_location_table_name='||x_location_table_name||
654: ', p_location_id='||p_location_id||', p_zone_type=' ||p_zone_type||', p_date='||p_trx_date;
655: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
656: END IF;
657:
658: get_location_info(p_location_id, x_location_table_name, l_location_info_rec, x_return_status);
659: x_location_table_name := ZX_GLOBAL_STRUCTURES_PKG.Loc_info_tbl(to_char(p_location_id)).location_table_name;

Line 699: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

695:
696: IF l_limited_by_geography_id IS NOT NULL THEN
697: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
698: l_log_msg := 'R: Location country and Zone Type country are matching';
699: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
700: END IF;
701:
702: -- check if geo name reference information is there in cache
703: l_tbl_index := dbms_utility.get_hash_value(

Line 712: FND_LOG.STRING(g_level_statement,

708: IF g_geo_name_references_tbl.EXISTS(l_tbl_index) then
709: -- The geo name reference information is there in cache.
710: -- No need to read from tables
711: IF (g_level_statement >= g_current_runtime_level ) THEN
712: FND_LOG.STRING(g_level_statement,
713: G_MODULE_NAME || l_procedure_name,
714: 'Found geo name reference information in cache ');
715: END IF;
716: l_count_geo := g_geo_name_references_tbl(l_tbl_index).ref_count;

Line 720: FND_LOG.STRING(g_level_statement,

716: l_count_geo := g_geo_name_references_tbl(l_tbl_index).ref_count;
717:
718: ELSE
719: IF (g_level_statement >= g_current_runtime_level ) THEN
720: FND_LOG.STRING(g_level_statement,
721: G_MODULE_NAME || l_procedure_name,
722: 'Not found geo name reference information in cache, read from table');
723: END IF;
724: -- Bug 4551957

Line 767: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

763: IF x_zone_tbl.count > 0 THEN
764: FOR i in x_zone_tbl.first..x_zone_tbl.last LOOP
765: 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||
766: ', x_zone_name='||x_zone_tbl(i).zone_name||', x_return_status='||x_return_status;
767: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
768: END LOOP;
769: END IF;
770: END IF;
771: ELSE

Line 775: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

771: ELSE
772: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
773: l_log_msg := 'R: Location country and Zone Type country are not matching';
774: l_log_msg := l_log_msg ||' '|| l_procedure_name||'(-)';
775: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
776: END IF;
777:
778: END IF;
779:

Line 790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

786: IF x_zone_tbl.count > 0 THEN
787: FOR i in x_zone_tbl.first..x_zone_tbl.last LOOP
788: l_log_msg := 'E: EXC: FND_API.G_EXC_ERROR: x_zone_id='||x_zone_tbl(i).zone_id||', x_zone_code='||x_zone_tbl(i).zone_code||
789: ', x_zone_name='||x_zone_tbl(i).zone_name||', x_return_status='||x_return_status;
790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
791: END LOOP;
792: END IF;
793: END IF;
794:

Line 808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '|| SQLERRM);

804: -- Logging Infra: Statement level: "E" means "E"rror
805: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
806: IF x_zone_tbl.count > 0 THEN
807: FOR i in x_zone_tbl.first..x_zone_tbl.last LOOP
808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '|| SQLERRM);
809: l_log_msg := 'E: EXC: OTHERS: x_zone_id='||x_zone_tbl(i).zone_id||', x_zone_code='||x_zone_tbl(i).zone_code||
810: ', x_zone_name='||x_zone_tbl(i).zone_name||', x_return_status='||x_return_status;
811: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
812: END LOOP;

Line 811: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

807: FOR i in x_zone_tbl.first..x_zone_tbl.last LOOP
808: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '|| SQLERRM);
809: l_log_msg := 'E: EXC: OTHERS: x_zone_id='||x_zone_tbl(i).zone_id||', x_zone_code='||x_zone_tbl(i).zone_code||
810: ', x_zone_name='||x_zone_tbl(i).zone_name||', x_return_status='||x_return_status;
811: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
812: END LOOP;
813: END IF;
814: END IF;
815:

Line 859: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

855: l_same_regime_loc_country VARCHAR2(1);
856: x_location_table_name VARCHAR2(30);
857: -- Logging Infra
858: l_procedure_name CONSTANT VARCHAR2(30) := 'get_tax_jurisdictions';
859: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
860: l_tax_rec ZX_TDS_UTILITIES_PKG.zx_tax_info_cache_rec;
861: l_tax_regime_rec zx_global_structures_pkg.tax_regime_rec_type;
862:
863: l_tbl_index BINARY_INTEGER;

Line 870: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

866:
867: BEGIN
868:
869: -- Logging Infra: Setting up runtime message level
870: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
871: -- Logging Infra: Procedure level
872: -- Logging Infra: Statement level: "B" means "B"reak point
873: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
874: l_log_msg := l_procedure_name||'(+)';

Line 876: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

872: -- Logging Infra: Statement level: "B" means "B"reak point
873: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
874: l_log_msg := l_procedure_name||'(+)';
875: l_log_msg := l_log_msg ||' B: SEL hz_geography_types: in: p_tax='||p_tax||', p_tax_regime_code='||p_tax_regime_code;
876: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
877: END IF;
878:
879:
880: -- Initialize API return status to success.

Line 902: FND_LOG.STRING(g_level_exception,

898: 'ZX_TDS_UTILITIES_PKG.get_regime_cache_info
899: RETURN_STATUS = ' || x_return_status||' Error Buffer = '||l_error_buffer||
900: ', '||l_procedure_name||' (-)';
901:
902: FND_LOG.STRING(g_level_exception,
903: G_MODULE_NAME || l_procedure_name||'.END',
904: l_log_msg);
905: END IF;
906: RETURN;

Line 918: FND_LOG.STRING(g_level_statement,

914: l_country_or_group_code := l_tax_regime_rec.country_or_group_code;
915: l_regime_country_code := l_tax_regime_rec.country_code;
916:
917: /*IF (g_level_statement >= g_current_runtime_level ) THEN
918: FND_LOG.STRING(g_level_statement,
919: G_MODULE_NAME || l_procedure_name,
920: 'Country_or_group_code = ' ||l_country_or_group_code||
921: 'Country_code = '||l_regime_country_code);
922: END If;

Line 928: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

924:
925: IF l_country_or_group_code <> 'COUNTRY' THEN
926: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
927: l_log_msg := 'R: Tax Regime is created for a tax zone';
928: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
929: END IF;
930: l_country_regime_flag := 'N';
931: ELSE
932: l_country_regime_flag := 'Y';

Line 935: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

931: ELSE
932: l_country_regime_flag := 'Y';
933: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
934: l_log_msg := 'R: Tax Regime is created for a country';
935: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
936: END IF;
937: get_location_table_name(p_location_type,
938: x_location_table_name);
939:

Line 961: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

957:
958: IF l_regime_country_code = l_loc_country_code THEN
959: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
960: l_log_msg := 'R: Country of Tax Regime is same as the country of the location';
961: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
962: END IF;
963: l_same_regime_loc_country := 'Y';
964: ELSE
965: null;

Line 969: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

965: null;
966: l_same_regime_loc_country := 'N';
967: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
968: l_log_msg := 'R: Country of Tax Regime is not the same as the country of the location';
969: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
970: END IF;
971: END IF;
972: END IF;
973: IF l_country_regime_flag = 'N' or l_same_regime_loc_country = 'Y' THEN

Line 986: FND_LOG.STRING(g_level_statement,

982: -- The Gography usage information is there in cache. No need to read from tables
983:
984:
985: IF (g_level_statement >= g_current_runtime_level ) THEN
986: FND_LOG.STRING(g_level_statement,
987: G_MODULE_NAME || l_procedure_name,
988: 'Found Geography usage information in cache ');
989: END IF;
990:

Line 1015: FND_LOG.STRING(g_level_exception,

1011: 'ZX_TDS_UTILITIES_PKG.get_regime_cache_info
1012: RETURN_STATUS = ' || x_return_status||' Error Buffer = '||l_error_buffer||
1013: ', '||l_procedure_name||' (-)';
1014:
1015: FND_LOG.STRING(g_level_exception,
1016: G_MODULE_NAME || l_procedure_name||'.END',
1017: l_log_msg);
1018: END IF;
1019:

Line 1068: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1064:
1065: EXCEPTION WHEN NO_DATA_FOUND THEN
1066: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1067: l_log_msg := 'B: SEL hz_geography_type: Not Found for Tax';
1068: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1069: END IF;
1070: END;
1071:
1072: -- IF l_geography_type.count > 0 THEN

Line 1093: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1089: l_log_msg := 'B: SEL hz_geography_type: out: p_location_id='||p_location_id||',
1090: p_location_type='||p_location_type||
1091: ', l_geography_type='||g_geography_use_info_tbl(l_tbl_index).geography_type||
1092: ', l_geography_use='||g_geography_use_info_tbl(l_tbl_index).geography_use;
1093: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1094: END IF;
1095: IF g_geography_use_info_tbl(l_tbl_index).geography_use = 'TAX' THEN
1096: get_zone(p_location_id,
1097: p_location_type,

Line 1107: ----- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1103: -- Logging Infra: Statement level: "B" means "B"reak point
1104: ----- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1105: ----- l_log_msg := 'B: geography info: geography_id='||l_geography_id(i)||', geography_name='||l_geography_name(i)||
1106: ----- ', x_return_status='||x_return_status;
1107: ----- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1108: ----- END IF;
1109: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1110: IF l_zone_tbl.count > 0 THEN
1111: FOR j in l_zone_tbl.first..l_zone_tbl.last LOOP

Line 1134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1130: -- Logging Infra: Statement level: "B" means "B"reak point
1131: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1132: l_log_msg := 'B: geography info: geography_id='||l_geography_id||', geography_name='||l_geography_name||
1133: ', x_return_status='||x_return_status;
1134: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1135: END IF;
1136: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1137: IF l_geography_id IS NOT NULL THEN
1138: get_jurisdiction(p_tax,

Line 1164: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1160: x_tax_jurisdiction_rec.precedence_level := l_jurisdiction_rec_tmp_tbl(1).precedence_level;
1161: x_jurisdictions_found := 'Y';
1162: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1163: l_log_msg := 'R: Single jurisdiction has been found';
1164: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1165: END IF;
1166: ELSIF l_jurisdiction_rec_tmp_tbl.count > 1 THEN
1167: FOR n in l_jurisdiction_rec_tmp_tbl.first..l_jurisdiction_rec_tmp_tbl.last LOOP
1168: INSERT INTO zx_jurisdictions_gt

Line 1191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1187:
1188: -- Logging Infra: Statement level: "R" means "R"eturned value to a caller
1189: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1190: l_log_msg := 'R: Inserted into zx_jurisdictions_gt table)' ;
1191: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1192: END IF;
1193: ELSIF l_jurisdiction_rec_tmp_tbl.count = 0 THEN
1194: x_jurisdictions_found := 'N';
1195: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1193: ELSIF l_jurisdiction_rec_tmp_tbl.count = 0 THEN
1194: x_jurisdictions_found := 'N';
1195: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1196: l_log_msg := 'R: No jurisdiction has been found';
1197: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1198: END IF;
1199: END IF;
1200:
1201:

Line 1206: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1202: -- Logging Infra: Statement level: "R" means "R"eturned value to a caller
1203: ---- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1204: ---- l_log_msg := 'R: tax_jurisdiction_id='||g_jurisdiction_rec_tbl(i).tax_jurisdiction_id||
1205: ---- ', tax_jurisdiction_code='||g_jurisdiction_rec_tbl(i).tax_jurisdiction_code;
1206: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1207: ---- END IF;
1208: -- Logging Infra: Procedure level
1209: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1210: l_log_msg := l_procedure_name||'(-)';

Line 1211: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.end', l_log_msg);

1207: ---- END IF;
1208: -- Logging Infra: Procedure level
1209: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1210: l_log_msg := l_procedure_name||'(-)';
1211: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.end', l_log_msg);
1212: END IF;
1213: EXCEPTION
1214: WHEN FND_API.G_EXC_ERROR THEN
1215: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1221: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1217: -- Logging Infra: Statement level
1218: ---- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1219: ---- l_log_msg := 'E: EXC: FND_API.G_EXEC_ERROR: tax_jurisdiction_id='||g_jurisdiction_rec_tbl.tax_jurisdiction_id(i)||
1220: ---- ', tax_jurisdiction_code='||g_jurisdiction_rec_tbl.tax_jurisdiction_code(i);
1221: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1222: ---- END IF;
1223:
1224:
1225: WHEN OTHERS THEN

Line 1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);

1228: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1229:
1230: -- Logging Infra: Statement level
1231: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
1233: ---- l_log_msg := 'E: EXC: OTHERS: tax_jurisdiction_id='||g_jurisdiction_rec_tbl.tax_jurisdiction_id(i)||
1234: ---- ', tax_jurisdiction_code='||g_jurisdiction_rec_tbl.tax_jurisdiction_code(i);
1235: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1236: END IF;

Line 1235: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1231: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
1233: ---- l_log_msg := 'E: EXC: OTHERS: tax_jurisdiction_id='||g_jurisdiction_rec_tbl.tax_jurisdiction_id(i)||
1234: ---- ', tax_jurisdiction_code='||g_jurisdiction_rec_tbl.tax_jurisdiction_code(i);
1235: ---- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1236: END IF;
1237:
1238: END get_tax_jurisdictions;
1239:

Line 1254: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1250: x_location_table_name VARCHAR2(30);
1251: l_country_code VARCHAR2(30);
1252: -- Logging Infra
1253: l_procedure_name CONSTANT VARCHAR2(30) := 'get_master_geography';
1254: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1255:
1256: l_location_info_rec ZX_GLOBAL_STRUCTURES_PKG.loc_info_rec_type;
1257: l_geography_use hz_geographies.geography_use%type;
1258: l_tbl_index binary_integer;

Line 1263: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1259: l_tbl_country_index binary_integer;
1260:
1261: BEGIN
1262: -- Logging Infra: Setting up runtime level
1263: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1264:
1265: -- Logging Infra: Procedure level
1266: -- Logging Infra: Statement level: "B" means "B"reak point
1267: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

Line 1270: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

1266: -- Logging Infra: Statement level: "B" means "B"reak point
1267: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1268: l_log_msg := l_procedure_name||'(+)';
1269: l_log_msg := l_log_msg||' B: SEL hz_geography_types: in: p_geography_type='||p_geography_type;
1270: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
1271: END IF;
1272:
1273: x_return_status := FND_API.G_RET_STS_SUCCESS;
1274:

Line 1292: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1288: IF l_count = 0 THEN
1289: -- Logging Infra: Statement level: "E" means "E"rror
1290: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1291: l_log_msg := 'E: SEL hz_geography_types: no_data_found: '||'p_geography_type='||p_geography_type;
1292: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1293: END IF;
1294:
1295: --x_return_status := FND_API.G_RET_STS_ERROR;
1296: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_TYPE_INVALID');

Line 1311: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1307: -- Logging Infra: Statement level: "B" means "B"reak point
1308: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1309: l_log_msg := 'B: SEL hz_geo_name_ref: in: p_location_id='||p_location_id||', p_geography_type='||p_geography_type||
1310: ', x_location_table_name='||x_location_table_name;
1311: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1312: END IF;
1313:
1314: -- Find geography id from gnr table
1315: -- ---------------------------------

Line 1328: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);

1324: zx_global_structures_pkg.Loc_geography_info_tbl(l_tbl_index).geography_type = p_geography_type) THEN
1325:
1326: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1327: l_log_msg := 'Found the geography id and geography name info in cache';
1328: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name, l_log_msg);
1329: END IF;
1330:
1331: x_geography_id := zx_global_structures_pkg.Loc_geography_info_tbl(l_tbl_index).geography_id;
1332: x_geography_code := zx_global_structures_pkg.Loc_geography_info_tbl(l_tbl_index).geography_code;

Line 1348: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1344: AND geo.geography_id = gnr.geography_id;
1345:
1346: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1347: l_log_msg := 'B: SEL hz_geo_name_ref: out: x_geography_id='||x_geography_id;
1348: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1349: END IF;
1350:
1351: zx_global_structures_pkg.Loc_geography_info_tbl(l_tbl_index).location_id := p_location_id;
1352: zx_global_structures_pkg.Loc_geography_info_tbl(l_tbl_index).geography_type := p_geography_type;

Line 1365: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1361: -- Logging Infra: Statement level: "S" means "S"uccess. Geography code can be NULL.
1362: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1363: l_log_msg := 'S: SEL hz_geo_name_ref: no_data_found: '||'x_location_table_name='||x_location_table_name||' B: x_geography_id='||x_geography_id||', p_geography_type='||p_geography_type||
1364: ', p_location_id='||p_location_id||', p_geography_type='||p_geography_type;
1365: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1366: END IF;
1367: END;
1368:
1369: END IF;

Line 1380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1376:
1377: -- Logging Infra: "B" means "B"reak point
1378: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1379: l_log_msg := 'B: SEL hz_geographies: in: l_country_code='||l_country_code;
1380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1381: END IF;
1382:
1383: BEGIN
1384: SELECT geography_id, geography_code, geography_name

Line 1394: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1390: EXCEPTION WHEN NO_DATA_FOUND THEN
1391:
1392: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1393: l_log_msg := 'E: SEL hz_geographies: no_data_found: '||'l_country_code='||l_country_code;
1394: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1395: END IF;
1396:
1397: x_return_status := FND_API.G_RET_STS_ERROR;
1398: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_INVALID_COUNTRY');

Line 1410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1406: /* 3471450 -- Logging Infra: return_status changed to success status */
1407: -- Logging Infra: Statement level: "S" means "S"uccess. Geography code can be NULL.
1408: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1409: l_log_msg := 'S: hz_geo_no_geo_name_ref: p_geography_type='||p_geography_type;
1410: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1411: END IF;
1412:
1413: x_return_status := FND_API.G_RET_STS_SUCCESS;
1414:

Line 1422: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1418: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1419: l_log_msg := 'R: x_geography_id='||x_geography_id||', x_gegraphy_code='||x_geography_code||
1420: ', x_geography_name='||x_geography_name;
1421: l_log_msg := l_log_msg || '- '||l_procedure_name||'(-)';
1422: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1423: END IF;
1424:
1425: EXCEPTION
1426: WHEN FND_API.G_EXC_ERROR THEN

Line 1433: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name,l_log_msg);

1429: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1430: l_log_msg := 'E: EXC: FND_API.G_EXC_ERROR: x_geography_id='||
1431: x_geography_id||', x_gegraphy_code='||x_geography_code||',
1432: x_geography_name='||x_geography_name;
1433: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name,l_log_msg);
1434: END IF;
1435:
1436: WHEN OTHERS THEN
1437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1442: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,

1438: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
1439: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1440:
1441: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1442: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,
1443: 'E: EXC: OTHERS: '|| SQLCODE||': '||SQLERRM);
1444: l_log_msg := 'E: EXC: OTHERS: x_geography_id='||x_geography_id||',
1445: x_gegraphy_code='||x_geography_code||
1446: ', x_geography_name='||x_geography_name;

Line 1447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name,l_log_msg);

1443: 'E: EXC: OTHERS: '|| SQLCODE||': '||SQLERRM);
1444: l_log_msg := 'E: EXC: OTHERS: x_geography_id='||x_geography_id||',
1445: x_gegraphy_code='||x_geography_code||
1446: ', x_geography_name='||x_geography_name;
1447: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name,l_log_msg);
1448: END IF;
1449: END;
1450:
1451: PROCEDURE RETRIEVE_GEO_VALUE( p_event_class_mapping_id IN ZX_LINES_DET_FACTORS.event_class_mapping_id%type,

Line 1519: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1515: TYPE GEO_NAME_TBL_TYPE IS TABLE OF VARCHAR2(360) index by BINARY_INTEGER;
1516: l_geography_name GEO_NAME_TBL_TYPE;
1517: -- Logging Infra
1518: l_procedure_name CONSTANT VARCHAR2(30) := 'populate_loc_geography_info';
1519: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1520: BEGIN
1521: -- Logging Infra: Setting up runtime level
1522: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1523:

Line 1522: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1518: l_procedure_name CONSTANT VARCHAR2(30) := 'populate_loc_geography_info';
1519: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1520: BEGIN
1521: -- Logging Infra: Setting up runtime level
1522: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1523:
1524: -- Logging Infra: Procedure level
1525: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1526: l_log_msg := l_procedure_name||'(+)';

Line 1527: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);

1523:
1524: -- Logging Infra: Procedure level
1525: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1526: l_log_msg := l_procedure_name||'(+)';
1527: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME || l_procedure_name || '.begin', l_log_msg);
1528: END IF;
1529:
1530: -- Initialize API return status to success.
1531:

Line 1544: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1540:
1541: -- Logging Infra: Statement level: "B" means "B"reak point
1542: -- IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1543: -- l_log_msg := 'B: get_location_table_name: out: x_loc_tbl='||x_loc_tbl;
1544: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1545: -- END IF;
1546:
1547: n := 1;
1548: idx1 := to_char(event_class_mapping_id)||location_type_tbl(i)||location_id_tbl(i) ||x_loc_tbl|| to_char(n);

Line 1562: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1558: geography_found := 'TRUE';
1559: -- Logging Infra: Statement level: "B" means "B"reak point
1560: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1561: l_log_msg := 'B: Geography found ';
1562: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1563: END IF;
1564: ZX_GLOBAL_STRUCTURES_PKG.LOCATION_INFO_TBL.event_class_mapping_id(k) :=
1565: event_class_mapping_id;
1566: ZX_GLOBAL_STRUCTURES_PKG.LOCATION_INFO_TBL.trx_id(k) := trx_id;

Line 1596: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1592: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1593: l_log_msg := 'B: Geography found ='||event_class_mapping_id||trx_id||trx_line_id||
1594: trx_level_type||x_loc_tbl||location_id_tbl(i)||g_geography_id_tbl(idx1)
1595: ||g_geography_type_tbl(idx1)||g_geography_name_tbl(idx1);
1596: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1597: END IF;
1598: n := n + 1;
1599: k := k + 1;
1600: idx1 := to_char(event_class_mapping_id)||location_type_tbl(i)||location_id_tbl(i) ||x_loc_tbl|| to_char(n);

Line 1605: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1601: ELSE
1602: -- Logging Infra: Statement level: "B" means "B"reak point
1603: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1604: l_log_msg := 'B: Geography NOT existing in cache ';
1605: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1606: END IF;
1607: EXIT;
1608: END IF;
1609: END LOOP;

Line 1614: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1610: IF geography_found <> 'TRUE' THEN
1611: -- Logging Infra: Statement level: "B" means "B"reak point
1612: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1613: l_log_msg := 'B: Fetching geography info from gnr. The Location id is'||to_char(location_id_tbl(i));
1614: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1615: END IF;
1616: BEGIN
1617: l_error_flag := 'N';
1618: SELECT gnr.geography_id, gnr.geography_type, g.geography_name

Line 1627: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1623: AND gnr.geography_id = g.geography_id
1624: ORDER BY gnr.geography_id;
1625: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1626: l_log_msg := 'B: After GNR fetch ';
1627: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1628: END IF;
1629: EXCEPTION
1630: WHEN OTHERS THEN
1631: -- Logging Infra: Statement level

Line 1633: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '

1629: EXCEPTION
1630: WHEN OTHERS THEN
1631: -- Logging Infra: Statement level
1632: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1633: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '
1634: || SQLCODE||': '||SQLERRM);
1635:
1636: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1637: END IF;

Line 1636: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1632: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1633: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '
1634: || SQLCODE||': '||SQLERRM);
1635:
1636: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1637: END IF;
1638: l_error_flag := 'Y';
1639: END;
1640: IF l_error_flag <> 'Y' then

Line 1646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1642: idx1 := to_char(event_class_mapping_id)||location_type_tbl(i)||location_id_tbl(i) ||x_loc_tbl|| to_char(n);
1643: IF l_geography_id.count > 0 THEN
1644: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1645: l_log_msg := 'B: Entering assignment loop after GNR fetch';
1646: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1647: END IF;
1648:
1649:
1650: FOR m IN l_geography_id.first..l_geography_id.last LOOP

Line 1705: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1701: l_log_msg := l_log_msg ||' B: LOCATION_INFO_TBL.geography_type(k)'
1702: ||ZX_GLOBAL_STRUCTURES_PKG.LOCATION_INFO_TBL.geography_type(k);
1703: l_log_msg := l_log_msg || 'B: LOCATION_INFO_TBL.geography_value(k)'
1704: ||ZX_GLOBAL_STRUCTURES_PKG.LOCATION_INFO_TBL.geography_value(k);
1705: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1706: END IF;
1707:
1708: hash_string := to_char(event_class_mapping_id)||'|'||
1709: to_char(trx_id)||'|'||

Line 1724: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1720: -- Logging Infra: Statement level: "B" means "B"reak point
1721: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1722: l_log_msg := 'B: Geography details populated'|| g_geography_id_tbl(idx1)
1723: ||g_geography_type_tbl(idx1)||g_geography_name_tbl(idx1);
1724: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1725: END IF;
1726:
1727: n := n + 1;
1728: k := k + 1;