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.66.12020000.22 2013/05/23 23:50:22 sahmahes 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.66.12020000.22 2013/05/23 23:50:22 sahmahes 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 445: mydebug('Inside UPDATE_LOADED_PART', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');

441: BEGIN
442:
443: x_return_status := l_g_ret_sts_success;
444: IF (l_debug = 1) THEN
445: mydebug('Inside UPDATE_LOADED_PART', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
446: END IF;
447:
448: FOR mmtt_rec IN mmtt_cursor(p_transaction_temp_id1, p_transaction_temp_id2) LOOP
449: IF mmtt_rec.transaction_temp_id = p_transaction_temp_id1 THEN

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

473: to_name => NULL);
474: END IF;
475:
476: IF (l_debug = 1) THEN
477: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
478: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
479: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
480: END IF;
481:

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

474: END IF;
475:
476: IF (l_debug = 1) THEN
477: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
478: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
479: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
480: END IF;
481:
482: IF p_lot_controlled <> 'Y' AND p_serial_controlled <> 'Y' THEN -- No Lot or serial control

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

475:
476: IF (l_debug = 1) THEN
477: mydebug('Conversion Factor: ' || l_conversion_factor, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
478: mydebug('Conversion Factor1: ' || l_conversion_factor1, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
479: mydebug('Conversion Factor2: ' || l_conversion_factor2, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
480: END IF;
481:
482: IF p_lot_controlled <> 'Y' AND p_serial_controlled <> 'Y' THEN -- No Lot or serial control
483: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );

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

504: x_msg_count => x_msg_count,
505: x_msg_data => x_msg_data);
506:
507: IF (l_debug = 1) THEN
508: mydebug('Return Status from Lot Serial Parse: ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
509: END IF;
510:
511: IF x_return_status <> l_g_ret_sts_success
512: THEN

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

520: END IF;
521:
522: IF p_lot_controlled = 'Y' AND p_serial_controlled <> 'Y' THEN -- Lot Controlled only
523: IF (l_debug = 1) THEN
524: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
525: END IF;
526:
527: i := 1; -- lot table counter
528: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP

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

527: i := 1; -- lot table counter
528: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP
529:
530: IF (l_debug = 1) THEN
531: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
532: END IF;
533:
534: l_lot_table1(i).lot_number := mtlt_record.lot_number;
535: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;

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

538: i := i + 1;
539: END LOOP;
540:
541: IF (l_debug = 1) THEN
542: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
543: END IF;
544:
545: i := 1; -- lot table counter
546: l_primary_quantity := 0;

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

551: l_secondary_quantity := l_secondary_quantity + lot_serial_rec.secondary_quantity;
552:
553: WHILE l_lot_table1(i).lot_number <> lot_serial_rec.lot_number LOOP
554: IF (l_debug = 1) THEN
555: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
556: END IF;
557: l_lot_table1(i).delete_mtlt := TRUE;
558: l_lot_table1(i).delta_primary_quantity := l_lot_table1(i).primary_quantity;
559: l_lot_table1(i).delta_secondary_quantity := l_lot_table1(i).secondary_quantity;

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

560: i := i + 1;
561: END LOOP;
562:
563: IF (l_debug = 1) THEN
564: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
565: END IF;
566:
567: IF l_lot_table1(i).lot_number = lot_serial_rec.lot_number THEN
568: l_lot_table1(i).secondary_quantity := lot_serial_rec.secondary_quantity;

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

569:
570: IF l_lot_table1(i).primary_quantity <> lot_serial_rec.primary_quantity THEN
571:
572: IF (l_debug = 1) THEN
573: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
574: END IF;
575:
576: l_lot_table1(i).update_mtlt := TRUE;
577:

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

609: END;
610:
611: IF (l_debug = 1) THEN
612: IF l_row_exists = 1 THEN
613: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
614: ELSE
615: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
616: END IF;
617: END IF;

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

611: IF (l_debug = 1) THEN
612: IF l_row_exists = 1 THEN
613: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
614: ELSE
615: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
616: END IF;
617: END IF;
618:
619:

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

617: END IF;
618:
619:
620: IF (l_debug = 1) THEN
621: mydebug(i || 'Delta: ' || l_lot_table1(i).delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
622: mydebug(i || 'Sec Delta: ' || l_lot_table1(i).delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
623: END IF;
624:
625: IF l_lot_table1(i).delete_mtlt THEN

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

618:
619:
620: IF (l_debug = 1) THEN
621: mydebug(i || 'Delta: ' || l_lot_table1(i).delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
622: mydebug(i || 'Sec Delta: ' || l_lot_table1(i).delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
623: END IF;
624:
625: IF l_lot_table1(i).delete_mtlt THEN
626:

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

626:
627: IF l_row_exists = 1 THEN
628:
629: IF (l_debug = 1) THEN
630: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
631: END IF;
632:
633: UPDATE mtl_transaction_lots_temp
634: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

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

647:
648: ELSE -- row does not exist in 2
649:
650: IF (l_debug = 1) THEN
651: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
652: END IF;
653:
654: UPDATE mtl_transaction_lots_temp
655: SET transaction_temp_id = p_transaction_temp_id2,

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

674:
675: IF l_row_exists = 1 THEN
676:
677: IF (l_debug = 1) THEN
678: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
679: END IF;
680:
681: UPDATE mtl_transaction_lots_temp
682: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

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

689: AND lot_number = l_lot_table1(i).lot_number;
690: ELSE -- row does not exist in 2
691:
692: IF (l_debug = 1) THEN
693: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
694: END IF;
695:
696: SELECT *
697: INTO l_mtlt_rec

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

720: END LOOP; -- lot loop
721: ELSIF p_lot_controlled <> 'Y' AND p_serial_controlled = 'Y' THEN -- Serial controlled only
722:
723: IF (l_debug = 1) THEN
724: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
725: END IF;
726:
727: l_secondary_quantity := p_secondary_quantity;
728:

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

728:
729: j := 1; -- serial table counter
730: FOR msnt_record IN msnt_cursor(p_transaction_temp_id1) LOOP
731: IF (l_debug = 1) THEN
732: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
733: END IF;
734:
735: l_serial_table1(j).serial_number := msnt_record.fm_serial_number;
736: j := j + 1;

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

736: j := j + 1;
737: END LOOP;
738:
739: IF (l_debug = 1) THEN
740: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
741: END IF;
742:
743: j := 1; -- serial table counter
744: l_primary_quantity := 0;

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

751: j := j + 1;
752: END LOOP;
753:
754: IF (l_debug = 1) THEN
755: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
756: END IF;
757:
758: j := j + 1;
759: END LOOP;

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

772:
773: IF p_serial_allocated_flag = 'Y' THEN
774:
775: IF (l_debug = 1) THEN
776: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
777: END IF;
778:
779: UPDATE mtl_serial_numbers_temp
780: SET transaction_temp_id = p_transaction_temp_id2,

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

784: AND fm_serial_number = l_serial_table1(j).serial_number;
785: ELSE
786:
787: IF (l_debug = 1) THEN
788: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
789: END IF;
790:
791: DELETE FROM mtl_serial_numbers_temp
792: WHERE transaction_temp_id = p_transaction_temp_id1

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

808:
809: ELSIF p_lot_controlled = 'Y' AND p_serial_controlled = 'Y' THEN -- Lot and serial controlled
810:
811: IF (l_debug = 1) THEN
812: mydebug('Loaded...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
813: END IF;
814:
815: i := 1; -- lot table counter
816: j := 1; -- serial table counter

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

816: j := 1; -- serial table counter
817: FOR mtlt_record IN mtlt_cursor(p_transaction_temp_id1) LOOP
818:
819: IF (l_debug = 1) THEN
820: mydebug(i || ' Lot Number: ' || mtlt_record.lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
821: END IF;
822:
823: l_lot_table1(i).lot_number := mtlt_record.lot_number;
824: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;

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

824: l_lot_table1(i).primary_quantity := mtlt_record.primary_quantity;
825:
826: FOR msnt_record IN msnt_cursor(mtlt_record.serial_transaction_temp_id) LOOP
827: IF (l_debug = 1) THEN
828: mydebug(j || ' Serial Number: ' || msnt_record.fm_serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
829: END IF;
830:
831: l_serial_table1(j).transaction_temp_id := mtlt_record.serial_transaction_temp_id;
832: l_serial_table1(j).serial_number := msnt_record.fm_serial_number;

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

838: i := i + 1;
839: END LOOP;
840:
841: IF (l_debug = 1) THEN
842: mydebug('Confirmed...', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
843: END IF;
844:
845: i := 1; -- lot table counter
846: j := 1; -- serial table counter

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

849:
850: l_primary_quantity := l_primary_quantity + 1;
851:
852: IF (l_debug = 1) THEN
853: mydebug(i || ' Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
854: END IF;
855:
856: IF l_lot_table1(i).lot_number = lot_serial_rec.lot_number THEN
857: l_lot_table1(i).secondary_quantity := lot_serial_rec.secondary_quantity;

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

859:
860: WHILE l_serial_table1(j).serial_number <> lot_serial_rec.serial_number LOOP
861:
862: IF (l_debug = 1) THEN
863: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
864: END IF;
865:
866: l_serial_table1(j).delete_msnt := TRUE;
867:

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

872: IF l_lot_table1(i).primary_quantity = 0 THEN
873: l_lot_table1(i).delete_mtlt := TRUE;
874:
875: IF (l_debug = 1) THEN
876: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
877: END IF;
878:
879: ELSE
880:

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

878:
879: ELSE
880:
881: IF (l_debug = 1) THEN
882: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
883: END IF;
884:
885: END IF;
886:

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

889: IF l_serial_table1.COUNT >= j THEN
890: IF l_serial_table1(j-1).lot_number = l_lot_table1(i).lot_number AND
891: l_serial_table1(j).lot_number <> l_lot_table1(i).lot_number THEN
892: i := i + 1;
893: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
894: END IF;
895: END IF;
896:
897: END LOOP;

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

896:
897: END LOOP;
898:
899: IF (l_debug = 1) THEN
900: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
901: END IF;
902:
903: j := j + 1;
904:

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

906:
907: WHILE j <= l_serial_table1.COUNT LOOP
908:
909: IF (l_debug = 1) THEN
910: mydebug(j || 'Marking Serial Number: ' || l_serial_table1(j).serial_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
911: END IF;
912:
913: l_serial_table1(j).delete_msnt := TRUE;
914:

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

919: IF l_lot_table1(i).primary_quantity = 0 THEN
920: l_lot_table1(i).delete_mtlt := TRUE;
921:
922: IF (l_debug = 1) THEN
923: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be deleted', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
924: END IF;
925:
926: ELSE
927:

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

925:
926: ELSE
927:
928: IF (l_debug = 1) THEN
929: mydebug(i || 'Marking Lot Number: ' || l_lot_table1(i).lot_number || ' to be updated', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
930: END IF;
931:
932: END IF;
933:

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

936: IF l_serial_table1.COUNT >= j THEN
937: IF l_serial_table1(j-1).lot_number = l_lot_table1(i).lot_number AND
938: l_serial_table1(j).lot_number <> l_lot_table1(i).lot_number THEN
939: i := i + 1;
940: mydebug('Incrementing i', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
941: END IF;
942: END IF;
943:
944: END LOOP;

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

968: END;
969:
970: IF (l_debug = 1) THEN
971: IF l_row_exists = 1 THEN
972: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
973: ELSE
974: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
975: END IF;
976: END IF;

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

970: IF (l_debug = 1) THEN
971: IF l_row_exists = 1 THEN
972: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' exists in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
973: ELSE
974: mydebug(i || 'Lot Number: ' || l_lot_table1(i).lot_number || ' does not exist in remaining', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
975: END IF;
976: END IF;
977:
978: WHILE j <= l_serial_table1.COUNT AND l_serial_table1(j).lot_number = l_lot_table1(i).lot_number LOOP

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

981:
982: IF p_serial_allocated_flag = 'Y' THEN
983:
984: IF (l_debug = 1) THEN
985: mydebug(j || 'Transferring Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
986: END IF;
987:
988: UPDATE mtl_serial_numbers_temp
989: SET transaction_temp_id = l_serial_transaction_temp_id,

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

993: AND fm_serial_number = l_serial_table1(j).serial_number;
994: ELSE
995:
996: IF (l_debug = 1) THEN
997: mydebug(j || 'Deleting Serial Number: ' || l_serial_table1(j).serial_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
998: END IF;
999:
1000: DELETE FROM mtl_serial_numbers_temp
1001: WHERE transaction_temp_id = l_serial_table1(j).transaction_temp_id

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

1011:
1012: END IF; -- serial allocated flag
1013: ELSE
1014: IF (l_debug = 1) THEN
1015: mydebug(j || ' Serial Number: ' || l_serial_table1(j).serial_number || ' left untouched', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1016: END IF;
1017: END IF;
1018:
1019: j := j + 1;

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

1024:
1025: IF l_row_exists = 1 THEN
1026:
1027: IF (l_debug = 1) THEN
1028: mydebug(i || 'Deleting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1029: END IF;
1030:
1031: UPDATE mtl_transaction_lots_temp
1032: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

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

1044:
1045: ELSE -- row does not exist in 2
1046:
1047: IF (l_debug = 1) THEN
1048: mydebug(i || 'Transferring Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1049: END IF;
1050:
1051: UPDATE mtl_transaction_lots_temp
1052: SET transaction_temp_id = p_transaction_temp_id2,

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

1072:
1073: IF l_row_exists = 1 THEN
1074:
1075: IF (l_debug = 1) THEN
1076: mydebug(i || 'Updating Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1077: END IF;
1078:
1079: UPDATE mtl_transaction_lots_temp
1080: SET primary_quantity = primary_quantity + l_lot_table1(i).delta_primary_quantity,

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

1086: AND lot_number = l_lot_table1(i).lot_number;
1087: ELSE -- row does not exist in 2
1088:
1089: IF (l_debug = 1) THEN
1090: mydebug(i || 'Inserting Lot Number: ' || l_lot_table1(i).lot_number, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1091: END IF;
1092:
1093: SELECT *
1094: INTO l_mtlt_rec

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

1105: x_return_status => x_return_status,
1106: x_msg_count => x_msg_count,
1107: x_msg_data => x_msg_data);
1108:
1109: mydebug('Return status from insert MTLT : ' || x_return_status, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1110: IF x_return_status <> l_g_ret_sts_success THEN
1111: RAISE fnd_api.g_exc_error;
1112: END IF;
1113:

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

1124: l_delta_primary_quantity := l_primary_quantity1 - l_primary_quantity;
1125: l_delta_secondary_quantity := l_secondary_quantity1 - l_secondary_quantity;
1126:
1127: IF (l_debug = 1) THEN
1128: mydebug('Updating MMTT with delta qty: ' || l_delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1129: mydebug('Updating MMTT with delta sec qty: ' || l_delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1130: END IF;
1131:
1132: UPDATE mtl_material_transactions_temp

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

1125: l_delta_secondary_quantity := l_secondary_quantity1 - l_secondary_quantity;
1126:
1127: IF (l_debug = 1) THEN
1128: mydebug('Updating MMTT with delta qty: ' || l_delta_primary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1129: mydebug('Updating MMTT with delta sec qty: ' || l_delta_secondary_quantity, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1130: END IF;
1131:
1132: UPDATE mtl_material_transactions_temp
1133: SET transaction_quantity = Round(l_primary_quantity*l_conversion_factor, l_g_decimal_precision),

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

1164: x_return_status := l_g_ret_sts_error;
1165: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1166:
1167: IF (l_debug = 1) THEN
1168: mydebug('Error', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1169: END IF;
1170: ROLLBACK;
1171:
1172: WHEN OTHERS THEN

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

1172: WHEN OTHERS THEN
1173: x_return_status := l_g_ret_sts_unexp_error;
1174: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1175: IF (l_debug = 1) THEN
1176: mydebug('Error: ' || Sqlerrm, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1177: END IF;
1178: ROLLBACK ;
1179: END update_loaded_part;
1180:

Line 3606: mydebug('WMS_TASK_LOAD.proc_process_confirmed_lots - Exception is raised while calling proc_decrement_allocated_mtlts');

3602: x_return_status);
3603: EXCEPTION
3604: WHEN OTHERS THEN
3605: IF l_return_status_ls <> l_g_ret_sts_success THEN
3606: mydebug('WMS_TASK_LOAD.proc_process_confirmed_lots - Exception is raised while calling proc_decrement_allocated_mtlts');
3607: RAISE fnd_api.G_EXC_ERROR;
3608: END IF;
3609: END;
3610:

Line 7589: mydebug ('* Entering WMS_TASK_LOAD.task_load *' );

7585: IF p_lpn_match_lpn_id = 0 THEN l_lpn_match_lpn_id := NULL; END IF;
7586: IF p_qty_rsn_id = 0 THEN l_qty_rsn_id := NULL; END IF;
7587:
7588: IF (l_debug = 1) THEN
7589: mydebug ('*** Entering WMS_TASK_LOAD.task_load ***' );
7590: mydebug ('l_progress: ' || l_progress );
7591: mydebug('Entered..... task_Load');
7592: mydebug('p_action:'||p_action);
7593: mydebug('p_organization_id:'||p_organization_id);

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

14374: WHEN OTHERS THEN
14375: x_return_status := fnd_api.g_ret_sts_unexp_error;
14376:
14377: IF SQLCODE IS NOT NULL THEN
14378: inv_mobile_helper_functions.sql_error('wms_task_load.insert_serial', l_progress, SQLCODE);
14379: END IF;
14380:
14381: IF (l_debug = 1) THEN
14382: mydebug('Exitting insert_serial - other exception:'|| l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);

Line 16220: END wms_task_load;

16216:
16217: END Update_Tree_Flex_Lot;
16218:
16219:
16220: END wms_task_load;