[Home] [Help]
28: -- Convert any missing values to NULL
29:
30: FOR I IN 1..l_segment_array.COUNT LOOP
31:
32: IF l_segment_array(I) = FND_API.G_MISS_CHAR THEN
33: l_segment_array(I) := NULL;
34: END IF;
35:
36: END LOOP;
52: -- Function has already pushed a message on the stack. Add to
53: -- the API message list.
54:
55: FND_MSG_PUB.Add;
56: l_id := FND_API.G_MISS_NUM;
57:
58: END IF;
59:
60: RETURN l_id;
70: , 'Key_Flex'
71: );
72: END IF;
73:
74: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
75:
76: END Key_Flex;
77:
78: -- Generator will append new prototypes before end generate comment.
110:
111: WHEN OTHERS THEN
112: x_err_text := G_PKG_NAME || ' : (Approval List Value-id conversion) '
113: || substrb(SQLERRM,1,200);
114: RETURN FND_API.G_MISS_NUM;
115:
116: END Approval_List;
117:
118:
183:
184: WHEN OTHERS THEN
185: x_err_text := G_PKG_NAME || ' : (Lifecycle Value-id conversion) '
186: || substrb(SQLERRM,1,200);
187: RETURN FND_API.G_MISS_NUM;
188:
189: END Lifecycle_Id;
190:
191:
328: WHEN NO_DATA_FOUND THEN
329: RETURN NULL;
330:
331: WHEN OTHERS THEN
332: RETURN FND_API.G_MISS_NUM;
333:
334: END Get_Type_From_Header;
335:
336:
365: WHEN NO_DATA_FOUND THEN
366: RETURN NULL;
367:
368: WHEN OTHERS THEN
369: RETURN FND_API.G_MISS_NUM;
370:
371: END Get_Change_Id;
372:
373:
407:
408: WHEN OTHERS THEN
409: x_err_text := G_PKG_NAME || ' : (Project Value-id conversion)'
410: || substrb(SQLERRM,1,200);
411: RETURN FND_API.G_MISS_NUM;
412:
413: END Project;
414:
415: -- Task
447:
448: WHEN OTHERS THEN
449: x_err_text := G_PKG_NAME || ' : (Task Value-id conversion)'
450: || substrb(SQLERRM,1,200);
451: RETURN FND_API.G_MISS_NUM;
452:
453: END Task;
454:
455:
523: THEN
524: CLOSE c_employee;
525: END IF;
526: x_err_text := G_PKG_NAME || ' : (employee Value-id conversion)' || substrb(SQLERRM,1,200);
527: RETURN FND_API.G_MISS_NUM;
528: END Employee;
529: --* End of Bug 4402842
530:
531: -- Assignee
569:
570: WHEN OTHERS THEN
571: x_err_text := G_PKG_NAME || ' : (Assignee Value-id conversion) '
572: || substrb(SQLERRM,1,200);
573: RETURN FND_API.G_MISS_NUM;
574:
575: END Assignee ;
576:
577: /*
602: l_st_code NUMBER;
603: l_st_type NUMBER;
604:
605: BEGIN
606: x_return_status := FND_API.G_RET_STS_SUCCESS;
607: if p_plm_or_erp ='PLM' then
608: SELECT status_code ,status_type into l_st_code,l_st_type
609: from eng_change_statuses_vl
610: where status_name = p_status_name
628: WHEN NO_DATA_FOUND THEN
629: x_return_status := NULL;
630:
631: WHEN OTHERS THEN
632: x_return_status := FND_API.G_MISS_NUM;
633:
634: END Status_Type;
635:
636:
708:
709: WHEN OTHERS THEN
710: x_err_text := G_PKG_NAME || ' : (Change_Management_Type Value-id conversion) '
711: || substrb(SQLERRM,1,200);
712: RETURN FND_API.G_MISS_CHAR ;
713:
714: END Change_Management_Type;
715:
716:
747:
748: WHEN OTHERS THEN
749: x_err_text := G_PKG_NAME || ' : (Source_Type Value-id conversion) '
750: || substrb(SQLERRM,1,200);
751: RETURN FND_API.G_MISS_CHAR ;
752:
753: END Source_Type;
754:
755:
787:
788: WHEN OTHERS THEN
789: x_err_text := G_PKG_NAME || ' : (Source_Name Value-id conversion) '
790: || substrb(SQLERRM,1,200);
791: RETURN FND_API.G_MISS_CHAR ;
792:
793: END Source_Name ;
794:
795:
819:
820: WHEN OTHERS THEN
821: x_err_text := G_PKG_NAME || ' : (Organization_Hierarchy Value-id conversion) '
822: || substrb(SQLERRM,1,200);
823: RETURN FND_API.G_MISS_CHAR ;
824:
825: END Hierarchy ;
826: -- End bug 4967902
827:
861:
862: WHEN OTHERS THEN
863: x_err_text := G_PKG_NAME || ' : (Item Revision Value-id conversion) '
864: || substrb(SQLERRM,1,200);
865: RETURN FND_API.G_MISS_CHAR ;
866:
867: END Item_Revision ;
868:
869:
903:
904: WHEN OTHERS THEN
905: x_err_text := G_PKG_NAME || ' : (Change Order Type Value-id conversion) '
906: || substrb(SQLERRM,1,200);
907: x_change_order_id := FND_API.G_MISS_NUM;
908:
909: END Change_Order_Type;
910:
911: -- Change_Order_Line_Type
945:
946: WHEN OTHERS THEN
947: x_err_text := G_PKG_NAME || ' : (Change Order Type Value-id conversion) '
948: || substrb(SQLERRM,1,200);
949: x_change_order_id := FND_API.G_MISS_NUM;
950:
951: END Change_Order_Line_Type;
952:
953:
1065: l_token_tbl(1).token_name := 'ECO_NAME';
1066: l_token_tbl(1).token_value := l_change_notice;
1067:
1068: IF l_change_mgmt_type_name IS NULL OR
1069: l_change_mgmt_type_name = FND_API.G_MISS_CHAR
1070: THEN
1071: l_change_mgmt_type_code := 'CHANGE_ORDER';
1072: ELSE
1073: Change_Mgmt_Type
1093: , p_Token_Tbl => l_Token_Tbl
1094: );
1095: END IF;
1096:
1097: x_Return_Status := FND_API.G_RET_STS_ERROR;
1098: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1099: return; --added for bug 10234492
1100: END IF;
1101:
1102:
1103: -- Convert change_order_type_code to change_order_type_id
1104:
1105: IF l_change_type_code IS NOT NULL AND
1106: l_change_type_code <> FND_API.G_MISS_CHAR AND
1107: l_change_mgmt_type_code IS NOT NULL
1108: THEN
1109: Change_Order_Type
1110: ( p_change_order_type => l_change_type_code
1129: , p_Token_Tbl => l_Token_Tbl
1130: );
1131: END IF;
1132:
1133: x_Return_Status := FND_API.G_RET_STS_ERROR;
1134: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1135: ELSIF l_change_order_type_id = FND_API.G_MISS_NUM
1136: THEN
1137: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1131: END IF;
1132:
1133: x_Return_Status := FND_API.G_RET_STS_ERROR;
1134: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1135: ELSIF l_change_order_type_id = FND_API.G_MISS_NUM
1136: THEN
1137: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1138: THEN
1139: Error_Handler.Add_Error_Token
1143: );
1144: END IF;
1145:
1146: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1148: ELSE
1149: p_eco_unexp_rec.change_order_type_id := l_change_order_type_id;
1150: p_eco_unexp_rec.change_mgmt_type_code := l_change_mgmt_type_code;
1151: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
1147: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1148: ELSE
1149: p_eco_unexp_rec.change_order_type_id := l_change_order_type_id;
1150: p_eco_unexp_rec.change_mgmt_type_code := l_change_mgmt_type_code;
1151: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
1152: END IF;
1153: ELSE
1154: IF l_transaction_type = Bom_GLOBALS.G_OPR_CREATE
1155: THEN
1161: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1162: , p_Token_Tbl => l_Token_Tbl
1163: );
1164: END IF;
1165: x_Return_Status := FND_API.G_RET_STS_ERROR;
1166: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1167: p_eco_unexp_rec.change_order_type_id := NULL;
1168: ELSE
1169: p_eco_unexp_rec.change_order_type_id := l_old_change_type_id;
1185: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1186: , p_Token_Tbl => l_Token_Tbl
1187: );
1188: END IF;
1189: x_Return_Status := FND_API.G_RET_STS_ERROR;
1190: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1191: p_eco_unexp_rec.change_order_type_id := l_change_order_type_id;
1192: END IF;
1193: --folowing has been added for bug 10234492
1190: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1191: p_eco_unexp_rec.change_order_type_id := l_change_order_type_id;
1192: END IF;
1193: --folowing has been added for bug 10234492
1194: if x_Return_Status = FND_API.G_RET_STS_ERROR then
1195: return;
1196: end if;
1197:
1198:
1196: end if;
1197:
1198:
1199: IF p_ECO_rec.Status_Name IS NOT NULL AND
1200: p_ECO_rec.Status_Name <> FND_API.G_MISS_CHAR
1201: THEN
1202: Status_Type(p_status_name => p_ECO_rec.Status_Name
1203: ,x_status_code => l_status_code
1204: ,x_status_type => l_status_type
1217: , x_mesg_token_tbl => l_mesg_token_tbl
1218: );
1219:
1220: l_token_tbl.DELETE;
1221: x_return_status := FND_API.G_RET_STS_ERROR;
1222: ELSE
1223: p_ECO_Unexp_Rec.Status_Type := l_status_type ;
1224: p_ECO_Unexp_Rec.Status_Code := l_status_code ;
1225: END IF;
1278:
1279: WHEN OTHERS THEN
1280: x_err_text := G_PKG_NAME || ' : (Responsible Org Value-id conversion) '
1281: || substrb(SQLERRM,1,200);
1282: RETURN FND_API.G_MISS_NUM;
1283:
1284: END Responsible_Org;
1285:
1286: /***************************************************************************
1314: WHEN NO_DATA_FOUND THEN
1315: RETURN NULL;
1316:
1317: WHEN OTHERS THEN
1318: RETURN FND_API.G_MISS_NUM;
1319:
1320: END Organization;
1321:
1322: /****************************************************************************
1545: FROM eng_revised_items
1546: WHERE revised_item_id = p_revised_item_id
1547: AND NVL(new_item_revision,'NULL')= NVL(p_item_revision,'NULL')
1548: AND TRUNC(scheduled_date) = trunc(p_effective_date)
1549: AND NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR)
1550: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
1551: AND change_notice = p_change_notice
1552: AND organization_id = p_organization_id;
1553:
1546: WHERE revised_item_id = p_revised_item_id
1547: AND NVL(new_item_revision,'NULL')= NVL(p_item_revision,'NULL')
1548: AND TRUNC(scheduled_date) = trunc(p_effective_date)
1549: AND NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR)
1550: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
1551: AND change_notice = p_change_notice
1552: AND organization_id = p_organization_id;
1553:
1554: x_Bill_Sequence_Id := l_Bill_Seq;
1611:
1612: RETURN NULL;
1613:
1614: WHEN OTHERS THEN
1615: RETURN FND_API.G_MISS_NUM;
1616:
1617: END Revised_Item_Sequence;
1618:
1619:
1638: EXCEPTION
1639: WHEN NO_DATA_FOUND THEN
1640: RETURN NULL;
1641: WHEN OTHERS THEN
1642: RETURN FND_API.G_MISS_NUM;
1643:
1644: END Revision;
1645:
1646: /* 11.5.10 Function to return parent_revised_item_sequence_id ,
1688: EXCEPTION
1689: WHEN NO_DATA_FOUND THEN
1690: RETURN NULL;
1691: WHEN OTHERS THEN
1692: RETURN FND_API.G_MISS_NUM;
1693:
1694:
1695: END ParentRevSeqId;
1696:
1772: THEN
1773: CLOSE FROM_REVISION_ID_FUTURE;
1774: END IF;
1775:
1776: RETURN FND_API.G_MISS_NUM;
1777:
1778: END From_Revision_Id;
1779:
1780:
1804: EXCEPTION
1805: WHEN NO_DATA_FOUND THEN
1806: RETURN NULL;
1807: WHEN OTHERS THEN
1808: RETURN FND_API.G_MISS_CHAR;
1809: END New_Revision_Reason_Code;
1810:
1811:
1812: /**************************************************************************
1833: EXCEPTION
1834: WHEN NO_DATA_FOUND THEN
1835: RETURN NULL;
1836: WHEN OTHERS THEN
1837: RETURN FND_API.G_MISS_CHAR;
1838: END Get_Structure_Type_Id;
1839:
1840:
1841: /****************************************************************************
1868: l_from_revision_id NUMBER;
1869: l_structure_type_id NUMBER;
1870:
1871: BEGIN
1872: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1873: l_Rev_item_Unexp_Rec := p_Rev_item_Unexp_Rec;
1874:
1875: IF p_revised_item_rec.use_up_item_name IS NOT NULL AND
1876: p_revised_item_rec.use_up_item_name <> FND_API.G_MISS_CHAR
1872: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
1873: l_Rev_item_Unexp_Rec := p_Rev_item_Unexp_Rec;
1874:
1875: IF p_revised_item_rec.use_up_item_name IS NOT NULL AND
1876: p_revised_item_rec.use_up_item_name <> FND_API.G_MISS_CHAR
1877: THEN
1878: l_rev_item_unexp_rec.use_up_item_id :=
1879: Use_Up_Item( p_use_up_item_num =>
1880: p_revised_item_rec.use_up_item_name
1883: , x_err_text => l_Err_Text);
1884:
1885: IF l_rev_item_unexp_rec.use_up_item_id IS NULL
1886: THEN
1887: l_return_status := FND_API.G_RET_STS_ERROR;
1888:
1889: l_token_tbl(1).token_name := 'USE_UP_ITEM_NAME';
1890: l_token_tbl(1).token_value :=
1891: p_revised_item_rec.use_up_item_name;
1907: -- to requestor ID.
1908: --
1909:
1910: IF p_revised_item_rec.requestor IS NOT NULL AND
1911: p_revised_item_rec.requestor <> FND_API.G_MISS_CHAR
1912: THEN
1913: l_rev_item_unexp_rec.requestor_id :=
1914: Requestor
1915: ( p_requestor => p_revised_item_rec.requestor
1924: , p_Message_Text => l_err_text
1925: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1926: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1927: );
1928: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1929: ELSIF l_rev_item_unexp_rec.requestor_id IS NULL
1930: THEN
1931: l_token_tbl(1).token_name := 'REQUESTOR';
1932: l_token_tbl(1).token_value :=
1941: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1942: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1943: , p_token_tbl => l_token_tbl
1944: );
1945: l_return_status := FND_API.G_RET_STS_ERROR;
1946: END IF;
1947: END IF;
1948:
1949:
1955: -- If the user has give from_work_order or to_work_order,
1956: -- then convert to wip_entity_id
1957: --
1958: IF p_revised_item_rec.from_work_order IS NOT NULL AND
1959: p_revised_item_rec.from_work_order <> FND_API.G_MISS_CHAR
1960: THEN
1961: l_rev_item_unexp_rec.from_wip_entity_id :=
1962: Work_Order
1963: ( p_work_order => p_revised_item_rec.from_work_order
1972: , p_Message_Text => l_err_text
1973: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1974: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1975: );
1976: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1977: ELSIF l_rev_item_unexp_rec.from_wip_entity_id IS NULL
1978: THEN
1979: l_token_tbl(1).token_name := 'FROM_WORK_ORDER';
1980: l_token_tbl(1).token_value :=
1989: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1990: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1991: , p_token_tbl => l_token_tbl
1992: );
1993: l_return_status := FND_API.G_RET_STS_ERROR;
1994: END IF;
1995: END IF ;
1996:
1997: IF p_revised_item_rec.to_work_order IS NOT NULL AND
1994: END IF;
1995: END IF ;
1996:
1997: IF p_revised_item_rec.to_work_order IS NOT NULL AND
1998: p_revised_item_rec.to_work_order <> FND_API.G_MISS_CHAR
1999: THEN
2000: l_rev_item_unexp_rec.to_wip_entity_id :=
2001: Work_Order
2002: ( p_work_order => p_revised_item_rec.to_work_order
2011: , p_Message_Text => l_err_text
2012: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2013: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2014: );
2015: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2016: ELSIF l_rev_item_unexp_rec.from_wip_entity_id IS NULL
2017: THEN
2018: l_token_tbl(1).token_name := 'TO_WORK_ORDER';
2019: l_token_tbl(1).token_value :=
2028: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2029: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2030: , p_token_tbl => l_token_tbl
2031: );
2032: l_return_status := FND_API.G_RET_STS_ERROR;
2033: END IF;
2034: END IF ;
2035:
2036: --
2037: -- If the user has give Copmletion_Location_Name,
2038: -- then convert to completion_location_id
2039: --
2040: IF p_revised_item_rec.completion_location_name IS NOT NULL AND
2041: p_revised_item_rec.completion_location_name <> FND_API.G_MISS_CHAR
2042: THEN
2043: l_rev_item_unexp_rec.completion_locator_id :=
2044: BOM_RTG_Val_To_Id.Completion_locator_id
2045: ( p_completion_location_name => p_revised_item_rec.completion_location_name
2053: , p_Message_Text => l_err_text
2054: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2055: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2056: );
2057: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2058: ELSIF l_rev_item_unexp_rec.completion_locator_id IS NULL
2059: THEN
2060: l_token_tbl(1).token_name := 'COMPLETION_LOCATION_NAME';
2061: l_token_tbl(1).token_value :=
2070: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2071: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2072: , p_token_tbl => l_token_tbl
2073: );
2074: l_return_status := FND_API.G_RET_STS_ERROR;
2075: END IF;
2076: END IF;
2077: -- Added by MK 08/24/2000
2078:
2077: -- Added by MK 08/24/2000
2078:
2079: -- Added by MK on 02/15/2001
2080: IF ( l_rev_item_unexp_rec.bill_sequence_id IS NULL OR
2081: l_rev_item_unexp_rec.bill_sequence_id = FND_API.G_MISS_NUM ) AND
2082: (( p_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_CREATE OR
2083: p_revised_item_rec.alternate_bom_code IS NOT NULL ) OR
2084: /* Added for Bug 2992001 */
2085: (p_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_UPDATE))
2101:
2102: END IF;
2103:
2104: IF ( l_rev_item_unexp_rec.routing_sequence_id IS NULL OR
2105: l_rev_item_unexp_rec.routing_sequence_id = FND_API.G_MISS_NUM ) AND
2106: ( p_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_CREATE OR
2107: p_revised_item_rec.alternate_bom_code IS NOT NULL )
2108:
2109: THEN
2206: to_char(l_rev_item_unexp_rec.from_item_revision_id));
2207: END IF;
2208:
2209: IF ( l_rev_item_unexp_rec.from_item_revision_id IS NULL OR
2210: l_rev_item_unexp_rec.from_item_revision_id = FND_API.G_MISS_NUM)
2211: THEN
2212: l_token_tbl(1).token_name := 'FROM_REVISION';
2213: l_token_tbl(1).token_value := l_rev_item_unexp_rec.from_item_revision_id ;
2214: l_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
2220: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2221: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2222: , p_token_tbl => l_token_tbl
2223: );
2224: l_return_status := FND_API.G_RET_STS_ERROR;
2225: END IF;
2226: END IF;
2227:
2228: -- The new revision reason, if provided is converted to the corresponding
2238: , x_err_text => l_err_text
2239: );
2240:
2241: IF ( l_rev_item_unexp_rec.new_revision_reason_code IS NULL OR
2242: l_rev_item_unexp_rec.new_revision_reason_code = FND_API.G_MISS_CHAR)
2243: THEN
2244: l_token_tbl(1).token_name := 'NEW_REVISION_REASON';
2245: l_token_tbl(1).token_value := p_revised_item_rec.new_revision_reason ;
2246: l_token_tbl(2).token_name := 'REVISED_ITEM_NAME';
2252: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2253: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2254: , p_token_tbl => l_token_tbl
2255: );
2256: l_return_status := FND_API.G_RET_STS_ERROR;
2257: END IF;
2258:
2259: IF Bom_Globals.Get_Debug = 'Y'
2260: THEN
2268: -- Convert structure type name to structure type id
2269: -- if it is given
2270: --
2271: IF p_revised_item_rec.structure_type_name IS NOT NULL AND
2272: p_revised_item_rec.structure_type_name <> FND_API.G_MISS_CHAR
2273: THEN
2274: l_rev_item_unexp_rec.structure_type_id :=
2275: Get_Structure_Type_Id
2276: ( p_structure_type_name => p_revised_item_rec.structure_type_name
2283: , p_Message_Text => l_err_text
2284: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2285: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2286: );
2287: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2288: ELSIF l_rev_item_unexp_rec.structure_type_id IS NULL
2289: THEN
2290: l_token_tbl(1).token_name := 'STRUCTURE_TYPE_NAME';
2291: l_token_tbl(1).token_value :=
2300: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2301: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2302: , p_token_tbl => l_token_tbl
2303: );
2304: l_return_status := FND_API.G_RET_STS_ERROR;
2305: END IF;
2306: END IF;
2307:
2308: x_return_status := l_return_status;
2334: l_approval_status_type NUMBER;
2335: l_status_code NUMBER;
2336: l_plm_or_erp_change eng_engineering_changes.plm_or_erp_change%type;
2337: BEGIN
2338: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
2339: l_ECO_Unexp_Rec := p_ECO_Unexp_Rec;
2340:
2341: l_token_tbl(1).token_name := 'ECO_Name';
2342: l_token_tbl(1).token_value := p_ECO_rec.ECO_name;
2355: -- Convert Approval_List_Name to Approval_List_Id
2356: --
2357:
2358: IF p_ECO_rec.approval_list_name IS NOT NULL AND
2359: p_ECO_rec.approval_list_name <> FND_API.G_MISS_CHAR
2360: THEN
2361: l_Return_Value :=
2362: Approval_List( p_approval_list => p_ECO_rec.approval_list_name
2363: , x_err_text => l_err_text
2375: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2376: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2377: , p_Token_Tbl => l_Token_Tbl
2378: );
2379: l_Return_Status := FND_API.G_RET_STS_ERROR;
2380:
2381: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2382: THEN
2383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2377: , p_Token_Tbl => l_Token_Tbl
2378: );
2379: l_Return_Status := FND_API.G_RET_STS_ERROR;
2380:
2381: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2382: THEN
2383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2384:
2385: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2379: l_Return_Status := FND_API.G_RET_STS_ERROR;
2380:
2381: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2382: THEN
2383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2384:
2385: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2386: THEN
2387: Error_Handler.Add_Error_Token
2405: -- Convert ECO_Department to Responsible_Org_Id
2406: --
2407:
2408: IF p_ECO_rec.ECO_Department_Name IS NOT NULL AND
2409: p_ECO_rec.ECO_Department_name <> FND_API.G_MISS_CHAR
2410: THEN
2411: l_Return_Value :=
2412: Responsible_Org
2413: ( p_responsible_org => p_ECO_rec.ECO_Department_name
2427: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2428: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2429: , p_Token_Tbl => l_Token_Tbl
2430: );
2431: l_Return_Status := FND_API.G_RET_STS_ERROR;
2432:
2433: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2434: THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2429: , p_Token_Tbl => l_Token_Tbl
2430: );
2431: l_Return_Status := FND_API.G_RET_STS_ERROR;
2432:
2433: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2434: THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436:
2437: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2431: l_Return_Status := FND_API.G_RET_STS_ERROR;
2432:
2433: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2434: THEN
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436:
2437: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2438: THEN
2439: Error_Handler.Add_Error_Token
2455: END IF;
2456:
2457: -- Added for Bug 4402842
2458: IF p_ECO_rec.employee_number IS NOT NULL AND
2459: p_ECO_rec.employee_number <> FND_API.G_MISS_CHAR AND
2460: l_plm_or_erp_change <> 'PLM'
2461: THEN
2462: l_Return_Value :=
2463: Employee( p_employee_number => p_ECO_rec.employee_number
2473: p_Message_Name => 'ENG_EMP_NUMBER_INVALID'
2474: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2475: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2476: , p_Token_Tbl => l_Token_Tbl );
2477: l_Return_Status := FND_API.G_RET_STS_ERROR;
2478:
2479: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2480: THEN
2481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2475: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2476: , p_Token_Tbl => l_Token_Tbl );
2477: l_Return_Status := FND_API.G_RET_STS_ERROR;
2478:
2479: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2480: THEN
2481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2482:
2483: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2477: l_Return_Status := FND_API.G_RET_STS_ERROR;
2478:
2479: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2480: THEN
2481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2482:
2483: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2484: THEN
2485: Error_Handler.Add_Error_Token(
2499: --
2500: -- Convert Requestor to Requestor_Id
2501: --
2502: ELSIF p_ECO_rec.Requestor IS NOT NULL AND
2503: p_ECO_rec.Requestor <> FND_API.G_MISS_CHAR
2504: THEN
2505: l_Return_Value :=
2506: Requestor
2507: ( p_Requestor => p_ECO_rec.Requestor
2521: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2522: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2523: , p_Token_Tbl => l_Token_Tbl
2524: );
2525: l_Return_Status := FND_API.G_RET_STS_ERROR;
2526:
2527: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2528: THEN
2529: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2523: , p_Token_Tbl => l_Token_Tbl
2524: );
2525: l_Return_Status := FND_API.G_RET_STS_ERROR;
2526:
2527: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2528: THEN
2529: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2530:
2531: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2525: l_Return_Status := FND_API.G_RET_STS_ERROR;
2526:
2527: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2528: THEN
2529: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2530:
2531: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2532: THEN
2533: Error_Handler.Add_Error_Token
2548: l_ECO_Unexp_Rec.Requestor_Id := NULL;
2549: END IF;
2550:
2551: IF p_ECO_rec.Project_Name IS NOT NULL AND
2552: p_ECO_rec.Project_Name <> FND_API.G_MISS_CHAR
2553: THEN
2554: l_Return_Value :=
2555: Project
2556: ( p_project_name => p_ECO_rec.project_name
2569: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2570: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2571: , p_Token_Tbl => l_Token_Tbl
2572: );
2573: l_Return_Status := FND_API.G_RET_STS_ERROR;
2574:
2575: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2576: THEN
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2571: , p_Token_Tbl => l_Token_Tbl
2572: );
2573: l_Return_Status := FND_API.G_RET_STS_ERROR;
2574:
2575: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2576: THEN
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578:
2579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2573: l_Return_Status := FND_API.G_RET_STS_ERROR;
2574:
2575: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2576: THEN
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578:
2579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2580: THEN
2581: Error_Handler.Add_Error_Token
2596: l_ECO_Unexp_Rec.project_id := NULL;
2597: END IF;
2598:
2599: IF p_ECO_rec.Task_Number IS NOT NULL AND
2600: p_ECO_rec.Task_Number <> FND_API.G_MISS_CHAR
2601: THEN
2602: l_Return_Value :=
2603: Task
2604: ( p_task_number => p_ECO_rec.task_number
2618: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2619: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2620: , p_Token_Tbl => l_Token_Tbl
2621: );
2622: l_Return_Status := FND_API.G_RET_STS_ERROR;
2623:
2624: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2625: THEN
2626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2620: , p_Token_Tbl => l_Token_Tbl
2621: );
2622: l_Return_Status := FND_API.G_RET_STS_ERROR;
2623:
2624: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2625: THEN
2626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2627:
2628: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2622: l_Return_Status := FND_API.G_RET_STS_ERROR;
2623:
2624: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2625: THEN
2626: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2627:
2628: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2629: THEN
2630: Error_Handler.Add_Error_Token
2649: -- Assignee
2650: -- Convert Assignee to Assignee_Id (Party Id of Group or Person)
2651: --
2652: IF p_ECO_rec.Assignee IS NOT NULL AND
2653: p_ECO_rec.Assignee <> FND_API.G_MISS_CHAR
2654: THEN
2655: l_Return_Value :=
2656: Assignee
2657: ( p_assignee => p_ECO_rec.Assignee
2676: , p_Token_Tbl => l_Token_Tbl
2677: );
2678:
2679: l_token_tbl.DELETE;
2680: l_Return_Status := FND_API.G_RET_STS_ERROR;
2681:
2682: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2683: THEN
2684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2678:
2679: l_token_tbl.DELETE;
2680: l_Return_Status := FND_API.G_RET_STS_ERROR;
2681:
2682: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2683: THEN
2684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2685:
2686: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2680: l_Return_Status := FND_API.G_RET_STS_ERROR;
2681:
2682: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2683: THEN
2684: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2685:
2686: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2687: THEN
2688: Error_Handler.Add_Error_Token
2713: -- Get the Change Management Type code for the corresponding
2714: -- change management type
2715: --
2716: IF p_ECO_rec.Change_Management_Type IS NOT NULL AND
2717: p_ECO_rec.Change_Management_Type <> FND_API.G_MISS_CHAR
2718: THEN
2719:
2720: l_change_mgmt_type_code :=
2721: Change_Management_Type( p_change_management_type => p_ECO_rec.Change_Management_Type
2734: );
2735:
2736: l_token_tbl.DELETE;
2737:
2738: l_return_status := FND_API.G_RET_STS_ERROR;
2739:
2740: ELSIF l_change_mgmt_type_code = FND_API.G_MISS_CHAR
2741: THEN
2742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2736: l_token_tbl.DELETE;
2737:
2738: l_return_status := FND_API.G_RET_STS_ERROR;
2739:
2740: ELSIF l_change_mgmt_type_code = FND_API.G_MISS_CHAR
2741: THEN
2742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2743:
2744: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2738: l_return_status := FND_API.G_RET_STS_ERROR;
2739:
2740: ELSIF l_change_mgmt_type_code = FND_API.G_MISS_CHAR
2741: THEN
2742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2743:
2744: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2745: THEN
2746: Error_Handler.Add_Error_Token
2763: END IF;
2764:
2765:
2766: IF p_ECO_rec.Status_Name IS NOT NULL AND
2767: p_ECO_rec.Status_Name <> FND_API.G_MISS_CHAR
2768: THEN
2769:
2770:
2771:
2788: , x_mesg_token_tbl => l_mesg_token_tbl
2789: );
2790:
2791: l_token_tbl.DELETE;
2792: l_return_status := FND_API.G_RET_STS_ERROR;
2793: ELSE
2794: l_ECO_Unexp_Rec.Status_Type := l_status_type ;
2795: l_ECO_Unexp_Rec.Status_Code := l_status_code ;
2796: END IF;
2800: END IF;
2801:
2802:
2803: IF p_ECO_rec.Approval_Status_Name IS NOT NULL AND
2804: p_ECO_rec.Approval_Status_Name <> FND_API.G_MISS_CHAR
2805: THEN
2806:
2807: l_approval_status_type :=
2808: Approval_Status_Type(p_approval_status_name => p_ECO_rec.Approval_Status_Name);
2819: , x_mesg_token_tbl => l_mesg_token_tbl
2820: );
2821:
2822: l_token_tbl.DELETE;
2823: l_return_status := FND_API.G_RET_STS_ERROR;
2824:
2825: ELSE
2826: l_ECO_Unexp_Rec.Approval_Status_Type := l_approval_status_type ;
2827: END IF;
2835: -- Get the Source Type code for the corresponding
2836: -- source type
2837: --
2838: IF p_ECO_rec.Source_Type IS NOT NULL AND
2839: p_ECO_rec.Source_Type <> FND_API.G_MISS_CHAR
2840: THEN
2841:
2842: l_source_type_code :=
2843: Source_Type( p_source_type => p_ECO_rec.Source_Type
2856: );
2857:
2858: l_token_tbl.DELETE;
2859:
2860: l_return_status := FND_API.G_RET_STS_ERROR;
2861:
2862: ELSIF l_source_type_code = FND_API.G_MISS_CHAR
2863: THEN
2864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2858: l_token_tbl.DELETE;
2859:
2860: l_return_status := FND_API.G_RET_STS_ERROR;
2861:
2862: ELSIF l_source_type_code = FND_API.G_MISS_CHAR
2863: THEN
2864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2865:
2866: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2860: l_return_status := FND_API.G_RET_STS_ERROR;
2861:
2862: ELSIF l_source_type_code = FND_API.G_MISS_CHAR
2863: THEN
2864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2865:
2866: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2867: THEN
2868: Error_Handler.Add_Error_Token
2889: -- Source_Name
2890: -- Get the Source Id for the corresponding
2891: -- source name and source type code
2892: IF l_ECO_Unexp_Rec.Source_Type_Code IS NOT NULL AND
2893: l_ECO_Unexp_Rec.Source_Type_Code <> FND_API.G_MISS_CHAR AND
2894: p_ECO_rec.Source_Name IS NOT NULL AND
2895: p_ECO_rec.Source_Name <> FND_API.G_MISS_CHAR
2896: THEN
2897:
2891: -- source name and source type code
2892: IF l_ECO_Unexp_Rec.Source_Type_Code IS NOT NULL AND
2893: l_ECO_Unexp_Rec.Source_Type_Code <> FND_API.G_MISS_CHAR AND
2894: p_ECO_rec.Source_Name IS NOT NULL AND
2895: p_ECO_rec.Source_Name <> FND_API.G_MISS_CHAR
2896: THEN
2897:
2898: l_Return_Value :=
2899: Source_Name( p_source_name => p_ECO_rec.Source_Name
2916: );
2917:
2918: l_token_tbl.DELETE;
2919:
2920: l_return_status := FND_API.G_RET_STS_ERROR;
2921:
2922: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2923: THEN
2924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2918: l_token_tbl.DELETE;
2919:
2920: l_return_status := FND_API.G_RET_STS_ERROR;
2921:
2922: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2923: THEN
2924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2925:
2926: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2920: l_return_status := FND_API.G_RET_STS_ERROR;
2921:
2922: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2923: THEN
2924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2925:
2926: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2927: THEN
2928: Error_Handler.Add_Error_Token
2945: END IF;
2946:
2947: -- Start Bug 4967902
2948: IF p_ECO_rec.Organization_Hierarchy IS NOT NULL AND
2949: p_ECO_rec.Organization_Hierarchy <> FND_API.G_MISS_CHAR
2950: THEN
2951: l_Return_Value :=
2952: Hierarchy
2953: ( p_organization_hierarchy => p_ECO_rec.Organization_Hierarchy
2965: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2966: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2967: , p_Token_Tbl => l_Token_Tbl
2968: );
2969: l_Return_Status := FND_API.G_RET_STS_ERROR;
2970:
2971: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2972: THEN
2973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2967: , p_Token_Tbl => l_Token_Tbl
2968: );
2969: l_Return_Status := FND_API.G_RET_STS_ERROR;
2970:
2971: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2972: THEN
2973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2974:
2975: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2969: l_Return_Status := FND_API.G_RET_STS_ERROR;
2970:
2971: ELSIF l_Return_Value = FND_API.G_MISS_NUM
2972: THEN
2973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2974:
2975: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2976: THEN
2977: Error_Handler.Add_Error_Token
3054: l_dummy VARCHAR2(30);
3055:
3056: BEGIN
3057:
3058: x_return_status := FND_API.G_RET_STS_SUCCESS;
3059: x_eco_rev_unexp_rec := p_eco_rev_unexp_rec;
3060:
3061: IF p_eco_revision_rec.revision IS NULL OR
3062: p_eco_revision_rec.revision = FND_API.G_MISS_CHAR
3058: x_return_status := FND_API.G_RET_STS_SUCCESS;
3059: x_eco_rev_unexp_rec := p_eco_rev_unexp_rec;
3060:
3061: IF p_eco_revision_rec.revision IS NULL OR
3062: p_eco_revision_rec.revision = FND_API.G_MISS_CHAR
3063: THEN
3064: Error_Handler.Add_Error_Token
3065: ( p_Message_Name => 'ENG_REVISION_KEYCOL_NULL'
3066: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3066: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3067: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3068: );
3069:
3070: x_return_status := FND_API.G_RET_STS_ERROR;
3071: x_mesg_token_tbl := l_mesg_token_tbl;
3072:
3073: END IF;
3074:
3102: l_dummy VARCHAR2(30);
3103: BEGIN
3104:
3105: l_rev_item_unexp_rec := p_rev_item_unexp_rec;
3106: l_return_status := FND_API.G_RET_STS_SUCCESS;
3107:
3108: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
3109: g_Token_Tbl(1).Token_Value := p_revised_item_rec.revised_item_name;
3110:
3113: -- Verify that the unique key columns are not null or missing
3114: --
3115: ************************************************************/
3116: IF p_revised_item_rec.revised_item_name IS NULL OR
3117: p_revised_item_rec.revised_item_name = FND_API.G_MISS_CHAR
3118: THEN
3119: Error_Handler.Add_Error_Token
3120: ( p_Message_Name => 'ENG_RITEM_NAME_KEYCOL_NULL'
3121: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3120: ( p_Message_Name => 'ENG_RITEM_NAME_KEYCOL_NULL'
3121: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3122: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3123: );
3124: l_Return_Status := FND_API.G_RET_STS_ERROR;
3125: END IF;
3126:
3127: IF p_revised_item_rec.start_effective_date IS NULL OR
3128: p_revised_item_rec.start_Effective_date = FND_API.G_MISS_DATE
3124: l_Return_Status := FND_API.G_RET_STS_ERROR;
3125: END IF;
3126:
3127: IF p_revised_item_rec.start_effective_date IS NULL OR
3128: p_revised_item_rec.start_Effective_date = FND_API.G_MISS_DATE
3129: THEN
3130: Error_Handler.Add_Error_Token
3131: ( p_Message_Name => 'ENG_RITEM_DATE_KEYCOL_NULL'
3132: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3131: ( p_Message_Name => 'ENG_RITEM_DATE_KEYCOL_NULL'
3132: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3133: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3134: );
3135: l_Return_Status := FND_API.G_RET_STS_ERROR;
3136: END IF;
3137:
3138: --
3139: -- If Key columns are NULL then return
3137:
3138: --
3139: -- If Key columns are NULL then return
3140: --
3141: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3142: THEN
3143: x_Return_Status := l_Return_Status;
3144: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3145: RETURN;
3170: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3171: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3172: , p_Token_Tbl => g_Token_Tbl
3173: );
3174: l_Return_Status := FND_API.G_RET_STS_ERROR;
3175: END IF;
3176:
3177: l_rev_item_unexp_rec.change_id :=
3178: Get_Change_Id(p_revised_item_rec.eco_name,
3188: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3189: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3190: , p_Token_Tbl => g_Token_Tbl
3191: );
3192: l_Return_Status := FND_API.G_RET_STS_ERROR;
3193: END IF;
3194:
3195: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3196: x_rev_item_unexp_rec := l_rev_item_unexp_rec;
3319: , x_from_cum_qty
3320: , x_eco_for_production
3321: , x_cfm_routing_flag
3322: FROM eng_revised_items
3323: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3320: , x_eco_for_production
3321: , x_cfm_routing_flag
3322: FROM eng_revised_items
3323: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3328: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3321: , x_cfm_routing_flag
3322: FROM eng_revised_items
3323: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3328: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3329: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3322: FROM eng_revised_items
3323: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3328: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3329: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3330: AND change_notice = p_change_notice
3323: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3328: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3329: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3330: AND change_notice = p_change_notice
3331: AND organization_id = p_organization_id
3324: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3325: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3326: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3327: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3328: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3329: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3330: AND change_notice = p_change_notice
3331: AND organization_id = p_organization_id
3332: AND revised_item_id = p_revised_item_id
3348: , x_from_cum_qty
3349: , x_eco_for_production
3350: , x_cfm_routing_flag
3351: FROM eng_revised_items
3352: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3349: , x_eco_for_production
3350: , x_cfm_routing_flag
3351: FROM eng_revised_items
3352: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3357: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3350: , x_cfm_routing_flag
3351: FROM eng_revised_items
3352: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3357: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3358: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3351: FROM eng_revised_items
3352: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3357: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3358: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3359: AND change_notice = p_change_notice
3352: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3357: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3358: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3359: AND change_notice = p_change_notice
3360: AND organization_id = p_organization_id
3353: = NVL(p_from_end_item_number,FND_API.G_MISS_CHAR)
3354: AND NVL(new_routing_revision,FND_API.G_MISS_CHAR)
3355: = NVL(p_new_routing_revision,FND_API.G_MISS_CHAR)
3356: AND NVL(new_item_revision, FND_API.G_MISS_CHAR)
3357: = NVL(p_item_revision , FND_API.G_MISS_CHAR)
3358: AND scheduled_date = p_effective_date --bug 5096309 removed trunc
3359: AND change_notice = p_change_notice
3360: AND organization_id = p_organization_id
3361: AND revised_item_id = p_revised_item_id ;
3426: , x_from_cum_qty
3427: , x_eco_for_production
3428: , x_cfm_routing_flag
3429: FROM eng_revised_items
3430: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3427: , x_eco_for_production
3428: , x_cfm_routing_flag
3429: FROM eng_revised_items
3430: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3435: NVL(p_item_revision,FND_API.G_MISS_CHAR)
3428: , x_cfm_routing_flag
3429: FROM eng_revised_items
3430: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3435: NVL(p_item_revision,FND_API.G_MISS_CHAR)
3436: AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
3429: FROM eng_revised_items
3430: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3435: NVL(p_item_revision,FND_API.G_MISS_CHAR)
3436: AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
3437: AND change_notice = p_change_notice
3430: WHERE NVL(from_end_item_unit_number, FND_API.G_MISS_CHAR )
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3435: NVL(p_item_revision,FND_API.G_MISS_CHAR)
3436: AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
3437: AND change_notice = p_change_notice
3438: AND organization_id = p_organization_id
3431: = NVL(p_from_end_item_number, FND_API.G_MISS_CHAR)
3432: AND NVL(new_routing_revision, FND_API.G_MISS_CHAR) =
3433: NVL(p_new_routing_revision, FND_API.G_MISS_CHAR)
3434: AND NVL(new_item_revision,FND_API.G_MISS_CHAR)=
3435: NVL(p_item_revision,FND_API.G_MISS_CHAR)
3436: AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
3437: AND change_notice = p_change_notice
3438: AND organization_id = p_organization_id
3439: AND revised_item_id = p_revised_item_id
3436: AND TRUNC(scheduled_date) = TRUNC(p_effective_date)
3437: AND change_notice = p_change_notice
3438: AND organization_id = p_organization_id
3439: AND revised_item_id = p_revised_item_id
3440: AND NVL(alternate_bom_designator, FND_API.G_MISS_CHAR) =
3441: NVL(p_alternate_routing_code, FND_API.G_MISS_CHAR); -- Added for bug 13329115
3442:
3443: RETURN l_Rev_Item_Seq;
3444:
3437: AND change_notice = p_change_notice
3438: AND organization_id = p_organization_id
3439: AND revised_item_id = p_revised_item_id
3440: AND NVL(alternate_bom_designator, FND_API.G_MISS_CHAR) =
3441: NVL(p_alternate_routing_code, FND_API.G_MISS_CHAR); -- Added for bug 13329115
3442:
3443: RETURN l_Rev_Item_Seq;
3444:
3445: EXCEPTION
3497: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3498: l_return_status VARCHAR2(1);
3499: BEGIN
3500:
3501: l_return_status := FND_API.G_RET_STS_SUCCESS;
3502:
3503:
3504: x_revised_item_sequence_id :=
3505: BillAndRevItemSeq( p_revised_item_id => p_revised_item_id
3535: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3536: , p_Token_Tbl => g_Token_Tbl
3537: );
3538:
3539: l_Return_Status := FND_API.G_RET_STS_ERROR;
3540: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3541: x_Return_Status := l_Return_Status;
3542: x_other_message := 'BOM_CMP_UUI_SEV_ERROR';
3543: x_other_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
3552: BOM_Globals.G_OPR_CANCEL
3553: ) AND
3554: x_bill_sequence_id IS NULL AND p_entity_processed = 'RC'
3555: THEN
3556: l_return_status := FND_API.G_RET_STS_ERROR;
3557:
3558: g_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';
3559: g_Token_Tbl(1).Token_Value := p_revised_item_name;
3560:
3588: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3589: , p_Token_Tbl => g_Token_Tbl
3590: );
3591:
3592: l_Return_Status := FND_API.G_RET_STS_ERROR;
3593: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3594:
3595: --
3596: -- Set the other message and its tokens
3618: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3619: , p_Token_Tbl => g_Token_Tbl
3620: );
3621:
3622: l_Return_Status := FND_API.G_RET_STS_ERROR;
3623: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3624:
3625: --
3626: -- Set the other message
3644: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3645: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3646: , p_Token_Tbl => g_Token_Tbl
3647: );
3648: l_Return_Status := FND_API.G_RET_STS_ERROR;
3649: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3650:
3651: --
3652: -- Set the other message
3698: x_other_message := 'BOM_SBC_UUI_SEV_ERROR';
3699: x_other_token_tbl(1).token_name := 'SUBSTITUTE_ITEM_NAME';
3700: x_other_token_tbl(1).token_value := p_rfd_sbc_name ;
3701:
3702: l_Return_Status := FND_API.G_RET_STS_ERROR;
3703: g_Token_Tbl.Delete;
3704:
3705: ELSIF x_component_sequence_id IS NULL
3706: AND p_entity_processed = 'RFD'
3724: x_other_message := 'BOM_RFD_UUI_SEV_ERROR';
3725: x_other_token_tbl(1).token_name := 'REFERENCE_DESIGNATOR_NAME';
3726: x_other_token_tbl(1).token_value := p_rfd_sbc_name ;
3727:
3728: l_Return_Status := FND_API.G_RET_STS_ERROR;
3729: g_Token_Tbl.Delete;
3730: END IF;
3731:
3732: END IF ;
3793: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3794: l_return_status VARCHAR2(1);
3795: BEGIN
3796:
3797: l_return_status := FND_API.G_RET_STS_SUCCESS;
3798:
3799: x_revised_item_sequence_id :=
3800: RtgAndRevItemSeq
3801: ( p_revised_item_id => p_revised_item_id
3830: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3831: , p_Token_Tbl => g_Token_Tbl
3832: );
3833:
3834: l_Return_Status := FND_API.G_RET_STS_ERROR;
3835: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3836: x_Return_Status := l_Return_Status;
3837:
3838:
3854: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3855: , p_Token_Tbl => g_Token_Tbl
3856: );
3857:
3858: l_Return_Status := FND_API.G_RET_STS_ERROR;
3859: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3860: x_Return_Status := l_Return_Status;
3861:
3862: RETURN;
3878: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3879: , p_Token_Tbl => g_Token_Tbl
3880: );
3881:
3882: l_Return_Status := FND_API.G_RET_STS_ERROR;
3883: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3884: x_Return_Status := l_Return_Status;
3885:
3886: RETURN;
3908: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3909: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3910: , p_Token_Tbl => g_Token_Tbl
3911: );
3912: l_Return_Status := FND_API.G_RET_STS_ERROR;
3913:
3914: ELSIF x_operation_sequence_id IS NULL AND p_entity_processed = 'SOR'
3915: THEN
3916: g_token_tbl(1).token_name := 'OP_SEQ_NUMBER';
3921: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3922: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3923: , p_Token_Tbl => g_Token_Tbl
3924: );
3925: l_Return_Status := FND_API.G_RET_STS_ERROR;
3926: RETURN;
3927:
3928: ELSIF l_err_text IS NOT NULL AND
3929: (x_operation_sequence_id IS NULL OR
3926: RETURN;
3927:
3928: ELSIF l_err_text IS NOT NULL AND
3929: (x_operation_sequence_id IS NULL OR
3930: x_operation_sequence_id = FND_API.G_MISS_NUM
3931: )
3932: THEN
3933: -- This is an unexpected error.
3934: Error_Handler.Add_Error_Token
3937: G_PKG_NAME
3938: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3939: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3940: );
3941: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3942: END IF;
3943: END IF ;
3944:
3945: -- Set Revised Item Attributes to Global System Information.
3971: l_return_status VARCHAR2(1);
3972: BEGIN
3973:
3974: l_change_line_unexp_rec := p_change_line_unexp_rec;
3975: l_return_status := FND_API.G_RET_STS_SUCCESS;
3976:
3977: g_Token_Tbl(1).Token_Name := 'LINE_NAME';
3978: g_Token_Tbl(1).Token_Value := p_change_line_rec.name;
3979:
3982: -- Verify that the unique key columns are not null or missing
3983: --
3984: ************************************************************/
3985: IF (p_change_line_rec.name IS NULL OR
3986: p_change_line_rec.name = FND_API.G_MISS_CHAR)
3987:
3988: THEN
3989: Error_Handler.Add_Error_Token
3990: ( p_Message_Name => 'ENG_CL_NAME_KEYCOL_NULL'
3990: ( p_Message_Name => 'ENG_CL_NAME_KEYCOL_NULL'
3991: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3992: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3993: );
3994: l_Return_Status := FND_API.G_RET_STS_ERROR;
3995: END IF;
3996:
3997: --
3998: -- If Key columns are NULL then return
3996:
3997: --
3998: -- If Key columns are NULL then return
3999: --
4000: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4001: THEN
4002: x_Return_Status := l_Return_Status;
4003: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4004: RETURN;
4077:
4078:
4079:
4080: BEGIN
4081: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
4082: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4083: l_display_name :=p_change_line_rec.object_display_name;
4084: l_change_line_unexp_rec := p_change_line_unexp_rec ;
4085: l_token_tbl(1).token_name := 'LINE_NAME';
4078:
4079:
4080: BEGIN
4081: l_Return_Status := FND_API.G_RET_STS_SUCCESS;
4082: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
4083: l_display_name :=p_change_line_rec.object_display_name;
4084: l_change_line_unexp_rec := p_change_line_unexp_rec ;
4085: l_token_tbl(1).token_name := 'LINE_NAME';
4086: l_token_tbl(1).token_value := p_change_line_rec.name;
4093: x_change_mgmt_type_code => l_hdr_change_mgmt_type_code
4094: );
4095:
4096: IF p_change_line_rec.change_management_type IS NOT NULL AND
4097: p_change_line_rec.change_management_type <> FND_API.G_MISS_CHAR
4098: THEN
4099: Change_Mgmt_Type
4100: (
4101: p_change_mgmt_type_name => p_change_line_rec.change_management_type
4119: , p_Token_Tbl => l_Token_Tbl
4120: );
4121: END IF;
4122:
4123: x_Return_Status := FND_API.G_RET_STS_ERROR;
4124: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4125: END IF;
4126:
4127: --Bug No: 3463472
4132:
4133:
4134: -- Convert change_type_code to change_type_id
4135: IF p_change_line_rec.change_type_code IS NOT NULL AND
4136: p_change_line_rec.change_type_code <> FND_API.G_MISS_CHAR
4137: THEN
4138: --Bug No: 3463472
4139: --Issue: DEF-1694
4140: --Calling procedure Change_Order_Line_Type
4162: , p_Token_Tbl => l_Token_Tbl
4163: );
4164: END IF;
4165:
4166: l_Return_Status := FND_API.G_RET_STS_ERROR;
4167: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4168:
4169: ELSIF l_change_type_id = FND_API.G_MISS_NUM
4170: THEN
4165:
4166: l_Return_Status := FND_API.G_RET_STS_ERROR;
4167: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4168:
4169: ELSIF l_change_type_id = FND_API.G_MISS_NUM
4170: THEN
4171: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4172: THEN
4173: Error_Handler.Add_Error_Token
4177: );
4178: END IF;
4179:
4180: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4182: ELSE
4183: l_change_line_unexp_rec.change_type_id := l_change_type_id;
4184: END IF;
4185:
4201: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4202: , p_Token_Tbl => l_Token_Tbl
4203: );
4204: END IF;
4205: l_Return_Status := FND_API.G_RET_STS_ERROR;
4206: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4207:
4208: END IF;
4209: /* Not required any more as subjects have moved to eng_change_subjects
4234: )
4235: THEN
4236: l_org_id := ORGANIZATION (p_change_line_rec.pk4_name, l_err_text);
4237:
4238: IF (l_org_id IS NOT NULL AND l_org_id <> fnd_api.g_miss_num)
4239: THEN
4240: l_inv_item_id := revised_item (
4241: p_change_line_rec.pk3_name,
4242: l_org_id,
4243: l_err_text
4244: );
4245:
4246: IF ( l_inv_item_id IS NOT NULL
4247: AND l_inv_item_id <> fnd_api.g_miss_num
4248: )
4249: THEN
4250: l_rev_id := revised_item_code (
4251: l_inv_item_id,
4252: l_org_id,
4253: p_change_line_rec.pk1_name
4254: );
4255:
4256: IF (l_rev_id IS NOT NULL AND l_rev_id <> fnd_api.g_miss_num)
4257: THEN
4258: l_return_status := 'S'; --fnd_api.g_ret_sts_error;
4259: ELSE
4260: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4254: );
4255:
4256: IF (l_rev_id IS NOT NULL AND l_rev_id <> fnd_api.g_miss_num)
4257: THEN
4258: l_return_status := 'S'; --fnd_api.g_ret_sts_error;
4259: ELSE
4260: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4261: l_token_tbl (1).token_value :=
4262: p_change_line_rec.change_type_code;
4265: p_mesg_token_tbl=> l_mesg_token_tbl,
4266: x_mesg_token_tbl=> l_mesg_token_tbl,
4267: p_token_tbl=> l_token_tbl
4268: );
4269: l_return_status := fnd_api.g_ret_sts_error;
4270: END IF; --end of l_rev_id IS NOT NULL
4271: ELSE
4272: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4273: l_token_tbl (1).token_value :=
4277: p_mesg_token_tbl=> l_mesg_token_tbl,
4278: x_mesg_token_tbl=> l_mesg_token_tbl,
4279: p_token_tbl=> l_token_tbl
4280: );
4281: l_return_status := fnd_api.g_ret_sts_error;
4282: END IF; -- l_inv_item_id IS NOT NULL
4283: ELSE
4284: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4285: l_token_tbl (1).token_value :=
4289: p_mesg_token_tbl=> l_mesg_token_tbl,
4290: x_mesg_token_tbl=> l_mesg_token_tbl,
4291: p_token_tbl=> l_token_tbl
4292: );
4293: l_return_status := fnd_api.g_ret_sts_error;
4294: END IF; --l_org_id IS NOT NULL
4295: ELSE
4296: IF ( p_change_line_rec.pk1_name IS NULL
4297: OR p_change_line_rec.pk1_name = fnd_api.g_miss_char
4293: l_return_status := fnd_api.g_ret_sts_error;
4294: END IF; --l_org_id IS NOT NULL
4295: ELSE
4296: IF ( p_change_line_rec.pk1_name IS NULL
4297: OR p_change_line_rec.pk1_name = fnd_api.g_miss_char
4298: )
4299: THEN
4300: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4301: l_token_tbl (1).token_value :=
4305: p_mesg_token_tbl=> l_mesg_token_tbl,
4306: x_mesg_token_tbl=> l_mesg_token_tbl,
4307: p_token_tbl=> l_token_tbl
4308: );
4309: l_return_status := fnd_api.g_ret_sts_error;
4310: END IF;
4311:
4312: IF ( p_change_line_rec.pk3_name IS NULL
4313: OR p_change_line_rec.pk3_name = fnd_api.g_miss_char
4309: l_return_status := fnd_api.g_ret_sts_error;
4310: END IF;
4311:
4312: IF ( p_change_line_rec.pk3_name IS NULL
4313: OR p_change_line_rec.pk3_name = fnd_api.g_miss_char
4314: )
4315: THEN
4316: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4317: l_token_tbl (1).token_value :=
4321: p_mesg_token_tbl=> l_mesg_token_tbl,
4322: x_mesg_token_tbl=> l_mesg_token_tbl,
4323: p_token_tbl=> l_token_tbl
4324: );
4325: l_return_status := fnd_api.g_ret_sts_error;
4326: END IF;
4327:
4328: IF ( p_change_line_rec.pk4_name IS NULL
4329: OR p_change_line_rec.pk4_name = fnd_api.g_miss_char
4325: l_return_status := fnd_api.g_ret_sts_error;
4326: END IF;
4327:
4328: IF ( p_change_line_rec.pk4_name IS NULL
4329: OR p_change_line_rec.pk4_name = fnd_api.g_miss_char
4330: )
4331: THEN
4332: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4333: l_token_tbl (1).token_value :=
4337: p_mesg_token_tbl=> l_mesg_token_tbl,
4338: x_mesg_token_tbl=> l_mesg_token_tbl,
4339: p_token_tbl=> l_token_tbl
4340: );
4341: l_return_status := fnd_api.g_ret_sts_error;
4342: END IF;
4343: END IF; --p_change_line_rec.Pk1_Name
4344: ELSIF (l_display_name =
4345: bom_globals.retrieve_message ('ENG', 'ENG_SUBJECT_ITEM')
4351: )
4352: THEN
4353: l_org_id := ORGANIZATION (p_change_line_rec.pk3_name, l_err_text);
4354:
4355: IF (l_org_id IS NOT NULL AND l_org_id <> fnd_api.g_miss_num)
4356: THEN
4357: l_rev_id := revised_item (
4358: p_change_line_rec.pk1_name,
4359: l_org_id,
4359: l_org_id,
4360: l_err_text
4361: );
4362:
4363: IF (l_rev_id IS NOT NULL AND l_rev_id <> fnd_api.g_miss_num)
4364: THEN
4365: l_return_status := 'S';
4366: ELSE
4367: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4372: p_mesg_token_tbl=> l_mesg_token_tbl,
4373: x_mesg_token_tbl=> l_mesg_token_tbl,
4374: p_token_tbl=> l_token_tbl
4375: );
4376: l_return_status := fnd_api.g_ret_sts_error;
4377: END IF; --l_rev_id IS NOT NULL
4378: ELSE
4379: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4380: l_token_tbl (1).token_value :=
4384: p_mesg_token_tbl=> l_mesg_token_tbl,
4385: x_mesg_token_tbl=> l_mesg_token_tbl,
4386: p_token_tbl=> l_token_tbl
4387: );
4388: l_return_status := fnd_api.g_ret_sts_error;
4389: END IF; --l_org_id IS NOT NULL
4390: ELSE
4391: IF ( p_change_line_rec.pk1_name IS NULL
4392: OR p_change_line_rec.pk1_name = fnd_api.g_miss_char
4388: l_return_status := fnd_api.g_ret_sts_error;
4389: END IF; --l_org_id IS NOT NULL
4390: ELSE
4391: IF ( p_change_line_rec.pk1_name IS NULL
4392: OR p_change_line_rec.pk1_name = fnd_api.g_miss_char
4393: )
4394: THEN
4395: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4396: l_token_tbl (1).token_value :=
4400: p_mesg_token_tbl=> l_mesg_token_tbl,
4401: x_mesg_token_tbl=> l_mesg_token_tbl,
4402: p_token_tbl=> l_token_tbl
4403: );
4404: l_return_status := fnd_api.g_ret_sts_error;
4405: END IF;
4406:
4407: IF ( p_change_line_rec.pk3_name IS NULL
4408: OR p_change_line_rec.pk3_name = fnd_api.g_miss_char
4404: l_return_status := fnd_api.g_ret_sts_error;
4405: END IF;
4406:
4407: IF ( p_change_line_rec.pk3_name IS NULL
4408: OR p_change_line_rec.pk3_name = fnd_api.g_miss_char
4409: )
4410: THEN
4411: l_token_tbl (1).token_name := 'CHANGE_LINE_TYPE';
4412: l_token_tbl (1).token_value :=
4416: p_mesg_token_tbl=> l_mesg_token_tbl,
4417: x_mesg_token_tbl=> l_mesg_token_tbl,
4418: p_token_tbl=> l_token_tbl
4419: );
4420: l_return_status := fnd_api.g_ret_sts_error;
4421: END IF;
4422: END IF; --p_change_line_rec.Pk1_Name
4423: END IF; --End Of If of check for l_display_name
4424: -- END IF; --End of IF (p_change_line_rec.change_type_code is not null )
4423: END IF; --End Of If of check for l_display_name
4424: -- END IF; --End of IF (p_change_line_rec.change_type_code is not null )
4425:
4426:
4427: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4428: THEN
4429: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4430: x_change_line_unexp_rec := l_change_line_unexp_rec;
4431: x_Return_Status := l_Return_Status;
4435: --End Of Bug 2848506
4436: */
4437:
4438: IF p_change_line_rec.status_name IS NOT NULL AND
4439: p_change_line_rec.status_name <> FND_API.G_MISS_CHAR
4440: THEN
4441: l_change_line_unexp_rec.status_code := Line_Status(p_change_line_rec.status_name);
4442: END IF;
4443:
4442: END IF;
4443:
4444:
4445: IF p_change_line_rec.Assignee_Name IS NOT NULL AND
4446: p_change_line_rec.Assignee_Name <> FND_API.G_MISS_CHAR
4447: THEN
4448: l_Return_Value :=
4449: Assignee
4450: ( p_assignee => p_change_line_rec.Assignee_Name
4464: , p_Token_Tbl => l_Token_Tbl
4465: );
4466:
4467: l_token_tbl.DELETE;
4468: l_Return_Status := FND_API.G_RET_STS_ERROR;
4469:
4470: ELSIF l_Return_Value = FND_API.G_MISS_NUM
4471: THEN
4472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4466:
4467: l_token_tbl.DELETE;
4468: l_Return_Status := FND_API.G_RET_STS_ERROR;
4469:
4470: ELSIF l_Return_Value = FND_API.G_MISS_NUM
4471: THEN
4472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4473:
4474: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4468: l_Return_Status := FND_API.G_RET_STS_ERROR;
4469:
4470: ELSIF l_Return_Value = FND_API.G_MISS_NUM
4471: THEN
4472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4473:
4474: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4475: THEN
4476: Error_Handler.Add_Error_Token
4658: , p_Token_Tbl => l_Token_Tbl
4659: );
4660: END IF;
4661:
4662: x_Return_Status := FND_API.G_RET_STS_ERROR;
4663: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
4664:
4665: l_token_tbl.DELETE ;
4666: l_token_tbl(1).token_name := 'LINE_NAME';
4667: l_token_tbl(1).token_value := p_change_line_rec.name;
4668: END IF;
4669: END IF;
4670: */
4671: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4672: AND x_return_status <> FND_API.G_RET_STS_UNEXP_ERROR
4673: THEN
4674: x_Return_Status := l_return_status ;
4675: END IF;
4668: END IF;
4669: END IF;
4670: */
4671: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4672: AND x_return_status <> FND_API.G_RET_STS_UNEXP_ERROR
4673: THEN
4674: x_Return_Status := l_return_status ;
4675: END IF;
4676: