DBA Data[Home] [Help]

APPS.GME_PICKING_PVT dependencies on GME_DEBUG

Line 85: gme_debug.log_initialize ('ConcPicking');

81: TYPE pick_ref IS REF CURSOR;
82: l_pick_cursor pick_ref;
83: BEGIN
84: IF g_debug IS NOT NULL THEN
85: gme_debug.log_initialize ('ConcPicking');
86: END IF;
87: IF g_debug <= gme_debug.g_log_procedure THEN
88: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
89: END IF;

Line 87: IF g_debug <= gme_debug.g_log_procedure THEN

83: BEGIN
84: IF g_debug IS NOT NULL THEN
85: gme_debug.log_initialize ('ConcPicking');
86: END IF;
87: IF g_debug <= gme_debug.g_log_procedure THEN
88: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
89: END IF;
90: l_where := 'NVL(open_qty,0) > 0';
91: l_where := l_where || ' AND organization_id = :organization_id';

Line 88: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);

84: IF g_debug IS NOT NULL THEN
85: gme_debug.log_initialize ('ConcPicking');
86: END IF;
87: IF g_debug <= gme_debug.g_log_procedure THEN
88: gme_debug.put_line ('Entering api ' || g_pkg_name || '.' || l_api_name);
89: END IF;
90: l_where := 'NVL(open_qty,0) > 0';
91: l_where := l_where || ' AND organization_id = :organization_id';
92: IF (TO_NUMBER(p_all_batches) = 2) THEN

Line 123: IF g_debug <= gme_debug.g_log_statement THEN

119: || ' AND material_requirement_date <= SYSDATE + NVL(:days_forward, 100000)'
120: || ' AND material_requirement_date >= NVL(:from_req_date, material_requirement_date)'
121: || ' AND material_requirement_date <= NVL(:to_req_date, material_requirement_date)';
122: l_sql_stmt := 'SELECT * FROM gme_ingred_pick_vw WHERE ' || l_where;
123: IF g_debug <= gme_debug.g_log_statement THEN
124: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'|| l_sql_stmt);
125: END IF;
126: OPEN l_pick_cursor FOR l_sql_stmt
127: USING p_organization_id, p_from_batch, p_to_batch, p_oprn_no, p_oprn_vers,

Line 124: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'|| l_sql_stmt);

120: || ' AND material_requirement_date >= NVL(:from_req_date, material_requirement_date)'
121: || ' AND material_requirement_date <= NVL(:to_req_date, material_requirement_date)';
122: l_sql_stmt := 'SELECT * FROM gme_ingred_pick_vw WHERE ' || l_where;
123: IF g_debug <= gme_debug.g_log_statement THEN
124: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':'|| l_sql_stmt);
125: END IF;
126: OPEN l_pick_cursor FOR l_sql_stmt
127: USING p_organization_id, p_from_batch, p_to_batch, p_oprn_no, p_oprn_vers,
128: p_product_no, p_organization_id, p_organization_id, p_product_no,

Line 134: IF g_debug <= gme_debug.g_log_statement THEN

130: p_days_forward, fnd_date.canonical_to_date(p_from_req_date),
131: fnd_date.canonical_to_date(p_to_req_date);
132: FETCH l_pick_cursor BULK COLLECT INTO l_picking_tbl;
133: CLOSE l_pick_cursor;
134: IF g_debug <= gme_debug.g_log_statement THEN
135: gme_debug.put_line(g_pkg_name|| '.'|| l_api_name|| ':No. of records found = '|| l_picking_tbl.COUNT);
136: END IF;
137:
138: FOR i IN 1 .. l_picking_tbl.COUNT LOOP

Line 135: gme_debug.put_line(g_pkg_name|| '.'|| l_api_name|| ':No. of records found = '|| l_picking_tbl.COUNT);

131: fnd_date.canonical_to_date(p_to_req_date);
132: FETCH l_pick_cursor BULK COLLECT INTO l_picking_tbl;
133: CLOSE l_pick_cursor;
134: IF g_debug <= gme_debug.g_log_statement THEN
135: gme_debug.put_line(g_pkg_name|| '.'|| l_api_name|| ':No. of records found = '|| l_picking_tbl.COUNT);
136: END IF;
137:
138: FOR i IN 1 .. l_picking_tbl.COUNT LOOP
139: l_mat_req_tbl (i).organization_id :=

Line 164: IF g_debug <= gme_debug.g_log_statement THEN

160: ,p_plan_tasks => p_plan_tasks
161: ,x_return_status => l_return_status
162: ,x_conc_request_id => l_conc_request_id);
163:
164: IF g_debug <= gme_debug.g_log_statement THEN
165: gme_debug.put_line ( g_pkg_name
166: || '.'
167: || l_api_name
168: || ':Return from pick_material is '

Line 165: gme_debug.put_line ( g_pkg_name

161: ,x_return_status => l_return_status
162: ,x_conc_request_id => l_conc_request_id);
163:
164: IF g_debug <= gme_debug.g_log_statement THEN
165: gme_debug.put_line ( g_pkg_name
166: || '.'
167: || l_api_name
168: || ':Return from pick_material is '
169: || l_return_status);

Line 176: IF g_debug <= gme_debug.g_log_procedure THEN

172: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
173: RAISE pick_material_err;
174: END IF;
175:
176: IF g_debug <= gme_debug.g_log_procedure THEN
177: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
178: END IF;
179: EXCEPTION
180: WHEN build_where_err OR pick_material_err THEN

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

173: RAISE pick_material_err;
174: END IF;
175:
176: IF g_debug <= gme_debug.g_log_procedure THEN
177: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
178: END IF;
179: EXCEPTION
180: WHEN build_where_err OR pick_material_err THEN
181: gme_common_pvt.count_and_get (x_count => l_msg_count

Line 187: IF g_debug <= gme_debug.g_log_unexpected THEN

183: raise_application_error (-20000, l_msg_data, TRUE);
184: WHEN OTHERS THEN
185: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
186:
187: IF g_debug <= gme_debug.g_log_unexpected THEN
188: gme_debug.put_line ( 'When others exception in '
189: || g_pkg_name
190: || '.'
191: || l_api_name

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

184: WHEN OTHERS THEN
185: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
186:
187: IF g_debug <= gme_debug.g_log_unexpected THEN
188: gme_debug.put_line ( 'When others exception in '
189: || g_pkg_name
190: || '.'
191: || l_api_name
192: || ' Error is '

Line 222: IF g_debug <= gme_debug.g_log_procedure THEN

218: l_open_qty NUMBER := 0;
219: l_return_status VARCHAR2 (1);
220: l_mtl_dtl_rec gme_material_details%ROWTYPE;
221: BEGIN
222: IF g_debug <= gme_debug.g_log_procedure THEN
223: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
224: || l_api_name);
225: END IF;
226:

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

219: l_return_status VARCHAR2 (1);
220: l_mtl_dtl_rec gme_material_details%ROWTYPE;
221: BEGIN
222: IF g_debug <= gme_debug.g_log_procedure THEN
223: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
224: || l_api_name);
225: END IF;
226:
227: l_mtl_dtl_rec.organization_id := p_organization_id;

Line 255: IF g_debug <= gme_debug.g_log_unexpected THEN

251: EXCEPTION
252: WHEN OTHERS THEN
253: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
254:
255: IF g_debug <= gme_debug.g_log_unexpected THEN
256: gme_debug.put_line ( 'When others exception in '
257: || g_pkg_name
258: || '.'
259: || l_api_name

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

252: WHEN OTHERS THEN
253: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
254:
255: IF g_debug <= gme_debug.g_log_unexpected THEN
256: gme_debug.put_line ( 'When others exception in '
257: || g_pkg_name
258: || '.'
259: || l_api_name
260: || ' Error is '

Line 365: gme_debug.log_initialize ('PickMaterial');

361: process_line_err EXCEPTION;
362: print_pickslip_err EXCEPTION;
363: BEGIN
364: IF g_debug IS NOT NULL THEN
365: gme_debug.log_initialize ('PickMaterial');
366: END IF;
367:
368: IF g_debug <= gme_debug.g_log_procedure THEN
369: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'

Line 368: IF g_debug <= gme_debug.g_log_procedure THEN

364: IF g_debug IS NOT NULL THEN
365: gme_debug.log_initialize ('PickMaterial');
366: END IF;
367:
368: IF g_debug <= gme_debug.g_log_procedure THEN
369: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
370: || l_api_name);
371: END IF;
372:

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

365: gme_debug.log_initialize ('PickMaterial');
366: END IF;
367:
368: IF g_debug <= gme_debug.g_log_procedure THEN
369: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
370: || l_api_name);
371: END IF;
372:
373: x_return_status := fnd_api.g_ret_sts_success;

Line 376: IF g_debug <= gme_debug.g_log_statement THEN

372:
373: x_return_status := fnd_api.g_ret_sts_success;
374: l_count := p_mtl_req_tbl.COUNT;
375:
376: IF g_debug <= gme_debug.g_log_statement THEN
377: gme_debug.put_line ( g_pkg_name
378: || '.'
379: || l_api_name
380: || ':Material Requirement count is '

Line 377: gme_debug.put_line ( g_pkg_name

373: x_return_status := fnd_api.g_ret_sts_success;
374: l_count := p_mtl_req_tbl.COUNT;
375:
376: IF g_debug <= gme_debug.g_log_statement THEN
377: gme_debug.put_line ( g_pkg_name
378: || '.'
379: || l_api_name
380: || ':Material Requirement count is '
381: || l_count);

Line 398: IF g_debug <= gme_debug.g_log_statement THEN

394: RAISE setup_failure;
395: END IF;
396: END IF;
397:
398: IF g_debug <= gme_debug.g_log_statement THEN
399: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':After setup');
400: END IF;
401:
402: -- Bug 13076579 - Moved creation of MO hdr inside loop to avoid creating it unnecessarily.

Line 399: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':After setup');

395: END IF;
396: END IF;
397:
398: IF g_debug <= gme_debug.g_log_statement THEN
399: gme_debug.put_line (g_pkg_name || '.' || l_api_name || ':After setup');
400: END IF;
401:
402: -- Bug 13076579 - Moved creation of MO hdr inside loop to avoid creating it unnecessarily.
403: /*

Line 415: IF g_debug <= gme_debug.g_log_statement THEN

411: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
412: RAISE create_move_order_err;
413: END IF;
414:
415: IF g_debug <= gme_debug.g_log_statement THEN
416: gme_debug.put_line ( g_pkg_name
417: || '.'
418: || l_api_name
419: || ':Move order header created is '

Line 416: gme_debug.put_line ( g_pkg_name

412: RAISE create_move_order_err;
413: END IF;
414:
415: IF g_debug <= gme_debug.g_log_statement THEN
416: gme_debug.put_line ( g_pkg_name
417: || '.'
418: || l_api_name
419: || ':Move order header created is '
420: || l_move_order_header_id);

Line 445: IF g_debug <= gme_debug.g_log_statement THEN

441: FETCH cur_pending_move_orders_sum INTO l_mo_sum;
442: CLOSE cur_pending_move_orders_sum;
443: END IF;
444:
445: IF g_debug <= gme_debug.g_log_statement THEN
446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));
447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));
448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));
449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));

Line 446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));

442: CLOSE cur_pending_move_orders_sum;
443: END IF;
444:
445: IF g_debug <= gme_debug.g_log_statement THEN
446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));
447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));
448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));
449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));
450: END IF;

Line 447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));

443: END IF;
444:
445: IF g_debug <= gme_debug.g_log_statement THEN
446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));
447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));
448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));
449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));
450: END IF;
451:

Line 448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));

444:
445: IF g_debug <= gme_debug.g_log_statement THEN
446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));
447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));
448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));
449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));
450: END IF;
451:
452: -- Bug 13076579 - Do not create a move order if the existing MO already accounts for the open qty.

Line 449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));

445: IF g_debug <= gme_debug.g_log_statement THEN
446: gme_debug.put_line ('iteration is '|| TO_CHAR(i));
447: gme_debug.put_line ('material_detail_id is '|| TO_CHAR(p_mtl_req_tbl (i).material_detail_id));
448: gme_debug.put_line ('open_qty is '|| TO_CHAR(p_mtl_req_tbl (i).open_qty));
449: gme_debug.put_line ('l_mo_sum is '|| TO_CHAR(l_mo_sum));
450: END IF;
451:
452: -- Bug 13076579 - Do not create a move order if the existing MO already accounts for the open qty.
453: IF l_mo_sum < p_mtl_req_tbl (i).open_qty THEN

Line 467: IF g_debug <= gme_debug.g_log_statement THEN

463: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
464: RAISE create_move_order_err;
465: END IF;
466:
467: IF g_debug <= gme_debug.g_log_statement THEN
468: gme_debug.put_line ( g_pkg_name
469: || '.'
470: || l_api_name
471: || ':Move order header created is '

Line 468: gme_debug.put_line ( g_pkg_name

464: RAISE create_move_order_err;
465: END IF;
466:
467: IF g_debug <= gme_debug.g_log_statement THEN
468: gme_debug.put_line ( g_pkg_name
469: || '.'
470: || l_api_name
471: || ':Move order header created is '
472: || l_move_order_header_id);

Line 509: IF g_debug <= gme_debug.g_log_statement THEN

505:
506: CLOSE cur_pending_move_orders;
507: END LOOP;
508:
509: IF g_debug <= gme_debug.g_log_statement THEN
510: gme_debug.put_line
511: ( g_pkg_name
512: || '.'
513: || l_api_name

Line 510: gme_debug.put_line

506: CLOSE cur_pending_move_orders;
507: END LOOP;
508:
509: IF g_debug <= gme_debug.g_log_statement THEN
510: gme_debug.put_line
511: ( g_pkg_name
512: || '.'
513: || l_api_name
514: || ':No. of lines to create move_order_lines is '

Line 532: IF g_debug <= gme_debug.g_log_statement THEN

528: END IF;
529:
530: l_count := l_trolin_tbl.COUNT;
531:
532: IF g_debug <= gme_debug.g_log_statement THEN
533: gme_debug.put_line ( g_pkg_name
534: || '.'
535: || l_api_name
536: || ':No. Move order lines created is '

Line 533: gme_debug.put_line ( g_pkg_name

529:
530: l_count := l_trolin_tbl.COUNT;
531:
532: IF g_debug <= gme_debug.g_log_statement THEN
533: gme_debug.put_line ( g_pkg_name
534: || '.'
535: || l_api_name
536: || ':No. Move order lines created is '
537: || l_count);

Line 538: gme_debug.put_line ( g_pkg_name

534: || '.'
535: || l_api_name
536: || ':No. Move order lines created is '
537: || l_count);
538: gme_debug.put_line ( g_pkg_name
539: || '.'
540: || l_api_name
541: || ':No. Pending Move order lines is '
542: || l_pend_lines_tbl.COUNT);

Line 565: IF g_debug <= gme_debug.g_log_statement THEN

561: END LOOP;
562:
563: IF ( p_print_pick_slip = 'Y'
564: AND (g_fully_allocated OR g_partially_allocated) ) THEN
565: IF g_debug <= gme_debug.g_log_statement THEN
566: gme_debug.put_line ( g_pkg_name
567: || '.'
568: || l_api_name
569: || ':Calling print picklsip');

Line 566: gme_debug.put_line ( g_pkg_name

562:
563: IF ( p_print_pick_slip = 'Y'
564: AND (g_fully_allocated OR g_partially_allocated) ) THEN
565: IF g_debug <= gme_debug.g_log_statement THEN
566: gme_debug.put_line ( g_pkg_name
567: || '.'
568: || l_api_name
569: || ':Calling print picklsip');
570: END IF;

Line 588: IF g_debug <= gme_debug.g_log_statement THEN

584: ,p_mo_request_number => l_move_order_header_id
585: ,p_plan_tasks => l_plan_tasks);
586:
587:
588: IF g_debug <= gme_debug.g_log_statement THEN
589: gme_debug.put_line ( g_pkg_name
590: || '.'
591: || l_api_name
592: || ':Print picklsip returns '

Line 589: gme_debug.put_line ( g_pkg_name

585: ,p_plan_tasks => l_plan_tasks);
586:
587:
588: IF g_debug <= gme_debug.g_log_statement THEN
589: gme_debug.put_line ( g_pkg_name
590: || '.'
591: || l_api_name
592: || ':Print picklsip returns '
593: || l_return_status);

Line 594: gme_debug.put_line ( g_pkg_name

590: || '.'
591: || l_api_name
592: || ':Print picklsip returns '
593: || l_return_status);
594: gme_debug.put_line ( g_pkg_name
595: || '.'
596: || l_api_name
597: || ':Print picklsip message '
598: || l_msg_data);

Line 614: IF g_debug <= gme_debug.g_log_unexpected THEN

610: ,p_token1_name => 'MO_NUMBER'
611: ,p_token1_value => l_move_order_header_id
612: ,p_token2_name => 'CONC_REQUEST_ID'
613: ,p_token2_value => l_conc_req_id);
614: IF g_debug <= gme_debug.g_log_unexpected THEN
615: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
616: END IF;
617: ELSIF (g_partially_allocated OR g_fully_allocated) THEN
618: gme_common_pvt.log_message

Line 615: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));

611: ,p_token1_value => l_move_order_header_id
612: ,p_token2_name => 'CONC_REQUEST_ID'
613: ,p_token2_value => l_conc_req_id);
614: IF g_debug <= gme_debug.g_log_unexpected THEN
615: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
616: END IF;
617: ELSIF (g_partially_allocated OR g_fully_allocated) THEN
618: gme_common_pvt.log_message
619: (p_message_code => 'GME_PICKED_PARTIAL_PRINTED'

Line 624: IF g_debug <= gme_debug.g_log_unexpected THEN

620: ,p_token1_name => 'MO_NUMBER'
621: ,p_token1_value => l_move_order_header_id
622: ,p_token2_name => 'CONC_REQUEST_ID'
623: ,p_token2_value => l_conc_req_id);
624: IF g_debug <= gme_debug.g_log_unexpected THEN
625: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
626: END IF;
627: END IF;
628: ELSE

Line 625: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));

621: ,p_token1_value => l_move_order_header_id
622: ,p_token2_name => 'CONC_REQUEST_ID'
623: ,p_token2_value => l_conc_req_id);
624: IF g_debug <= gme_debug.g_log_unexpected THEN
625: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
626: END IF;
627: END IF;
628: ELSE
629: IF (NOT (g_partially_allocated) AND NOT (g_not_allocated) ) THEN

Line 634: IF g_debug <= gme_debug.g_log_unexpected THEN

630: gme_common_pvt.log_message
631: (p_message_code => 'GME_PICKED_ALL'
632: ,p_token1_name => 'MO_NUMBER'
633: ,p_token1_value => l_move_order_header_id);
634: IF g_debug <= gme_debug.g_log_unexpected THEN
635: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
636: END IF;
637: ELSIF (g_partially_allocated OR g_fully_allocated) THEN
638: gme_common_pvt.log_message

Line 635: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));

631: (p_message_code => 'GME_PICKED_ALL'
632: ,p_token1_name => 'MO_NUMBER'
633: ,p_token1_value => l_move_order_header_id);
634: IF g_debug <= gme_debug.g_log_unexpected THEN
635: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
636: END IF;
637: ELSIF (g_partially_allocated OR g_fully_allocated) THEN
638: gme_common_pvt.log_message
639: (p_message_code => 'GME_PICKED_PARTIAL'

Line 642: IF g_debug <= gme_debug.g_log_unexpected THEN

638: gme_common_pvt.log_message
639: (p_message_code => 'GME_PICKED_PARTIAL'
640: ,p_token1_name => 'MO_NUMBER'
641: ,p_token1_value => l_move_order_header_id);
642: IF g_debug <= gme_debug.g_log_unexpected THEN
643: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
644: END IF;
645: ELSIF (NOT (g_partially_allocated) AND NOT (g_fully_allocated) ) THEN
646: gme_common_pvt.log_message

Line 643: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));

639: (p_message_code => 'GME_PICKED_PARTIAL'
640: ,p_token1_name => 'MO_NUMBER'
641: ,p_token1_value => l_move_order_header_id);
642: IF g_debug <= gme_debug.g_log_unexpected THEN
643: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
644: END IF;
645: ELSIF (NOT (g_partially_allocated) AND NOT (g_fully_allocated) ) THEN
646: gme_common_pvt.log_message
647: (p_message_code => 'GME_PICKED_NO_ALLOC'

Line 650: IF g_debug <= gme_debug.g_log_unexpected THEN

646: gme_common_pvt.log_message
647: (p_message_code => 'GME_PICKED_NO_ALLOC'
648: ,p_token1_name => 'MO_NUMBER'
649: ,p_token1_value => l_move_order_header_id);
650: IF g_debug <= gme_debug.g_log_unexpected THEN
651: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
652: END IF;
653: END IF;
654: END IF;

Line 651: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));

647: (p_message_code => 'GME_PICKED_NO_ALLOC'
648: ,p_token1_name => 'MO_NUMBER'
649: ,p_token1_value => l_move_order_header_id);
650: IF g_debug <= gme_debug.g_log_unexpected THEN
651: gme_debug.put_line(fnd_msg_pub.get(FND_MSG_PUB.G_LAST, 'F'));
652: END IF;
653: END IF;
654: END IF;
655:

Line 656: IF g_debug <= gme_debug.g_log_procedure THEN

652: END IF;
653: END IF;
654: END IF;
655:
656: IF g_debug <= gme_debug.g_log_procedure THEN
657: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
658: END IF;
659: EXCEPTION
660: WHEN no_materials_picked THEN

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

653: END IF;
654: END IF;
655:
656: IF g_debug <= gme_debug.g_log_procedure THEN
657: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
658: END IF;
659: EXCEPTION
660: WHEN no_materials_picked THEN
661: --Bug#5311713

Line 673: IF g_debug <= gme_debug.g_log_unexpected THEN

669: x_return_status := l_return_status;
670: WHEN OTHERS THEN
671: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
672:
673: IF g_debug <= gme_debug.g_log_unexpected THEN
674: gme_debug.put_line ( 'When others exception in '
675: || g_pkg_name
676: || '.'
677: || l_api_name

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

670: WHEN OTHERS THEN
671: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
672:
673: IF g_debug <= gme_debug.g_log_unexpected THEN
674: gme_debug.put_line ( 'When others exception in '
675: || g_pkg_name
676: || '.'
677: || l_api_name
678: || ' Error is '

Line 757: IF g_debug <= gme_debug.g_log_procedure THEN

753: l_inv_resv_tbl inv_reservation_global.mtl_reservation_tbl_type;
754: create_suggestions_err EXCEPTION;
755: get_pick_slip_err EXCEPTION;
756: BEGIN
757: IF g_debug <= gme_debug.g_log_procedure THEN
758: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
759: || l_api_name);
760: END IF;
761:

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

754: create_suggestions_err EXCEPTION;
755: get_pick_slip_err EXCEPTION;
756: BEGIN
757: IF g_debug <= gme_debug.g_log_procedure THEN
758: gme_debug.put_line ('Entering api ' || g_pkg_name || '.'
759: || l_api_name);
760: END IF;
761:
762: x_return_status := fnd_api.g_ret_sts_success;

Line 770: IF g_debug <= gme_debug.g_log_statement THEN

766: ,p_material_detail_id => p_mo_line_rec.txn_source_line_id
767: ,x_return_status => l_return_status
768: ,x_reservations_tbl => l_resv_tbl);
769:
770: IF g_debug <= gme_debug.g_log_statement THEN
771: gme_debug.put_line ( g_pkg_name
772: || '.'
773: || l_api_name
774: || ':No. of reservations is '

Line 771: gme_debug.put_line ( g_pkg_name

767: ,x_return_status => l_return_status
768: ,x_reservations_tbl => l_resv_tbl);
769:
770: IF g_debug <= gme_debug.g_log_statement THEN
771: gme_debug.put_line ( g_pkg_name
772: || '.'
773: || l_api_name
774: || ':No. of reservations is '
775: || l_resv_tbl.COUNT);

Line 832: IF g_debug <= gme_debug.g_log_statement THEN

828: l_inv_resv_tbl (l_count).lpn_id := l_resv_tbl (i).lpn_id;
829: END IF;
830: END LOOP;
831:
832: IF g_debug <= gme_debug.g_log_statement THEN
833: gme_debug.put_line
834: ( g_pkg_name
835: || '.'
836: || l_api_name

Line 833: gme_debug.put_line

829: END IF;
830: END LOOP;
831:
832: IF g_debug <= gme_debug.g_log_statement THEN
833: gme_debug.put_line
834: ( g_pkg_name
835: || '.'
836: || l_api_name
837: || ':No. of reservations passed to create suggestions is '

Line 863: IF g_debug <= gme_debug.g_log_statement THEN

859: ,p_simulation_id => NULL
860: ,p_plan_tasks => l_plan_tasks
861: ,p_quick_pick_flag => 'N');
862:
863: IF g_debug <= gme_debug.g_log_statement THEN
864: gme_debug.put_line ( g_pkg_name
865: || '.'
866: || l_api_name
867: || 'create suggestions returns '

Line 864: gme_debug.put_line ( g_pkg_name

860: ,p_plan_tasks => l_plan_tasks
861: ,p_quick_pick_flag => 'N');
862:
863: IF g_debug <= gme_debug.g_log_statement THEN
864: gme_debug.put_line ( g_pkg_name
865: || '.'
866: || l_api_name
867: || 'create suggestions returns '
868: || l_return_status);

Line 869: gme_debug.put_line ( g_pkg_name

865: || '.'
866: || l_api_name
867: || 'create suggestions returns '
868: || l_return_status);
869: gme_debug.put_line ( g_pkg_name
870: || '.'
871: || l_api_name
872: || 'create suggestions mesg '
873: || l_msg_data);

Line 887: IF g_debug <= gme_debug.g_log_statement THEN

883: INTO l_qty_detailed, l_sec_qty_detailed;
884:
885: CLOSE cur_detailed_qty;
886:
887: IF g_debug <= gme_debug.g_log_statement THEN
888: gme_debug.put_line ( g_pkg_name
889: || '.'
890: || l_api_name
891: || ':Qty allocated '

Line 888: gme_debug.put_line ( g_pkg_name

884:
885: CLOSE cur_detailed_qty;
886:
887: IF g_debug <= gme_debug.g_log_statement THEN
888: gme_debug.put_line ( g_pkg_name
889: || '.'
890: || l_api_name
891: || ':Qty allocated '
892: || l_qty_detailed);

Line 893: gme_debug.put_line ( g_pkg_name

889: || '.'
890: || l_api_name
891: || ':Qty allocated '
892: || l_qty_detailed);
893: gme_debug.put_line ( g_pkg_name
894: || '.'
895: || l_api_name
896: || ':Sec Qty allocated '
897: || l_sec_qty_detailed);

Line 903: IF g_debug <= gme_debug.g_log_statement THEN

899:
900: l_mo_line_rec := p_mo_line_rec;
901:
902: IF (NVL (l_qty_detailed, 0) > 0) THEN
903: IF g_debug <= gme_debug.g_log_statement THEN
904: gme_debug.put_line ( g_pkg_name
905: || '.'
906: || l_api_name
907: || ':Get mmtt recs and create pick slips ');

Line 904: gme_debug.put_line ( g_pkg_name

900: l_mo_line_rec := p_mo_line_rec;
901:
902: IF (NVL (l_qty_detailed, 0) > 0) THEN
903: IF g_debug <= gme_debug.g_log_statement THEN
904: gme_debug.put_line ( g_pkg_name
905: || '.'
906: || l_api_name
907: || ':Get mmtt recs and create pick slips ');
908: END IF;

Line 1051: IF g_debug <= gme_debug.g_log_statement THEN

1047: END IF;
1048: -- Bug 8481421 end of update quantity loop
1049:
1050: FOR get_mmtt IN cur_mmtt (p_mo_line_rec.line_id) LOOP
1051: IF g_debug <= gme_debug.g_log_statement THEN
1052: gme_debug.put_line(g_pkg_name || '.' || l_api_name
1053: || ' Calling ASSIGNTT with temp id ' || get_mmtt.transaction_temp_id);
1054: END IF;
1055:

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

1048: -- Bug 8481421 end of update quantity loop
1049:
1050: FOR get_mmtt IN cur_mmtt (p_mo_line_rec.line_id) LOOP
1051: IF g_debug <= gme_debug.g_log_statement THEN
1052: gme_debug.put_line(g_pkg_name || '.' || l_api_name
1053: || ' Calling ASSIGNTT with temp id ' || get_mmtt.transaction_temp_id);
1054: END IF;
1055:
1056:

Line 1066: IF g_debug <= gme_debug.g_log_statement THEN

1062: x_msg_count => l_msg_count,
1063: x_msg_data => l_msg_data
1064: );
1065:
1066: IF g_debug <= gme_debug.g_log_statement THEN
1067: gme_debug.put_line(g_pkg_name || '.' || l_api_name
1068: || ':Return from ASSIGNTT IS ' || l_return_status);
1069:
1070: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN

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

1063: x_msg_data => l_msg_data
1064: );
1065:
1066: IF g_debug <= gme_debug.g_log_statement THEN
1067: gme_debug.put_line(g_pkg_name || '.' || l_api_name
1068: || ':Return from ASSIGNTT IS ' || l_return_status);
1069:
1070: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
1071: gme_debug.put_line ( g_pkg_name

Line 1071: gme_debug.put_line ( g_pkg_name

1067: gme_debug.put_line(g_pkg_name || '.' || l_api_name
1068: || ':Return from ASSIGNTT IS ' || l_return_status);
1069:
1070: IF (l_return_status <> fnd_api.g_ret_sts_success) THEN
1071: gme_debug.put_line ( g_pkg_name
1072: || '.'
1073: || l_api_name
1074: || 'temp_id is '
1075: || get_mmtt.transaction_temp_id);

Line 1076: gme_debug.put_line ( g_pkg_name

1072: || '.'
1073: || l_api_name
1074: || 'temp_id is '
1075: || get_mmtt.transaction_temp_id);
1076: gme_debug.put_line ( g_pkg_name
1077: || '.'
1078: || l_api_name
1079: || ':Message is '
1080: || l_msg_data);

Line 1090: IF g_debug <= gme_debug.g_log_statement THEN

1086: RAISE get_pick_slip_err;
1087: END IF;
1088:
1089: IF get_mmtt.pick_slip_number IS NULL THEN
1090: IF g_debug <= gme_debug.g_log_statement THEN
1091: gme_debug.put_line
1092: ( g_pkg_name
1093: || '.'
1094: || l_api_name

Line 1091: gme_debug.put_line

1087: END IF;
1088:
1089: IF get_mmtt.pick_slip_number IS NULL THEN
1090: IF g_debug <= gme_debug.g_log_statement THEN
1091: gme_debug.put_line
1092: ( g_pkg_name
1093: || '.'
1094: || l_api_name
1095: || ':Calling inv_pr_pick_slip_number.get_pick_slip_number');

Line 1119: IF g_debug <= gme_debug.g_log_statement THEN

1115: ,x_pick_slip_number => l_pick_slip_number
1116: ,x_api_status => l_return_status
1117: ,x_error_message => l_msg_data);
1118:
1119: IF g_debug <= gme_debug.g_log_statement THEN
1120: gme_debug.put_line
1121: ( g_pkg_name
1122: || '.'
1123: || l_api_name

Line 1120: gme_debug.put_line

1116: ,x_api_status => l_return_status
1117: ,x_error_message => l_msg_data);
1118:
1119: IF g_debug <= gme_debug.g_log_statement THEN
1120: gme_debug.put_line
1121: ( g_pkg_name
1122: || '.'
1123: || l_api_name
1124: || ':Return from inv_pr_pick_slip_number.get_pick_slip_number '

Line 1126: gme_debug.put_line ( g_pkg_name

1122: || '.'
1123: || l_api_name
1124: || ':Return from inv_pr_pick_slip_number.get_pick_slip_number '
1125: || l_return_status);
1126: gme_debug.put_line ( g_pkg_name
1127: || '.'
1128: || l_api_name
1129: || ':l_pick_slip_number is '
1130: || l_pick_slip_number);

Line 1131: gme_debug.put_line ( g_pkg_name

1127: || '.'
1128: || l_api_name
1129: || ':l_pick_slip_number is '
1130: || l_pick_slip_number);
1131: gme_debug.put_line ( g_pkg_name
1132: || '.'
1133: || l_api_name
1134: || ':Message is '
1135: || l_msg_data);

Line 1163: IF g_debug <= gme_debug.g_log_statement THEN

1159: ELSE
1160: g_fully_allocated := TRUE;
1161: END IF;
1162: ELSE
1163: IF g_debug <= gme_debug.g_log_statement THEN
1164: gme_debug.put_line ( g_pkg_name
1165: || '.'
1166: || l_api_name
1167: || ':Close mo lines since no allocations');

Line 1164: gme_debug.put_line ( g_pkg_name

1160: g_fully_allocated := TRUE;
1161: END IF;
1162: ELSE
1163: IF g_debug <= gme_debug.g_log_statement THEN
1164: gme_debug.put_line ( g_pkg_name
1165: || '.'
1166: || l_api_name
1167: || ':Close mo lines since no allocations');
1168: END IF;

Line 1175: IF g_debug <= gme_debug.g_log_statement THEN

1171: l_mo_line_rec.line_status := 5;
1172: g_not_allocated := TRUE;
1173: END IF;
1174:
1175: IF g_debug <= gme_debug.g_log_statement THEN
1176: gme_debug.put_line ( g_pkg_name
1177: || '.'
1178: || l_api_name
1179: || 'Updating MO line');

Line 1176: gme_debug.put_line ( g_pkg_name

1172: g_not_allocated := TRUE;
1173: END IF;
1174:
1175: IF g_debug <= gme_debug.g_log_statement THEN
1176: gme_debug.put_line ( g_pkg_name
1177: || '.'
1178: || l_api_name
1179: || 'Updating MO line');
1180: END IF;

Line 1184: IF g_debug <= gme_debug.g_log_statement THEN

1180: END IF;
1181:
1182: inv_trolin_util.update_row (l_mo_line_rec);
1183:
1184: IF g_debug <= gme_debug.g_log_statement THEN
1185: gme_debug.put_line ( g_pkg_name
1186: || '.'
1187: || l_api_name
1188: || 'After Updating MO line');

Line 1185: gme_debug.put_line ( g_pkg_name

1181:
1182: inv_trolin_util.update_row (l_mo_line_rec);
1183:
1184: IF g_debug <= gme_debug.g_log_statement THEN
1185: gme_debug.put_line ( g_pkg_name
1186: || '.'
1187: || l_api_name
1188: || 'After Updating MO line');
1189: END IF;

Line 1191: IF g_debug <= gme_debug.g_log_statement THEN

1187: || l_api_name
1188: || 'After Updating MO line');
1189: END IF;
1190:
1191: IF g_debug <= gme_debug.g_log_statement THEN
1192: gme_debug.put_line ( g_pkg_name
1193: || '.'
1194: || l_api_name
1195: || 'l_backordered_qty = '

Line 1192: gme_debug.put_line ( g_pkg_name

1188: || 'After Updating MO line');
1189: END IF;
1190:
1191: IF g_debug <= gme_debug.g_log_statement THEN
1192: gme_debug.put_line ( g_pkg_name
1193: || '.'
1194: || l_api_name
1195: || 'l_backordered_qty = '
1196: || l_backordered_qty);

Line 1205: IF g_debug <= gme_debug.g_log_procedure THEN

1201: SET backordered_qty = l_backordered_qty
1202: WHERE material_detail_id = p_mo_line_rec.txn_source_line_id;
1203: END IF;
1204:
1205: IF g_debug <= gme_debug.g_log_procedure THEN
1206: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1207: END IF;
1208: EXCEPTION
1209: WHEN create_suggestions_err OR get_pick_slip_err THEN

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

1202: WHERE material_detail_id = p_mo_line_rec.txn_source_line_id;
1203: END IF;
1204:
1205: IF g_debug <= gme_debug.g_log_procedure THEN
1206: gme_debug.put_line ('Exiting api ' || g_pkg_name || '.' || l_api_name);
1207: END IF;
1208: EXCEPTION
1209: WHEN create_suggestions_err OR get_pick_slip_err THEN
1210: x_return_status := l_return_status;

Line 1214: IF g_debug <= gme_debug.g_log_unexpected THEN

1210: x_return_status := l_return_status;
1211: WHEN OTHERS THEN
1212: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1213:
1214: IF g_debug <= gme_debug.g_log_unexpected THEN
1215: gme_debug.put_line ( 'When others exception in '
1216: || g_pkg_name
1217: || '.'
1218: || l_api_name

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

1211: WHEN OTHERS THEN
1212: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
1213:
1214: IF g_debug <= gme_debug.g_log_unexpected THEN
1215: gme_debug.put_line ( 'When others exception in '
1216: || g_pkg_name
1217: || '.'
1218: || l_api_name
1219: || ' Error is '