DBA Data[Home] [Help]

APPS.GME_CANCEL_BATCH_PVT dependencies on GME_DEBUG

Line 101: IF (g_debug <= gme_debug.g_log_procedure) THEN

97: material_details_fetch_err EXCEPTION;
98: batch_header_fetch_failure EXCEPTION;
99: reservation_delete_err EXCEPTION; -- 4944024
100: BEGIN
101: IF (g_debug <= gme_debug.g_log_procedure) THEN
102: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
103: || 'Entering');
104: END IF;
105:

Line 102: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'

98: batch_header_fetch_failure EXCEPTION;
99: reservation_delete_err EXCEPTION; -- 4944024
100: BEGIN
101: IF (g_debug <= gme_debug.g_log_procedure) THEN
102: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
103: || 'Entering');
104: END IF;
105:
106: /* Set the success staus to success inititally*/

Line 112: IF (g_debug <= gme_debug.g_log_procedure) THEN

108: x_batch_header_rec := p_batch_header_rec;
109: -- Now Examine the ingredient material rows :
110: l_material_details_rec.batch_id := x_batch_header_rec.batch_id;
111:
112: IF (g_debug <= gme_debug.g_log_procedure) THEN
113: gme_debug.put_line ( g_pkg_name
114: || '.'
115: || l_api_name
116: || ':'

Line 113: gme_debug.put_line ( g_pkg_name

109: -- Now Examine the ingredient material rows :
110: l_material_details_rec.batch_id := x_batch_header_rec.batch_id;
111:
112: IF (g_debug <= gme_debug.g_log_procedure) THEN
113: gme_debug.put_line ( g_pkg_name
114: || '.'
115: || l_api_name
116: || ':'
117: || 'Call fetch material tab');

Line 131: IF (g_debug <= gme_debug.g_log_procedure) THEN

127: -- 4944024 BEGIN
128: -- Need to delete any reservations agains PROD supply
129: -- ===================================================
130: IF l_material_details_tab(i).line_type <> -1 THEN
131: IF (g_debug <= gme_debug.g_log_procedure) THEN
132: gme_debug.put_line ( g_pkg_name
133: || '.'
134: || l_api_name
135: || ':'

Line 132: gme_debug.put_line ( g_pkg_name

128: -- Need to delete any reservations agains PROD supply
129: -- ===================================================
130: IF l_material_details_tab(i).line_type <> -1 THEN
131: IF (g_debug <= gme_debug.g_log_procedure) THEN
132: gme_debug.put_line ( g_pkg_name
133: || '.'
134: || l_api_name
135: || ':'
136: || ' Call delete_prod_supply_resv');

Line 145: IF (g_debug <= gme_debug.g_log_procedure) THEN

141: ,x_msg_count => l_message_count
142: ,x_msg_data => l_message_data
143: ,x_return_status => x_return_status);
144:
145: IF (g_debug <= gme_debug.g_log_procedure) THEN
146: gme_debug.put_line ( g_pkg_name
147: || '.'
148: || l_api_name
149: || ':'

Line 146: gme_debug.put_line ( g_pkg_name

142: ,x_msg_data => l_message_data
143: ,x_return_status => x_return_status);
144:
145: IF (g_debug <= gme_debug.g_log_procedure) THEN
146: gme_debug.put_line ( g_pkg_name
147: || '.'
148: || l_api_name
149: || ':'
150: || ' Return from delete_prod_supply_resv indicates '

Line 159: IF (g_debug <= gme_debug.g_log_procedure) THEN

155: END IF;
156: END IF;
157: -- 4944024 END
158:
159: IF (g_debug <= gme_debug.g_log_procedure) THEN
160: gme_debug.put_line ( g_pkg_name
161: || '.'
162: || l_api_name
163: || ':'

Line 160: gme_debug.put_line ( g_pkg_name

156: END IF;
157: -- 4944024 END
158:
159: IF (g_debug <= gme_debug.g_log_procedure) THEN
160: gme_debug.put_line ( g_pkg_name
161: || '.'
162: || l_api_name
163: || ':'
164: || 'phantom_id='

Line 171: IF (g_debug <= gme_debug.g_log_procedure) THEN

167:
168: -- IF PHANTOM_ID is not null,
169: -- THEN recurse from the start for each one.
170: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
171: IF (g_debug <= gme_debug.g_log_procedure) THEN
172: gme_debug.put_line ( g_pkg_name
173: || '.'
174: || l_api_name
175: || ':'

Line 172: gme_debug.put_line ( g_pkg_name

168: -- IF PHANTOM_ID is not null,
169: -- THEN recurse from the start for each one.
170: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
171: IF (g_debug <= gme_debug.g_log_procedure) THEN
172: gme_debug.put_line ( g_pkg_name
173: || '.'
174: || l_api_name
175: || ':'
176: || 'calling cancel batch for phantom_id='

Line 215: IF (g_debug <= gme_debug.g_log_procedure) THEN

211: END LOOP;
212:
213: -- Delete the Inventory transaction under specific conditions
214: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
215: IF (g_debug <= gme_debug.g_log_procedure) THEN
216: gme_debug.put_line ( g_pkg_name
217: || '.'
218: || l_api_name
219: || ':'

Line 216: gme_debug.put_line ( g_pkg_name

212:
213: -- Delete the Inventory transaction under specific conditions
214: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
215: IF (g_debug <= gme_debug.g_log_procedure) THEN
216: gme_debug.put_line ( g_pkg_name
217: || '.'
218: || l_api_name
219: || ':'
220: || 'calling purge exceptions for batch_id='

Line 252: IF (g_debug <= gme_debug.g_log_procedure) THEN

248: AND mtrl.ORGANIZATION_ID = x_batch_header_rec.organization_id
249: AND mtrh.MOVE_ORDER_TYPE = 6);
250:
251: -- Now Examine the batch step(POC data) :
252: IF (g_debug <= gme_debug.g_log_procedure) THEN
253: gme_debug.put_line ( g_pkg_name
254: || '.'
255: || l_api_name
256: || ':'

Line 253: gme_debug.put_line ( g_pkg_name

249: AND mtrh.MOVE_ORDER_TYPE = 6);
250:
251: -- Now Examine the batch step(POC data) :
252: IF (g_debug <= gme_debug.g_log_procedure) THEN
253: gme_debug.put_line ( g_pkg_name
254: || '.'
255: || l_api_name
256: || ':'
257: || 'Check routing_id/poc_ind='

Line 266: IF (g_debug <= gme_debug.g_log_procedure) THEN

262:
263: IF x_batch_header_rec.poc_ind = 'Y' THEN
264: /* Now update the batch step status to Cancel (5) */
265: -- Get batch_step_ids bulk collected for batch
266: IF (g_debug <= gme_debug.g_log_procedure) THEN
267: gme_debug.put_line ( g_pkg_name
268: || '.'
269: || l_api_name
270: || ':'

Line 267: gme_debug.put_line ( g_pkg_name

263: IF x_batch_header_rec.poc_ind = 'Y' THEN
264: /* Now update the batch step status to Cancel (5) */
265: -- Get batch_step_ids bulk collected for batch
266: IF (g_debug <= gme_debug.g_log_procedure) THEN
267: gme_debug.put_line ( g_pkg_name
268: || '.'
269: || l_api_name
270: || ':'
271: || 'routing exists');

Line 292: IF (g_debug <= gme_debug.g_log_procedure) THEN

288: RAISE batch_step_cancel_error;
289: END IF;
290:
291: FOR i IN 1 .. l_batch_step_tab.COUNT LOOP
292: IF (g_debug <= gme_debug.g_log_procedure) THEN
293: gme_debug.put_line ( g_pkg_name
294: || '.'
295: || l_api_name
296: || ':'

Line 293: gme_debug.put_line ( g_pkg_name

289: END IF;
290:
291: FOR i IN 1 .. l_batch_step_tab.COUNT LOOP
292: IF (g_debug <= gme_debug.g_log_procedure) THEN
293: gme_debug.put_line ( g_pkg_name
294: || '.'
295: || l_api_name
296: || ':'
297: || 'calling cancel step for step_id='

Line 321: IF (g_debug <= gme_debug.g_log_procedure) THEN

317: /* Set up the fields in output structure. */
318: x_batch_header_rec.batch_status := -1;
319:
320: /* Update the batch status to the database */
321: IF (g_debug <= gme_debug.g_log_procedure) THEN
322: gme_debug.put_line ( g_pkg_name
323: || '.'
324: || l_api_name
325: || ':'

Line 322: gme_debug.put_line ( g_pkg_name

318: x_batch_header_rec.batch_status := -1;
319:
320: /* Update the batch status to the database */
321: IF (g_debug <= gme_debug.g_log_procedure) THEN
322: gme_debug.put_line ( g_pkg_name
323: || '.'
324: || l_api_name
325: || ':'
326: || 'Call batch UPDATE_ROW'

Line 337: IF (g_debug <= gme_debug.g_log_procedure) THEN

333:
334: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
335: -- Insert the event into the batch history table
336: IF NOT gme_common_pvt.create_history (x_batch_header_rec, -1) THEN
337: IF (g_debug <= gme_debug.g_log_procedure) THEN
338: gme_debug.put_line ( g_pkg_name
339: || '.'
340: || l_api_name
341: || ':'

Line 338: gme_debug.put_line ( g_pkg_name

334: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
335: -- Insert the event into the batch history table
336: IF NOT gme_common_pvt.create_history (x_batch_header_rec, -1) THEN
337: IF (g_debug <= gme_debug.g_log_procedure) THEN
338: gme_debug.put_line ( g_pkg_name
339: || '.'
340: || l_api_name
341: || ':'
342: || 'create history');

Line 354: IF (g_debug <= gme_debug.g_log_procedure) THEN

350: x_batch_header_rec.last_update_date := gme_common_pvt.g_timestamp;
351: x_batch_header_rec.last_updated_by := gme_common_pvt.g_user_ident;
352: x_batch_header_rec.last_update_login := gme_common_pvt.g_login_id;
353:
354: IF (g_debug <= gme_debug.g_log_procedure) THEN
355: gme_debug.put_line ( g_pkg_name
356: || '.'
357: || l_api_name
358: || ':'

Line 355: gme_debug.put_line ( g_pkg_name

351: x_batch_header_rec.last_updated_by := gme_common_pvt.g_user_ident;
352: x_batch_header_rec.last_update_login := gme_common_pvt.g_login_id;
353:
354: IF (g_debug <= gme_debug.g_log_procedure) THEN
355: gme_debug.put_line ( g_pkg_name
356: || '.'
357: || l_api_name
358: || ':'
359: || 'Exiating cancel batch with status'

Line 364: IF (g_debug <= gme_debug.g_log_procedure) THEN

360: || x_return_status);
361: END IF;
362: EXCEPTION
363: WHEN purge_exception_err THEN
364: IF (g_debug <= gme_debug.g_log_procedure) THEN
365: gme_debug.put_line ( g_pkg_name
366: || '.'
367: || l_api_name
368: || ':'

Line 365: gme_debug.put_line ( g_pkg_name

361: END IF;
362: EXCEPTION
363: WHEN purge_exception_err THEN
364: IF (g_debug <= gme_debug.g_log_procedure) THEN
365: gme_debug.put_line ( g_pkg_name
366: || '.'
367: || l_api_name
368: || ':'
369: || 'purge_exception_err');

Line 374: IF (g_debug <= gme_debug.g_log_procedure) THEN

370: END IF;
371:
372: x_return_status := l_return_status;
373: WHEN material_details_fetch_err THEN
374: IF (g_debug <= gme_debug.g_log_procedure) THEN
375: gme_debug.put_line ( g_pkg_name
376: || '.'
377: || l_api_name
378: || ':'

Line 375: gme_debug.put_line ( g_pkg_name

371:
372: x_return_status := l_return_status;
373: WHEN material_details_fetch_err THEN
374: IF (g_debug <= gme_debug.g_log_procedure) THEN
375: gme_debug.put_line ( g_pkg_name
376: || '.'
377: || l_api_name
378: || ':'
379: || 'MATERIAL_FETCH_ERROR');

Line 384: IF (g_debug <= gme_debug.g_log_procedure) THEN

380: END IF;
381:
382: x_return_status := fnd_api.g_ret_sts_error;
383: WHEN batch_header_fetch_failure THEN
384: IF (g_debug <= gme_debug.g_log_procedure) THEN
385: gme_debug.put_line ( g_pkg_name
386: || '.'
387: || l_api_name
388: || ':'

Line 385: gme_debug.put_line ( g_pkg_name

381:
382: x_return_status := fnd_api.g_ret_sts_error;
383: WHEN batch_header_fetch_failure THEN
384: IF (g_debug <= gme_debug.g_log_procedure) THEN
385: gme_debug.put_line ( g_pkg_name
386: || '.'
387: || l_api_name
388: || ':'
389: || 'BATCH_FETCH_ERROR');

Line 394: IF (g_debug <= gme_debug.g_log_procedure) THEN

390: END IF;
391:
392: x_return_status := fnd_api.g_ret_sts_error;
393: WHEN phantom_batch_cancel_error THEN
394: IF (g_debug <= gme_debug.g_log_procedure) THEN
395: gme_debug.put_line ( g_pkg_name
396: || '.'
397: || l_api_name
398: || ':'

Line 395: gme_debug.put_line ( g_pkg_name

391:
392: x_return_status := fnd_api.g_ret_sts_error;
393: WHEN phantom_batch_cancel_error THEN
394: IF (g_debug <= gme_debug.g_log_procedure) THEN
395: gme_debug.put_line ( g_pkg_name
396: || '.'
397: || l_api_name
398: || ':'
399: || 'PHANTOM_BATCH_CANCEL_ERROR');

Line 404: IF (g_debug <= gme_debug.g_log_procedure) THEN

400: END IF;
401:
402: x_return_status := l_return_status;
403: WHEN batch_header_upd_err THEN
404: IF (g_debug <= gme_debug.g_log_procedure) THEN
405: gme_debug.put_line ( g_pkg_name
406: || '.'
407: || l_api_name
408: || ':'

Line 405: gme_debug.put_line ( g_pkg_name

401:
402: x_return_status := l_return_status;
403: WHEN batch_header_upd_err THEN
404: IF (g_debug <= gme_debug.g_log_procedure) THEN
405: gme_debug.put_line ( g_pkg_name
406: || '.'
407: || l_api_name
408: || ':'
409: || 'BATCH_HEADER_UPD_ERR');

Line 415: IF (g_debug <= gme_debug.g_log_procedure) THEN

411:
412: x_return_status := fnd_api.g_ret_sts_error;
413: gme_common_pvt.log_message ('GME_API_BATCH_HEADER_UPD_ERROR');
414: WHEN batch_hist_insert_err THEN
415: IF (g_debug <= gme_debug.g_log_procedure) THEN
416: gme_debug.put_line ( g_pkg_name
417: || '.'
418: || l_api_name
419: || ':'

Line 416: gme_debug.put_line ( g_pkg_name

412: x_return_status := fnd_api.g_ret_sts_error;
413: gme_common_pvt.log_message ('GME_API_BATCH_HEADER_UPD_ERROR');
414: WHEN batch_hist_insert_err THEN
415: IF (g_debug <= gme_debug.g_log_procedure) THEN
416: gme_debug.put_line ( g_pkg_name
417: || '.'
418: || l_api_name
419: || ':'
420: || 'BATCH_HIST_INSERT_ERR.');

Line 425: IF (g_debug <= gme_debug.g_log_procedure) THEN

421: END IF;
422:
423: x_return_status := fnd_api.g_ret_sts_error;
424: WHEN batch_step_fetch_err THEN
425: IF (g_debug <= gme_debug.g_log_procedure) THEN
426: gme_debug.put_line ( g_pkg_name
427: || '.'
428: || l_api_name
429: || ':'

Line 426: gme_debug.put_line ( g_pkg_name

422:
423: x_return_status := fnd_api.g_ret_sts_error;
424: WHEN batch_step_fetch_err THEN
425: IF (g_debug <= gme_debug.g_log_procedure) THEN
426: gme_debug.put_line ( g_pkg_name
427: || '.'
428: || l_api_name
429: || ':'
430: || ' BATCH_STEP_FETCH_ERR.');

Line 435: IF (g_debug <= gme_debug.g_log_procedure) THEN

431: END IF;
432:
433: x_return_status := fnd_api.g_ret_sts_error;
434: WHEN batch_step_cancel_error THEN
435: IF (g_debug <= gme_debug.g_log_procedure) THEN
436: gme_debug.put_line ( g_pkg_name
437: || '.'
438: || l_api_name
439: || ':'

Line 436: gme_debug.put_line ( g_pkg_name

432:
433: x_return_status := fnd_api.g_ret_sts_error;
434: WHEN batch_step_cancel_error THEN
435: IF (g_debug <= gme_debug.g_log_procedure) THEN
436: gme_debug.put_line ( g_pkg_name
437: || '.'
438: || l_api_name
439: || ':'
440: || ' BATCH_STEP_CANCEL_ERROR.');

Line 446: IF (g_debug <= gme_debug.g_log_procedure) THEN

442:
443: x_return_status := l_return_status;
444: -- 4944024 BEGIN
445: WHEN reservation_delete_err THEN
446: IF (g_debug <= gme_debug.g_log_procedure) THEN
447: gme_debug.put_line ( g_pkg_name
448: || '.'
449: || l_api_name
450: || ':'

Line 447: gme_debug.put_line ( g_pkg_name

443: x_return_status := l_return_status;
444: -- 4944024 BEGIN
445: WHEN reservation_delete_err THEN
446: IF (g_debug <= gme_debug.g_log_procedure) THEN
447: gme_debug.put_line ( g_pkg_name
448: || '.'
449: || l_api_name
450: || ':'
451: || ' DELETE_PROD_SUPPLY_RESV ERROR');

Line 455: IF g_debug <= gme_debug.g_log_unexpected THEN

451: || ' DELETE_PROD_SUPPLY_RESV ERROR');
452: END IF;
453: -- 4944024 END
454: WHEN OTHERS THEN
455: IF g_debug <= gme_debug.g_log_unexpected THEN
456: gme_debug.put_line ( 'When others exception in '
457: || g_pkg_name
458: || '.'
459: || l_api_name

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

452: END IF;
453: -- 4944024 END
454: WHEN OTHERS THEN
455: IF g_debug <= gme_debug.g_log_unexpected THEN
456: gme_debug.put_line ( 'When others exception in '
457: || g_pkg_name
458: || '.'
459: || l_api_name
460: || ' Error is '

Line 508: IF (g_debug <= gme_debug.g_log_statement) THEN

504: BEGIN
505: -- Initially let us assign the return status to success
506: x_return_status := fnd_api.g_ret_sts_success;
507:
508: IF (g_debug <= gme_debug.g_log_statement) THEN
509: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
510: || 'Entering');
511: END IF;
512:

Line 509: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'

505: -- Initially let us assign the return status to success
506: x_return_status := fnd_api.g_ret_sts_success;
507:
508: IF (g_debug <= gme_debug.g_log_statement) THEN
509: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
510: || 'Entering');
511: END IF;
512:
513: l_batch_header_rec := p_batch_header_rec;

Line 515: IF (g_debug <= gme_debug.g_log_statement) THEN

511: END IF;
512:
513: l_batch_header_rec := p_batch_header_rec;
514:
515: IF (g_debug <= gme_debug.g_log_statement) THEN
516: gme_debug.put_line ( g_pkg_name
517: || '.'
518: || l_api_name
519: || ':'

Line 516: gme_debug.put_line ( g_pkg_name

512:
513: l_batch_header_rec := p_batch_header_rec;
514:
515: IF (g_debug <= gme_debug.g_log_statement) THEN
516: gme_debug.put_line ( g_pkg_name
517: || '.'
518: || l_api_name
519: || ':'
520: || 'batch_id:'

Line 522: gme_debug.put_line ( g_pkg_name

518: || l_api_name
519: || ':'
520: || 'batch_id:'
521: || l_batch_header_rec.batch_id);
522: gme_debug.put_line ( g_pkg_name
523: || '.'
524: || l_api_name
525: || ':'
526: || 'organization_id:'

Line 531: IF (g_debug <= gme_debug.g_log_procedure) THEN

527: || l_batch_header_rec.organization_id);
528: END IF;
529: l_material_details_rec.batch_id := l_batch_header_rec.batch_id;
530:
531: IF (g_debug <= gme_debug.g_log_procedure) THEN
532: gme_debug.put_line ( g_pkg_name
533: || '.'
534: || l_api_name
535: || ':'

Line 532: gme_debug.put_line ( g_pkg_name

528: END IF;
529: l_material_details_rec.batch_id := l_batch_header_rec.batch_id;
530:
531: IF (g_debug <= gme_debug.g_log_procedure) THEN
532: gme_debug.put_line ( g_pkg_name
533: || '.'
534: || l_api_name
535: || ':'
536: || 'Call fetch material tab');

Line 549: IF (g_debug <= gme_debug.g_log_procedure) THEN

545: -- Bug 8312658 - Reintroduced recursive logic conditionally for those actions that require it here.
546: -- This code was removed by bug 5411627 for cancel and terminate, but it is needed for complete batch.
547: IF p_recursive = 'R' THEN
548: FOR i IN 1 .. l_material_details_tab.COUNT LOOP
549: IF (g_debug <= gme_debug.g_log_procedure) THEN
550: gme_debug.put_line ( g_pkg_name
551: || '.'
552: || l_api_name
553: || ':'

Line 550: gme_debug.put_line ( g_pkg_name

546: -- This code was removed by bug 5411627 for cancel and terminate, but it is needed for complete batch.
547: IF p_recursive = 'R' THEN
548: FOR i IN 1 .. l_material_details_tab.COUNT LOOP
549: IF (g_debug <= gme_debug.g_log_procedure) THEN
550: gme_debug.put_line ( g_pkg_name
551: || '.'
552: || l_api_name
553: || ':'
554: || 'phantom_id='

Line 560: IF (g_debug <= gme_debug.g_log_procedure) THEN

556: END IF;
557: -- IF PHANTOM_ID is not null,
558: -- THEN recurse from the start for each one.
559: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
560: IF (g_debug <= gme_debug.g_log_procedure) THEN
561: gme_debug.put_line ( g_pkg_name
562: || '.'
563: || l_api_name
564: || ':'

Line 561: gme_debug.put_line ( g_pkg_name

557: -- IF PHANTOM_ID is not null,
558: -- THEN recurse from the start for each one.
559: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
560: IF (g_debug <= gme_debug.g_log_procedure) THEN
561: gme_debug.put_line ( g_pkg_name
562: || '.'
563: || l_api_name
564: || ':'
565: || 'calling purge batch for phantom_id='

Line 591: IF (g_debug <= gme_debug.g_log_statement) THEN

587: END LOOP;
588: END IF; -- If p_recursive = 'R'
589:
590: -- delete move orders
591: IF (g_debug <= gme_debug.g_log_statement) THEN
592: gme_debug.put_line ( g_pkg_name
593: || '.'
594: || l_api_name
595: || ':'

Line 592: gme_debug.put_line ( g_pkg_name

588: END IF; -- If p_recursive = 'R'
589:
590: -- delete move orders
591: IF (g_debug <= gme_debug.g_log_statement) THEN
592: gme_debug.put_line ( g_pkg_name
593: || '.'
594: || l_api_name
595: || ':'
596: || 'deleting move orders for batch_id:'

Line 622: IF (g_debug <= gme_debug.g_log_statement) THEN

618: END IF;
619:
620: IF p_delete_reservations = fnd_api.g_true THEN
621: -- delete all reservations
622: IF (g_debug <= gme_debug.g_log_statement) THEN
623: gme_debug.put_line ( g_pkg_name
624: || '.'
625: || l_api_name
626: || ':'

Line 623: gme_debug.put_line ( g_pkg_name

619:
620: IF p_delete_reservations = fnd_api.g_true THEN
621: -- delete all reservations
622: IF (g_debug <= gme_debug.g_log_statement) THEN
623: gme_debug.put_line ( g_pkg_name
624: || '.'
625: || l_api_name
626: || ':'
627: || 'deleting reservations for batch_id:'

Line 642: IF (g_debug <= gme_debug.g_log_statement) THEN

638: END IF;
639: END IF;
640:
641: IF p_delete_trans_pairs = fnd_api.g_true THEN
642: IF (g_debug <= gme_debug.g_log_statement) THEN
643: gme_debug.put_line ( g_pkg_name
644: || '.'
645: || l_api_name
646: || ':'

Line 643: gme_debug.put_line ( g_pkg_name

639: END IF;
640:
641: IF p_delete_trans_pairs = fnd_api.g_true THEN
642: IF (g_debug <= gme_debug.g_log_statement) THEN
643: gme_debug.put_line ( g_pkg_name
644: || '.'
645: || l_api_name
646: || ':'
647: || 'deleting trans pairs for batch_id:'

Line 659: IF (g_debug <= gme_debug.g_log_statement) THEN

655: IF l_return_status <> fnd_api.g_ret_sts_success THEN
656: RAISE delete_trans_pair_err;
657: END IF;
658: END IF;
659: IF (g_debug <= gme_debug.g_log_statement) THEN
660: gme_debug.put_line ( g_pkg_name
661: || '.'
662: || l_api_name
663: || ':'

Line 660: gme_debug.put_line ( g_pkg_name

656: RAISE delete_trans_pair_err;
657: END IF;
658: END IF;
659: IF (g_debug <= gme_debug.g_log_statement) THEN
660: gme_debug.put_line ( g_pkg_name
661: || '.'
662: || l_api_name
663: || ':'
664: || 'deleting pending product lots for batch_id:'

Line 675: IF (g_debug <= gme_debug.g_log_statement) THEN

671: IF l_return_status <> fnd_api.g_ret_sts_success THEN
672: RAISE delete_pend_prod_lots_err;
673: END IF;
674:
675: IF (g_debug <= gme_debug.g_log_statement) THEN
676: gme_debug.put_line ( g_pkg_name
677: || '.'
678: || l_api_name
679: || ':'

Line 676: gme_debug.put_line ( g_pkg_name

672: RAISE delete_pend_prod_lots_err;
673: END IF;
674:
675: IF (g_debug <= gme_debug.g_log_statement) THEN
676: gme_debug.put_line ( g_pkg_name
677: || '.'
678: || l_api_name
679: || ':'
680: || 'Exiting with '

Line 685: IF (g_debug <= gme_debug.g_log_procedure) THEN

681: || x_return_status);
682: END IF;
683: EXCEPTION
684: WHEN material_details_fetch_err THEN
685: IF (g_debug <= gme_debug.g_log_procedure) THEN
686: gme_debug.put_line ( g_pkg_name
687: || '.'
688: || l_api_name
689: || ':'

Line 686: gme_debug.put_line ( g_pkg_name

682: END IF;
683: EXCEPTION
684: WHEN material_details_fetch_err THEN
685: IF (g_debug <= gme_debug.g_log_procedure) THEN
686: gme_debug.put_line ( g_pkg_name
687: || '.'
688: || l_api_name
689: || ':'
690: || 'MATERIAL_FETCH_ERROR');

Line 695: IF (g_debug <= gme_debug.g_log_procedure) THEN

691: END IF;
692:
693: x_return_status := fnd_api.g_ret_sts_error;
694: WHEN batch_header_fetch_failure THEN
695: IF (g_debug <= gme_debug.g_log_procedure) THEN
696: gme_debug.put_line ( g_pkg_name
697: || '.'
698: || l_api_name
699: || ':'

Line 696: gme_debug.put_line ( g_pkg_name

692:
693: x_return_status := fnd_api.g_ret_sts_error;
694: WHEN batch_header_fetch_failure THEN
695: IF (g_debug <= gme_debug.g_log_procedure) THEN
696: gme_debug.put_line ( g_pkg_name
697: || '.'
698: || l_api_name
699: || ':'
700: || 'BATCH_FETCH_ERROR');

Line 705: IF (g_debug <= gme_debug.g_log_procedure) THEN

701: END IF;
702:
703: x_return_status := fnd_api.g_ret_sts_error;
704: WHEN phantom_batch_purge_error THEN
705: IF (g_debug <= gme_debug.g_log_procedure) THEN
706: gme_debug.put_line ( g_pkg_name
707: || '.'
708: || l_api_name
709: || ':'

Line 706: gme_debug.put_line ( g_pkg_name

702:
703: x_return_status := fnd_api.g_ret_sts_error;
704: WHEN phantom_batch_purge_error THEN
705: IF (g_debug <= gme_debug.g_log_procedure) THEN
706: gme_debug.put_line ( g_pkg_name
707: || '.'
708: || l_api_name
709: || ':'
710: || 'delete_move_order_err');

Line 715: IF (g_debug <= gme_debug.g_log_procedure) THEN

711: END IF;
712:
713: x_return_status := l_return_status;
714: WHEN delete_move_order_err THEN
715: IF (g_debug <= gme_debug.g_log_procedure) THEN
716: gme_debug.put_line ( g_pkg_name
717: || '.'
718: || l_api_name
719: || ':'

Line 716: gme_debug.put_line ( g_pkg_name

712:
713: x_return_status := l_return_status;
714: WHEN delete_move_order_err THEN
715: IF (g_debug <= gme_debug.g_log_procedure) THEN
716: gme_debug.put_line ( g_pkg_name
717: || '.'
718: || l_api_name
719: || ':'
720: || 'delete_move_order_err');

Line 725: IF (g_debug <= gme_debug.g_log_procedure) THEN

721: END IF;
722:
723: x_return_status := l_return_status;
724: WHEN delete_reservations_err THEN
725: IF (g_debug <= gme_debug.g_log_procedure) THEN
726: gme_debug.put_line ( g_pkg_name
727: || '.'
728: || l_api_name
729: || ':'

Line 726: gme_debug.put_line ( g_pkg_name

722:
723: x_return_status := l_return_status;
724: WHEN delete_reservations_err THEN
725: IF (g_debug <= gme_debug.g_log_procedure) THEN
726: gme_debug.put_line ( g_pkg_name
727: || '.'
728: || l_api_name
729: || ':'
730: || 'delete_reservations_err');

Line 735: IF (g_debug <= gme_debug.g_log_procedure) THEN

731: END IF;
732:
733: x_return_status := l_return_status;
734: WHEN delete_trans_pair_err THEN
735: IF (g_debug <= gme_debug.g_log_procedure) THEN
736: gme_debug.put_line ( g_pkg_name
737: || '.'
738: || l_api_name
739: || ':'

Line 736: gme_debug.put_line ( g_pkg_name

732:
733: x_return_status := l_return_status;
734: WHEN delete_trans_pair_err THEN
735: IF (g_debug <= gme_debug.g_log_procedure) THEN
736: gme_debug.put_line ( g_pkg_name
737: || '.'
738: || l_api_name
739: || ':'
740: || 'delete_trans_pair_err');

Line 745: IF (g_debug <= gme_debug.g_log_procedure) THEN

741: END IF;
742:
743: x_return_status := l_return_status;
744: WHEN delete_pend_prod_lots_err THEN
745: IF (g_debug <= gme_debug.g_log_procedure) THEN
746: gme_debug.put_line ( g_pkg_name
747: || '.'
748: || l_api_name
749: || ':'

Line 746: gme_debug.put_line ( g_pkg_name

742:
743: x_return_status := l_return_status;
744: WHEN delete_pend_prod_lots_err THEN
745: IF (g_debug <= gme_debug.g_log_procedure) THEN
746: gme_debug.put_line ( g_pkg_name
747: || '.'
748: || l_api_name
749: || ':'
750: || 'delete_pend_prod_lots_err');

Line 762: IF g_debug <= gme_debug.g_log_unexpected THEN

758: WHEN OTHERS THEN
759: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
760: x_return_status := fnd_api.g_ret_sts_unexp_error;
761:
762: IF g_debug <= gme_debug.g_log_unexpected THEN
763: gme_debug.put_line ( 'When others exception in '
764: || g_pkg_name
765: || '.'
766: || l_api_name

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

759: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
760: x_return_status := fnd_api.g_ret_sts_unexp_error;
761:
762: IF g_debug <= gme_debug.g_log_unexpected THEN
763: gme_debug.put_line ( 'When others exception in '
764: || g_pkg_name
765: || '.'
766: || l_api_name
767: || ' Error is '

Line 787: IF (g_debug <= gme_debug.g_log_statement) THEN

783: BEGIN
784: -- Initially let us assign the return status to success
785: x_return_status := fnd_api.g_ret_sts_success;
786:
787: IF (g_debug <= gme_debug.g_log_statement) THEN
788: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
789: || 'Entering');
790: END IF;
791:

Line 788: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'

784: -- Initially let us assign the return status to success
785: x_return_status := fnd_api.g_ret_sts_success;
786:
787: IF (g_debug <= gme_debug.g_log_statement) THEN
788: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
789: || 'Entering');
790: END IF;
791:
792: IF p_batch_id IS NULL AND p_material_detail_id IS NULL THEN

Line 803: IF (g_debug <= gme_debug.g_log_statement) THEN

799:
800: l_batch_id := p_batch_id;
801: l_material_detail_id := p_material_detail_id;
802:
803: IF (g_debug <= gme_debug.g_log_statement) THEN
804: gme_debug.put_line ( g_pkg_name
805: || '.'
806: || l_api_name
807: || ':'

Line 804: gme_debug.put_line ( g_pkg_name

800: l_batch_id := p_batch_id;
801: l_material_detail_id := p_material_detail_id;
802:
803: IF (g_debug <= gme_debug.g_log_statement) THEN
804: gme_debug.put_line ( g_pkg_name
805: || '.'
806: || l_api_name
807: || ':'
808: || 'batch_id:'

Line 810: gme_debug.put_line ( g_pkg_name

806: || l_api_name
807: || ':'
808: || 'batch_id:'
809: || l_batch_id);
810: gme_debug.put_line ( g_pkg_name
811: || '.'
812: || l_api_name
813: || ':'
814: || 'material_detail_id:'

Line 838: IF g_debug <= gme_debug.g_log_unexpected THEN

834: WHEN OTHERS THEN
835: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
836: x_return_status := fnd_api.g_ret_sts_unexp_error;
837:
838: IF g_debug <= gme_debug.g_log_unexpected THEN
839: gme_debug.put_line ( 'When others exception in '
840: || g_pkg_name
841: || '.'
842: || l_api_name

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

835: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
836: x_return_status := fnd_api.g_ret_sts_unexp_error;
837:
838: IF g_debug <= gme_debug.g_log_unexpected THEN
839: gme_debug.put_line ( 'When others exception in '
840: || g_pkg_name
841: || '.'
842: || l_api_name
843: || ' Error is '