DBA Data[Home] [Help]

APPS.OZF_TERR_LEVELS_PVT dependencies on FND_API

Line 56: x_return_status := fnd_api.g_ret_sts_success;

52: -- Bug # 5723438 fixed by ateotia (-)
53: BEGIN
54:
55:
56: x_return_status := fnd_api.g_ret_sts_success;
57: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: begin process');
58:
59: IF g_debug THEN
60: ozf_utility_pvt.debug_message ('create_terr_hierarchy: p_start_node_id=' || p_start_node_id);

Line 76: ,p_init_msg_list => fnd_api.g_true

72: IF c_hier_exists%FOUND THEN
73: CLOSE c_hier_exists;
74: ozf_terr_levels_pvt.delete_terr_levels (
75: p_api_version => 1.0
76: ,p_init_msg_list => fnd_api.g_true
77: ,p_commit => fnd_api.g_false
78: ,p_validation_level => fnd_api.g_valid_level_full
79: ,x_return_status => x_return_status
80: ,x_msg_data => x_msg_data

Line 77: ,p_commit => fnd_api.g_false

73: CLOSE c_hier_exists;
74: ozf_terr_levels_pvt.delete_terr_levels (
75: p_api_version => 1.0
76: ,p_init_msg_list => fnd_api.g_true
77: ,p_commit => fnd_api.g_false
78: ,p_validation_level => fnd_api.g_valid_level_full
79: ,x_return_status => x_return_status
80: ,x_msg_data => x_msg_data
81: ,x_msg_count => x_msg_count

Line 78: ,p_validation_level => fnd_api.g_valid_level_full

74: ozf_terr_levels_pvt.delete_terr_levels (
75: p_api_version => 1.0
76: ,p_init_msg_list => fnd_api.g_true
77: ,p_commit => fnd_api.g_false
78: ,p_validation_level => fnd_api.g_valid_level_full
79: ,x_return_status => x_return_status
80: ,x_msg_data => x_msg_data
81: ,x_msg_count => x_msg_count
82: ,p_hierarchy_id => l_start_node_id

Line 85: IF x_return_status <> fnd_api.g_ret_sts_success THEN

81: ,x_msg_count => x_msg_count
82: ,p_hierarchy_id => l_start_node_id
83: );
84:
85: IF x_return_status <> fnd_api.g_ret_sts_success THEN
86: ozf_utility_pvt.write_conc_log (' Failed to delete existing levels for terr_id ' || l_start_node_id);
87: ---write all messages in the concurrent manager log
88: IF (x_msg_count > 0) THEN
89: FOR i IN 1 .. x_msg_count

Line 91: x_msg_data := fnd_msg_pub.get (i, fnd_api.g_false);

87: ---write all messages in the concurrent manager log
88: IF (x_msg_count > 0) THEN
89: FOR i IN 1 .. x_msg_count
90: LOOP
91: x_msg_data := fnd_msg_pub.get (i, fnd_api.g_false);
92: ozf_utility_pvt.write_conc_log (' delete_terr_levels returns error. Msg count='
93: || i
94: || '-'
95: || x_msg_data);

Line 99: RAISE fnd_api.g_exc_unexpected_error;

95: || x_msg_data);
96: --DBMS_OUTPUT.put_line ( 'message :' || x_msg_data);
97: END LOOP;
98: END IF;
99: RAISE fnd_api.g_exc_unexpected_error;
100: END IF;
101: ELSE
102: CLOSE c_hier_exists; */
103:

Line 113: ,p_init_msg_list => fnd_api.g_true

109:
110: ozf_utility_pvt.write_conc_log ('Territory Insertion Call');
111: ozf_terr_levels_pvt.insert_terr_levels (
112: p_api_version => 1.0
113: ,p_init_msg_list => fnd_api.g_true
114: ,p_commit => fnd_api.g_false
115: ,p_validation_level => fnd_api.g_valid_level_full
116: ,x_return_status => x_return_status
117: ,x_msg_data => x_msg_data

Line 114: ,p_commit => fnd_api.g_false

110: ozf_utility_pvt.write_conc_log ('Territory Insertion Call');
111: ozf_terr_levels_pvt.insert_terr_levels (
112: p_api_version => 1.0
113: ,p_init_msg_list => fnd_api.g_true
114: ,p_commit => fnd_api.g_false
115: ,p_validation_level => fnd_api.g_valid_level_full
116: ,x_return_status => x_return_status
117: ,x_msg_data => x_msg_data
118: ,x_msg_count => x_msg_count

Line 115: ,p_validation_level => fnd_api.g_valid_level_full

111: ozf_terr_levels_pvt.insert_terr_levels (
112: p_api_version => 1.0
113: ,p_init_msg_list => fnd_api.g_true
114: ,p_commit => fnd_api.g_false
115: ,p_validation_level => fnd_api.g_valid_level_full
116: ,x_return_status => x_return_status
117: ,x_msg_data => x_msg_data
118: ,x_msg_count => x_msg_count
119: ,p_start_node_id => p_start_node_id

Line 134: ,p_init_msg_list => fnd_api.g_true

130: -- Bug # 5723438 fixed by ateotia (-)
131:
132: ozf_terr_levels_pvt.bulk_insert_terr_levels (
133: p_api_version => 1.0
134: ,p_init_msg_list => fnd_api.g_true
135: ,p_commit => fnd_api.g_false
136: ,p_validation_level => fnd_api.g_valid_level_full
137: ,x_return_status => x_return_status
138: ,x_msg_data => x_msg_data

Line 135: ,p_commit => fnd_api.g_false

131:
132: ozf_terr_levels_pvt.bulk_insert_terr_levels (
133: p_api_version => 1.0
134: ,p_init_msg_list => fnd_api.g_true
135: ,p_commit => fnd_api.g_false
136: ,p_validation_level => fnd_api.g_valid_level_full
137: ,x_return_status => x_return_status
138: ,x_msg_data => x_msg_data
139: ,x_msg_count => x_msg_count

Line 136: ,p_validation_level => fnd_api.g_valid_level_full

132: ozf_terr_levels_pvt.bulk_insert_terr_levels (
133: p_api_version => 1.0
134: ,p_init_msg_list => fnd_api.g_true
135: ,p_commit => fnd_api.g_false
136: ,p_validation_level => fnd_api.g_valid_level_full
137: ,x_return_status => x_return_status
138: ,x_msg_data => x_msg_data
139: ,x_msg_count => x_msg_count
140: );

Line 143: IF x_return_status <> fnd_api.g_ret_sts_success THEN

139: ,x_msg_count => x_msg_count
140: );
141: END IF; -- IF p_start_node_id IS NOT NULL THEN
142:
143: IF x_return_status <> fnd_api.g_ret_sts_success THEN
144: ozf_utility_pvt.write_conc_log (' Failed to insert levels for terr_id ' || l_start_node_id);
145: ---write all messages in the concurrent manager log
146: IF (x_msg_count > 0) THEN
147: FOR i IN 1 .. x_msg_count

Line 149: x_msg_data := fnd_msg_pub.get (i, fnd_api.g_false);

145: ---write all messages in the concurrent manager log
146: IF (x_msg_count > 0) THEN
147: FOR i IN 1 .. x_msg_count
148: LOOP
149: x_msg_data := fnd_msg_pub.get (i, fnd_api.g_false);
150: ozf_utility_pvt.write_conc_log (' insert_terr_levels returns error. Msg count='
151: || i
152: || '-'
153: || x_msg_data);

Line 157: RAISE fnd_api.g_exc_unexpected_error;

153: || x_msg_data);
154: --DBMS_OUTPUT.put_line ( 'message :' || x_msg_data);
155: END LOOP;
156: END IF;
157: RAISE fnd_api.g_exc_unexpected_error;
158: END IF;
159:
160: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: SUCCESS');
161: EXCEPTION

Line 164: x_return_status := fnd_api.g_ret_sts_error;

160: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: SUCCESS');
161: EXCEPTION
162: WHEN OTHERS THEN
163: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: EXCEPTION');
164: x_return_status := fnd_api.g_ret_sts_error;
165: fnd_msg_pub.count_and_get (
166: p_encoded=> fnd_api.g_false
167: ,p_count=> x_msg_count
168: ,p_data=> x_msg_data

Line 166: p_encoded=> fnd_api.g_false

162: WHEN OTHERS THEN
163: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: EXCEPTION');
164: x_return_status := fnd_api.g_ret_sts_error;
165: fnd_msg_pub.count_and_get (
166: p_encoded=> fnd_api.g_false
167: ,p_count=> x_msg_count
168: ,p_data=> x_msg_data
169: );
170: END create_terr_hierarchy;

Line 183: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false

179: -- this pacakage is called from the above create_terr_hier program
180: --------------------------------------------------------------------------*/
181: PROCEDURE insert_terr_levels (
182: p_api_version IN NUMBER
183: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
184: ,p_commit IN VARCHAR2 := fnd_api.g_false
185: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
186: ,x_return_status OUT NOCOPY VARCHAR2
187: ,x_msg_data OUT NOCOPY VARCHAR2

Line 184: ,p_commit IN VARCHAR2 := fnd_api.g_false

180: --------------------------------------------------------------------------*/
181: PROCEDURE insert_terr_levels (
182: p_api_version IN NUMBER
183: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
184: ,p_commit IN VARCHAR2 := fnd_api.g_false
185: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
186: ,x_return_status OUT NOCOPY VARCHAR2
187: ,x_msg_data OUT NOCOPY VARCHAR2
188: ,x_msg_count OUT NOCOPY NUMBER

Line 185: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full

181: PROCEDURE insert_terr_levels (
182: p_api_version IN NUMBER
183: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
184: ,p_commit IN VARCHAR2 := fnd_api.g_false
185: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
186: ,x_return_status OUT NOCOPY VARCHAR2
187: ,x_msg_data OUT NOCOPY VARCHAR2
188: ,x_msg_count OUT NOCOPY NUMBER
189: ,p_start_node_id IN NUMBER

Line 284: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

280: START WITH terr_id = l_start_node_id;
281: BEGIN
282: SAVEPOINT insert_terr_levels;
283:
284: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
285: RAISE fnd_api.g_exc_unexpected_error;
286: END IF;
287:
288: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 285: RAISE fnd_api.g_exc_unexpected_error;

281: BEGIN
282: SAVEPOINT insert_terr_levels;
283:
284: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
285: RAISE fnd_api.g_exc_unexpected_error;
286: END IF;
287:
288: -- Initialize message list if p_init_msg_list is set to TRUE.
289: IF fnd_api.to_boolean (p_init_msg_list) THEN

Line 289: IF fnd_api.to_boolean (p_init_msg_list) THEN

285: RAISE fnd_api.g_exc_unexpected_error;
286: END IF;
287:
288: -- Initialize message list if p_init_msg_list is set to TRUE.
289: IF fnd_api.to_boolean (p_init_msg_list) THEN
290: fnd_msg_pub.initialize;
291: END IF;
292:
293: -- Initialize API return status to success

Line 294: x_return_status := fnd_api.g_ret_sts_success;

290: fnd_msg_pub.initialize;
291: END IF;
292:
293: -- Initialize API return status to success
294: x_return_status := fnd_api.g_ret_sts_success;
295:
296: ozf_utility_pvt.write_conc_log('**********Start of Hierarchy Insert*******' );
297: ozf_utility_pvt.write_conc_log('**********Territory Details *******' );
298:

Line 313: RAISE fnd_api.g_exc_error;

309: fnd_message.set_name ('OZF', 'OZF_TERR_ID_NOT_FOUND');
310: fnd_msg_pub.ADD;
311: END IF;
312:
313: RAISE fnd_api.g_exc_error;
314: END IF;
315:
316: IF l_terr_type_id IS NULL THEN
317: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN

Line 322: RAISE fnd_api.g_exc_error;

318: fnd_message.set_name ('OZF', 'OZF_TERR_TYPE_ID_NOT_FOUND');
319: fnd_msg_pub.ADD;
320: END IF;
321:
322: RAISE fnd_api.g_exc_error;
323: END IF;
324:
325:
326: ------------check for data integrity---------------------------

Line 342: RAISE fnd_api.g_exc_error;

338: fnd_message.set_name ('OZF', 'OZF_TERR_TYPE_ID_NOT_FOUND');
339: fnd_msg_pub.ADD;
340: END IF;
341:
342: RAISE fnd_api.g_exc_error;
343: END IF;
344:
345: -- Record level validation
346: ozf_utility_pvt.debug_message ( l_full_name

Line 375: RAISE fnd_api.g_exc_error;

371: fnd_message.set_name ('OZF', 'OZF_TERR_TYPE_DUPLICATE_RECORD');
372: fnd_msg_pub.ADD;
373: END IF;
374:
375: RAISE fnd_api.g_exc_error;
376: END IF; */
377: -- Bug # 5723438 fixed by ateotia (-)
378:
379: OPEN c_get_seq;

Line 472: x_return_status := fnd_api.g_ret_sts_success;

468: -- Bug # 5723438 fixed by ateotia (-)
469:
470: IF SQL%FOUND THEN
471: l_insert_count := SQL%ROWCOUNT;
472: x_return_status := fnd_api.g_ret_sts_success;
473: END IF;
474:
475: x_return_status := fnd_api.g_ret_sts_success;
476: END LOOP;

Line 475: x_return_status := fnd_api.g_ret_sts_success;

471: l_insert_count := SQL%ROWCOUNT;
472: x_return_status := fnd_api.g_ret_sts_success;
473: END IF;
474:
475: x_return_status := fnd_api.g_ret_sts_success;
476: END LOOP;
477:
478: IF fnd_api.to_boolean (p_commit)
479: AND x_return_status = fnd_api.g_ret_sts_success THEN

Line 478: IF fnd_api.to_boolean (p_commit)

474:
475: x_return_status := fnd_api.g_ret_sts_success;
476: END LOOP;
477:
478: IF fnd_api.to_boolean (p_commit)
479: AND x_return_status = fnd_api.g_ret_sts_success THEN
480: COMMIT;
481: END IF;
482:

Line 479: AND x_return_status = fnd_api.g_ret_sts_success THEN

475: x_return_status := fnd_api.g_ret_sts_success;
476: END LOOP;
477:
478: IF fnd_api.to_boolean (p_commit)
479: AND x_return_status = fnd_api.g_ret_sts_success THEN
480: COMMIT;
481: END IF;
482:
483: fnd_msg_pub.count_and_get (

Line 484: p_encoded=> fnd_api.g_false

480: COMMIT;
481: END IF;
482:
483: fnd_msg_pub.count_and_get (
484: p_encoded=> fnd_api.g_false
485: ,p_count=> x_msg_count
486: ,p_data=> x_msg_data
487: );
488: ozf_utility_pvt.debug_message ( l_full_name

Line 491: WHEN fnd_api.g_exc_error THEN

487: );
488: ozf_utility_pvt.debug_message ( l_full_name
489: || ': end');
490: EXCEPTION
491: WHEN fnd_api.g_exc_error THEN
492: ROLLBACK TO insert_terr_levels;
493: x_return_status := fnd_api.g_ret_sts_error;
494: fnd_msg_pub.count_and_get (
495: p_encoded=> fnd_api.g_false

Line 493: x_return_status := fnd_api.g_ret_sts_error;

489: || ': end');
490: EXCEPTION
491: WHEN fnd_api.g_exc_error THEN
492: ROLLBACK TO insert_terr_levels;
493: x_return_status := fnd_api.g_ret_sts_error;
494: fnd_msg_pub.count_and_get (
495: p_encoded=> fnd_api.g_false
496: ,p_count=> x_msg_count
497: ,p_data=> x_msg_data

Line 495: p_encoded=> fnd_api.g_false

491: WHEN fnd_api.g_exc_error THEN
492: ROLLBACK TO insert_terr_levels;
493: x_return_status := fnd_api.g_ret_sts_error;
494: fnd_msg_pub.count_and_get (
495: p_encoded=> fnd_api.g_false
496: ,p_count=> x_msg_count
497: ,p_data=> x_msg_data
498: );
499: WHEN fnd_api.g_exc_unexpected_error THEN

Line 499: WHEN fnd_api.g_exc_unexpected_error THEN

495: p_encoded=> fnd_api.g_false
496: ,p_count=> x_msg_count
497: ,p_data=> x_msg_data
498: );
499: WHEN fnd_api.g_exc_unexpected_error THEN
500: ROLLBACK TO insert_terr_levels;
501: x_return_status := fnd_api.g_ret_sts_unexp_error;
502: fnd_msg_pub.count_and_get (
503: p_encoded=> fnd_api.g_false

Line 501: x_return_status := fnd_api.g_ret_sts_unexp_error;

497: ,p_data=> x_msg_data
498: );
499: WHEN fnd_api.g_exc_unexpected_error THEN
500: ROLLBACK TO insert_terr_levels;
501: x_return_status := fnd_api.g_ret_sts_unexp_error;
502: fnd_msg_pub.count_and_get (
503: p_encoded=> fnd_api.g_false
504: ,p_count=> x_msg_count
505: ,p_data=> x_msg_data

Line 503: p_encoded=> fnd_api.g_false

499: WHEN fnd_api.g_exc_unexpected_error THEN
500: ROLLBACK TO insert_terr_levels;
501: x_return_status := fnd_api.g_ret_sts_unexp_error;
502: fnd_msg_pub.count_and_get (
503: p_encoded=> fnd_api.g_false
504: ,p_count=> x_msg_count
505: ,p_data=> x_msg_data
506: );
507: WHEN OTHERS THEN

Line 509: x_return_status := fnd_api.g_ret_sts_unexp_error;

505: ,p_data=> x_msg_data
506: );
507: WHEN OTHERS THEN
508: ROLLBACK TO insert_terr_levels;
509: x_return_status := fnd_api.g_ret_sts_unexp_error;
510:
511: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error) THEN
512: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
513: END IF;

Line 516: p_encoded=> fnd_api.g_false

512: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
513: END IF;
514:
515: fnd_msg_pub.count_and_get (
516: p_encoded=> fnd_api.g_false
517: ,p_count=> x_msg_count
518: ,p_data=> x_msg_data
519: );
520: END insert_terr_levels;

Line 534: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false

530: -- to import all hierarchy levels defined under 'Trade Management'
531: --------------------------------------------------------------------------*/
532: PROCEDURE bulk_insert_terr_levels (
533: p_api_version IN NUMBER
534: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
535: ,p_commit IN VARCHAR2 := fnd_api.g_false
536: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
537: ,x_return_status OUT NOCOPY VARCHAR2
538: ,x_msg_data OUT NOCOPY VARCHAR2

Line 535: ,p_commit IN VARCHAR2 := fnd_api.g_false

531: --------------------------------------------------------------------------*/
532: PROCEDURE bulk_insert_terr_levels (
533: p_api_version IN NUMBER
534: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
535: ,p_commit IN VARCHAR2 := fnd_api.g_false
536: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
537: ,x_return_status OUT NOCOPY VARCHAR2
538: ,x_msg_data OUT NOCOPY VARCHAR2
539: ,x_msg_count OUT NOCOPY NUMBER

Line 536: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full

532: PROCEDURE bulk_insert_terr_levels (
533: p_api_version IN NUMBER
534: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
535: ,p_commit IN VARCHAR2 := fnd_api.g_false
536: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
537: ,x_return_status OUT NOCOPY VARCHAR2
538: ,x_msg_data OUT NOCOPY VARCHAR2
539: ,x_msg_count OUT NOCOPY NUMBER
540: ) IS

Line 570: ,p_init_msg_list => fnd_api.g_true

566: FETCH c_get_all_root_nodes BULK COLLECT INTO l_terrIdTbl LIMIT g_bulk_limit;
567: FOR i IN NVL(l_terrIdTbl.FIRST, 1) .. NVL(l_terrIdTbl.LAST, 0) LOOP
568: ozf_terr_levels_pvt.insert_terr_levels (
569: p_api_version => 1.0
570: ,p_init_msg_list => fnd_api.g_true
571: ,p_commit => fnd_api.g_false
572: ,p_validation_level => fnd_api.g_valid_level_full
573: ,x_return_status => x_return_status
574: ,x_msg_data => x_msg_data

Line 571: ,p_commit => fnd_api.g_false

567: FOR i IN NVL(l_terrIdTbl.FIRST, 1) .. NVL(l_terrIdTbl.LAST, 0) LOOP
568: ozf_terr_levels_pvt.insert_terr_levels (
569: p_api_version => 1.0
570: ,p_init_msg_list => fnd_api.g_true
571: ,p_commit => fnd_api.g_false
572: ,p_validation_level => fnd_api.g_valid_level_full
573: ,x_return_status => x_return_status
574: ,x_msg_data => x_msg_data
575: ,x_msg_count => x_msg_count

Line 572: ,p_validation_level => fnd_api.g_valid_level_full

568: ozf_terr_levels_pvt.insert_terr_levels (
569: p_api_version => 1.0
570: ,p_init_msg_list => fnd_api.g_true
571: ,p_commit => fnd_api.g_false
572: ,p_validation_level => fnd_api.g_valid_level_full
573: ,x_return_status => x_return_status
574: ,x_msg_data => x_msg_data
575: ,x_msg_count => x_msg_count
576: ,p_start_node_id => l_terrIdTbl(i)

Line 578: IF x_return_status <> fnd_api.g_ret_sts_success THEN

574: ,x_msg_data => x_msg_data
575: ,x_msg_count => x_msg_count
576: ,p_start_node_id => l_terrIdTbl(i)
577: );
578: IF x_return_status <> fnd_api.g_ret_sts_success THEN
579: ozf_utility_pvt.write_conc_log(' /****** Failed to bulk insert level for hier id ' || l_terrIdTbl(i));
580: ELSE
581: ozf_utility_pvt.debug_message(' D: ' || l_api_name || ' successfully insert levels for terr id' || l_terrIdTbl(i));
582: END IF;

Line 601: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false

597: --------------------------------------------------------------------------*/
598:
599: PROCEDURE delete_terr_levels (
600: p_api_version IN NUMBER
601: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
602: ,p_commit IN VARCHAR2 := fnd_api.g_false
603: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
604: ,x_return_status OUT NOCOPY VARCHAR2
605: ,x_msg_data OUT NOCOPY VARCHAR2

Line 602: ,p_commit IN VARCHAR2 := fnd_api.g_false

598:
599: PROCEDURE delete_terr_levels (
600: p_api_version IN NUMBER
601: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
602: ,p_commit IN VARCHAR2 := fnd_api.g_false
603: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
604: ,x_return_status OUT NOCOPY VARCHAR2
605: ,x_msg_data OUT NOCOPY VARCHAR2
606: ,x_msg_count OUT NOCOPY NUMBER

Line 603: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full

599: PROCEDURE delete_terr_levels (
600: p_api_version IN NUMBER
601: ,p_init_msg_list IN VARCHAR2 := fnd_api.g_false
602: ,p_commit IN VARCHAR2 := fnd_api.g_false
603: ,p_validation_level IN NUMBER := fnd_api.g_valid_level_full
604: ,x_return_status OUT NOCOPY VARCHAR2
605: ,x_msg_data OUT NOCOPY VARCHAR2
606: ,x_msg_count OUT NOCOPY NUMBER
607: ,p_hierarchy_id IN NUMBER

Line 631: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN

627:
628: BEGIN
629: SAVEPOINT delete_terr_levels;
630:
631: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
632: RAISE fnd_api.g_exc_unexpected_error;
633: END IF;
634:
635: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 632: RAISE fnd_api.g_exc_unexpected_error;

628: BEGIN
629: SAVEPOINT delete_terr_levels;
630:
631: IF NOT fnd_api.compatible_api_call (l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
632: RAISE fnd_api.g_exc_unexpected_error;
633: END IF;
634:
635: -- Initialize message list if p_init_msg_list is set to TRUE.
636: IF fnd_api.to_boolean (p_init_msg_list) THEN

Line 636: IF fnd_api.to_boolean (p_init_msg_list) THEN

632: RAISE fnd_api.g_exc_unexpected_error;
633: END IF;
634:
635: -- Initialize message list if p_init_msg_list is set to TRUE.
636: IF fnd_api.to_boolean (p_init_msg_list) THEN
637: fnd_msg_pub.initialize;
638: END IF;
639:
640: -- Initialize API return status to success

Line 641: x_return_status := fnd_api.g_ret_sts_success;

637: fnd_msg_pub.initialize;
638: END IF;
639:
640: -- Initialize API return status to success
641: x_return_status := fnd_api.g_ret_sts_success;
642:
643: -- 07/13/2001 mpande delete the whole hierarchy structure to recreate it
644: DELETE FROM ozf_terr_levels_all
645: WHERE heirarchy_id = p_hierarchy_id;

Line 657: IF fnd_api.to_boolean (p_commit) THEN

653: DELETE FROM ozf_terr_levels_all
654: WHERE terr_level_id = l_terr_level_rec.terr_level_id;
655: END LOOP;
656:
657: IF fnd_api.to_boolean (p_commit) THEN
658: COMMIT;
659: END IF;
660: */
661:

Line 663: p_encoded=> fnd_api.g_false

659: END IF;
660: */
661:
662: fnd_msg_pub.count_and_get (
663: p_encoded=> fnd_api.g_false
664: ,p_count=> x_msg_count
665: ,p_data=> x_msg_data
666: );
667: ozf_utility_pvt.debug_message ( l_full_name

Line 670: WHEN fnd_api.g_exc_error THEN

666: );
667: ozf_utility_pvt.debug_message ( l_full_name
668: || ': end');
669: EXCEPTION
670: WHEN fnd_api.g_exc_error THEN
671: ROLLBACK TO delete_terr_levels;
672: x_return_status := fnd_api.g_ret_sts_error;
673: fnd_msg_pub.count_and_get (
674: p_encoded=> fnd_api.g_false

Line 672: x_return_status := fnd_api.g_ret_sts_error;

668: || ': end');
669: EXCEPTION
670: WHEN fnd_api.g_exc_error THEN
671: ROLLBACK TO delete_terr_levels;
672: x_return_status := fnd_api.g_ret_sts_error;
673: fnd_msg_pub.count_and_get (
674: p_encoded=> fnd_api.g_false
675: ,p_count=> x_msg_count
676: ,p_data=> x_msg_data

Line 674: p_encoded=> fnd_api.g_false

670: WHEN fnd_api.g_exc_error THEN
671: ROLLBACK TO delete_terr_levels;
672: x_return_status := fnd_api.g_ret_sts_error;
673: fnd_msg_pub.count_and_get (
674: p_encoded=> fnd_api.g_false
675: ,p_count=> x_msg_count
676: ,p_data=> x_msg_data
677: );
678: WHEN fnd_api.g_exc_unexpected_error THEN

Line 678: WHEN fnd_api.g_exc_unexpected_error THEN

674: p_encoded=> fnd_api.g_false
675: ,p_count=> x_msg_count
676: ,p_data=> x_msg_data
677: );
678: WHEN fnd_api.g_exc_unexpected_error THEN
679: ROLLBACK TO delete_terr_levels;
680: x_return_status := fnd_api.g_ret_sts_unexp_error;
681: fnd_msg_pub.count_and_get (
682: p_encoded=> fnd_api.g_false

Line 680: x_return_status := fnd_api.g_ret_sts_unexp_error;

676: ,p_data=> x_msg_data
677: );
678: WHEN fnd_api.g_exc_unexpected_error THEN
679: ROLLBACK TO delete_terr_levels;
680: x_return_status := fnd_api.g_ret_sts_unexp_error;
681: fnd_msg_pub.count_and_get (
682: p_encoded=> fnd_api.g_false
683: ,p_count=> x_msg_count
684: ,p_data=> x_msg_data

Line 682: p_encoded=> fnd_api.g_false

678: WHEN fnd_api.g_exc_unexpected_error THEN
679: ROLLBACK TO delete_terr_levels;
680: x_return_status := fnd_api.g_ret_sts_unexp_error;
681: fnd_msg_pub.count_and_get (
682: p_encoded=> fnd_api.g_false
683: ,p_count=> x_msg_count
684: ,p_data=> x_msg_data
685: );
686: WHEN OTHERS THEN

Line 688: x_return_status := fnd_api.g_ret_sts_unexp_error;

684: ,p_data=> x_msg_data
685: );
686: WHEN OTHERS THEN
687: ROLLBACK TO delete_terr_levels;
688: x_return_status := fnd_api.g_ret_sts_unexp_error;
689:
690: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error) THEN
691: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
692: END IF;

Line 695: p_encoded=> fnd_api.g_false

691: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
692: END IF;
693:
694: fnd_msg_pub.count_and_get (
695: p_encoded=> fnd_api.g_false
696: ,p_count=> x_msg_count
697: ,p_data=> x_msg_data
698: );
699: END delete_terr_levels;