DBA Data[Home] [Help]

APPS.INV_VALIDATE_TROLIN dependencies on INV_VALIDATE

Line 1: PACKAGE BODY INV_Validate_Trolin AS

1: PACKAGE BODY INV_Validate_Trolin AS
2: /* $Header: INVLTRLB.pls 120.9 2007/07/24 13:45:32 hjogleka ship $ */
3: -- Global constant holding the package name
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Validate_Trolin';

Line 5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Validate_Trolin';

1: PACKAGE BODY INV_Validate_Trolin AS
2: /* $Header: INVLTRLB.pls 120.9 2007/07/24 13:45:32 hjogleka ship $ */
3: -- Global constant holding the package name
4:
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Validate_Trolin';
6:
7: g_organization_id NUMBER;
8: g_wms_org_flag BOOLEAN;
9:

Line 32: p_org IN inv_validate_trohdr.ORG ) RETURN NUMBER

28:
29: -- ---------------------------------------------------------------------
30: FUNCTION Line_Number ( p_line_number IN NUMBER,
31: p_header_id IN NUMBER,
32: p_org IN inv_validate_trohdr.ORG ) RETURN NUMBER
33: IS
34: l_dummy VARCHAR2(10);
35: l_return_value BOOLEAN;
36: l_request_number VARCHAR2(30);

Line 576: IF p_trolin_rec.organization_id <> INV_Validate_Trohdr.g_org.organization_id

572:
573: --inv_debug.message('ssia', 'TRO: validating attributes');
574: -- Validate trolin attributes
575:
576: IF p_trolin_rec.organization_id <> INV_Validate_Trohdr.g_org.organization_id
577: THEN
578: x_return_status := FND_API.G_RET_STS_ERROR;
579: return;
580: END IF;

Line 598: inv_validate_trohdr.g_org.organization_id := p_trolin_rec.organization_id;

594: p_old_trolin_rec.inventory_item_id IS NULL )
595: THEN
596:
597: g_item.inventory_item_id := p_trolin_rec.inventory_item_id;
598: inv_validate_trohdr.g_org.organization_id := p_trolin_rec.organization_id;
599:
600: IF INV_Validate.Inventory_Item(g_item,inv_validate_trohdr.g_org) =
601: INV_Validate.F
602: THEN

Line 600: IF INV_Validate.Inventory_Item(g_item,inv_validate_trohdr.g_org) =

596:
597: g_item.inventory_item_id := p_trolin_rec.inventory_item_id;
598: inv_validate_trohdr.g_org.organization_id := p_trolin_rec.organization_id;
599:
600: IF INV_Validate.Inventory_Item(g_item,inv_validate_trohdr.g_org) =
601: INV_Validate.F
602: THEN
603: x_return_status := FND_API.G_RET_STS_ERROR;
604: return;

Line 601: INV_Validate.F

597: g_item.inventory_item_id := p_trolin_rec.inventory_item_id;
598: inv_validate_trohdr.g_org.organization_id := p_trolin_rec.organization_id;
599:
600: IF INV_Validate.Inventory_Item(g_item,inv_validate_trohdr.g_org) =
601: INV_Validate.F
602: THEN
603: x_return_status := FND_API.G_RET_STS_ERROR;
604: return;
605: END IF;

Line 614: IF INV_Validate.Transaction_Type(g_transaction_l) = inv_validate.F THEN

610: ( p_trolin_rec.transaction_type_id <> p_old_trolin_rec.transaction_type_id OR
611: p_old_trolin_rec.transaction_type_id IS NULL )
612: THEN
613: g_transaction_l.transaction_type_id := p_trolin_rec.transaction_type_id;
614: IF INV_Validate.Transaction_Type(g_transaction_l) = inv_validate.F THEN
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: END IF;
617: END IF;
618:

Line 625: IF INV_Validate.Created_By(p_trolin_rec.created_by) = inv_validate.F

621: ( p_trolin_rec.created_by <>
622: p_old_trolin_rec.created_by OR
623: p_old_trolin_rec.created_by IS NULL )
624: THEN
625: IF INV_Validate.Created_By(p_trolin_rec.created_by) = inv_validate.F
626: THEN
627: x_return_status := FND_API.G_RET_STS_ERROR;
628: return;
629: END IF;

Line 641: IF INV_Validate.Creation_Date(p_trolin_rec.creation_date) =

637: ( p_trolin_rec.creation_date <>
638: p_old_trolin_rec.creation_date OR
639: p_old_trolin_rec.creation_date IS NULL )
640: THEN
641: IF INV_Validate.Creation_Date(p_trolin_rec.creation_date) =
642: INV_Validate.F
643: THEN
644: x_return_status := FND_API.G_RET_STS_ERROR;
645: return;

Line 642: INV_Validate.F

638: p_old_trolin_rec.creation_date OR
639: p_old_trolin_rec.creation_date IS NULL )
640: THEN
641: IF INV_Validate.Creation_Date(p_trolin_rec.creation_date) =
642: INV_Validate.F
643: THEN
644: x_return_status := FND_API.G_RET_STS_ERROR;
645: return;
646: END IF;

Line 655: IF INV_Validate_Trohdr.Date_Required(p_trolin_rec.date_required) =

651: ( p_trolin_rec.date_required <>
652: p_old_trolin_rec.date_required OR
653: p_old_trolin_rec.date_required IS NULL )
654: THEN
655: IF INV_Validate_Trohdr.Date_Required(p_trolin_rec.date_required) =
656: INV_Validate.F
657: THEN
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: return;

Line 656: INV_Validate.F

652: p_old_trolin_rec.date_required OR
653: p_old_trolin_rec.date_required IS NULL )
654: THEN
655: IF INV_Validate_Trohdr.Date_Required(p_trolin_rec.date_required) =
656: INV_Validate.F
657: THEN
658: x_return_status := FND_API.G_RET_STS_ERROR;
659: return;
660: END IF;

Line 672: IF inv_validate_trolin.g_transaction_l.transaction_action_id = 2 THEN

668: p_old_trolin_rec.from_subinventory_code IS NULL )
669: THEN
670: g_from_sub.secondary_inventory_name :=
671: p_trolin_rec.from_subinventory_code;
672: IF inv_validate_trolin.g_transaction_l.transaction_action_id = 2 THEN
673: l_acct_txn := 0;
674: ELSE
675: l_acct_txn := 1;
676: END IF;

Line 677: IF INV_Validate.From_Subinventory(g_from_sub,

673: l_acct_txn := 0;
674: ELSE
675: l_acct_txn := 1;
676: END IF;
677: IF INV_Validate.From_Subinventory(g_from_sub,
678: inv_validate_trohdr.g_org,
679: g_item,l_acct_txn ) = INV_Validate.F
680: THEN
681: --inv_Debug.message('ssia', 'error from inv_validate.from_subinventory');

Line 678: inv_validate_trohdr.g_org,

674: ELSE
675: l_acct_txn := 1;
676: END IF;
677: IF INV_Validate.From_Subinventory(g_from_sub,
678: inv_validate_trohdr.g_org,
679: g_item,l_acct_txn ) = INV_Validate.F
680: THEN
681: --inv_Debug.message('ssia', 'error from inv_validate.from_subinventory');
682: x_return_status := FND_API.G_RET_STS_ERROR;

Line 679: g_item,l_acct_txn ) = INV_Validate.F

675: l_acct_txn := 1;
676: END IF;
677: IF INV_Validate.From_Subinventory(g_from_sub,
678: inv_validate_trohdr.g_org,
679: g_item,l_acct_txn ) = INV_Validate.F
680: THEN
681: --inv_Debug.message('ssia', 'error from inv_validate.from_subinventory');
682: x_return_status := FND_API.G_RET_STS_ERROR;
683: return;

Line 681: --inv_Debug.message('ssia', 'error from inv_validate.from_subinventory');

677: IF INV_Validate.From_Subinventory(g_from_sub,
678: inv_validate_trohdr.g_org,
679: g_item,l_acct_txn ) = INV_Validate.F
680: THEN
681: --inv_Debug.message('ssia', 'error from inv_validate.from_subinventory');
682: x_return_status := FND_API.G_RET_STS_ERROR;
683: return;
684: END IF;
685:

Line 727: IF INV_Validate.Project(p_trolin_rec.project_id) = inv_validate.F THEN

723: ( p_trolin_rec.project_id <>
724: p_old_trolin_rec.project_id OR
725: p_old_trolin_rec.project_id IS NULL )
726: THEN
727: IF INV_Validate.Project(p_trolin_rec.project_id) = inv_validate.F THEN
728: x_return_status := FND_API.G_RET_STS_ERROR;
729: return;
730: END IF;
731: END IF;

Line 740: IF INV_Validate.Task(p_trolin_rec.task_id, p_trolin_rec.project_id)

736: ( p_trolin_rec.task_id <>
737: p_old_trolin_rec.task_id OR
738: p_old_trolin_rec.task_id IS NULL )
739: THEN
740: IF INV_Validate.Task(p_trolin_rec.task_id, p_trolin_rec.project_id)
741: = INV_Validate.F THEN
742: x_return_status := FND_API.G_RET_STS_ERROR;
743: return;
744: END IF;

Line 741: = INV_Validate.F THEN

737: p_old_trolin_rec.task_id OR
738: p_old_trolin_rec.task_id IS NULL )
739: THEN
740: IF INV_Validate.Task(p_trolin_rec.task_id, p_trolin_rec.project_id)
741: = INV_Validate.F THEN
742: x_return_status := FND_API.G_RET_STS_ERROR;
743: return;
744: END IF;
745: END IF;

Line 763: passed to 'INV_VALIDATE.FROM_LOCATOR' should be null when the org is non-PJM

759: p_old_trolin_rec.from_locator_id IS NULL )
760: THEN
761: g_from_locator.inventory_location_id := p_trolin_rec.from_locator_id;
762: /*Bug#5036174. If the org is non-PJM enbled, then the 'from locator' should not be specific to any project. So the values of both project_id and task_id
763: passed to 'INV_VALIDATE.FROM_LOCATOR' should be null when the org is non-PJM
764: enabled.*/
765:
766: IF (inv_cache.set_org_rec(p_trolin_rec.organization_id)) THEN
767: l_pjm := inv_cache.org_rec.project_reference_enabled;

Line 770: IF INV_Validate.From_Locator(

766: IF (inv_cache.set_org_rec(p_trolin_rec.organization_id)) THEN
767: l_pjm := inv_cache.org_rec.project_reference_enabled;
768: END IF;
769: IF (l_pjm = 2) THEN
770: IF INV_Validate.From_Locator(
771: g_from_locator
772: ,inv_validate_trohdr.g_org
773: ,g_item
774: ,g_from_sub

Line 772: ,inv_validate_trohdr.g_org

768: END IF;
769: IF (l_pjm = 2) THEN
770: IF INV_Validate.From_Locator(
771: g_from_locator
772: ,inv_validate_trohdr.g_org
773: ,g_item
774: ,g_from_sub
775: ,NULL
776: ,NULL

Line 777: ,inv_validate_trolin.g_transaction_l.transaction_action_id) = INV_Validate.F

773: ,g_item
774: ,g_from_sub
775: ,NULL
776: ,NULL
777: ,inv_validate_trolin.g_transaction_l.transaction_action_id) = INV_Validate.F
778: THEN
779: x_return_status := FND_API.G_RET_STS_ERROR;
780: return;
781: END IF;

Line 783: IF INV_Validate.From_Locator(g_from_locator,

779: x_return_status := FND_API.G_RET_STS_ERROR;
780: return;
781: END IF;
782: ELSE
783: IF INV_Validate.From_Locator(g_from_locator,
784: inv_validate_trohdr.g_org,
785: g_item, g_from_sub,
786: p_trolin_rec.project_id,
787: p_trolin_rec.task_id,

Line 784: inv_validate_trohdr.g_org,

780: return;
781: END IF;
782: ELSE
783: IF INV_Validate.From_Locator(g_from_locator,
784: inv_validate_trohdr.g_org,
785: g_item, g_from_sub,
786: p_trolin_rec.project_id,
787: p_trolin_rec.task_id,
788: inv_validate_trolin.g_transaction_l.transaction_action_id) =

Line 788: inv_validate_trolin.g_transaction_l.transaction_action_id) =

784: inv_validate_trohdr.g_org,
785: g_item, g_from_sub,
786: p_trolin_rec.project_id,
787: p_trolin_rec.task_id,
788: inv_validate_trolin.g_transaction_l.transaction_action_id) =
789: INV_Validate.F
790: THEN
791: x_return_status := FND_API.G_RET_STS_ERROR;
792: return;

Line 789: INV_Validate.F

785: g_item, g_from_sub,
786: p_trolin_rec.project_id,
787: p_trolin_rec.task_id,
788: inv_validate_trolin.g_transaction_l.transaction_action_id) =
789: INV_Validate.F
790: THEN
791: x_return_status := FND_API.G_RET_STS_ERROR;
792: return;
793: END IF;

Line 805: IF INV_Validate_Trohdr.Header(p_trolin_rec.header_id) =

801: ( p_trolin_rec.header_id <>
802: p_old_trolin_rec.header_id OR
803: p_old_trolin_rec.header_id IS NULL )
804: THEN
805: IF INV_Validate_Trohdr.Header(p_trolin_rec.header_id) =
806: INV_Validate.F THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
808: return;
809: END IF;

Line 806: INV_Validate.F THEN

802: p_old_trolin_rec.header_id OR
803: p_old_trolin_rec.header_id IS NULL )
804: THEN
805: IF INV_Validate_Trohdr.Header(p_trolin_rec.header_id) =
806: INV_Validate.F THEN
807: x_return_status := FND_API.G_RET_STS_ERROR;
808: return;
809: END IF;
810: END IF;

Line 819: IF INV_Validate.Last_Updated_By(p_trolin_rec.last_updated_by) =

815: ( p_trolin_rec.last_updated_by <>
816: p_old_trolin_rec.last_updated_by OR
817: p_old_trolin_rec.last_updated_by IS NULL )
818: THEN
819: IF INV_Validate.Last_Updated_By(p_trolin_rec.last_updated_by) =
820: INV_Validate.F
821: THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: return;

Line 820: INV_Validate.F

816: p_old_trolin_rec.last_updated_by OR
817: p_old_trolin_rec.last_updated_by IS NULL )
818: THEN
819: IF INV_Validate.Last_Updated_By(p_trolin_rec.last_updated_by) =
820: INV_Validate.F
821: THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: return;
824: END IF;

Line 837: IF INV_Validate.Last_Update_Date(p_trolin_rec.last_update_date) =

833: ( p_trolin_rec.last_update_date <>
834: p_old_trolin_rec.last_update_date OR
835: p_old_trolin_rec.last_update_date IS NULL )
836: THEN
837: IF INV_Validate.Last_Update_Date(p_trolin_rec.last_update_date) =
838: inv_validate.f
839: THEN
840: x_return_status := FND_API.G_RET_STS_ERROR;
841: return;

Line 838: inv_validate.f

834: p_old_trolin_rec.last_update_date OR
835: p_old_trolin_rec.last_update_date IS NULL )
836: THEN
837: IF INV_Validate.Last_Update_Date(p_trolin_rec.last_update_date) =
838: inv_validate.f
839: THEN
840: x_return_status := FND_API.G_RET_STS_ERROR;
841: return;
842: END IF;

Line 852: IF INV_Validate.Last_Update_Login(p_trolin_rec.last_update_login) =

848: ( p_trolin_rec.last_update_login <>
849: p_old_trolin_rec.last_update_login OR
850: p_old_trolin_rec.last_update_login IS NULL )
851: THEN
852: IF INV_Validate.Last_Update_Login(p_trolin_rec.last_update_login) =
853: INV_Validate.f
854: THEN
855: x_return_status := FND_API.G_RET_STS_ERROR;
856: return;

Line 853: INV_Validate.f

849: p_old_trolin_rec.last_update_login OR
850: p_old_trolin_rec.last_update_login IS NULL )
851: THEN
852: IF INV_Validate.Last_Update_Login(p_trolin_rec.last_update_login) =
853: INV_Validate.f
854: THEN
855: x_return_status := FND_API.G_RET_STS_ERROR;
856: return;
857: END IF;

Line 882: inv_validate_trohdr.g_org) = F

878: p_old_trolin_rec.line_number OR
879: p_old_trolin_rec.line_number IS NULL )
880: THEN
881: IF Line_Number(p_trolin_rec.line_number,p_trolin_rec.header_id,
882: inv_validate_trohdr.g_org) = F
883: THEN
884: x_return_status := FND_API.G_RET_STS_ERROR;
885: RETURN;
886: END IF;

Line 912: INV_Validate.Program_Application(p_trolin_rec.program_application_id)

908: p_old_trolin_rec.program_application_id OR
909: p_old_trolin_rec.program_application_id IS NULL )
910: THEN
911: IF
912: INV_Validate.Program_Application(p_trolin_rec.program_application_id)
913: = INV_Validate.F
914: THEN
915: x_return_status := FND_API.G_RET_STS_ERROR;
916: return;

Line 913: = INV_Validate.F

909: p_old_trolin_rec.program_application_id IS NULL )
910: THEN
911: IF
912: INV_Validate.Program_Application(p_trolin_rec.program_application_id)
913: = INV_Validate.F
914: THEN
915: x_return_status := FND_API.G_RET_STS_ERROR;
916: return;
917: END IF;

Line 927: IF INV_Validate.Program(p_trolin_rec.program_id) = inv_validate.F THEN

923: ( p_trolin_rec.program_id <>
924: p_old_trolin_rec.program_id OR
925: p_old_trolin_rec.program_id IS NULL )
926: THEN
927: IF INV_Validate.Program(p_trolin_rec.program_id) = inv_validate.F THEN
928: x_return_status := FND_API.G_RET_STS_ERROR;
929: return;
930: END IF;
931: END IF;

Line 941: INV_Validate.Program_Update_Date(p_trolin_rec.program_update_date)

937: p_old_trolin_rec.program_update_date OR
938: p_old_trolin_rec.program_update_date IS NULL )
939: THEN
940: IF
941: INV_Validate.Program_Update_Date(p_trolin_rec.program_update_date)
942: = inv_validate.F THEN
943: x_return_status := FND_API.G_RET_STS_ERROR;
944: return;
945: END IF;

Line 942: = inv_validate.F THEN

938: p_old_trolin_rec.program_update_date IS NULL )
939: THEN
940: IF
941: INV_Validate.Program_Update_Date(p_trolin_rec.program_update_date)
942: = inv_validate.F THEN
943: x_return_status := FND_API.G_RET_STS_ERROR;
944: return;
945: END IF;
946: END IF;

Line 955: IF INV_Validate.Quantity(p_trolin_rec.quantity) = inv_validate.F THEN

951: ( p_trolin_rec.quantity <>
952: p_old_trolin_rec.quantity OR
953: p_old_trolin_rec.quantity IS NULL )
954: THEN
955: IF INV_Validate.Quantity(p_trolin_rec.quantity) = inv_validate.F THEN
956: x_return_status := FND_API.G_RET_STS_ERROR;
957: return;
958: END IF;
959: END IF;

Line 996: IF INV_Validate.Secondary_Quantity(p_trolin_rec.secondary_quantity) = inv_validate.F THEN

992: ( p_trolin_rec.secondary_quantity <>
993: p_old_trolin_rec.secondary_quantity OR
994: p_old_trolin_rec.secondary_quantity IS NULL )
995: THEN
996: IF INV_Validate.Secondary_Quantity(p_trolin_rec.secondary_quantity) = inv_validate.F THEN
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: return;
999: END IF;
1000: END IF;

Line 1035: IF INV_Validate.Reason(p_trolin_rec.reason_id) = inv_validate.F THEN

1031: ( p_trolin_rec.reason_id <>
1032: p_old_trolin_rec.reason_id OR
1033: p_old_trolin_rec.reason_id IS NULL )
1034: THEN
1035: IF INV_Validate.Reason(p_trolin_rec.reason_id) = inv_validate.F THEN
1036: x_return_status := FND_API.G_RET_STS_ERROR;
1037: return;
1038: END IF;
1039: END IF;

Line 1047: IF INV_Validate.Reference(p_trolin_rec.reference) = inv_validate.F THEN

1043: ( p_trolin_rec.reference <>
1044: p_old_trolin_rec.reference OR
1045: p_old_trolin_rec.reference IS NULL )
1046: THEN
1047: IF INV_Validate.Reference(p_trolin_rec.reference) = inv_validate.F THEN
1048: x_return_status := FND_API.G_RET_STS_ERROR;
1049: return;
1050: END IF;
1051: END IF;

Line 1059: IF INV_Validate.Reference_Type(p_trolin_rec.reference_type_code) =

1055: ( p_trolin_rec.reference_type_code <>
1056: p_old_trolin_rec.reference_type_code OR
1057: p_old_trolin_rec.reference_type_code IS NULL )
1058: THEN
1059: IF INV_Validate.Reference_Type(p_trolin_rec.reference_type_code) =
1060: inv_validate.F THEN
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: return;
1063: END IF;

Line 1060: inv_validate.F THEN

1056: p_old_trolin_rec.reference_type_code OR
1057: p_old_trolin_rec.reference_type_code IS NULL )
1058: THEN
1059: IF INV_Validate.Reference_Type(p_trolin_rec.reference_type_code) =
1060: inv_validate.F THEN
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: return;
1063: END IF;
1064: END IF;

Line 1073: IF INV_Validate.Reference(p_trolin_rec.reference_id,

1069: ( p_trolin_rec.reference_id <>
1070: p_old_trolin_rec.reference_id OR
1071: p_old_trolin_rec.reference_id IS NULL )
1072: THEN
1073: IF INV_Validate.Reference(p_trolin_rec.reference_id,
1074: p_trolin_rec.reference_type_code) =
1075: inv_validate.F THEN
1076: x_return_status := FND_API.G_RET_STS_ERROR;
1077: return;

Line 1075: inv_validate.F THEN

1071: p_old_trolin_rec.reference_id IS NULL )
1072: THEN
1073: IF INV_Validate.Reference(p_trolin_rec.reference_id,
1074: p_trolin_rec.reference_type_code) =
1075: inv_validate.F THEN
1076: x_return_status := FND_API.G_RET_STS_ERROR;
1077: return;
1078: END IF;
1079: END IF;

Line 1087: IF INV_Validate_Trohdr.Request(p_trolin_rec.request_id) =

1083: ( p_trolin_rec.request_id <>
1084: p_old_trolin_rec.request_id OR
1085: p_old_trolin_rec.request_id IS NULL )
1086: THEN
1087: IF INV_Validate_Trohdr.Request(p_trolin_rec.request_id) =
1088: inv_validate.F THEN
1089: x_return_status := FND_API.G_RET_STS_ERROR;
1090: return;
1091: END IF;

Line 1088: inv_validate.F THEN

1084: p_old_trolin_rec.request_id OR
1085: p_old_trolin_rec.request_id IS NULL )
1086: THEN
1087: IF INV_Validate_Trohdr.Request(p_trolin_rec.request_id) =
1088: inv_validate.F THEN
1089: x_return_status := FND_API.G_RET_STS_ERROR;
1090: return;
1091: END IF;
1092: END IF;

Line 1100: IF INV_Validate.Revision(p_trolin_rec.revision,

1096: ( p_trolin_rec.revision <>
1097: p_old_trolin_rec.revision OR
1098: p_old_trolin_rec.revision IS NULL )
1099: THEN
1100: IF INV_Validate.Revision(p_trolin_rec.revision,
1101: inv_validate_trohdr.g_org,
1102: g_item) = inv_validate.F THEN
1103: x_return_status := FND_API.G_RET_STS_ERROR;
1104: return;

Line 1101: inv_validate_trohdr.g_org,

1097: p_old_trolin_rec.revision OR
1098: p_old_trolin_rec.revision IS NULL )
1099: THEN
1100: IF INV_Validate.Revision(p_trolin_rec.revision,
1101: inv_validate_trohdr.g_org,
1102: g_item) = inv_validate.F THEN
1103: x_return_status := FND_API.G_RET_STS_ERROR;
1104: return;
1105: END IF;

Line 1102: g_item) = inv_validate.F THEN

1098: p_old_trolin_rec.revision IS NULL )
1099: THEN
1100: IF INV_Validate.Revision(p_trolin_rec.revision,
1101: inv_validate_trohdr.g_org,
1102: g_item) = inv_validate.F THEN
1103: x_return_status := FND_API.G_RET_STS_ERROR;
1104: return;
1105: END IF;
1106: END IF;

Line 1131: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item) = inv_validate.F THEN

1127:
1128: IF l_mov_order_type=INV_GLOBALS.g_move_order_put_away
1129: THEN
1130:
1131: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item) = inv_validate.F THEN
1132: x_return_status := FND_API.G_RET_STS_ERROR;
1133: return;
1134: END IF;
1135:

Line 1138: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,

1134: END IF;
1135:
1136: ELSE
1137:
1138: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,
1139: g_from_sub, g_from_locator,
1140: p_trolin_rec.revision) = inv_validate.F THEN
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: return;

Line 1140: p_trolin_rec.revision) = inv_validate.F THEN

1136: ELSE
1137:
1138: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,
1139: g_from_sub, g_from_locator,
1140: p_trolin_rec.revision) = inv_validate.F THEN
1141: x_return_status := FND_API.G_RET_STS_ERROR;
1142: return;
1143: END IF;
1144:

Line 1149: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,

1145: END IF;
1146:
1147:
1148: /*
1149: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,
1150: g_from_sub, g_from_locator,
1151: p_trolin_rec.revision) = inv_validate.F THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: return;

Line 1151: p_trolin_rec.revision) = inv_validate.F THEN

1147:
1148: /*
1149: IF INV_Validate.Lot_Number(g_lot, inv_validate_trohdr.g_org, g_item,
1150: g_from_sub, g_from_locator,
1151: p_trolin_rec.revision) = inv_validate.F THEN
1152: x_return_status := FND_API.G_RET_STS_ERROR;
1153: return;
1154: END IF;
1155: */

Line 1165: IF INV_Validate.Serial_Number_Start(g_serial,

1161: p_old_trolin_rec.serial_number_start OR
1162: p_old_trolin_rec.serial_number_start IS NULL )
1163: THEN
1164: g_serial.serial_number := p_trolin_rec.serial_number_start;
1165: IF INV_Validate.Serial_Number_Start(g_serial,
1166: inv_validate_trohdr.g_org,
1167: g_item, g_from_sub, g_lot,
1168: g_from_locator,
1169: p_trolin_rec.revision) =

Line 1166: inv_validate_trohdr.g_org,

1162: p_old_trolin_rec.serial_number_start IS NULL )
1163: THEN
1164: g_serial.serial_number := p_trolin_rec.serial_number_start;
1165: IF INV_Validate.Serial_Number_Start(g_serial,
1166: inv_validate_trohdr.g_org,
1167: g_item, g_from_sub, g_lot,
1168: g_from_locator,
1169: p_trolin_rec.revision) =
1170: inv_validate.F THEN

Line 1170: inv_validate.F THEN

1166: inv_validate_trohdr.g_org,
1167: g_item, g_from_sub, g_lot,
1168: g_from_locator,
1169: p_trolin_rec.revision) =
1170: inv_validate.F THEN
1171: x_return_status := FND_API.G_RET_STS_ERROR;
1172: return;
1173: END IF;
1174: END IF;

Line 1183: IF INV_Validate.Serial_Number_End(g_serial,

1179: p_old_trolin_rec.serial_number_end OR
1180: p_old_trolin_rec.serial_number_end IS NULL )
1181: THEN
1182: g_serial.serial_number := p_trolin_rec.serial_number_end;
1183: IF INV_Validate.Serial_Number_End(g_serial,
1184: inv_validate_trohdr.g_org,
1185: g_item, g_from_sub, g_lot,
1186: g_from_locator,
1187: p_trolin_rec.revision) =

Line 1184: inv_validate_trohdr.g_org,

1180: p_old_trolin_rec.serial_number_end IS NULL )
1181: THEN
1182: g_serial.serial_number := p_trolin_rec.serial_number_end;
1183: IF INV_Validate.Serial_Number_End(g_serial,
1184: inv_validate_trohdr.g_org,
1185: g_item, g_from_sub, g_lot,
1186: g_from_locator,
1187: p_trolin_rec.revision) =
1188: inv_validate.F THEN

Line 1188: inv_validate.F THEN

1184: inv_validate_trohdr.g_org,
1185: g_item, g_from_sub, g_lot,
1186: g_from_locator,
1187: p_trolin_rec.revision) =
1188: inv_validate.F THEN
1189: x_return_status := FND_API.G_RET_STS_ERROR;
1190: return;
1191: END IF;
1192: END IF;

Line 1201: IF INV_Validate_Trohdr.Status_Date(p_trolin_rec.status_date) =

1197: ( p_trolin_rec.status_date <>
1198: p_old_trolin_rec.status_date OR
1199: p_old_trolin_rec.status_date IS NULL )
1200: THEN
1201: IF INV_Validate_Trohdr.Status_Date(p_trolin_rec.status_date) =
1202: inv_validate.F THEN
1203: x_return_status := FND_API.G_RET_STS_ERROR;
1204: return;
1205: END IF;

Line 1202: inv_validate.F THEN

1198: p_old_trolin_rec.status_date OR
1199: p_old_trolin_rec.status_date IS NULL )
1200: THEN
1201: IF INV_Validate_Trohdr.Status_Date(p_trolin_rec.status_date) =
1202: inv_validate.F THEN
1203: x_return_status := FND_API.G_RET_STS_ERROR;
1204: return;
1205: END IF;
1206: END IF;

Line 1218: WHERE ORG.ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id;

1214:
1215: SELECT ORG.CHART_OF_ACCOUNTS_ID
1216: INTO l_chart_of_accounts_id
1217: FROM ORG_ORGANIZATION_DEFINITIONS ORG
1218: WHERE ORG.ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id;
1219:
1220: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1221: OPERATION => 'CREATE_COMBINATION',
1222: APPL_SHORT_NAME => 'SQLGL',

Line 1227: -- DATA_SET => INV_Validate.g_TRO_VAttributes.organization_id);

1223: key_flex_code => 'GL#',
1224: STRUCTURE_NUMBER => l_chart_of_accounts_id,
1225: CONCAT_SEGMENTS => p_trolin_val_rec.to_account,
1226: VALUES_OR_IDS => 'V');
1227: -- DATA_SET => INV_Validate.g_TRO_VAttributes.organization_id);
1228: if l_keystat_val then
1229: l_combination_id := FND_FLEX_KEYVAL.combination_id;
1230: p_trolin_rec.to_account_id := l_combination_id;
1231: else

Line 1242: IF INV_Validate.To_Account(p_trolin_rec.to_account_id) =

1238: ( p_trolin_rec.to_account_id <>
1239: p_old_trolin_rec.to_account_id OR
1240: p_old_trolin_rec.to_account_id IS NULL )
1241: THEN
1242: IF INV_Validate.To_Account(p_trolin_rec.to_account_id) =
1243: inv_validate.f THEN
1244: x_return_status := FND_API.G_RET_STS_ERROR;
1245: END IF;
1246: END IF;

Line 1243: inv_validate.f THEN

1239: p_old_trolin_rec.to_account_id OR
1240: p_old_trolin_rec.to_account_id IS NULL )
1241: THEN
1242: IF INV_Validate.To_Account(p_trolin_rec.to_account_id) =
1243: inv_validate.f THEN
1244: x_return_status := FND_API.G_RET_STS_ERROR;
1245: END IF;
1246: END IF;
1247: -- inv_debug.message('TRO: to_account_id: ' || x_return_status);

Line 1258: IF INV_Validate.To_Subinventory(g_to_sub, inv_validate_trohdr.g_org,

1254: p_old_trolin_rec.to_subinventory_code IS NULL )
1255: THEN
1256: --inv_debug.message('ssia', 'check to_subinventory_code');
1257: g_to_sub.secondary_inventory_name := p_trolin_rec.to_subinventory_code;
1258: IF INV_Validate.To_Subinventory(g_to_sub, inv_validate_trohdr.g_org,
1259: g_item, g_from_sub, 0) =
1260: inv_validate.F THEN
1261: --inv_debug.message('ssia', 'error to_subinventory_code');
1262: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1260: inv_validate.F THEN

1256: --inv_debug.message('ssia', 'check to_subinventory_code');
1257: g_to_sub.secondary_inventory_name := p_trolin_rec.to_subinventory_code;
1258: IF INV_Validate.To_Subinventory(g_to_sub, inv_validate_trohdr.g_org,
1259: g_item, g_from_sub, 0) =
1260: inv_validate.F THEN
1261: --inv_debug.message('ssia', 'error to_subinventory_code');
1262: x_return_status := FND_API.G_RET_STS_ERROR;
1263: return;
1264: END IF;

Line 1316: inv_validate_trohdr.g_org.stock_locator_control_code,

1312: INV_Globals.Locator_control(
1313: l_return_status,
1314: l_msg_count,
1315: l_msg_data,
1316: inv_validate_trohdr.g_org.stock_locator_control_code,
1317: nvl(g_to_sub.locator_type,1),
1318: g_item.location_control_code,
1319: g_item.restrict_locators_code,
1320: inv_validate_trohdr.g_org.negative_inv_receipt_code,

Line 1320: inv_validate_trohdr.g_org.negative_inv_receipt_code,

1316: inv_validate_trohdr.g_org.stock_locator_control_code,
1317: nvl(g_to_sub.locator_type,1),
1318: g_item.location_control_code,
1319: g_item.restrict_locators_code,
1320: inv_validate_trohdr.g_org.negative_inv_receipt_code,
1321: inv_validate_trolin.g_transaction_l.transaction_action_id);
1322: if (NVL(v_locator_control,1) = 3) then
1323: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1324: OPERATION => 'CREATE_COMB_NO_AT',

Line 1321: inv_validate_trolin.g_transaction_l.transaction_action_id);

1317: nvl(g_to_sub.locator_type,1),
1318: g_item.location_control_code,
1319: g_item.restrict_locators_code,
1320: inv_validate_trohdr.g_org.negative_inv_receipt_code,
1321: inv_validate_trolin.g_transaction_l.transaction_action_id);
1322: if (NVL(v_locator_control,1) = 3) then
1323: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1324: OPERATION => 'CREATE_COMB_NO_AT',
1325: APPL_SHORT_NAME => 'INV',

Line 1330: DATA_SET => inv_validate_trohdr.g_org.organization_id);

1326: KEY_FLEX_CODE => 'MTLL',
1327: STRUCTURE_NUMBER => 101,
1328: CONCAT_SEGMENTS => p_trolin_val_rec.to_locator,
1329: VALUES_OR_IDS => 'V',
1330: DATA_SET => inv_validate_trohdr.g_org.organization_id);
1331:
1332: if l_keystat_val then
1333: l_combination_id := FND_FLEX_KEYVAL.combination_id;
1334: BEGIN

Line 1339: AND ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id

1335: SELECT 'EXISTS'
1336: INTO l_temp
1337: FROM MTL_ITEM_LOCATIONS
1338: WHERE INVENTORY_LOCATION_ID = l_combination_id
1339: AND ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id
1340: AND SUBINVENTORY_CODE = g_to_sub.secondary_inventory_name;
1341:
1342: EXCEPTION
1343: WHEN NO_DATA_FOUND THEN

Line 1347: AND ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id

1343: WHEN NO_DATA_FOUND THEN
1344: UPDATE mtl_item_locations
1345: SET SUBINVENTORY_CODE = g_to_sub.secondary_inventory_name
1346: WHERE INVENTORY_LOCATION_ID = l_combination_id
1347: AND ORGANIZATION_ID = inv_validate_trohdr.g_org.organization_id
1348: AND SUBINVENTORY_CODE = NULL;
1349:
1350: if SQL%NOTFOUND then
1351: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1358: AND ORGANIZATION_ID =inv_validate_trohdr.g_org.organization_id;

1354: SELECT PROJECT_ID,TASK_ID
1355: INTO l_project_id, l_task_id
1356: FROM MTL_ITEM_LOCATIONS
1357: WHERE INVENTORY_LOCATION_ID = l_combination_id
1358: AND ORGANIZATION_ID =inv_validate_trohdr.g_org.organization_id;
1359:
1360: if NOT INV_ProjectLocator_PUB.Check_Project_References(
1361: inv_validate_trohdr.g_org.organization_id,
1362: p_trolin_rec.to_locator_id,

Line 1361: inv_validate_trohdr.g_org.organization_id,

1357: WHERE INVENTORY_LOCATION_ID = l_combination_id
1358: AND ORGANIZATION_ID =inv_validate_trohdr.g_org.organization_id;
1359:
1360: if NOT INV_ProjectLocator_PUB.Check_Project_References(
1361: inv_validate_trohdr.g_org.organization_id,
1362: p_trolin_rec.to_locator_id,
1363: 'ANY',
1364: 'N',
1365: l_project_id,

Line 1406: IF INV_Validate.To_Locator(g_to_locator,

1402:
1403: IF l_project_id_mil is NOT NULL THEN
1404:
1405:
1406: IF INV_Validate.To_Locator(g_to_locator,
1407: inv_validate_trohdr.g_org, g_item,
1408: g_to_sub, p_trolin_rec.project_id,
1409: p_trolin_rec.task_id,
1410: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN

Line 1407: inv_validate_trohdr.g_org, g_item,

1403: IF l_project_id_mil is NOT NULL THEN
1404:
1405:
1406: IF INV_Validate.To_Locator(g_to_locator,
1407: inv_validate_trohdr.g_org, g_item,
1408: g_to_sub, p_trolin_rec.project_id,
1409: p_trolin_rec.task_id,
1410: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN
1411: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1410: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN

1406: IF INV_Validate.To_Locator(g_to_locator,
1407: inv_validate_trohdr.g_org, g_item,
1408: g_to_sub, p_trolin_rec.project_id,
1409: p_trolin_rec.task_id,
1410: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN
1411: x_return_status := FND_API.G_RET_STS_ERROR;
1412: return;
1413: END IF;
1414:

Line 1417: IF INV_Validate.To_Locator(g_to_locator,

1413: END IF;
1414:
1415: ELSE
1416:
1417: IF INV_Validate.To_Locator(g_to_locator,
1418: inv_validate_trohdr.g_org, g_item,
1419: g_to_sub, null, null,
1420: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN
1421: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1418: inv_validate_trohdr.g_org, g_item,

1414:
1415: ELSE
1416:
1417: IF INV_Validate.To_Locator(g_to_locator,
1418: inv_validate_trohdr.g_org, g_item,
1419: g_to_sub, null, null,
1420: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN
1421: x_return_status := FND_API.G_RET_STS_ERROR;
1422: return;

Line 1420: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN

1416:
1417: IF INV_Validate.To_Locator(g_to_locator,
1418: inv_validate_trohdr.g_org, g_item,
1419: g_to_sub, null, null,
1420: inv_validate_trolin.g_transaction_l.transaction_action_id) = inv_validate.F THEN
1421: x_return_status := FND_API.G_RET_STS_ERROR;
1422: return;
1423: END IF;
1424: END IF;

Line 1436: INV_Validate.Transaction_Header(p_trolin_rec.transaction_header_id) =

1432: p_old_trolin_rec.transaction_header_id OR
1433: p_old_trolin_rec.transaction_header_id IS NULL )
1434: THEN
1435: IF
1436: INV_Validate.Transaction_Header(p_trolin_rec.transaction_header_id) =
1437: inv_validate.f THEN
1438: x_return_status := FND_API.G_RET_STS_ERROR;
1439: END IF;
1440: END IF;

Line 1437: inv_validate.f THEN

1433: p_old_trolin_rec.transaction_header_id IS NULL )
1434: THEN
1435: IF
1436: INV_Validate.Transaction_Header(p_trolin_rec.transaction_header_id) =
1437: inv_validate.f THEN
1438: x_return_status := FND_API.G_RET_STS_ERROR;
1439: END IF;
1440: END IF;
1441: -- inv_debug.message('TRO: transaction_header_id: ' || x_return_status);

Line 1448: IF INV_Validate.HR_Location(p_trolin_rec.ship_to_location_id) =

1444: ( p_trolin_rec.ship_to_location_id <>
1445: p_old_trolin_rec.transaction_header_id OR
1446: p_old_trolin_rec.transaction_header_id IS NULL)
1447: THEN
1448: IF INV_Validate.HR_Location(p_trolin_rec.ship_to_location_id) =
1449: INV_Validate.F
1450: THEN
1451: x_return_status := FND_API.G_RET_STS_ERROR;
1452: END IF;

Line 1449: INV_Validate.F

1445: p_old_trolin_rec.transaction_header_id OR
1446: p_old_trolin_rec.transaction_header_id IS NULL)
1447: THEN
1448: IF INV_Validate.HR_Location(p_trolin_rec.ship_to_location_id) =
1449: INV_Validate.F
1450: THEN
1451: x_return_status := FND_API.G_RET_STS_ERROR;
1452: END IF;
1453: END IF;

Line 1460: IF INV_Validate.Uom(p_trolin_rec.uom_code,

1456: ( p_trolin_rec.uom_code <>
1457: p_old_trolin_rec.uom_code OR
1458: p_old_trolin_rec.uom_code IS NULL )
1459: THEN
1460: IF INV_Validate.Uom(p_trolin_rec.uom_code,
1461: inv_validate_trohdr.g_org, g_item) = inv_validate.F THEN
1462: x_return_status := FND_API.G_RET_STS_ERROR;
1463: END IF;
1464: END IF;

Line 1461: inv_validate_trohdr.g_org, g_item) = inv_validate.F THEN

1457: p_old_trolin_rec.uom_code OR
1458: p_old_trolin_rec.uom_code IS NULL )
1459: THEN
1460: IF INV_Validate.Uom(p_trolin_rec.uom_code,
1461: inv_validate_trohdr.g_org, g_item) = inv_validate.F THEN
1462: x_return_status := FND_API.G_RET_STS_ERROR;
1463: END IF;
1464: END IF;
1465:

Line 1469: if INV_Validate.Cost_Group(p_trolin_rec.from_cost_group_id,

1465:
1466: IF p_trolin_rec.from_cost_group_id IS NOT NULL AND
1467: (p_trolin_rec.from_cost_group_id <> p_old_trolin_rec.from_cost_group_id OR
1468: p_old_trolin_rec.from_cost_group_id IS NULL) then
1469: if INV_Validate.Cost_Group(p_trolin_rec.from_cost_group_id,
1470: p_trolin_rec.organization_id) = inv_validate.F then
1471: x_return_status := FND_API.G_RET_STS_ERROR;
1472: END IF;
1473: END IF;

Line 1470: p_trolin_rec.organization_id) = inv_validate.F then

1466: IF p_trolin_rec.from_cost_group_id IS NOT NULL AND
1467: (p_trolin_rec.from_cost_group_id <> p_old_trolin_rec.from_cost_group_id OR
1468: p_old_trolin_rec.from_cost_group_id IS NULL) then
1469: if INV_Validate.Cost_Group(p_trolin_rec.from_cost_group_id,
1470: p_trolin_rec.organization_id) = inv_validate.F then
1471: x_return_status := FND_API.G_RET_STS_ERROR;
1472: END IF;
1473: END IF;
1474:

Line 1478: if INV_Validate.Cost_Group(p_trolin_rec.to_cost_group_id,

1474:
1475: IF p_trolin_rec.to_cost_group_id IS NOT NULL AND
1476: (p_trolin_rec.to_cost_group_id <> p_old_trolin_rec.to_cost_group_id OR
1477: p_old_trolin_rec.to_cost_group_id IS NULL) then
1478: if INV_Validate.Cost_Group(p_trolin_rec.to_cost_group_id,
1479: p_trolin_rec.organization_id) = inv_validate.F then
1480: x_return_status := FND_API.G_RET_STS_ERROR;
1481: END IF;
1482: END IF;

Line 1479: p_trolin_rec.organization_id) = inv_validate.F then

1475: IF p_trolin_rec.to_cost_group_id IS NOT NULL AND
1476: (p_trolin_rec.to_cost_group_id <> p_old_trolin_rec.to_cost_group_id OR
1477: p_old_trolin_rec.to_cost_group_id IS NULL) then
1478: if INV_Validate.Cost_Group(p_trolin_rec.to_cost_group_id,
1479: p_trolin_rec.organization_id) = inv_validate.F then
1480: x_return_status := FND_API.G_RET_STS_ERROR;
1481: END IF;
1482: END IF;
1483:

Line 1487: if INV_Validate.LPN(p_trolin_rec.lpn_id) = inv_validate.F then

1483:
1484: IF p_trolin_rec.lpn_id IS NOT NULL AND
1485: (p_trolin_rec.lpn_id <> p_old_trolin_rec.lpn_id OR
1486: p_old_trolin_rec.lpn_id IS NULL) then
1487: if INV_Validate.LPN(p_trolin_rec.lpn_id) = inv_validate.F then
1488: x_return_status := FND_API.G_RET_STS_ERROR;
1489: END IF;
1490: END IF;
1491:

Line 1495: if INV_Validate.LPN(p_trolin_rec.to_lpn_id) = inv_validate.F then

1491:
1492: IF p_trolin_rec.to_lpn_id IS NOT NULL AND
1493: (p_trolin_rec.to_lpn_id <> p_old_trolin_rec.to_lpn_id OR
1494: p_old_trolin_rec.to_lpn_id IS NULL) then
1495: if INV_Validate.LPN(p_trolin_rec.to_lpn_id) = inv_validate.F then
1496: x_return_status := FND_API.G_RET_STS_ERROR;
1497: END IF;
1498: END IF;
1499:

Line 1573: IF INV_Validate.Desc_Flex( 'TROLIN' ) = inv_validate.F THEN

1569:
1570:
1571: -- Validate descriptive flexfield.
1572:
1573: IF INV_Validate.Desc_Flex( 'TROLIN' ) = inv_validate.F THEN
1574: x_return_status := FND_API.G_RET_STS_ERROR;
1575: END IF;
1576:
1577: END IF;

Line 1645: END INV_Validate_Trolin;

1641: g_from_locator.inventory_location_id := Null;
1642: g_to_locator.inventory_location_id := Null;
1643: END;
1644:
1645: END INV_Validate_Trolin;