eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.WMS_TASK_LOAD dependencies on WMS_TASK_LOAD

Line 1: PACKAGE BODY wms_task_load AS

1: PACKAGE BODY wms_task_load AS
2: /* $Header: WMSLOADB.pls 120.20.12010000.13 2009/01/21 15:23:46 kjujjuru ship $ */
3:
4: -- Global constants
5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_TASK_LOAD';

Line 5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_TASK_LOAD';

1: PACKAGE BODY wms_task_load AS
2: /* $Header: WMSLOADB.pls 120.20.12010000.13 2009/01/21 15:23:46 kjujjuru ship $ */
3:
4: -- Global constants
5: g_pkg_name CONSTANT VARCHAR2(30) := 'WMS_TASK_LOAD';
6: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
7: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
8: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
9:

Line 380: mydebug('Inside UPDATE_LOADED_PART', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

376: BEGIN
377:
378: x_return_status := l_g_ret_sts_success;
379: IF (l_debug = 1) THEN
380: mydebug('Inside UPDATE_LOADED_PART', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
381: END IF;
382:
383: FOR mmtt_rec IN mmtt_cursor(p_transaction_temp_id1, p_transaction_temp_id2) LOOP
384: IF mmtt_rec.transaction_temp_id = p_transaction_temp_id1 THEN

Line 412: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

408: to_name => NULL);
409: END IF;
410:
411: IF (l_debug = 1) THEN
412: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
413: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
414: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
415: END IF;
416:

Line 413: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

409: END IF;
410:
411: IF (l_debug = 1) THEN
412: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
413: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
414: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
415: END IF;
416:
417: IF p_lot_controlled <> 'Y' AND p_serial_controlled <> 'Y' THEN -- No Lot or serial control

Line 414: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

410:
411: IF (l_debug = 1) THEN
412: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
413: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
414: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
415: END IF;
416:
417: IF p_lot_controlled <> 'Y' AND p_serial_controlled <> 'Y' THEN -- No Lot or serial control
418: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );

Line 438: mydebug('Return Status from Lot Serial Parse: ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

434: x_msg_count => x_msg_count,
435: x_msg_data => x_msg_data);
436:
437: IF (l_debug = 1) THEN
438: mydebug('Return Status from Lot Serial Parse: ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
439: END IF;
440:
441: IF x_return_status <> l_g_ret_sts_success
442: THEN

Line 454: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

450: END IF;
451:
452: IF p_lot_controlled = 'Y' AND p_serial_controlled <> 'Y' THEN -- Lot Controlled only
453: IF (l_debug = 1) THEN
454: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
455: END IF;
456:
457: i := 1; -- lot table counter
458: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP

Line 461: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

457: i := 1; -- lot table counter
458: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP
459:
460: IF (l_debug = 1) THEN
461: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
462: END IF;
463:
464: l_lot_table1(i).lot_number := mtlt_record.lot_number;
465: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;

Line 472: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

468: i := i + 1;
469: END LOOP;
470:
471: IF (l_debug = 1) THEN
472: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
473: END IF;
474:
475: i := 1; -- lot table counter
476: l_primary_quantity := 0;

Line 485: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

481: l_secondary_quantity := l_secondary_quantity + lot_serial_rec.secondary_quantity;
482:
483: WHILE l_lot_table1(i).lot_number <> lot_serial_rec.lot_number LOOP
484: IF (l_debug = 1) THEN
485: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
486: END IF;
487: l_lot_table1(i).delete_mtlt := TRUE;
488: l_lot_table1(i).delta_primary_quantity := l_lot_table1(i).primary_quantity;
489: l_lot_table1(i).delta_secondary_quantity := l_lot_table1(i).secondary_quantity;

Line 494: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

490: i := i + 1;
491: END LOOP;
492:
493: IF (l_debug = 1) THEN
494: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
495: END IF;
496:
497: IF l_lot_table1(i).lot_number = lot_serial_rec.lot_number THEN
498: l_lot_table1(i).secondary_quantity := lot_serial_rec.secondary_quantity;

Line 503: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

499:
500: IF l_lot_table1(i).primary_quantity <> lot_serial_rec.primary_quantity THEN
501:
502: IF (l_debug = 1) THEN
503: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
504: END IF;
505:
506: l_lot_table1(i).update_mtlt := TRUE;
507:

Line 543: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

539: END;
540:
541: IF (l_debug = 1) THEN
542: IF l_row_exists = 1 THEN
543: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
544: ELSE
545: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
546: END IF;
547: END IF;

Line 545: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

541: IF (l_debug = 1) THEN
542: IF l_row_exists = 1 THEN
543: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
544: ELSE
545: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
546: END IF;
547: END IF;
548:
549:

Line 551: mydebug(i || 'Delta: ' || l_lot_table1(i).delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

547: END IF;
548:
549:
550: IF (l_debug = 1) THEN
551: mydebug(i || 'Delta: ' || l_lot_table1(i).delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
552: mydebug(i || 'Sec Delta: ' || l_lot_table1(i).delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
553: END IF;
554:
555: IF l_lot_table1(i).delete_mtlt THEN

Line 552: mydebug(i || 'Sec Delta: ' || l_lot_table1(i).delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

548:
549:
550: IF (l_debug = 1) THEN
551: mydebug(i || 'Delta: ' || l_lot_table1(i).delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
552: mydebug(i || 'Sec Delta: ' || l_lot_table1(i).delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
553: END IF;
554:
555: IF l_lot_table1(i).delete_mtlt THEN
556:

Line 560: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

556:
557: IF l_row_exists = 1 THEN
558:
559: IF (l_debug = 1) THEN
560: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
561: END IF;
562:
563: UPDATE mtl_transaction_lots_temp
564: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

Line 581: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

577:
578: ELSE -- row does not exist in 2
579:
580: IF (l_debug = 1) THEN
581: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
582: END IF;
583:
584: UPDATE mtl_transaction_lots_temp
585: SET transaction_temp_id = p_transaction_temp_id2,

Line 608: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

604:
605: IF l_row_exists = 1 THEN
606:
607: IF (l_debug = 1) THEN
608: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
609: END IF;
610:
611: UPDATE mtl_transaction_lots_temp
612: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

Line 623: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

619: AND lot_number = l_lot_table1(i).lot_number;
620: ELSE -- row does not exist in 2
621:
622: IF (l_debug = 1) THEN
623: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
624: END IF;
625:
626: SELECT *
627: INTO l_mtlt_rec

Line 654: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

650: END LOOP; -- lot loop
651: ELSIF p_lot_controlled <> 'Y' AND p_serial_controlled = 'Y' THEN -- Serial controlled only
652:
653: IF (l_debug = 1) THEN
654: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
655: END IF;
656:
657: l_secondary_quantity := p_secondary_quantity;
658:

Line 662: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

658:
659: j := 1; -- serial table counter
660: FOR msnt_record IN msnt_cursor(p_transaction_temp_id1) LOOP
661: IF (l_debug = 1) THEN
662: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
663: END IF;
664:
665: l_serial_table1(j).serial_number := msnt_record.fm_serial_number;
666: j := j + 1;

Line 670: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

666: j := j + 1;
667: END LOOP;
668:
669: IF (l_debug = 1) THEN
670: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
671: END IF;
672:
673: j := 1; -- serial table counter
674: l_primary_quantity := 0;

Line 685: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

681: j := j + 1;
682: END LOOP;
683:
684: IF (l_debug = 1) THEN
685: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
686: END IF;
687:
688: j := j + 1;
689: END LOOP;

Line 706: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

702:
703: IF p_serial_allocated_flag = 'Y' THEN
704:
705: IF (l_debug = 1) THEN
706: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
707: END IF;
708:
709: UPDATE mtl_serial_numbers_temp
710: SET transaction_temp_id = p_transaction_temp_id2,

Line 718: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

714: AND fm_serial_number = l_serial_table1(j).serial_number;
715: ELSE
716:
717: IF (l_debug = 1) THEN
718: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
719: END IF;
720:
721: DELETE FROM mtl_serial_numbers_temp
722: WHERE transaction_temp_id = p_transaction_temp_id1

Line 742: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

738:
739: ELSIF p_lot_controlled = 'Y' AND p_serial_controlled = 'Y' THEN -- Lot and serial controlled
740:
741: IF (l_debug = 1) THEN
742: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
743: END IF;
744:
745: i := 1; -- lot table counter
746: j := 1; -- serial table counter

Line 750: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

746: j := 1; -- serial table counter
747: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP
748:
749: IF (l_debug = 1) THEN
750: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
751: END IF;
752:
753: l_lot_table1(i).lot_number := mtlt_record.lot_number;
754: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;

Line 758: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

754: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;
755:
756: FOR msnt_record IN msnt_cursor(mtlt_record.serial_transaction_temp_id) LOOP
757: IF (l_debug = 1) THEN
758: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
759: END IF;
760:
761: l_serial_table1(j).transaction_temp_id := mtlt_record.serial_transaction_temp_id;
762: l_serial_table1(j).serial_number := msnt_record.fm_serial_number;

Line 772: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

768: i := i + 1;
769: END LOOP;
770:
771: IF (l_debug = 1) THEN
772: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
773: END IF;
774:
775: i := 1; -- lot table counter
776: j := 1; -- serial table counter

Line 783: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

779:
780: l_primary_quantity := l_primary_quantity + 1;
781:
782: IF (l_debug = 1) THEN
783: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
784: END IF;
785:
786: IF l_lot_table1(i).lot_number = lot_serial_rec.lot_number THEN
787: l_lot_table1(i).secondary_quantity := lot_serial_rec.secondary_quantity;

Line 793: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

789:
790: WHILE l_serial_table1(j).serial_number <> lot_serial_rec.serial_number LOOP
791:
792: IF (l_debug = 1) THEN
793: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
794: END IF;
795:
796: l_serial_table1(j).delete_msnt := TRUE;
797:

Line 806: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

802: IF l_lot_table1(i).primary_quantity = 0 THEN
803: l_lot_table1(i).delete_mtlt := TRUE;
804:
805: IF (l_debug = 1) THEN
806: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
807: END IF;
808:
809: ELSE
810:

Line 812: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

808:
809: ELSE
810:
811: IF (l_debug = 1) THEN
812: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
813: END IF;
814:
815: END IF;
816:

Line 823: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

819: IF l_serial_table1.COUNT >= j THEN
820: IF l_serial_table1(j-1).lot_number = l_lot_table1(i).lot_number AND
821: l_serial_table1(j).lot_number <> l_lot_table1(i).lot_number THEN
822: i := i + 1;
823: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
824: END IF;
825: END IF;
826:
827: END LOOP;

Line 830: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

826:
827: END LOOP;
828:
829: IF (l_debug = 1) THEN
830: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
831: END IF;
832:
833: j := j + 1;
834:

Line 840: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

836:
837: WHILE j <= l_serial_table1.COUNT LOOP
838:
839: IF (l_debug = 1) THEN
840: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
841: END IF;
842:
843: l_serial_table1(j).delete_msnt := TRUE;
844:

Line 853: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

849: IF l_lot_table1(i).primary_quantity = 0 THEN
850: l_lot_table1(i).delete_mtlt := TRUE;
851:
852: IF (l_debug = 1) THEN
853: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
854: END IF;
855:
856: ELSE
857:

Line 859: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

855:
856: ELSE
857:
858: IF (l_debug = 1) THEN
859: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
860: END IF;
861:
862: END IF;
863:

Line 870: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

866: IF l_serial_table1.COUNT >= j THEN
867: IF l_serial_table1(j-1).lot_number = l_lot_table1(i).lot_number AND
868: l_serial_table1(j).lot_number <> l_lot_table1(i).lot_number THEN
869: i := i + 1;
870: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
871: END IF;
872: END IF;
873:
874: END LOOP;

Line 902: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

898: END;
899:
900: IF (l_debug = 1) THEN
901: IF l_row_exists = 1 THEN
902: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
903: ELSE
904: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
905: END IF;
906: END IF;

Line 904: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

900: IF (l_debug = 1) THEN
901: IF l_row_exists = 1 THEN
902: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
903: ELSE
904: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
905: END IF;
906: END IF;
907:
908: WHILE j <= l_serial_table1.COUNT AND l_serial_table1(j).lot_number = l_lot_table1(i).lot_number LOOP

Line 915: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

911:
912: IF p_serial_allocated_flag = 'Y' THEN
913:
914: IF (l_debug = 1) THEN
915: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
916: END IF;
917:
918: UPDATE mtl_serial_numbers_temp
919: SET transaction_temp_id = l_serial_transaction_temp_id,

Line 927: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

923: AND fm_serial_number = l_serial_table1(j).serial_number;
924: ELSE
925:
926: IF (l_debug = 1) THEN
927: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
928: END IF;
929:
930: DELETE FROM mtl_serial_numbers_temp
931: WHERE transaction_temp_id = l_serial_table1(j).transaction_temp_id

Line 945: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number || ' left untouched', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

941:
942: END IF; -- serial allocated flag
943: ELSE
944: IF (l_debug = 1) THEN
945: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number || ' left untouched', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
946: END IF;
947: END IF;
948:
949: j := j + 1;

Line 958: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

954:
955: IF l_row_exists = 1 THEN
956:
957: IF (l_debug = 1) THEN
958: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
959: END IF;
960:
961: UPDATE mtl_transaction_lots_temp
962: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

Line 978: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

974:
975: ELSE -- row does not exist in 2
976:
977: IF (l_debug = 1) THEN
978: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
979: END IF;
980:
981: UPDATE mtl_transaction_lots_temp
982: SET transaction_temp_id = p_transaction_temp_id2,

Line 1006: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1002:
1003: IF l_row_exists = 1 THEN
1004:
1005: IF (l_debug = 1) THEN
1006: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1007: END IF;
1008:
1009: UPDATE mtl_transaction_lots_temp
1010: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

Line 1020: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1016: AND lot_number = l_lot_table1(i).lot_number;
1017: ELSE -- row does not exist in 2
1018:
1019: IF (l_debug = 1) THEN
1020: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1021: END IF;
1022:
1023: SELECT *
1024: INTO l_mtlt_rec

Line 1039: mydebug('Return status from insert MTLT : ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1035: x_return_status => x_return_status,
1036: x_msg_count => x_msg_count,
1037: x_msg_data => x_msg_data);
1038:
1039: mydebug('Return status from insert MTLT : ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1040: IF x_return_status <> l_g_ret_sts_success THEN
1041: RAISE fnd_api.g_exc_error;
1042: END IF;
1043:

Line 1058: mydebug('Updating MMTT with delta qty: ' || l_delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1054: l_delta_primary_quantity := l_primary_quantity1 - l_primary_quantity;
1055: l_delta_secondary_quantity := l_secondary_quantity1 - l_secondary_quantity;
1056:
1057: IF (l_debug = 1) THEN
1058: mydebug('Updating MMTT with delta qty: ' || l_delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1059: mydebug('Updating MMTT with delta sec qty: ' || l_delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1060: END IF;
1061:
1062: UPDATE mtl_material_transactions_temp

Line 1059: mydebug('Updating MMTT with delta sec qty: ' || l_delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1055: l_delta_secondary_quantity := l_secondary_quantity1 - l_secondary_quantity;
1056:
1057: IF (l_debug = 1) THEN
1058: mydebug('Updating MMTT with delta qty: ' || l_delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1059: mydebug('Updating MMTT with delta sec qty: ' || l_delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1060: END IF;
1061:
1062: UPDATE mtl_material_transactions_temp
1063: SET transaction_quantity = Round(l_primary_quantity*l_conversion_factor, l_g_decimal_precision),

Line 1098: mydebug('Error', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1094: x_return_status := l_g_ret_sts_error;
1095: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1096:
1097: IF (l_debug = 1) THEN
1098: mydebug('Error', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1099: END IF;
1100: ROLLBACK;
1101:
1102: WHEN OTHERS THEN

Line 1106: mydebug('Error: ' || Sqlerrm, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

1102: WHEN OTHERS THEN
1103: x_return_status := l_g_ret_sts_unexp_error;
1104: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1105: IF (l_debug = 1) THEN
1106: mydebug('Error: ' || Sqlerrm, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1107: END IF;
1108: ROLLBACK ;
1109: END update_loaded_part;
1110:

Line 12063: inv_mobile_helper_functions.sql_error('wms_task_load.insert_serial', l_progress, SQLCODE);

12059: WHEN OTHERS THEN
12060: x_return_status := fnd_api.g_ret_sts_unexp_error;
12061:
12062: IF SQLCODE IS NOT NULL THEN
12063: inv_mobile_helper_functions.sql_error('wms_task_load.insert_serial', l_progress, SQLCODE);
12064: END IF;
12065:
12066: IF (l_debug = 1) THEN
12067: mydebug('Exitting insert_serial - other exception:'|| l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);

Line 12255: END wms_task_load;

12251: x_commingle_exist := 'Y';
12252: END validate_loaded_lpn_cg;
12253:
12254:
12255: END wms_task_load;