DBA Data[Home] [Help]

APPS.OZF_TERR_LEVELS_PVT dependencies on OZF_UTILITY_PVT

Line 57: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: begin process');

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);
61: END IF;

Line 60: ozf_utility_pvt.debug_message ('create_terr_hierarchy: p_start_node_id=' || p_start_node_id);

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);
61: END IF;
62:
63: IF p_start_node_id IS NOT NULL THEN
64:

Line 86: ozf_utility_pvt.write_conc_log (' Failed to delete existing levels for terr_id ' || l_start_node_id);

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
90: LOOP

Line 92: ozf_utility_pvt.write_conc_log (' delete_terr_levels returns error. Msg count='

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);
96: --DBMS_OUTPUT.put_line ( 'message :' || x_msg_data);

Line 105: ozf_utility_pvt.write_conc_log ('Update active_flag to N for all OZF Territories to identify the old territories.');

101: ELSE
102: CLOSE c_hier_exists; */
103:
104: -- Update active_flag to 'N' for all OZF Territories to identify the old territories.
105: ozf_utility_pvt.write_conc_log ('Update active_flag to N for all OZF Territories to identify the old territories.');
106:
107: UPDATE ozf_terr_levels_all
108: SET active_flag = 'N';
109:

Line 110: ozf_utility_pvt.write_conc_log ('Territory Insertion Call');

106:
107: UPDATE ozf_terr_levels_all
108: SET active_flag = 'N';
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

Line 124: ozf_utility_pvt.write_conc_log ('Update active_flag to N for all OZF Territories to identify the old territories.');

120: );
121: -- END IF;
122: ELSE
123: -- Update active_flag to 'N' for all OZF Territories to identify the old territories.
124: ozf_utility_pvt.write_conc_log ('Update active_flag to N for all OZF Territories to identify the old territories.');
125:
126: UPDATE ozf_terr_levels_all
127: SET active_flag = 'N';
128:

Line 129: ozf_utility_pvt.write_conc_log ('Bulk Territories Insertion Call');

125:
126: UPDATE ozf_terr_levels_all
127: SET active_flag = 'N';
128:
129: ozf_utility_pvt.write_conc_log ('Bulk Territories Insertion Call');
130: -- Bug # 5723438 fixed by ateotia (-)
131:
132: ozf_terr_levels_pvt.bulk_insert_terr_levels (
133: p_api_version => 1.0

Line 144: ozf_utility_pvt.write_conc_log (' Failed to insert levels for terr_id ' || l_start_node_id);

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
148: LOOP

Line 150: ozf_utility_pvt.write_conc_log (' insert_terr_levels returns error. Msg count='

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);
154: --DBMS_OUTPUT.put_line ( 'message :' || x_msg_data);

Line 160: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: SUCCESS');

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
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;

Line 163: ozf_utility_pvt.write_conc_log ('Import Territory Hierarchy: EXCEPTION');

159:
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

Line 296: ozf_utility_pvt.write_conc_log('**********Start of Hierarchy Insert*******' );

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:
299: -- API body
300: -- check this for each record

Line 297: ozf_utility_pvt.write_conc_log('**********Territory Details *******' );

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:
299: -- API body
300: -- check this for each record
301: OPEN c_terr_id (p_start_node_id);

Line 303: ozf_utility_pvt.write_conc_log('l_terr_id:=' || l_terr_id );

299: -- API body
300: -- check this for each record
301: OPEN c_terr_id (p_start_node_id);
302: FETCH c_terr_id INTO l_terr_id, l_terr_type_id;
303: ozf_utility_pvt.write_conc_log('l_terr_id:=' || l_terr_id );
304: ozf_utility_pvt.write_conc_log('l_terr_type_id:=' || l_terr_type_id );
305: CLOSE c_terr_id;
306:
307: IF l_terr_id IS NULL THEN

Line 304: ozf_utility_pvt.write_conc_log('l_terr_type_id:=' || l_terr_type_id );

300: -- check this for each record
301: OPEN c_terr_id (p_start_node_id);
302: FETCH c_terr_id INTO l_terr_id, l_terr_type_id;
303: ozf_utility_pvt.write_conc_log('l_terr_id:=' || l_terr_id );
304: ozf_utility_pvt.write_conc_log('l_terr_type_id:=' || l_terr_type_id );
305: CLOSE c_terr_id;
306:
307: IF l_terr_id IS NULL THEN
308: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN

Line 346: ozf_utility_pvt.debug_message ( l_full_name

342: RAISE fnd_api.g_exc_error;
343: END IF;
344:
345: -- Record level validation
346: ozf_utility_pvt.debug_message ( l_full_name
347: || ': begin');
348:
349: -- 07/13/2001 mpande added . We want ot purge all the hierarchy that was created for the territories that
350: -- are now a part of this new hierarchy

Line 383: ozf_utility_pvt.write_conc_log('******* Insert into OZF Schema *******');

379: OPEN c_get_seq;
380: FETCH c_get_seq INTO l_terr_level_id;
381: CLOSE c_get_seq;
382:
383: ozf_utility_pvt.write_conc_log('******* Insert into OZF Schema *******');
384: INSERT INTO ozf_terr_levels_all
385: (terr_level_id
386: ,creation_date
387: ,created_by

Line 462: ozf_utility_pvt.write_conc_log('******* Delete Duplicates *******');

458: ,l_terr_level_rec.enabled_flag
459: -- Bug # 5723438 fixed by ateotia (-)
460: );
461:
462: ozf_utility_pvt.write_conc_log('******* Delete Duplicates *******');
463: -- Bug # 5723438 fixed by ateotia (+)
464: DELETE from ozf_terr_levels_all
465: WHERE active_flag = 'N'
466: AND territory_id = l_terr_level_rec.terr_id

Line 488: ozf_utility_pvt.debug_message ( l_full_name

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
489: || ': end');
490: EXCEPTION
491: WHEN fnd_api.g_exc_error THEN
492: ROLLBACK TO insert_terr_levels;

Line 579: ozf_utility_pvt.write_conc_log(' /****** Failed to bulk insert level for hier id ' || l_terrIdTbl(i));

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;
583: END LOOP; -- FOR i IN NVL(l_terrIdTbl.FIRST, 1) .. NVL(l_terrIdTbl.LAST, 0) LOOP

Line 581: ozf_utility_pvt.debug_message(' D: ' || l_api_name || ' successfully insert levels for terr 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;
583: END LOOP; -- FOR i IN NVL(l_terrIdTbl.FIRST, 1) .. NVL(l_terrIdTbl.LAST, 0) LOOP
584:
585: EXIT WHEN c_get_all_root_nodes%NOTFOUND;

Line 650: ozf_utility_pvt.debug_message ( l_full_name

646: -- API body
647: /*
648: FOR l_terr_level_rec IN c_delete_terr (p_hierarchy_id)
649: LOOP
650: ozf_utility_pvt.debug_message ( l_full_name
651: || ': begin');
652:
653: DELETE FROM ozf_terr_levels_all
654: WHERE terr_level_id = l_terr_level_rec.terr_level_id;

Line 667: ozf_utility_pvt.debug_message ( l_full_name

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
668: || ': end');
669: EXCEPTION
670: WHEN fnd_api.g_exc_error THEN
671: ROLLBACK TO delete_terr_levels;