367: P_DELIVERABLE_ID IN NUMBER,
368: X_OUT_ID OUT NOCOPY NUMBER,
369: X_RETURN_STATUS OUT NOCOPY VARCHAR2)
370: IS
371: l_return_status VARCHAR2(1) := oke_api.g_ret_sts_success;
372: l_api_version CONSTANT NUMBER :=1;
373: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_MDS_ENTRY';
374: x_msg_count NUMBER;
375: x_msg_data VARCHAR2(2000);
429: L_Inv_Org_ID_Old NUMBER;
430: L_Designator_Old VARCHAR2(80);
431:
432: BEGIN
433: l_return_status := OKE_API.START_ACTIVITY(
434: l_api_name,
435: OKE_API.G_FALSE,
436: '_PVT',
437: x_return_status);
431:
432: BEGIN
433: l_return_status := OKE_API.START_ACTIVITY(
434: l_api_name,
435: OKE_API.G_FALSE,
436: '_PVT',
437: x_return_status);
438:
439: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
435: OKE_API.G_FALSE,
436: '_PVT',
437: x_return_status);
438:
439: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
440: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
441: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
442: RAISE OKE_API.G_EXCEPTION_ERROR;
443: END IF;
436: '_PVT',
437: x_return_status);
438:
439: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
440: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
441: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
442: RAISE OKE_API.G_EXCEPTION_ERROR;
443: END IF;
444:
437: x_return_status);
438:
439: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
440: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
441: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
442: RAISE OKE_API.G_EXCEPTION_ERROR;
443: END IF;
444:
445: Open Mds_C;
438:
439: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
440: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
441: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
442: RAISE OKE_API.G_EXCEPTION_ERROR;
443: END IF;
444:
445: Open Mds_C;
446: Fetch Mds_C Into L_DRow_ID, L_Item_ID, L_Inv_Org_ID, L_Designator,
536: Create_Mrp_Item( l_Item_Id, l_Inv_Org_Id, l_Designator );
537: END IF;
538:
539: x_return_status := l_return_status;
540: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
541:
542: EXCEPTION
543: WHEN OKE_API.G_EXCEPTION_ERROR THEN
544:
539: x_return_status := l_return_status;
540: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
541:
542: EXCEPTION
543: WHEN OKE_API.G_EXCEPTION_ERROR THEN
544:
545: x_return_status := OKE_API.HANDLE_EXCEPTIONS
546: (
547: l_api_name,
541:
542: EXCEPTION
543: WHEN OKE_API.G_EXCEPTION_ERROR THEN
544:
545: x_return_status := OKE_API.HANDLE_EXCEPTIONS
546: (
547: l_api_name,
548: G_PKG_NAME,
549: 'OKE_API.G_RET_STS_ERROR',
545: x_return_status := OKE_API.HANDLE_EXCEPTIONS
546: (
547: l_api_name,
548: G_PKG_NAME,
549: 'OKE_API.G_RET_STS_ERROR',
550: x_msg_count,
551: x_msg_data,
552: '_PVT');
553: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
549: 'OKE_API.G_RET_STS_ERROR',
550: x_msg_count,
551: x_msg_data,
552: '_PVT');
553: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
554: x_return_status := OKE_API.HANDLE_EXCEPTIONS
555: (
556: l_api_name,
557: G_PKG_NAME,
550: x_msg_count,
551: x_msg_data,
552: '_PVT');
553: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
554: x_return_status := OKE_API.HANDLE_EXCEPTIONS
555: (
556: l_api_name,
557: G_PKG_NAME,
558: 'OKE_API.G_RET_STS_UNEXP_ERROR',
554: x_return_status := OKE_API.HANDLE_EXCEPTIONS
555: (
556: l_api_name,
557: G_PKG_NAME,
558: 'OKE_API.G_RET_STS_UNEXP_ERROR',
559: x_msg_count,
560: x_msg_data,
561: '_PVT');
562:
560: x_msg_data,
561: '_PVT');
562:
563: WHEN OTHERS THEN
564: x_return_status := OKE_API.HANDLE_EXCEPTIONS
565: (
566: l_api_name,
567: G_PKG_NAME,
568: 'OTHERS',
714: AND m.customer_item_id = x.CUSTOMER_ITEM_ID
715: AND m.customer_id = l_customer_id;
716:
717: BEGIN
718: l_return_status := OKE_API.START_ACTIVITY(
719: l_api_name,
720: OKE_API.G_FALSE,
721: '_PVT',
722: x_return_status);
716:
717: BEGIN
718: l_return_status := OKE_API.START_ACTIVITY(
719: l_api_name,
720: OKE_API.G_FALSE,
721: '_PVT',
722: x_return_status);
723:
724: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
720: OKE_API.G_FALSE,
721: '_PVT',
722: x_return_status);
723:
724: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
725:
726: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
727:
728: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
722: x_return_status);
723:
724: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
725:
726: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
727:
728: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
729:
730: RAISE OKE_API.G_EXCEPTION_ERROR;
724: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
725:
726: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
727:
728: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
729:
730: RAISE OKE_API.G_EXCEPTION_ERROR;
731:
732: END IF;
726: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
727:
728: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
729:
730: RAISE OKE_API.G_EXCEPTION_ERROR;
731:
732: END IF;
733:
734: OPEN l_line_csr(P_DELIVERABLE_ID);
956: IF rec_dts_ship.shipping_request_id IS NOT NULL THEN
957: FND_MESSAGE.Set_Name('OKE', 'OKE_DTS_SHIP_EXISTS');
958: FND_MESSAGE.set_token('SHIPPING_DETAIL',rec_dts_ship.shipping_request_id);
959: FND_MSG_PUB.Add;
960: RAISE OKE_API.G_EXCEPTION_ERROR;
961: END IF;
962: /* Bug 6011322 end */
963:
964: -- call api
963:
964: -- call api
965: WSH_interface_pub.create_shipment_lines(l_ship_rec, l_id, l_return_status);
966:
967: if l_return_status = oke_api.g_ret_sts_success then
968: -- update deliverable table
969: update oke_k_deliverables_b
970: set shipping_request_id = l_id,
971: in_process_flag = 'Y',
975: x_return_status := l_return_status;
976:
977: else
978:
979: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
980:
981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
982:
983: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
977: else
978:
979: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
980:
981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
982:
983: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
984:
985: RAISE OKE_API.G_EXCEPTION_ERROR;
979: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
980:
981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
982:
983: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
984:
985: RAISE OKE_API.G_EXCEPTION_ERROR;
986:
987: END IF;
981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
982:
983: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
984:
985: RAISE OKE_API.G_EXCEPTION_ERROR;
986:
987: END IF;
988:
989: end if;
988:
989: end if;
990:
991: END LOOP;
992: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
993: COMMIT;
994:
995:
996:
994:
995:
996:
997: EXCEPTION
998: WHEN OKE_API.G_EXCEPTION_ERROR THEN
999:
1000: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1001: (
1002: l_api_name,
996:
997: EXCEPTION
998: WHEN OKE_API.G_EXCEPTION_ERROR THEN
999:
1000: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1001: (
1002: l_api_name,
1003: G_PKG_NAME,
1004: 'OKE_API.G_RET_STS_ERROR',
1000: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1001: (
1002: l_api_name,
1003: G_PKG_NAME,
1004: 'OKE_API.G_RET_STS_ERROR',
1005: x_msg_count,
1006: x_msg_data,
1007: '_PVT');
1008: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1004: 'OKE_API.G_RET_STS_ERROR',
1005: x_msg_count,
1006: x_msg_data,
1007: '_PVT');
1008: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1009: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1010: (
1011: l_api_name,
1012: G_PKG_NAME,
1005: x_msg_count,
1006: x_msg_data,
1007: '_PVT');
1008: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1009: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1010: (
1011: l_api_name,
1012: G_PKG_NAME,
1013: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1009: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1010: (
1011: l_api_name,
1012: G_PKG_NAME,
1013: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1014: x_msg_count,
1015: x_msg_data,
1016: '_PVT');
1017:
1015: x_msg_data,
1016: '_PVT');
1017:
1018: WHEN OTHERS THEN
1019: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1020: (
1021: l_api_name,
1022: G_PKG_NAME,
1023: 'OTHERS',
1221: FROM okc_k_headers_b
1222: WHERE ID = (SELECT K_Header_ID FROM oke_k_deliverables_b WHERE Deliverable_ID = P_Deliverable_ID);
1223:
1224: BEGIN
1225: l_return_status := OKE_API.START_ACTIVITY(
1226: l_api_name,
1227: OKE_API.G_FALSE,
1228: '_PVT',
1229: x_return_status);
1223:
1224: BEGIN
1225: l_return_status := OKE_API.START_ACTIVITY(
1226: l_api_name,
1227: OKE_API.G_FALSE,
1228: '_PVT',
1229: x_return_status);
1230:
1231: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1227: OKE_API.G_FALSE,
1228: '_PVT',
1229: x_return_status);
1230:
1231: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1232:
1233: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234:
1235: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1229: x_return_status);
1230:
1231: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1232:
1233: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234:
1235: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1236:
1237: RAISE OKE_API.G_EXCEPTION_ERROR;
1231: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1232:
1233: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234:
1235: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1236:
1237: RAISE OKE_API.G_EXCEPTION_ERROR;
1238:
1239: END IF;
1233: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234:
1235: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1236:
1237: RAISE OKE_API.G_EXCEPTION_ERROR;
1238:
1239: END IF;
1240:
1241:
1295: FND_MSG_PUB.Add;
1296: end loop;
1297: close pi;
1298: if ( l_error_code is not null ) then
1299: RAISE OKE_API.G_EXCEPTION_ERROR;
1300: end if;
1301:
1302: l_exp_type := NULL;
1303: l_exp_org_id := NULL;
1317: FND_MSG_PUB.Add;
1318: end loop;
1319: close pe;
1320: if ( l_error_code is not null ) then
1321: RAISE OKE_API.G_EXCEPTION_ERROR;
1322: end if;
1323:
1324: end if;
1325:
1392: FOR rec_dts_req IN csr_dts_req(p_deliverable_id) LOOP
1393: /*Bug Bumber: 6011322 */
1394: if rec_dts_req.po_ref_1 > 0 then
1395:
1396: l_return_status := OKE_API.G_RET_STS_ERROR;
1397: open req_c(p_deliverable_id, rec_dts_req.po_ref_1);
1398: fetch req_c into l_return_status;
1399: close req_c;
1400: IF l_return_status = OKE_API.G_RET_STS_ERROR THEN
1396: l_return_status := OKE_API.G_RET_STS_ERROR;
1397: open req_c(p_deliverable_id, rec_dts_req.po_ref_1);
1398: fetch req_c into l_return_status;
1399: close req_c;
1400: IF l_return_status = OKE_API.G_RET_STS_ERROR THEN
1401: FND_MESSAGE.Set_Name('OKE', 'OKE_DTS_REQ_EXISTS');
1402: FND_MSG_PUB.Add;
1403: RAISE OKE_API.G_EXCEPTION_ERROR;
1404: END IF;
1399: close req_c;
1400: IF l_return_status = OKE_API.G_RET_STS_ERROR THEN
1401: FND_MESSAGE.Set_Name('OKE', 'OKE_DTS_REQ_EXISTS');
1402: FND_MSG_PUB.Add;
1403: RAISE OKE_API.G_EXCEPTION_ERROR;
1404: END IF;
1405:
1406: end if;
1407:
1512: and mp.organization_id = d.inventory_org_id;
1513:
1514:
1515:
1516: if l_return_status = oke_api.g_ret_sts_success then
1517: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1518: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Req created successfully, update deliverable table');
1519: END IF;
1520:
1541: P_DELIVERABLE_ID => P_DELIVERABLE_ID,
1542: X_OUT_ID => L_MPS_ID,
1543: X_RETURN_STATUS => L_RETURN_STATUS);
1544:
1545: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1546:
1547: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1548:
1549: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1543: X_RETURN_STATUS => L_RETURN_STATUS);
1544:
1545: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1546:
1547: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1548:
1549: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1550:
1551: RAISE OKE_API.G_EXCEPTION_ERROR;
1545: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1546:
1547: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1548:
1549: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1550:
1551: RAISE OKE_API.G_EXCEPTION_ERROR;
1552:
1553: END IF;
1547: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1548:
1549: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1550:
1551: RAISE OKE_API.G_EXCEPTION_ERROR;
1552:
1553: END IF;
1554:
1555: END IF;
1564:
1565:
1566: else
1567:
1568: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1569:
1570: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571:
1572: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1566: else
1567:
1568: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1569:
1570: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571:
1572: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1573:
1574: RAISE OKE_API.G_EXCEPTION_ERROR;
1568: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1569:
1570: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571:
1572: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1573:
1574: RAISE OKE_API.G_EXCEPTION_ERROR;
1575:
1576: END IF;
1570: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571:
1572: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1573:
1574: RAISE OKE_API.G_EXCEPTION_ERROR;
1575:
1576: END IF;
1577:
1578: end if;
1583:
1584:
1585: end if;
1586:
1587: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1588:
1589:
1590: EXCEPTION
1591: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1587: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1588:
1589:
1590: EXCEPTION
1591: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1592:
1593: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1594: (
1595: l_api_name,
1589:
1590: EXCEPTION
1591: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1592:
1593: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1594: (
1595: l_api_name,
1596: G_PKG_NAME,
1597: 'OKE_API.G_RET_STS_ERROR',
1593: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1594: (
1595: l_api_name,
1596: G_PKG_NAME,
1597: 'OKE_API.G_RET_STS_ERROR',
1598: x_msg_count,
1599: x_msg_data,
1600: '_PVT');
1601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1597: 'OKE_API.G_RET_STS_ERROR',
1598: x_msg_count,
1599: x_msg_data,
1600: '_PVT');
1601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1602: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1598: x_msg_count,
1599: x_msg_data,
1600: '_PVT');
1601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1602: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1606: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1602: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1603: (
1604: l_api_name,
1605: G_PKG_NAME,
1606: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1607: x_msg_count,
1608: x_msg_data,
1609: '_PVT');
1610:
1608: x_msg_data,
1609: '_PVT');
1610:
1611: WHEN OTHERS THEN
1612: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1613: (
1614: l_api_name,
1615: G_PKG_NAME,
1616: 'OTHERS',
1638:
1639: BEGIN
1640:
1641: l_api_name := 'CREATE_ACTIONS';
1642: l_return_status := OKE_API.G_RET_STS_SUCCESS;
1643:
1644: l_return_status := OKE_API.START_ACTIVITY(
1645: l_api_name,
1646: OKE_API.G_FALSE,
1640:
1641: l_api_name := 'CREATE_ACTIONS';
1642: l_return_status := OKE_API.G_RET_STS_SUCCESS;
1643:
1644: l_return_status := OKE_API.START_ACTIVITY(
1645: l_api_name,
1646: OKE_API.G_FALSE,
1647: '_PVT',
1648: x_return_status);
1642: l_return_status := OKE_API.G_RET_STS_SUCCESS;
1643:
1644: l_return_status := OKE_API.START_ACTIVITY(
1645: l_api_name,
1646: OKE_API.G_FALSE,
1647: '_PVT',
1648: x_return_status);
1649:
1650: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1646: OKE_API.G_FALSE,
1647: '_PVT',
1648: x_return_status);
1649:
1650: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1651:
1652: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1653:
1654: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1648: x_return_status);
1649:
1650: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1651:
1652: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1653:
1654: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1655:
1656: RAISE OKE_API.G_EXCEPTION_ERROR;
1650: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1651:
1652: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1653:
1654: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1655:
1656: RAISE OKE_API.G_EXCEPTION_ERROR;
1657:
1658: END IF;
1652: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1653:
1654: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1655:
1656: RAISE OKE_API.G_EXCEPTION_ERROR;
1657:
1658: END IF;
1659:
1660:
1684:
1685: END IF;
1686:
1687:
1688: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1689:
1690: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1691:
1692: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1686:
1687:
1688: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1689:
1690: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1691:
1692: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1693:
1694: RAISE OKE_API.G_EXCEPTION_ERROR;
1688: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1689:
1690: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1691:
1692: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1693:
1694: RAISE OKE_API.G_EXCEPTION_ERROR;
1695:
1696: END IF;
1690: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1691:
1692: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1693:
1694: RAISE OKE_API.G_EXCEPTION_ERROR;
1695:
1696: END IF;
1697:
1698: x_return_status := l_return_status;
1696: END IF;
1697:
1698: x_return_status := l_return_status;
1699:
1700: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1701:
1702: EXCEPTION
1703: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1704:
1699:
1700: OKE_API.END_ACTIVITY(x_msg_count, x_msg_data);
1701:
1702: EXCEPTION
1703: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1704:
1705: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1701:
1702: EXCEPTION
1703: WHEN OKE_API.G_EXCEPTION_ERROR THEN
1704:
1705: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1708: G_PKG_NAME,
1709: 'OKE_API.G_RET_STS_ERROR',
1705: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1708: G_PKG_NAME,
1709: 'OKE_API.G_RET_STS_ERROR',
1710: x_msg_count,
1711: x_msg_data,
1712: '_PVT');
1713: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1709: 'OKE_API.G_RET_STS_ERROR',
1710: x_msg_count,
1711: x_msg_data,
1712: '_PVT');
1713: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1714: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1715: (
1716: l_api_name,
1717: G_PKG_NAME,
1710: x_msg_count,
1711: x_msg_data,
1712: '_PVT');
1713: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1714: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1715: (
1716: l_api_name,
1717: G_PKG_NAME,
1718: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1714: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1715: (
1716: l_api_name,
1717: G_PKG_NAME,
1718: 'OKE_API.G_RET_STS_UNEXP_ERROR',
1719: x_msg_count,
1720: x_msg_data,
1721: '_PVT');
1722:
1720: x_msg_data,
1721: '_PVT');
1722:
1723: WHEN OTHERS THEN
1724: x_return_status := OKE_API.HANDLE_EXCEPTIONS
1725: (
1726: l_api_name,
1727: G_PKG_NAME,
1728: 'OTHERS',
2068: , ItemKey => ItemKey
2069: , AName => 'RETURN_STATUS'
2070: , AValue => l_return_status );
2071:
2072: IF ( l_return_status <> OKE_API.G_RET_STS_SUCCESS ) THEN
2073:
2074: if ( l_msg_count = 1 ) then
2075: l_error_text := FND_MSG_PUB.Get( p_msg_index => 1 , p_encoded => 'F' );
2076: elsif ( l_msg_count > 1 ) then