DBA Data[Home] [Help]

APPS.GME_DELETE_BATCH_STEP_PVT dependencies on GME_DEBUG

Line 77: IF g_debug <= gme_debug.g_log_procedure THEN

73: step_delete_error EXCEPTION;
74: one_step_reqd EXCEPTION;
75: error_calc_step_qty EXCEPTION;
76: BEGIN
77: IF g_debug <= gme_debug.g_log_procedure THEN
78: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
79: || l_api_name);
80: END IF;
81:

Line 78: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

74: one_step_reqd EXCEPTION;
75: error_calc_step_qty EXCEPTION;
76: BEGIN
77: IF g_debug <= gme_debug.g_log_procedure THEN
78: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
79: || l_api_name);
80: END IF;
81:
82: /* Set the savepoint before proceeding */

Line 204: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

200: --While Rerouting a batch, the call 'gmd_auto_step_calc.calc_step_qty' is not required.
201: --It is called when the dependent batch step is deleted.
202: IF NOT p_reroute_flag THEN
203: IF l_batch_header.automatic_step_calculation = 1 THEN
204: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
205: gme_debug.put_line ('l_batch_step' || l_batch_step.batchstep_id);
206: gme_debug.put_line ('auto step calc...');
207: END IF;
208:

Line 205: gme_debug.put_line ('l_batch_step' || l_batch_step.batchstep_id);

201: --It is called when the dependent batch step is deleted.
202: IF NOT p_reroute_flag THEN
203: IF l_batch_header.automatic_step_calculation = 1 THEN
204: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
205: gme_debug.put_line ('l_batch_step' || l_batch_step.batchstep_id);
206: gme_debug.put_line ('auto step calc...');
207: END IF;
208:
209: gmd_auto_step_calc.calc_step_qty

Line 206: gme_debug.put_line ('auto step calc...');

202: IF NOT p_reroute_flag THEN
203: IF l_batch_header.automatic_step_calculation = 1 THEN
204: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
205: gme_debug.put_line ('l_batch_step' || l_batch_step.batchstep_id);
206: gme_debug.put_line ('auto step calc...');
207: END IF;
208:
209: gmd_auto_step_calc.calc_step_qty
210: (p_parent_id => l_batch_header.batch_id

Line 220: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

216: ,p_organization_id => l_batch_header.organization_id);
217: END IF;
218:
219: IF l_return_status <> x_return_status THEN
220: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
221: gme_debug.put_line
222: (fnd_msg_pub.get (p_encoded => fnd_api.g_false) );
223: END IF;
224:

Line 221: gme_debug.put_line

217: END IF;
218:
219: IF l_return_status <> x_return_status THEN
220: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
221: gme_debug.put_line
222: (fnd_msg_pub.get (p_encoded => fnd_api.g_false) );
223: END IF;
224:
225: RAISE error_calc_step_qty;

Line 228: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

224:
225: RAISE error_calc_step_qty;
226: END IF;
227:
228: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
229: gme_debug.put_line ('done step calc...');
230: END IF;
231:
232: /*Bug 2395188 Bharati Satpute Replaced first,last with count */

Line 229: gme_debug.put_line ('done step calc...');

225: RAISE error_calc_step_qty;
226: END IF;
227:
228: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
229: gme_debug.put_line ('done step calc...');
230: END IF;
231:
232: /*Bug 2395188 Bharati Satpute Replaced first,last with count */
233: -- Update the plan_step_qty in GME_BATCH_STEPS

Line 247: IF g_debug <= gme_debug.g_log_procedure THEN

243: END LOOP; /* FOR i IN l_step_tbl.FIRST .. l_step_tbl.LAST */
244: END IF;
245:
246: --End Bug#3109673
247: IF g_debug <= gme_debug.g_log_procedure THEN
248: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
249: END IF;
250: EXCEPTION
251: WHEN invalid_step THEN

Line 248: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);

244: END IF;
245:
246: --End Bug#3109673
247: IF g_debug <= gme_debug.g_log_procedure THEN
248: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
249: END IF;
250: EXCEPTION
251: WHEN invalid_step THEN
252: ROLLBACK TO SAVEPOINT delete_batch_step;

Line 258: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

254: gme_common_pvt.log_message ('GME_STEP_NOT_PENDING');
255: /* FND_MSG_PUB.COUNT_AND_GET (P_count => x_message_count,
256: P_data => x_message_list); */
257: WHEN error_calc_step_qty THEN
258: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
259: gme_debug.put_line ('calc step qty error');
260: END IF;
261:
262: x_return_status := fnd_api.g_ret_sts_error;

Line 259: gme_debug.put_line ('calc step qty error');

255: /* FND_MSG_PUB.COUNT_AND_GET (P_count => x_message_count,
256: P_data => x_message_list); */
257: WHEN error_calc_step_qty THEN
258: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
259: gme_debug.put_line ('calc step qty error');
260: END IF;
261:
262: x_return_status := fnd_api.g_ret_sts_error;
263: WHEN one_step_reqd THEN

Line 275: IF g_debug <= gme_debug.g_log_unexpected THEN

271: ROLLBACK TO SAVEPOINT delete_batch_step;
272: /* FND_MSG_PUB.COUNT_AND_GET (P_count => x_message_count,
273: P_data => x_message_list); */
274: WHEN OTHERS THEN
275: IF g_debug <= gme_debug.g_log_unexpected THEN
276: gme_debug.put_line ( 'When others exception in '
277: || g_pkg_name
278: || '.'
279: || l_api_name

Line 276: gme_debug.put_line ( 'When others exception in '

272: /* FND_MSG_PUB.COUNT_AND_GET (P_count => x_message_count,
273: P_data => x_message_list); */
274: WHEN OTHERS THEN
275: IF g_debug <= gme_debug.g_log_unexpected THEN
276: gme_debug.put_line ( 'When others exception in '
277: || g_pkg_name
278: || '.'
279: || l_api_name
280: || ' Error is '

Line 337: IF g_debug <= gme_debug.g_log_procedure THEN

333: l_message_count NUMBER;
334: l_message_list VARCHAR2(2000);
335:
336: BEGIN
337: IF g_debug <= gme_debug.g_log_procedure THEN
338: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
339: || l_api_name);
340: END IF;
341:

Line 338: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

334: l_message_list VARCHAR2(2000);
335:
336: BEGIN
337: IF g_debug <= gme_debug.g_log_procedure THEN
338: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
339: || l_api_name);
340: END IF;
341:
342: /* Set the return status to success initially */

Line 398: IF g_debug <= gme_debug.g_log_procedure THEN

394:
395: gme_batch_step_chg_pvt.set_activity_sequence_num (l_batch_id);
396:
397: --Rishi Varma bug 3307549 13-05-2004 end.
398: IF g_debug <= gme_debug.g_log_procedure THEN
399: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
400: END IF;
401: EXCEPTION
402: WHEN gmf_cost_failure THEN

Line 399: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);

395: gme_batch_step_chg_pvt.set_activity_sequence_num (l_batch_id);
396:
397: --Rishi Varma bug 3307549 13-05-2004 end.
398: IF g_debug <= gme_debug.g_log_procedure THEN
399: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
400: END IF;
401: EXCEPTION
402: WHEN gmf_cost_failure THEN
403: -- Bug 5903208

Line 409: IF g_debug <= gme_debug.g_log_unexpected THEN

405:
406: WHEN step_activity_delete_error OR activity_resource_delete_error THEN
407: x_return_status := fnd_api.g_ret_sts_error;
408: WHEN OTHERS THEN
409: IF g_debug <= gme_debug.g_log_unexpected THEN
410: gme_debug.put_line ( 'When others exception in '
411: || g_pkg_name
412: || '.'
413: || l_api_name

Line 410: gme_debug.put_line ( 'When others exception in '

406: WHEN step_activity_delete_error OR activity_resource_delete_error THEN
407: x_return_status := fnd_api.g_ret_sts_error;
408: WHEN OTHERS THEN
409: IF g_debug <= gme_debug.g_log_unexpected THEN
410: gme_debug.put_line ( 'When others exception in '
411: || g_pkg_name
412: || '.'
413: || l_api_name
414: || ' Error is '

Line 490: IF g_debug <= gme_debug.g_log_procedure THEN

486: trans_delete_error EXCEPTION;
487: activity_resource_delete_error EXCEPTION;
488: rsrc_param_delete_error EXCEPTION;
489: BEGIN
490: IF g_debug <= gme_debug.g_log_procedure THEN
491: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
492: || l_api_name);
493: END IF;
494:

Line 491: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

487: activity_resource_delete_error EXCEPTION;
488: rsrc_param_delete_error EXCEPTION;
489: BEGIN
490: IF g_debug <= gme_debug.g_log_procedure THEN
491: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
492: || l_api_name);
493: END IF;
494:
495: /* Set the return status to success initially */

Line 517: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN

513:
514: FETCH cur_is_charge_associated
515: INTO l_cur_is_charge_associated;
516:
517: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
518: gme_debug.put_line ( l_api_name
519: || 'batch,step idno. are '
520: || l_batch_step_resource.batch_id
521: || l_batch_step_resource.batchstep_id);

Line 518: gme_debug.put_line ( l_api_name

514: FETCH cur_is_charge_associated
515: INTO l_cur_is_charge_associated;
516:
517: IF (NVL (g_debug, -1) = gme_debug.g_log_statement) THEN
518: gme_debug.put_line ( l_api_name
519: || 'batch,step idno. are '
520: || l_batch_step_resource.batch_id
521: || l_batch_step_resource.batchstep_id);
522: END IF;

Line 595: IF g_debug <= gme_debug.g_log_procedure THEN

591: --Re sequencing the sequence dependent ids after the delete.
592: gme_batch_step_chg_pvt.set_sequence_dependent_id
593: (l_batch_step_resource.batch_id);
594:
595: IF g_debug <= gme_debug.g_log_procedure THEN
596: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
597: END IF;
598: EXCEPTION
599: WHEN trans_delete_error OR activity_resource_delete_error OR rsrc_param_delete_error OR resource_charge_delete_error THEN

Line 596: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);

592: gme_batch_step_chg_pvt.set_sequence_dependent_id
593: (l_batch_step_resource.batch_id);
594:
595: IF g_debug <= gme_debug.g_log_procedure THEN
596: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
597: END IF;
598: EXCEPTION
599: WHEN trans_delete_error OR activity_resource_delete_error OR rsrc_param_delete_error OR resource_charge_delete_error THEN
600: x_return_status := fnd_api.g_ret_sts_error;

Line 602: IF g_debug <= gme_debug.g_log_unexpected THEN

598: EXCEPTION
599: WHEN trans_delete_error OR activity_resource_delete_error OR rsrc_param_delete_error OR resource_charge_delete_error THEN
600: x_return_status := fnd_api.g_ret_sts_error;
601: WHEN OTHERS THEN
602: IF g_debug <= gme_debug.g_log_unexpected THEN
603: gme_debug.put_line ( 'When others exception in '
604: || g_pkg_name
605: || '.'
606: || l_api_name

Line 603: gme_debug.put_line ( 'When others exception in '

599: WHEN trans_delete_error OR activity_resource_delete_error OR rsrc_param_delete_error OR resource_charge_delete_error THEN
600: x_return_status := fnd_api.g_ret_sts_error;
601: WHEN OTHERS THEN
602: IF g_debug <= gme_debug.g_log_unexpected THEN
603: gme_debug.put_line ( 'When others exception in '
604: || g_pkg_name
605: || '.'
606: || l_api_name
607: || ' Error is '

Line 636: IF g_debug <= gme_debug.g_log_procedure THEN

632: l_resource_tab gme_common_pvt.resource_transactions_tab;
633: l_api_name CONSTANT VARCHAR2 (30) := 'delete_resource_transactions';
634: l_return_status VARCHAR2 (1);
635: BEGIN
636: IF g_debug <= gme_debug.g_log_procedure THEN
637: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
638: || l_api_name);
639: END IF;
640:

Line 637: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

633: l_api_name CONSTANT VARCHAR2 (30) := 'delete_resource_transactions';
634: l_return_status VARCHAR2 (1);
635: BEGIN
636: IF g_debug <= gme_debug.g_log_procedure THEN
637: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
638: || l_api_name);
639: END IF;
640:
641: /* Set the return status to success initially */

Line 668: IF g_debug <= gme_debug.g_log_procedure THEN

664: RAISE fnd_api.g_exc_error;
665: END IF;
666: END LOOP; /* FOR i IN 1..l_resource_tab.COUNT */
667:
668: IF g_debug <= gme_debug.g_log_procedure THEN
669: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
670: END IF;
671: EXCEPTION
672: WHEN fnd_api.g_exc_error THEN

Line 669: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);

665: END IF;
666: END LOOP; /* FOR i IN 1..l_resource_tab.COUNT */
667:
668: IF g_debug <= gme_debug.g_log_procedure THEN
669: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
670: END IF;
671: EXCEPTION
672: WHEN fnd_api.g_exc_error THEN
673: x_return_status := fnd_api.g_ret_sts_error;

Line 675: IF g_debug <= gme_debug.g_log_unexpected THEN

671: EXCEPTION
672: WHEN fnd_api.g_exc_error THEN
673: x_return_status := fnd_api.g_ret_sts_error;
674: WHEN OTHERS THEN
675: IF g_debug <= gme_debug.g_log_unexpected THEN
676: gme_debug.put_line ( 'When others exception in '
677: || g_pkg_name
678: || '.'
679: || l_api_name

Line 676: gme_debug.put_line ( 'When others exception in '

672: WHEN fnd_api.g_exc_error THEN
673: x_return_status := fnd_api.g_ret_sts_error;
674: WHEN OTHERS THEN
675: IF g_debug <= gme_debug.g_log_unexpected THEN
676: gme_debug.put_line ( 'When others exception in '
677: || g_pkg_name
678: || '.'
679: || l_api_name
680: || ' Error is '