78: WHEN NO_DATA_FOUND THEN
79: IF l_debug_level > 0 THEN
80: oe_debug_pub.add( ' EXITING Get_Eligible_ISO_Shipment With No Data Found Error', 1 ) ;
81: END IF;
82: FND_Message.Set_Name('ONT', 'OE_IRCMS_NOT_ELIGIBLE');
83: -- There is no sales order line shipment eligible for update/cancellation.
84: OE_MSG_PUB.Add;
85: X_return_status := FND_API.G_RET_STS_ERROR;
86:
87: WHEN TOO_MANY_ROWS THEN
88: IF l_debug_level > 0 THEN
89: oe_debug_pub.add( ' EXITING Get_Eligible_ISO_Shipment with Too Many Rows error', 1 ) ;
90: END IF;
91: FND_Message.Set_Name('ONT', 'OE_IRCMS_TOO_MANY_ROWS');
92: -- There are multiple sales order line shipments eligible for update.
93: -- This is not allowed.
94: OE_MSG_PUB.Add;
95: X_return_status := FND_API.G_RET_STS_ERROR;
596: IF P_internal_req_line_id is NULL THEN
597: IF l_debug_level > 0 THEN
598: oe_debug_pub.add( ' Invalid value passed for Requisition Line',1);
599: END IF;
600: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
601: -- FND_Message.Set_Token('REQ_LIN_ID',' P_internal_req_line_id');
602: OE_MSG_PUB.Add;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
597: IF l_debug_level > 0 THEN
598: oe_debug_pub.add( ' Invalid value passed for Requisition Line',1);
599: END IF;
600: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
601: -- FND_Message.Set_Token('REQ_LIN_ID',' P_internal_req_line_id');
602: OE_MSG_PUB.Add;
603: RAISE FND_API.G_EXC_ERROR;
604: END IF;
605: IF P_internal_req_header_id is NULL THEN
614: where requisition_line_id = P_internal_req_line_id;
615:
616: IF l_req_hdr_id IS NULL THEN
617: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
618: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
619: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
620: OE_MSG_PUB.Add;
621: RAISE FND_API.G_EXC_ERROR;
622: END IF;
615:
616: IF l_req_hdr_id IS NULL THEN
617: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
618: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
619: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
620: OE_MSG_PUB.Add;
621: RAISE FND_API.G_EXC_ERROR;
622: END IF;
623: Exception
622: END IF;
623: Exception
624: When No_Data_Found Then
625: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
626: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
627: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
628: OE_MSG_PUB.Add;
629: RAISE FND_API.G_EXC_ERROR;
630: End;
623: Exception
624: When No_Data_Found Then
625: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
626: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
627: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
628: OE_MSG_PUB.Add;
629: RAISE FND_API.G_EXC_ERROR;
630: End;
631: ELSE
801: IF P_internal_req_line_id is NULL THEN
802: IF l_debug_level > 0 THEN
803: oe_debug_pub.add( ' Invalid value passed for Requisition Line',1);
804: END IF;
805: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
806: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
807: OE_MSG_PUB.Add;
808: RAISE FND_API.G_EXC_ERROR;
809: END IF;
802: IF l_debug_level > 0 THEN
803: oe_debug_pub.add( ' Invalid value passed for Requisition Line',1);
804: END IF;
805: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
806: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
807: OE_MSG_PUB.Add;
808: RAISE FND_API.G_EXC_ERROR;
809: END IF;
810: IF P_internal_req_header_id is NULL THEN
819: where requisition_line_id = P_internal_req_line_id;
820:
821: IF l_req_hdr_id IS NULL THEN
822: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
823: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
824: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
825: OE_MSG_PUB.Add;
826: RAISE FND_API.G_EXC_ERROR;
827: END IF;
820:
821: IF l_req_hdr_id IS NULL THEN
822: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
823: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
824: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
825: OE_MSG_PUB.Add;
826: RAISE FND_API.G_EXC_ERROR;
827: END IF;
828: Exception
827: END IF;
828: Exception
829: When No_Data_Found Then
830: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
831: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
832: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
833: OE_MSG_PUB.Add;
834: RAISE FND_API.G_EXC_ERROR;
835: End;
828: Exception
829: When No_Data_Found Then
830: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
831: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
832: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
833: OE_MSG_PUB.Add;
834: RAISE FND_API.G_EXC_ERROR;
835: End;
836: ELSE
890: When No_Data_Found Then
891: IF l_debug_level > 0 THEN
892: oe_debug_pub.add( 'EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with No Data Found Error');
893: END IF;
894: FND_Message.Set_Name('ONT', 'OE_IRCMS_NO_HOLD_RELEASED');
895: -- There is no sales order line shipment on hold.
896: OE_MSG_PUB.Add;
897: X_return_status := FND_API.G_RET_STS_ERROR;
898:
899: When Too_Many_Rows Then
900: IF l_debug_level > 0 THEN
901: oe_debug_pub.add('EXITING OE_Internal_Requisition_Pvt.Release_Hold_for_Ireq with Too Many rows error') ;
902: END IF;
903: FND_Message.Set_Name('ONT', 'OE_IRCMS_MANY_HOLD');
904: -- There are many sales order line shipments eligible for hold release. This is not allowed.
905: OE_MSG_PUB.Add;
906: X_return_status := FND_API.G_RET_STS_ERROR;
907: End;
1061: IF P_internal_req_header_id is NULL AND P_internal_req_line_id is NULL THEN
1062: IF l_debug_level > 0 THEN
1063: oe_debug_pub.add( ' Invalid value for Requisition Header/Line',1);
1064: END IF;
1065: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_INFO');
1066: OE_MSG_PUB.Add;
1067: RAISE FND_API.G_EXC_ERROR;
1068: END IF;
1069:
1153: IF l_debug_level > 0 THEN
1154: oe_debug_pub.add( ' Invalid value for Requisition Header',1);
1155: END IF;
1156: X_Cancel_Allowed := FALSE;
1157: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
1158: OE_MSG_PUB.Add;
1159: RAISE FND_API.G_EXC_ERROR;
1160: End;
1161: END IF;
1172: where requisition_line_id = P_internal_req_line_id;
1173:
1174: IF l_req_hdr_id IS NULL THEN
1175: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
1176: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
1177: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
1178: OE_MSG_PUB.Add;
1179: RAISE FND_API.G_EXC_ERROR;
1180: END IF;
1173:
1174: IF l_req_hdr_id IS NULL THEN
1175: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
1176: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
1177: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
1178: OE_MSG_PUB.Add;
1179: RAISE FND_API.G_EXC_ERROR;
1180: END IF;
1181: Exception
1180: END IF;
1181: Exception
1182: When No_Data_Found Then
1183: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
1184: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
1185: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
1186: OE_MSG_PUB.Add;
1187: RAISE FND_API.G_EXC_ERROR;
1188: End;
1181: Exception
1182: When No_Data_Found Then
1183: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
1184: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
1185: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
1186: OE_MSG_PUB.Add;
1187: RAISE FND_API.G_EXC_ERROR;
1188: End;
1189: ELSE
1457: IF l_debug_level > 0 THEN
1458: oe_debug_pub.add( ' Invalid call to Order Management', 5 ) ;
1459: oe_debug_pub.add( ' Please provide a valid argument values', 5 ) ;
1460: END IF;
1461: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_OM_CALL');
1462: OE_MSG_PUB.Add;
1463: RAISE FND_API.G_EXC_ERROR;
1464: END IF;
1465:
1467: IF l_debug_level > 0 THEN
1468: oe_debug_pub.add( ' Mode is Invalid. The Valid values are V or P', 1 ) ;
1469: oe_debug_pub.add( ' Invalid Mode passed to Fulfillment Organization',5);
1470: END IF;
1471: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_MODE');
1472: OE_MSG_PUB.Add;
1473: RAISE FND_API.G_EXC_ERROR;
1474: END IF;
1475:
1489: IF l_req_hdr_id IS NULL THEN
1490: IF l_debug_level > 0 THEN
1491: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
1492: END IF;
1493: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
1494: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
1495: OE_MSG_PUB.Add;
1496: RAISE FND_API.G_EXC_ERROR;
1497: END IF;
1490: IF l_debug_level > 0 THEN
1491: oe_debug_pub.add( ' Invalid value for Requisition Header',5);
1492: END IF;
1493: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_HDR');
1494: -- FND_Message.Set_Token('REQ_HDR_ID',P_internal_req_header_id);
1495: OE_MSG_PUB.Add;
1496: RAISE FND_API.G_EXC_ERROR;
1497: END IF;
1498: Exception
1499: When No_Data_Found Then
1500: IF l_debug_level > 0 THEN
1501: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
1502: END IF;
1503: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
1504: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
1505: OE_MSG_PUB.Add;
1506: RAISE FND_API.G_EXC_ERROR;
1507: End;
1500: IF l_debug_level > 0 THEN
1501: oe_debug_pub.add( ' Invalid value passed for Requisition Line',5);
1502: END IF;
1503: FND_Message.Set_Name('ONT', 'OE_IRCMS_INVALID_REQ_LIN');
1504: -- FND_Message.Set_Token('REQ_LIN_ID',P_internal_req_line_id);
1505: OE_MSG_PUB.Add;
1506: RAISE FND_API.G_EXC_ERROR;
1507: End;
1508: ELSE
1529: WHEN No_Data_found THEN
1530: IF l_debug_level > 0 THEN
1531: oe_debug_pub.add( ' Invalid value passed for Requisition Header: no data found',1);
1532: END IF;
1533: FND_Message.Set_name('ONT','OE_IRCMS_INVALID_REQ_HDR');
1534: RAISE FND_API.G_EXC_ERROR;
1535: WHEN Too_Many_Rows THEN
1536: IF l_debug_level > 0 THEN
1537: oe_debug_pub.add( ' Invalid value passed for Requisition Header: too many rows',1);
1535: WHEN Too_Many_Rows THEN
1536: IF l_debug_level > 0 THEN
1537: oe_debug_pub.add( ' Invalid value passed for Requisition Header: too many rows',1);
1538: END IF;
1539: FND_Message.Set_name('ONT','OE_IRCMS_INVALID_REQ_HDR');
1540: RAISE FND_API.G_EXC_ERROR;
1541: End;
1542:
1543: l_Cancel_Allowed := Cancel_Header_Allowed( P_header_id => l_order_header_id);