APPS.GME_CANCEL_BATCH_PVT dependencies on GME_DEBUG

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

67: material_details_fetch_err EXCEPTION;
68: batch_header_fetch_failure EXCEPTION;
69: reservation_delete_err EXCEPTION; -- 4944024
70: BEGIN
71: IF (g_debug <= gme_debug.g_log_procedure) THEN
72: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
73: || 'Entering');
74: END IF;
75:

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

68: batch_header_fetch_failure EXCEPTION;
69: reservation_delete_err EXCEPTION; -- 4944024
70: BEGIN
71: IF (g_debug <= gme_debug.g_log_procedure) THEN
72: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
73: || 'Entering');
74: END IF;
75:
76: /* Set the success staus to success inititally*/

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

78: x_batch_header_rec := p_batch_header_rec;
79: -- Now Examine the ingredient material rows :
80: l_material_details_rec.batch_id := x_batch_header_rec.batch_id;
81:
82: IF (g_debug <= gme_debug.g_log_procedure) THEN
83: gme_debug.put_line ( g_pkg_name
84: || '.'
85: || l_api_name
86: || ':'

Line 83: gme_debug.put_line ( g_pkg_name

79: -- Now Examine the ingredient material rows :
80: l_material_details_rec.batch_id := x_batch_header_rec.batch_id;
81:
82: IF (g_debug <= gme_debug.g_log_procedure) THEN
83: gme_debug.put_line ( g_pkg_name
84: || '.'
85: || l_api_name
86: || ':'
87: || 'Call fetch material tab');

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

97: -- 4944024 BEGIN
98: -- Need to delete any reservations agains PROD supply
99: -- ===================================================
100: IF l_material_details_tab(i).line_type <> -1 THEN
101: IF (g_debug <= gme_debug.g_log_procedure) THEN
102: gme_debug.put_line ( g_pkg_name
103: || '.'
104: || l_api_name
105: || ':'

Line 102: gme_debug.put_line ( g_pkg_name

98: -- Need to delete any reservations agains PROD supply
99: -- ===================================================
100: IF l_material_details_tab(i).line_type <> -1 THEN
101: IF (g_debug <= gme_debug.g_log_procedure) THEN
102: gme_debug.put_line ( g_pkg_name
103: || '.'
104: || l_api_name
105: || ':'
106: || ' Call delete_prod_supply_resv');

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

111: ,x_msg_count => l_message_count
112: ,x_msg_data => l_message_data
113: ,x_return_status => x_return_status);
114:
115: IF (g_debug <= gme_debug.g_log_procedure) THEN
116: gme_debug.put_line ( g_pkg_name
117: || '.'
118: || l_api_name
119: || ':'

Line 116: gme_debug.put_line ( g_pkg_name

112: ,x_msg_data => l_message_data
113: ,x_return_status => x_return_status);
114:
115: IF (g_debug <= gme_debug.g_log_procedure) THEN
116: gme_debug.put_line ( g_pkg_name
117: || '.'
118: || l_api_name
119: || ':'
120: || ' Return from delete_prod_supply_resv indicates '

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

125: END IF;
126: END IF;
127: -- 4944024 END
128:
129: IF (g_debug <= gme_debug.g_log_procedure) THEN
130: gme_debug.put_line ( g_pkg_name
131: || '.'
132: || l_api_name
133: || ':'

Line 130: gme_debug.put_line ( g_pkg_name

126: END IF;
127: -- 4944024 END
128:
129: IF (g_debug <= gme_debug.g_log_procedure) THEN
130: gme_debug.put_line ( g_pkg_name
131: || '.'
132: || l_api_name
133: || ':'
134: || 'phantom_id='

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

136: END IF;
137: -- IF PHANTOM_ID is not null,
138: -- THEN recurse from the start for each one.
139: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
140: IF (g_debug <= gme_debug.g_log_procedure) THEN
141: gme_debug.put_line ( g_pkg_name
142: || '.'
143: || l_api_name
144: || ':'

Line 141: gme_debug.put_line ( g_pkg_name

137: -- IF PHANTOM_ID is not null,
138: -- THEN recurse from the start for each one.
139: IF (NVL (l_material_details_tab (i).phantom_id, 0) <> 0) THEN
140: IF (g_debug <= gme_debug.g_log_procedure) THEN
141: gme_debug.put_line ( g_pkg_name
142: || '.'
143: || l_api_name
144: || ':'
145: || 'calling cancel batch for phantom_id='

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

166: END LOOP;
167:
168: -- Delete the Inventory transaction under specific conditions
169: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
170: IF (g_debug <= gme_debug.g_log_procedure) THEN
171: gme_debug.put_line ( g_pkg_name
172: || '.'
173: || l_api_name
174: || ':'

Line 171: gme_debug.put_line ( g_pkg_name

167:
168: -- Delete the Inventory transaction under specific conditions
169: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
170: IF (g_debug <= gme_debug.g_log_procedure) THEN
171: gme_debug.put_line ( g_pkg_name
172: || '.'
173: || l_api_name
174: || ':'
175: || 'calling purge exceptions for batch_id='

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

188: END IF;
189: END IF;
190:
191: -- Now Examine the batch step(POC data) :
192: IF (g_debug <= gme_debug.g_log_procedure) THEN
193: gme_debug.put_line ( g_pkg_name
194: || '.'
195: || l_api_name
196: || ':'

Line 193: gme_debug.put_line ( g_pkg_name

189: END IF;
190:
191: -- Now Examine the batch step(POC data) :
192: IF (g_debug <= gme_debug.g_log_procedure) THEN
193: gme_debug.put_line ( g_pkg_name
194: || '.'
195: || l_api_name
196: || ':'
197: || 'Check routing_id/poc_ind='

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

202:
203: IF x_batch_header_rec.poc_ind = 'Y' THEN
204: /* Now update the batch step status to Cancel (5) */
205: -- Get batch_step_ids bulk collected for batch
206: IF (g_debug <= gme_debug.g_log_procedure) THEN
207: gme_debug.put_line ( g_pkg_name
208: || '.'
209: || l_api_name
210: || ':'

Line 207: gme_debug.put_line ( g_pkg_name

203: IF x_batch_header_rec.poc_ind = 'Y' THEN
204: /* Now update the batch step status to Cancel (5) */
205: -- Get batch_step_ids bulk collected for batch
206: IF (g_debug <= gme_debug.g_log_procedure) THEN
207: gme_debug.put_line ( g_pkg_name
208: || '.'
209: || l_api_name
210: || ':'
211: || 'routing exists');

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

218:
219: CLOSE cur_get_steps;
220:
221: FOR i IN 1 .. l_batch_step_tab.COUNT LOOP
222: IF (g_debug <= gme_debug.g_log_procedure) THEN
223: gme_debug.put_line ( g_pkg_name
224: || '.'
225: || l_api_name
226: || ':'

Line 223: gme_debug.put_line ( g_pkg_name

219: CLOSE cur_get_steps;
220:
221: FOR i IN 1 .. l_batch_step_tab.COUNT LOOP
222: IF (g_debug <= gme_debug.g_log_procedure) THEN
223: gme_debug.put_line ( g_pkg_name
224: || '.'
225: || l_api_name
226: || ':'
227: || 'calling cancel step for step_id='

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

247: /* Set up the fields in output structure. */
248: x_batch_header_rec.batch_status := -1;
249:
250: /* Update the batch status to the database */
251: IF (g_debug <= gme_debug.g_log_procedure) THEN
252: gme_debug.put_line ( g_pkg_name
253: || '.'
254: || l_api_name
255: || ':'

Line 252: gme_debug.put_line ( g_pkg_name

248: x_batch_header_rec.batch_status := -1;
249:
250: /* Update the batch status to the database */
251: IF (g_debug <= gme_debug.g_log_procedure) THEN
252: gme_debug.put_line ( g_pkg_name
253: || '.'
254: || l_api_name
255: || ':'
256: || 'Call batch UPDATE_ROW'

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

263:
264: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
265: -- Insert the event into the batch history table
266: IF NOT gme_common_pvt.create_history (x_batch_header_rec, -1) THEN
267: IF (g_debug <= gme_debug.g_log_procedure) THEN
268: gme_debug.put_line ( g_pkg_name
269: || '.'
270: || l_api_name
271: || ':'

Line 268: gme_debug.put_line ( g_pkg_name

264: IF x_batch_header_rec.update_inventory_ind = 'Y' THEN
265: -- Insert the event into the batch history table
266: IF NOT gme_common_pvt.create_history (x_batch_header_rec, -1) THEN
267: IF (g_debug <= gme_debug.g_log_procedure) THEN
268: gme_debug.put_line ( g_pkg_name
269: || '.'
270: || l_api_name
271: || ':'
272: || 'create history');

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

280: x_batch_header_rec.last_update_date := gme_common_pvt.g_timestamp;
281: x_batch_header_rec.last_updated_by := gme_common_pvt.g_user_ident;
282: x_batch_header_rec.last_update_login := gme_common_pvt.g_login_id;
283:
284: IF (g_debug <= gme_debug.g_log_procedure) THEN
285: gme_debug.put_line ( g_pkg_name
286: || '.'
287: || l_api_name
288: || ':'

Line 285: gme_debug.put_line ( g_pkg_name

281: x_batch_header_rec.last_updated_by := gme_common_pvt.g_user_ident;
282: x_batch_header_rec.last_update_login := gme_common_pvt.g_login_id;
283:
284: IF (g_debug <= gme_debug.g_log_procedure) THEN
285: gme_debug.put_line ( g_pkg_name
286: || '.'
287: || l_api_name
288: || ':'
289: || 'Exiating cancel batch with status'

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

290: || x_return_status);
291: END IF;
292: EXCEPTION
293: WHEN purge_exception_err THEN
294: IF (g_debug <= gme_debug.g_log_procedure) THEN
295: gme_debug.put_line ( g_pkg_name
296: || '.'
297: || l_api_name
298: || ':'

Line 295: gme_debug.put_line ( g_pkg_name

291: END IF;
292: EXCEPTION
293: WHEN purge_exception_err THEN
294: IF (g_debug <= gme_debug.g_log_procedure) THEN
295: gme_debug.put_line ( g_pkg_name
296: || '.'
297: || l_api_name
298: || ':'
299: || 'purge_exception_err');

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

300: END IF;
301:
302: x_return_status := l_return_status;
303: WHEN material_details_fetch_err THEN
304: IF (g_debug <= gme_debug.g_log_procedure) THEN
305: gme_debug.put_line ( g_pkg_name
306: || '.'
307: || l_api_name
308: || ':'

Line 305: gme_debug.put_line ( g_pkg_name

301:
302: x_return_status := l_return_status;
303: WHEN material_details_fetch_err THEN
304: IF (g_debug <= gme_debug.g_log_procedure) THEN
305: gme_debug.put_line ( g_pkg_name
306: || '.'
307: || l_api_name
308: || ':'
309: || 'MATERIAL_FETCH_ERROR');

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

310: END IF;
311:
312: x_return_status := fnd_api.g_ret_sts_error;
313: WHEN batch_header_fetch_failure THEN
314: IF (g_debug <= gme_debug.g_log_procedure) THEN
315: gme_debug.put_line ( g_pkg_name
316: || '.'
317: || l_api_name
318: || ':'

Line 315: gme_debug.put_line ( g_pkg_name

311:
312: x_return_status := fnd_api.g_ret_sts_error;
313: WHEN batch_header_fetch_failure THEN
314: IF (g_debug <= gme_debug.g_log_procedure) THEN
315: gme_debug.put_line ( g_pkg_name
316: || '.'
317: || l_api_name
318: || ':'
319: || 'BATCH_FETCH_ERROR');

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

320: END IF;
321:
322: x_return_status := fnd_api.g_ret_sts_error;
323: WHEN phantom_batch_cancel_error THEN
324: IF (g_debug <= gme_debug.g_log_procedure) THEN
325: gme_debug.put_line ( g_pkg_name
326: || '.'
327: || l_api_name
328: || ':'

Line 325: gme_debug.put_line ( g_pkg_name

321:
322: x_return_status := fnd_api.g_ret_sts_error;
323: WHEN phantom_batch_cancel_error THEN
324: IF (g_debug <= gme_debug.g_log_procedure) THEN
325: gme_debug.put_line ( g_pkg_name
326: || '.'
327: || l_api_name
328: || ':'
329: || 'PHANTOM_BATCH_CANCEL_ERROR');

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

330: END IF;
331:
332: x_return_status := l_return_status;
333: WHEN batch_header_upd_err THEN
334: IF (g_debug <= gme_debug.g_log_procedure) THEN
335: gme_debug.put_line ( g_pkg_name
336: || '.'
337: || l_api_name
338: || ':'

Line 335: gme_debug.put_line ( g_pkg_name

331:
332: x_return_status := l_return_status;
333: WHEN batch_header_upd_err THEN
334: IF (g_debug <= gme_debug.g_log_procedure) THEN
335: gme_debug.put_line ( g_pkg_name
336: || '.'
337: || l_api_name
338: || ':'
339: || 'BATCH_HEADER_UPD_ERR');

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

341:
342: x_return_status := fnd_api.g_ret_sts_error;
343: gme_common_pvt.log_message ('GME_API_BATCH_HEADER_UPD_ERROR');
344: WHEN batch_hist_insert_err THEN
345: IF (g_debug <= gme_debug.g_log_procedure) THEN
346: gme_debug.put_line ( g_pkg_name
347: || '.'
348: || l_api_name
349: || ':'

Line 346: gme_debug.put_line ( g_pkg_name

342: x_return_status := fnd_api.g_ret_sts_error;
343: gme_common_pvt.log_message ('GME_API_BATCH_HEADER_UPD_ERROR');
344: WHEN batch_hist_insert_err THEN
345: IF (g_debug <= gme_debug.g_log_procedure) THEN
346: gme_debug.put_line ( g_pkg_name
347: || '.'
348: || l_api_name
349: || ':'
350: || 'BATCH_HIST_INSERT_ERR.');

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

351: END IF;
352:
353: x_return_status := fnd_api.g_ret_sts_error;
354: WHEN batch_step_fetch_err THEN
355: IF (g_debug <= gme_debug.g_log_procedure) THEN
356: gme_debug.put_line ( g_pkg_name
357: || '.'
358: || l_api_name
359: || ':'

Line 356: gme_debug.put_line ( g_pkg_name

352:
353: x_return_status := fnd_api.g_ret_sts_error;
354: WHEN batch_step_fetch_err THEN
355: IF (g_debug <= gme_debug.g_log_procedure) THEN
356: gme_debug.put_line ( g_pkg_name
357: || '.'
358: || l_api_name
359: || ':'
360: || ' BATCH_STEP_FETCH_ERR.');

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

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

Line 366: gme_debug.put_line ( g_pkg_name

362:
363: x_return_status := fnd_api.g_ret_sts_error;
364: WHEN batch_step_cancel_error THEN
365: IF (g_debug <= gme_debug.g_log_procedure) THEN
366: gme_debug.put_line ( g_pkg_name
367: || '.'
368: || l_api_name
369: || ':'
370: || ' BATCH_STEP_CANCEL_ERROR.');

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

372:
373: x_return_status := l_return_status;
374: -- 4944024 BEGIN
375: WHEN reservation_delete_err THEN
376: IF (g_debug <= gme_debug.g_log_procedure) THEN
377: gme_debug.put_line ( g_pkg_name
378: || '.'
379: || l_api_name
380: || ':'

Line 377: gme_debug.put_line ( g_pkg_name

373: x_return_status := l_return_status;
374: -- 4944024 BEGIN
375: WHEN reservation_delete_err THEN
376: IF (g_debug <= gme_debug.g_log_procedure) THEN
377: gme_debug.put_line ( g_pkg_name
378: || '.'
379: || l_api_name
380: || ':'
381: || ' DELETE_PROD_SUPPLY_RESV ERROR');

Line 385: IF g_debug <= gme_debug.g_log_unexpected THEN

381: || ' DELETE_PROD_SUPPLY_RESV ERROR');
382: END IF;
383: -- 4944024 END
384: WHEN OTHERS THEN
385: IF g_debug <= gme_debug.g_log_unexpected THEN
386: gme_debug.put_line ( 'When others exception in '
387: || g_pkg_name
388: || '.'
389: || l_api_name

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

382: END IF;
383: -- 4944024 END
384: WHEN OTHERS THEN
385: IF g_debug <= gme_debug.g_log_unexpected THEN
386: gme_debug.put_line ( 'When others exception in '
387: || g_pkg_name
388: || '.'
389: || l_api_name
390: || ' Error is '

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

421: BEGIN
422: -- Initially let us assign the return status to success
423: x_return_status := fnd_api.g_ret_sts_success;
424:
425: IF (g_debug <= gme_debug.g_log_statement) THEN
426: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
427: || 'Entering');
428: END IF;
429:

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

422: -- Initially let us assign the return status to success
423: x_return_status := fnd_api.g_ret_sts_success;
424:
425: IF (g_debug <= gme_debug.g_log_statement) THEN
426: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
427: || 'Entering');
428: END IF;
429:
430: l_batch_header_rec := p_batch_header_rec;

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

428: END IF;
429:
430: l_batch_header_rec := p_batch_header_rec;
431:
432: IF (g_debug <= gme_debug.g_log_statement) THEN
433: gme_debug.put_line ( g_pkg_name
434: || '.'
435: || l_api_name
436: || ':'

Line 433: gme_debug.put_line ( g_pkg_name

429:
430: l_batch_header_rec := p_batch_header_rec;
431:
432: IF (g_debug <= gme_debug.g_log_statement) THEN
433: gme_debug.put_line ( g_pkg_name
434: || '.'
435: || l_api_name
436: || ':'
437: || 'batch_id:'

Line 439: gme_debug.put_line ( g_pkg_name

435: || l_api_name
436: || ':'
437: || 'batch_id:'
438: || l_batch_header_rec.batch_id);
439: gme_debug.put_line ( g_pkg_name
440: || '.'
441: || l_api_name
442: || ':'
443: || 'organization_id:'

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

444: || l_batch_header_rec.organization_id);
445: END IF;
446: l_material_details_rec.batch_id := l_batch_header_rec.batch_id;
447:
448: IF (g_debug <= gme_debug.g_log_procedure) THEN
449: gme_debug.put_line ( g_pkg_name
450: || '.'
451: || l_api_name
452: || ':'

Line 449: gme_debug.put_line ( g_pkg_name

445: END IF;
446: l_material_details_rec.batch_id := l_batch_header_rec.batch_id;
447:
448: IF (g_debug <= gme_debug.g_log_procedure) THEN
449: gme_debug.put_line ( g_pkg_name
450: || '.'
451: || l_api_name
452: || ':'
453: || 'Call fetch material tab');

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

459: RAISE material_details_fetch_err;
460: END IF;
461:
462: -- delete move orders
463: IF (g_debug <= gme_debug.g_log_statement) THEN
464: gme_debug.put_line ( g_pkg_name
465: || '.'
466: || l_api_name
467: || ':'

Line 464: gme_debug.put_line ( g_pkg_name

460: END IF;
461:
462: -- delete move orders
463: IF (g_debug <= gme_debug.g_log_statement) THEN
464: gme_debug.put_line ( g_pkg_name
465: || '.'
466: || l_api_name
467: || ':'
468: || 'deleting move orders for batch_id:'

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

480: END IF;
481:
482: IF p_delete_reservations = fnd_api.g_true THEN
483: -- delete all reservations
484: IF (g_debug <= gme_debug.g_log_statement) THEN
485: gme_debug.put_line ( g_pkg_name
486: || '.'
487: || l_api_name
488: || ':'

Line 485: gme_debug.put_line ( g_pkg_name

481:
482: IF p_delete_reservations = fnd_api.g_true THEN
483: -- delete all reservations
484: IF (g_debug <= gme_debug.g_log_statement) THEN
485: gme_debug.put_line ( g_pkg_name
486: || '.'
487: || l_api_name
488: || ':'
489: || 'deleting reservations for batch_id:'

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

499: RAISE delete_reservations_err;
500: END IF;
501: END IF;
502: IF p_delete_trans_pairs = fnd_api.g_true THEN
503: IF (g_debug <= gme_debug.g_log_statement) THEN
504: gme_debug.put_line ( g_pkg_name
505: || '.'
506: || l_api_name
507: || ':'

Line 504: gme_debug.put_line ( g_pkg_name

500: END IF;
501: END IF;
502: IF p_delete_trans_pairs = fnd_api.g_true THEN
503: IF (g_debug <= gme_debug.g_log_statement) THEN
504: gme_debug.put_line ( g_pkg_name
505: || '.'
506: || l_api_name
507: || ':'
508: || 'deleting trans pairs for batch_id:'

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

516: IF l_return_status <> fnd_api.g_ret_sts_success THEN
517: RAISE delete_trans_pair_err;
518: END IF;
519: END IF;
520: IF (g_debug <= gme_debug.g_log_statement) THEN
521: gme_debug.put_line ( g_pkg_name
522: || '.'
523: || l_api_name
524: || ':'

Line 521: gme_debug.put_line ( g_pkg_name

517: RAISE delete_trans_pair_err;
518: END IF;
519: END IF;
520: IF (g_debug <= gme_debug.g_log_statement) THEN
521: gme_debug.put_line ( g_pkg_name
522: || '.'
523: || l_api_name
524: || ':'
525: || 'deleting pending product lots for batch_id:'

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

532: IF l_return_status <> fnd_api.g_ret_sts_success THEN
533: RAISE delete_pend_prod_lots_err;
534: END IF;
535:
536: IF (g_debug <= gme_debug.g_log_statement) THEN
537: gme_debug.put_line ( g_pkg_name
538: || '.'
539: || l_api_name
540: || ':'

Line 537: gme_debug.put_line ( g_pkg_name

533: RAISE delete_pend_prod_lots_err;
534: END IF;
535:
536: IF (g_debug <= gme_debug.g_log_statement) THEN
537: gme_debug.put_line ( g_pkg_name
538: || '.'
539: || l_api_name
540: || ':'
541: || 'Exiting with '

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

542: || x_return_status);
543: END IF;
544: EXCEPTION
545: WHEN material_details_fetch_err THEN
546: IF (g_debug <= gme_debug.g_log_procedure) THEN
547: gme_debug.put_line ( g_pkg_name
548: || '.'
549: || l_api_name
550: || ':'

Line 547: gme_debug.put_line ( g_pkg_name

543: END IF;
544: EXCEPTION
545: WHEN material_details_fetch_err THEN
546: IF (g_debug <= gme_debug.g_log_procedure) THEN
547: gme_debug.put_line ( g_pkg_name
548: || '.'
549: || l_api_name
550: || ':'
551: || 'MATERIAL_FETCH_ERROR');

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

552: END IF;
553:
554: x_return_status := fnd_api.g_ret_sts_error;
555: WHEN batch_header_fetch_failure THEN
556: IF (g_debug <= gme_debug.g_log_procedure) THEN
557: gme_debug.put_line ( g_pkg_name
558: || '.'
559: || l_api_name
560: || ':'

Line 557: gme_debug.put_line ( g_pkg_name

553:
554: x_return_status := fnd_api.g_ret_sts_error;
555: WHEN batch_header_fetch_failure THEN
556: IF (g_debug <= gme_debug.g_log_procedure) THEN
557: gme_debug.put_line ( g_pkg_name
558: || '.'
559: || l_api_name
560: || ':'
561: || 'BATCH_FETCH_ERROR');

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

562: END IF;
563:
564: x_return_status := fnd_api.g_ret_sts_error;
565: WHEN phantom_batch_purge_error THEN
566: IF (g_debug <= gme_debug.g_log_procedure) THEN
567: gme_debug.put_line ( g_pkg_name
568: || '.'
569: || l_api_name
570: || ':'

Line 567: gme_debug.put_line ( g_pkg_name

563:
564: x_return_status := fnd_api.g_ret_sts_error;
565: WHEN phantom_batch_purge_error THEN
566: IF (g_debug <= gme_debug.g_log_procedure) THEN
567: gme_debug.put_line ( g_pkg_name
568: || '.'
569: || l_api_name
570: || ':'
571: || 'delete_move_order_err');

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

572: END IF;
573:
574: x_return_status := l_return_status;
575: WHEN delete_move_order_err THEN
576: IF (g_debug <= gme_debug.g_log_procedure) THEN
577: gme_debug.put_line ( g_pkg_name
578: || '.'
579: || l_api_name
580: || ':'

Line 577: gme_debug.put_line ( g_pkg_name

573:
574: x_return_status := l_return_status;
575: WHEN delete_move_order_err THEN
576: IF (g_debug <= gme_debug.g_log_procedure) THEN
577: gme_debug.put_line ( g_pkg_name
578: || '.'
579: || l_api_name
580: || ':'
581: || 'delete_move_order_err');

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

582: END IF;
583:
584: x_return_status := l_return_status;
585: WHEN delete_reservations_err THEN
586: IF (g_debug <= gme_debug.g_log_procedure) THEN
587: gme_debug.put_line ( g_pkg_name
588: || '.'
589: || l_api_name
590: || ':'

Line 587: gme_debug.put_line ( g_pkg_name

583:
584: x_return_status := l_return_status;
585: WHEN delete_reservations_err THEN
586: IF (g_debug <= gme_debug.g_log_procedure) THEN
587: gme_debug.put_line ( g_pkg_name
588: || '.'
589: || l_api_name
590: || ':'
591: || 'delete_reservations_err');

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

592: END IF;
593:
594: x_return_status := l_return_status;
595: WHEN delete_trans_pair_err THEN
596: IF (g_debug <= gme_debug.g_log_procedure) THEN
597: gme_debug.put_line ( g_pkg_name
598: || '.'
599: || l_api_name
600: || ':'

Line 597: gme_debug.put_line ( g_pkg_name

593:
594: x_return_status := l_return_status;
595: WHEN delete_trans_pair_err THEN
596: IF (g_debug <= gme_debug.g_log_procedure) THEN
597: gme_debug.put_line ( g_pkg_name
598: || '.'
599: || l_api_name
600: || ':'
601: || 'delete_trans_pair_err');

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

602: END IF;
603:
604: x_return_status := l_return_status;
605: WHEN delete_pend_prod_lots_err THEN
606: IF (g_debug <= gme_debug.g_log_procedure) THEN
607: gme_debug.put_line ( g_pkg_name
608: || '.'
609: || l_api_name
610: || ':'

Line 607: gme_debug.put_line ( g_pkg_name

603:
604: x_return_status := l_return_status;
605: WHEN delete_pend_prod_lots_err THEN
606: IF (g_debug <= gme_debug.g_log_procedure) THEN
607: gme_debug.put_line ( g_pkg_name
608: || '.'
609: || l_api_name
610: || ':'
611: || 'delete_pend_prod_lots_err');

Line 623: IF g_debug <= gme_debug.g_log_unexpected THEN

619: WHEN OTHERS THEN
620: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
621: x_return_status := fnd_api.g_ret_sts_unexp_error;
622:
623: IF g_debug <= gme_debug.g_log_unexpected THEN
624: gme_debug.put_line ( 'When others exception in '
625: || g_pkg_name
626: || '.'
627: || l_api_name

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

620: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
621: x_return_status := fnd_api.g_ret_sts_unexp_error;
622:
623: IF g_debug <= gme_debug.g_log_unexpected THEN
624: gme_debug.put_line ( 'When others exception in '
625: || g_pkg_name
626: || '.'
627: || l_api_name
628: || ' Error is '

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

644: BEGIN
645: -- Initially let us assign the return status to success
646: x_return_status := fnd_api.g_ret_sts_success;
647:
648: IF (g_debug <= gme_debug.g_log_statement) THEN
649: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
650: || 'Entering');
651: END IF;
652:

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

645: -- Initially let us assign the return status to success
646: x_return_status := fnd_api.g_ret_sts_success;
647:
648: IF (g_debug <= gme_debug.g_log_statement) THEN
649: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'
650: || 'Entering');
651: END IF;
652:
653: IF p_batch_id IS NULL AND p_material_detail_id IS NULL THEN

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

660:
661: l_batch_id := p_batch_id;
662: l_material_detail_id := p_material_detail_id;
663:
664: IF (g_debug <= gme_debug.g_log_statement) THEN
665: gme_debug.put_line ( g_pkg_name
666: || '.'
667: || l_api_name
668: || ':'

Line 665: gme_debug.put_line ( g_pkg_name

661: l_batch_id := p_batch_id;
662: l_material_detail_id := p_material_detail_id;
663:
664: IF (g_debug <= gme_debug.g_log_statement) THEN
665: gme_debug.put_line ( g_pkg_name
666: || '.'
667: || l_api_name
668: || ':'
669: || 'batch_id:'

Line 671: gme_debug.put_line ( g_pkg_name

667: || l_api_name
668: || ':'
669: || 'batch_id:'
670: || l_batch_id);
671: gme_debug.put_line ( g_pkg_name
672: || '.'
673: || l_api_name
674: || ':'
675: || 'material_detail_id:'

Line 699: IF g_debug <= gme_debug.g_log_unexpected THEN

695: WHEN OTHERS THEN
696: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
697: x_return_status := fnd_api.g_ret_sts_unexp_error;
698:
699: IF g_debug <= gme_debug.g_log_unexpected THEN
700: gme_debug.put_line ( 'When others exception in '
701: || g_pkg_name
702: || '.'
703: || l_api_name

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

696: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
697: x_return_status := fnd_api.g_ret_sts_unexp_error;
698:
699: IF g_debug <= gme_debug.g_log_unexpected THEN
700: gme_debug.put_line ( 'When others exception in '
701: || g_pkg_name
702: || '.'
703: || l_api_name
704: || ' Error is '