[Home] [Help]
520: CLOSE c_user;
521:
522: IF l_user_id IS NULL THEN
523: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
524: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_USER_ID');
525: --//User Id is invalid, Please re-enter
526: FND_MSG_PUB.add;
527: END IF;
528: x_return_status := fnd_api.g_ret_sts_error;
533: CLOSE c_resource_id;
534:
535: IF l_resource_id IS NULL THEN
536: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
537: FND_MESSAGE.set_name('OZF', 'OZF_SD_USER_IS_NOT_RESOURCE');
538: FND_MSG_PUB.add;
539: END IF;
540: x_return_status := fnd_api.g_ret_sts_error;
541: RETURN;
546: END IF;
547:
548: ELSE
549: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
550: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_USER_ID');
551: --//User Id is Mandatory
552: FND_MSG_PUB.add;
553: END IF;
554: x_return_status := fnd_api.g_ret_sts_error;
562: CLOSE c_org_id;
563:
564: IF l_org_id IS NULL THEN
565: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
566: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ORG_ID');
567: --//Organization id entered is invalid
568: FND_MSG_PUB.add;
569: END IF;
570: x_return_status := fnd_api.g_ret_sts_error;
573: --//Set Org ID to Global Variable
574: -- G_ORG_ID := p_SDR_hdr_rec.org_id;
575: ELSE
576: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
577: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_ORG_ID');
578: --//Organization id is Mandatory
579: FND_MSG_PUB.add;
580: END IF;
581: x_return_status := fnd_api.g_ret_sts_error;
592: CLOSE c_requestor_id;
593:
594: IF l_requestor_id IS NULL THEN
595: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
596: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQUESTOR_ID');
597: --//Requestor id entered is invalid
598: IF G_DEBUG THEN
599: OZF_UTILITY_PVT.debug_message('Requestor id entered is invalid');
600: END IF;
621: CLOSE c_supp_id;
622:
623: IF l_supplier_id IS NULL THEN
624: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
625: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPPLIER_ID');
626: --//Supplier id entered is invalid
627: FND_MSG_PUB.add;
628: END IF;
629: x_return_status := fnd_api.g_ret_sts_error;
631: END IF;
632:
633: ELSE
634: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
635: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_SUPPLIER_ID');
636: --//Supplier id is Mandatory
637: FND_MSG_PUB.add;
638: END IF;
639: x_return_status := fnd_api.g_ret_sts_error;
650: CLOSE c_supplier_site_id;
651:
652: IF l_supplier_site_id IS NULL THEN
653: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
654: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPPLIER_SITE_ID');
655: --//Supplier site id entered is invalid
656: FND_MSG_PUB.add;
657: END IF;
658: x_return_status := fnd_api.g_ret_sts_error;
660: END IF;
661:
662: ELSE
663: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
664: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_SUPPLIER_SITE_ID');
665: --//Supplier site id is Mandatory
666: FND_MSG_PUB.add;
667: END IF;
668: x_return_status := fnd_api.g_ret_sts_error;
683: p_SDR_hdr_rec.supplier_contact_name := l_sup_contact_full_name;
684: ELSE
685: IF p_SDR_hdr_rec.supplier_contact_name = FND_API.g_miss_char OR p_SDR_hdr_rec.supplier_contact_name IS NULL THEN
686: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
687: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPP_CONTACT_ID');
688: --//Supplier contact id entered is invalid
689: FND_MSG_PUB.add;
690: END IF;
691: x_return_status := fnd_api.g_ret_sts_error;
711: IF p_SDR_hdr_rec.supplier_response_by_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
712: p_SDR_hdr_rec.request_end_date THEN
713:
714: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
715: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPRESPB_DATE');
716: FND_MSG_PUB.add;
717: END IF;
718: x_return_status := fnd_api.g_ret_sts_error;
719: RETURN;
727: IF p_SDR_hdr_rec.supplier_response_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
728: p_SDR_hdr_rec.request_end_date THEN
729:
730: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
731: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPRESP_DATE');
732: FND_MSG_PUB.add;
733: END IF;
734: x_return_status := fnd_api.g_ret_sts_error;
735: RETURN;
743: IF p_SDR_hdr_rec.supplier_submission_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
744: p_SDR_hdr_rec.request_end_date THEN
745:
746: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
747: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SUPSUB_DATE');
748: FND_MSG_PUB.add;
749: END IF;
750: x_return_status := fnd_api.g_ret_sts_error;
751: RETURN;
772: CLOSE c_requestor_id;
773:
774: IF l_assignee_resource_id IS NULL THEN
775: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
776: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ASSIGNEE_ID');
777: --//Assignee id entered is invalid (Approver)
778: FND_MSG_PUB.add;
779: END IF;
780: x_return_status := fnd_api.g_ret_sts_error;
781: RETURN;
782: END IF;
783: ELSE
784: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
785: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_ASSIGNEE_ID');
786: --//Assignee resource id is Mandatory (Approver is mandatory)
787: FND_MSG_PUB.add;
788: END IF;
789: x_return_status := fnd_api.g_ret_sts_error;
797: IF p_SDR_hdr_rec.assignee_response_by_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
798: p_SDR_hdr_rec.request_end_date THEN
799:
800: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
801: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ASRESPB_DATE');
802: FND_MSG_PUB.add;
803: END IF;
804: x_return_status := fnd_api.g_ret_sts_error;
805: RETURN;
813: IF p_SDR_hdr_rec.assignee_response_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
814: p_SDR_hdr_rec.request_end_date THEN
815:
816: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
817: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ASRESP_DATE');
818: FND_MSG_PUB.add;
819: END IF;
820: x_return_status := fnd_api.g_ret_sts_error;
821: RETURN;
851: CLOSE c_cust_account_id;
852:
853: IF l_cust_account_id IS NULL THEN
854: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
855: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_ACCOUNT_ID');
856: --//Cust Account ID entered is invalid
857: FND_MSG_PUB.add;
858: END IF;
859: x_return_status := fnd_api.g_ret_sts_error;
861: END IF;
862:
863: ELSE
864: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
865: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_CUST_ACCOUNT_ID');
866: --//Cust Account id is Mandatory
867: FND_MSG_PUB.add;
868: END IF;
869: x_return_status := fnd_api.g_ret_sts_error;
888: END IF;
889:
890: ELSIF p_SDR_hdr_rec.request_end_date < p_SDR_hdr_rec.request_start_date THEN
891: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
892: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_END_DATE');
893: --//End date should be greater than start date
894: FND_MSG_PUB.add;
895: END IF;
896: x_return_status := fnd_api.g_ret_sts_error;
909: CLOSE c_currency;
910:
911: IF l_currency_code IS NULL THEN
912: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
913: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CURRENCY_CODE');
914: FND_MSG_PUB.add;
915: END IF;
916: x_return_status := fnd_api.g_ret_sts_error;
917: RETURN;
922:
923: IF p_SDR_hdr_rec.request_currency_code IS NULL THEN
924:
925: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
926: FND_MESSAGE.set_name('OZF', 'OZF_SD_ADD_PROFILE_CURRENCY');
927: --//Please set default Currency in profile JTF_PROFILE_DEFAULT_CURRENCY
928: FND_MSG_PUB.add;
929: END IF;
930: x_return_status := fnd_api.g_ret_sts_error;
940: ,p_lookup_code => p_SDR_hdr_rec.request_outcome);
941:
942: IF l_lookup_stat = FND_API.g_false THEN
943: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
944: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQ_OUTCOME');
945: FND_MSG_PUB.add;
946: END IF;
947: x_return_status := fnd_api.g_ret_sts_error;
948: RETURN;
956: CLOSE c_order_no;
957:
958: IF l_internal_order_number IS NULL THEN
959: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
960: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ORDER_NUMBER'); --//Seed
961: FND_MSG_PUB.add;
962: END IF;
963: x_return_status := fnd_api.g_ret_sts_error;
964: RETURN;
972: CLOSE c_currency;
973:
974: IF l_sales_order_currency IS NULL THEN
975: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
976: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SO_CURRENCY');
977: --//Invalid Sales order Currency.
978: FND_MSG_PUB.add;
979: END IF;
980: x_return_status := fnd_api.g_ret_sts_error;
989: IF p_SDR_hdr_rec.internal_submission_date NOT BETWEEN p_SDR_hdr_rec.request_start_date AND
990: p_SDR_hdr_rec.request_end_date THEN
991:
992: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
993: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_INTSUB_DATE');
994: FND_MSG_PUB.add;
995: END IF;
996: x_return_status := fnd_api.g_ret_sts_error;
997: RETURN;
1209: CLOSE c_request_line_id;
1210:
1211: IF l_request_line_id IS NULL THEN
1212: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1213: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQUEST_LINE_ID');
1214: --//Request Line id is Invalid , Please Re-enter
1215: FND_MSG_PUB.add;
1216: END IF;
1217: x_return_status := fnd_api.g_ret_sts_error;
1342: ,p_lookup_code => p_SDR_lines_tbl(i).product_context);
1343:
1344: IF l_lookup_stat = FND_API.g_false THEN
1345: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1346: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_PRODUCT_TYPE');
1347: FND_MSG_PUB.add;
1348: END IF;
1349: x_return_status := fnd_api.g_ret_sts_error;
1350: RETURN;
1350: RETURN;
1351: END IF;
1352: ELSE
1353: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1354: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_PRODUCT_CONTEXT');
1355: --//Product context is Mandatory
1356: FND_MSG_PUB.add;
1357: END IF;
1358: x_return_status := fnd_api.g_ret_sts_error;
1373: CLOSE c_inventory_item_id;
1374:
1375: IF l_inventory_item_id IS NULL THEN
1376: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1377: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_INVENTORY_ITEM_ID');
1378: --//Inventory item id is Invalid
1379: FND_MSG_PUB.add;
1380: END IF;
1381: x_return_status := fnd_api.g_ret_sts_error;
1399: CLOSE c_ext_int_code;
1400:
1401: IF l_external_code IS NULL THEN
1402: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1403: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_VENDOR_ITEM_CODE');
1404: FND_MSG_PUB.add;
1405: END IF;
1406: x_return_status := fnd_api.g_ret_sts_error;
1407: RETURN;
1409: p_SDR_lines_tbl(i).inventory_item_id := l_internal_code;
1410:
1411: ELSE
1412: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1413: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_INVENTORY_ITEM_ID');
1414: --//Inventory item id is mandatory
1415: FND_MSG_PUB.add;
1416: END IF;
1417: x_return_status := fnd_api.g_ret_sts_error;
1427: CLOSE c_item_uom;
1428:
1429: IF l_item_uom IS NULL THEN
1430: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1431: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ITEM_UOM');
1432: --//Unit of Measurement is Invalid
1433: FND_MSG_PUB.add;
1434: END IF;
1435: x_return_status := fnd_api.g_ret_sts_error;
1436: RETURN;
1437: END IF;
1438: ELSE
1439: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1440: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_ITEM_UOM');
1441: --//Unit of Measurement is mandatory
1442: FND_MSG_PUB.add;
1443: END IF;
1444: x_return_status := fnd_api.g_ret_sts_error;
1452: CLOSE c_product_cost;
1453:
1454: IF p_SDR_lines_tbl(i).product_cost IS NULL THEN
1455: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1456: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_PRODUCT_COST');
1457: --//A value must be entered for Product Cost
1458: FND_MSG_PUB.add;
1459: END IF;
1460: x_return_status := fnd_api.g_ret_sts_error;
1478: CLOSE c_category_id;
1479:
1480: IF l_category_id IS NULL THEN
1481: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1482: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_PRODUCT_CATEGORY');
1483: --//Product category is Invalid
1484: FND_MSG_PUB.add;
1485: END IF;
1486: x_return_status := fnd_api.g_ret_sts_error;
1487: RETURN;
1488: END IF;
1489: ELSE
1490: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1491: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_PRODUCT_CATEGORY');
1492: --//Product category is mandatory
1493: FND_MSG_PUB.add;
1494: END IF;
1495: x_return_status := fnd_api.g_ret_sts_error;
1505: CLOSE c_category_set_id;
1506:
1507: IF l_category_set_id IS NULL THEN
1508: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1509: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_PRODUCT_CATEGORY_SET');
1510: --//Product category set is Invalid
1511: FND_MSG_PUB.add;
1512: END IF;
1513: x_return_status := fnd_api.g_ret_sts_error;
1525: ,p_lookup_code => p_SDR_lines_tbl(i).requested_discount_type);
1526:
1527: IF l_lookup_stat = FND_API.g_false THEN
1528: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1529: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_DISCOUNT_TYPE');
1530: FND_MSG_PUB.add;
1531: END IF;
1532: x_return_status := fnd_api.g_ret_sts_error;
1533: RETURN;
1533: RETURN;
1534: END IF;
1535: ELSE
1536: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1537: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_DISCOUNT_TYPE');
1538: FND_MSG_PUB.add;
1539: END IF;
1540: x_return_status := fnd_api.g_ret_sts_error;
1541: RETURN;
1544: --//Requested discount Value
1545:
1546: IF p_SDR_lines_tbl(i).requested_discount_value = FND_API.g_miss_num OR p_SDR_lines_tbl(i).requested_discount_value IS NULL THEN
1547: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1548: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_DISC_VALUE');
1549: FND_MSG_PUB.add;
1550: END IF;
1551: x_return_status := fnd_api.g_ret_sts_error;
1552: RETURN;
1553: ELSE
1554: l_status := check_zero(p_SDR_lines_tbl(i).requested_discount_value);
1555: IF l_status = FND_API.g_false THEN
1556: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1557: FND_MESSAGE.set_name('OZF', 'OZF_SD_DISCOUNT_VALUE_IS_ZERO'); --//Check the message!
1558: --//Discount value should not be zero
1559: FND_MSG_PUB.add;
1560: END IF;
1561: x_return_status := fnd_api.g_ret_sts_error;
1575: IF p_SDR_lines_tbl(i).max_qty <> FND_API.g_miss_num AND p_SDR_lines_tbl(i).max_qty IS NOT NULL THEN
1576: l_status := check_zero(p_SDR_lines_tbl(i).max_qty);
1577: IF l_status = FND_API.g_false THEN
1578: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1579: FND_MESSAGE.set_name('OZF', 'OZF_SD_MAX_QTY_ZERO_CHECK'); --//Check the message!
1580: --//Discount value should not be zero
1581: FND_MSG_PUB.add;
1582: END IF;
1583: x_return_status := fnd_api.g_ret_sts_error;
1599: IF p_SDR_lines_tbl(i).end_customer_price <> FND_API.g_miss_num AND p_SDR_lines_tbl(i).end_customer_price IS NOT NULL THEN
1600: l_status := check_zero(p_SDR_lines_tbl(i).end_customer_price);
1601: IF l_status = FND_API.g_false THEN
1602: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1603: FND_MESSAGE.set_name('OZF', 'OZF_SD_END_CUST_PRICE_VALUE_IS_ZERO');
1604: --//Discount value should not be zero
1605: FND_MSG_PUB.add;
1606: END IF;
1607: x_return_status := fnd_api.g_ret_sts_error;
1614: p_SDR_lines_tbl(i).vendor_approved_flag := 'Y';
1615: ELSE
1616: IF p_SDR_lines_tbl(i).vendor_approved_flag NOT IN ('Y','N')THEN
1617: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1618: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_VENDOR_APPR_FLAG');
1619: FND_MSG_PUB.add;
1620: END IF;
1621: x_return_status := fnd_api.g_ret_sts_error;
1622: RETURN;
1630: ELSIF TRUNC(p_SDR_lines_tbl(i).start_date) NOT BETWEEN
1631: TRUNC(p_SDR_hdr_rec.request_start_date) AND TRUNC(p_SDR_hdr_rec.request_end_date) THEN
1632:
1633: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1634: FND_MESSAGE.set_name('OZF', 'OZF_SD_LINE_START_DATE_CHECK');
1635: --//Start Date should fall in between Header Start date and End Date
1636: FND_MSG_PUB.add;
1637: END IF;
1638: x_return_status := fnd_api.g_ret_sts_error;
1646: ELSIF TRUNC(p_SDR_lines_tbl(i).end_date) NOT BETWEEN
1647: TRUNC(p_SDR_hdr_rec.request_start_date) AND TRUNC(p_SDR_hdr_rec.request_end_date) THEN
1648:
1649: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1650: FND_MESSAGE.set_name('OZF', 'OZF_SD_LINE_END_DATE_CHECK');
1651: --//End Date should fall in between Header Start date and End Date
1652: FND_MSG_PUB.add;
1653: END IF;
1654: x_return_status := fnd_api.g_ret_sts_error;
1657: END IF;
1658:
1659: IF p_SDR_lines_tbl(i).end_date < p_SDR_lines_tbl(i).start_date THEN
1660: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1661: FND_MESSAGE.set_name('OZF', 'OZF_SD_LINE_END_DATE_GT_CHECK');
1662: --//End Date should be greater than start date
1663: FND_MSG_PUB.add;
1664: END IF;
1665: x_return_status := fnd_api.g_ret_sts_error;
1677: ,p_lookup_code => p_SDR_lines_tbl(i).end_customer_price_type);
1678:
1679: IF l_lookup_stat = FND_API.g_false THEN
1680: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1681: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_PRICE_TYPE');
1682: FND_MSG_PUB.add;
1683: END IF;
1684: x_return_status := fnd_api.g_ret_sts_error;
1685: RETURN;
1694: ,p_lookup_code => p_SDR_lines_tbl(i).end_customer_tolerance_type);
1695:
1696: IF l_lookup_stat = FND_API.g_false THEN
1697: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1698: FND_MESSAGE.set_name('OZF', 'OZF_SD_BAD_TOLERANCE_TYPE');
1699: FND_MSG_PUB.add;
1700: END IF;
1701: x_return_status := fnd_api.g_ret_sts_error;
1702: RETURN;
1711: ,p_lookup_code => p_SDR_lines_tbl(i).rejection_code);
1712:
1713: IF l_lookup_stat = FND_API.g_false THEN
1714: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1715: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REJECTION_CODE');
1716: FND_MSG_PUB.add;
1717: END IF;
1718: x_return_status := fnd_api.g_ret_sts_error;
1719: RETURN;
1737: ,p_lookup_code => p_SDR_lines_tbl(i).approved_discount_type);
1738:
1739: IF l_lookup_stat =FND_API.g_false THEN
1740: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1741: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_APPROVED_DISC_TYPE');
1742: FND_MSG_PUB.add;
1743: END IF;
1744: x_return_status := fnd_api.g_ret_sts_error;
1745: RETURN;
1745: RETURN;
1746: END IF;
1747: ELSE
1748: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1749: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_APPROVED_DISC_TYPE');
1750: FND_MSG_PUB.add;
1751: END IF;
1752: x_return_status := fnd_api.g_ret_sts_error;
1753: RETURN;
1757: IF p_SDR_lines_tbl(i).approved_discount_value <> FND_API.g_miss_num AND p_SDR_lines_tbl(i).approved_discount_value IS NOT NULL THEN
1758: l_status := check_zero(p_SDR_lines_tbl(i).approved_discount_value);
1759: IF l_status = FND_API.g_false THEN
1760: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1761: FND_MESSAGE.set_name('OZF', 'OZF_SD_APPR_DISC_VALUE_IS_ZERO');
1762: FND_MSG_PUB.add;
1763: END IF;
1764: x_return_status := fnd_api.g_ret_sts_error;
1765: RETURN;
1765: RETURN;
1766: END IF;
1767: ELSE
1768: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1769: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_APPROVED_DISC_VALUE');
1770: FND_MSG_PUB.add;
1771: END IF;
1772: x_return_status := fnd_api.g_ret_sts_error;
1773: RETURN;
1777: IF p_SDR_lines_tbl(i).approved_max_qty <> FND_API.g_miss_num AND p_SDR_lines_tbl(i).approved_max_qty IS NOT NULL THEN
1778: l_status := check_zero(p_SDR_lines_tbl(i).approved_max_qty);
1779: IF l_status = FND_API.g_false THEN
1780: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1781: FND_MESSAGE.set_name('OZF', 'OZF_SD_APPR_MAX_QTY_VALUE_IS_ZERO');
1782: FND_MSG_PUB.add;
1783: END IF;
1784: x_return_status := fnd_api.g_ret_sts_error;
1785: RETURN;
1786: END IF;
1787: /* BugFix : 7501013
1788: ELSE
1789: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1790: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_APPROVED_MAX_QTY');
1791: FND_MSG_PUB.add;
1792: END IF;
1793: x_return_status := fnd_api.g_ret_sts_error;
1794: RETURN; */
1904: CLOSE c_request_customer_id;
1905:
1906: IF l_request_customer_id IS NULL THEN
1907: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1908: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQUEST_CUSTOMER_ID');
1909: FND_MSG_PUB.add;
1910: END IF;
1911: x_return_status := fnd_api.g_ret_sts_error;
1912: RETURN;
1969:
1970: IF p_SDR_cust_tbl(j).end_customer_flag NOT IN ('N','Y') THEN
1971:
1972: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1973: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_END_CUST_FLAG');
1974: --//Invalid End Customer flag
1975: FND_MSG_PUB.add;
1976: END IF;
1977: x_return_status := fnd_api.g_ret_sts_error;
1978: RETURN;
1979: END IF;
1980: ELSE
1981: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1982: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_END_CUST_FLAG');
1983: --//End Customer Flag is Mandatory
1984: FND_MSG_PUB.add;
1985: END IF;
1986: x_return_status := fnd_api.g_ret_sts_error;
1996: ,p_lookup_code => p_SDR_cust_tbl(j).cust_usage_code);
1997:
1998: IF l_lookup_stat = FND_API.g_false THEN
1999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2000: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_ADDR_TYPE');
2001: FND_MSG_PUB.add;
2002: END IF;
2003: x_return_status := fnd_api.g_ret_sts_error;
2004: RETURN;
2007: --//if end_customer_flag = 'Y' then cust_usage_code should be CUSTOMER only
2008: IF ((p_SDR_cust_tbl(j).end_customer_flag ='Y')
2009: AND (p_SDR_cust_tbl(j).cust_usage_code <> 'CUSTOMER')) THEN
2010: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2011: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_COMB');
2012: FND_MSG_PUB.add;
2013: END IF;
2014: x_return_status := fnd_api.g_ret_sts_error;
2015: RETURN;
2022: CLOSE c_party_id;
2023:
2024: IF l_party_id IS NULL THEN
2025: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2026: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_PARTY_ID'); --//To set in design
2027: FND_MSG_PUB.add;
2028: END IF;
2029: x_return_status := fnd_api.g_ret_sts_error;
2030: RETURN;
2030: RETURN;
2031: END IF;
2032: ELSE
2033: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2034: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_PARTY_ID');
2035: --//Party Id is mandatory
2036: FND_MSG_PUB.add;
2037: END IF;
2038: x_return_status := fnd_api.g_ret_sts_error;
2048: CLOSE c_cust_account_id;
2049:
2050: IF l_cust_account_id IS NULL THEN
2051: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2052: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_ACCOUNT_ID');
2053: FND_MSG_PUB.add;
2054: END IF;
2055: x_return_status := fnd_api.g_ret_sts_error;
2056: RETURN;
2056: RETURN;
2057: END IF;
2058: ELSE
2059: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2060: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_CUST_ACCOUNT_ID');
2061: FND_MSG_PUB.add;
2062: END IF;
2063: x_return_status := fnd_api.g_ret_sts_error;
2064: RETURN;
2074: CLOSE c_cust_account_id;
2075:
2076: IF l_cust_account_id IS NULL THEN
2077: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2078: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_ACCOUNT_ID');
2079: FND_MSG_PUB.add;
2080: END IF;
2081: x_return_status := fnd_api.g_ret_sts_error;
2082: RETURN;
2093: CLOSE c_site_use_id;
2094:
2095: IF l_site_use_id IS NULL THEN
2096: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2097: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SITE_USE_ID');
2098: FND_MSG_PUB.add;
2099: END IF;
2100: x_return_status := fnd_api.g_ret_sts_error;
2101: RETURN;
2101: RETURN;
2102: END IF;
2103: ELSE
2104: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2105: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_SITE_USE_ID');
2106: FND_MSG_PUB.add;
2107: END IF;
2108: x_return_status := fnd_api.g_ret_sts_error;
2109: RETURN;
2110: END IF;
2111: END IF;
2112: ELSE
2113: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2114: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_CUST_ADDR_TYPE');
2115: --//Invalid Customer Usage Code
2116: FND_MSG_PUB.add;
2117: END IF;
2118: x_return_status := fnd_api.g_ret_sts_error;
2268: x_return_status := FND_API.G_RET_STS_ERROR;
2269: WHEN OTHERS THEN
2270: x_return_status := FND_API.g_ret_sts_unexp_error;
2271: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2272: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
2273: FND_MSG_PUB.add;
2274: END IF;
2275: End insert_header_record;
2276: ---------------------------------------------------------------------
2348: x_return_status := FND_API.G_RET_STS_ERROR;
2349: WHEN OTHERS THEN
2350: x_return_status := FND_API.g_ret_sts_unexp_error;
2351: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2352: FND_MESSAGE.set_name('OZF', 'OZF_SD_TL_POPULATION_ERROR');
2353: FND_MSG_PUB.add;
2354: END IF;
2355:
2356: END populate_translation_record;
2531: x_return_status := FND_API.G_RET_STS_ERROR;
2532: WHEN OTHERS THEN
2533: x_return_status := FND_API.g_ret_sts_unexp_error;
2534: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2535: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
2536: FND_MSG_PUB.add;
2537: END IF;
2538:
2539: END populate_product_lines;
2603: END IF;
2604:
2605: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2606: IF p_SDR_cust_tbl(c).end_customer_flag = 'Y' THEN
2607: FND_MESSAGE.set_name('OZF', 'OZF_SD_REQ_DUP_END_CUST');
2608: ELSE
2609: FND_MESSAGE.set_name('OZF', 'OZF_SD_REQ_DUP_CUSTOMER');
2610: END IF;
2611: FND_MSG_PUB.add;
2605: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2606: IF p_SDR_cust_tbl(c).end_customer_flag = 'Y' THEN
2607: FND_MESSAGE.set_name('OZF', 'OZF_SD_REQ_DUP_END_CUST');
2608: ELSE
2609: FND_MESSAGE.set_name('OZF', 'OZF_SD_REQ_DUP_CUSTOMER');
2610: END IF;
2611: FND_MSG_PUB.add;
2612: END IF;
2613: x_return_status := fnd_api.g_ret_sts_error;
2689: x_return_status := FND_API.G_RET_STS_ERROR;
2690: WHEN OTHERS THEN
2691: x_return_status := FND_API.g_ret_sts_unexp_error;
2692: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2693: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
2694: FND_MSG_PUB.add;
2695: END IF;
2696: END populate_customer_details;
2697: ---------------------------------------------------------------------
2824: OZF_UTILITY_PVT.debug_message(SQLERRM);
2825: END IF;
2826: x_return_status := FND_API.g_ret_sts_unexp_error;
2827: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2828: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
2829: FND_MSG_PUB.add;
2830: END IF;
2831:
2832: END update_header_record;
2918: ,p_lookup_code => l_SDR_rec.accrual_type);
2919:
2920: IF l_lookup_check = FND_API.g_false THEN
2921: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2922: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ACCRUAL_TYPE');
2923: FND_MSG_PUB.add;
2924: END IF;
2925: x_return_status := fnd_api.g_ret_sts_error;
2926: RETURN;
2926: RETURN;
2927: END IF;
2928: ELSE
2929: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2930: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_ACCRUAL_TYPE');
2931: --//Accrual type is Mandatory
2932: FND_MSG_PUB.add;
2933: END IF;
2934: x_return_status := fnd_api.g_ret_sts_error;
2942: l_system_status_code := get_system_status_code(l_SDR_rec.user_status_id);
2943:
2944: IF l_system_status_code IS NULL THEN
2945: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2946: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_USER_STATUS_ID');
2947: --//User status id entered is invalid
2948: FND_MSG_PUB.add;
2949: END IF;
2950: x_return_status := fnd_api.g_ret_sts_error;
2954: --//Accrual type wise status check
2955: IF l_SDR_rec.accrual_type ='SUPPLIER' THEN
2956: IF l_system_status_code NOT IN ('DRAFT','ASSIGNED','SUPPLIER_APPROVED') THEN
2957: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2958: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CREATE_STATUS');
2959: --//User status id entered is invalid for Create
2960: FND_MSG_PUB.add;
2961: END IF;
2962: x_return_status := fnd_api.g_ret_sts_error;
2965:
2966: ELSIF l_SDR_rec.accrual_type ='INTERNAL' THEN
2967: IF l_system_status_code <> 'DRAFT' THEN
2968: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2969: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CREATE_STATUS_I');
2970: --//User status id entered is invalid for Create
2971: FND_MSG_PUB.add;
2972: END IF;
2973: x_return_status := fnd_api.g_ret_sts_error;
2981: END IF;
2982:
2983: IF (l_system_status_code <> 'DRAFT') AND (p_SDR_lines_tbl.count = 0) THEN
2984: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2985: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_PRODUCT_RECORDS');
2986: --//Product Line records are mandatory
2987: FND_MSG_PUB.add;
2988: END IF;
2989: x_return_status := fnd_api.g_ret_sts_error;
2996: CLOSE c_request_number;
2997:
2998: IF l_request_number IS NOT NULL THEN
2999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3000: FND_MESSAGE.set_name('OZF', 'OZF_SD_DUP_SOURCE_REQ_NO');
3001: FND_MSG_PUB.add;
3002: END IF;
3003: x_return_status := fnd_api.g_ret_sts_error;
3004: RETURN;
3012: CLOSE c_request_type_setup;
3013:
3014: IF l_request_type_setup_id IS NULL THEN
3015: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3016: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQUEST_TYPE_SETUP');
3017: --//Request type setup id is Mandatory
3018: FND_MSG_PUB.add;
3019: END IF;
3020: x_return_status := fnd_api.g_ret_sts_error;
3024: AND (l_system_status_code <> 'DRAFT')
3025: AND (l_SDR_cust_tbl.count = 0)) THEN
3026:
3027: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3028: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_CUSTOMER_DETAILS');
3029: FND_MSG_PUB.add;
3030: END IF;
3031: x_return_status := fnd_api.g_ret_sts_error;
3032: RETURN;
3033: END IF;
3034: END IF;
3035: ELSE
3036: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3037: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_REQUEST_TYPE_SETUP');
3038: --//Request type setup id is Mandatory
3039: FND_MSG_PUB.add;
3040: END IF;
3041: x_return_status := fnd_api.g_ret_sts_error;
3462: --==============================================================================
3463: IF l_new_sdr_hdr_rec.request_header_id = FND_API.g_miss_num OR l_new_sdr_hdr_rec.request_header_id IS NULL THEN
3464:
3465: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3466: FND_MESSAGE.set_name('OZF', 'OZF_SD_REQUEST_HEADER_ID_NULL');
3467: FND_MSG_PUB.add;
3468: END IF;
3469: x_return_status := fnd_api.g_ret_sts_error;
3470: RETURN;
3474: CLOSE c_request_header_id;
3475:
3476: IF l_request_header_id IS NULL THEN
3477: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3478: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQ_HEADER_ID');
3479: --//Request id is invalid. Please re-enter
3480: FND_MSG_PUB.add;
3481: END IF;
3482: x_return_status := fnd_api.g_ret_sts_error;
3496: CLOSE c_request_number;
3497:
3498: IF l_request_number IS NOT NULL THEN
3499: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3500: FND_MESSAGE.set_name('OZF', 'OZF_SD_DUP_SOURCE_REQ_NO');
3501: FND_MSG_PUB.add;
3502: END IF;
3503: x_return_status := fnd_api.g_ret_sts_error;
3504: RETURN;
3559:
3560: --// Object Version number check
3561: IF l_old_sdr_hdr_rec.object_version_number <> l_new_sdr_hdr_rec.object_version_number THEN
3562: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3563: FND_MESSAGE.Set_Name('OZF', 'OZF_API_RESOURCE_LOCKED');
3564: FND_MSG_PUB.ADD;
3565: END IF;
3566: RAISE FND_API.G_EXC_ERROR;
3567: END IF;
3580: CLOSE c_user;
3581:
3582: IF l_user_id IS NULL THEN
3583: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3584: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_USER_ID');
3585: --//User Id is invalid, Please re-enter
3586: FND_MSG_PUB.add;
3587: END IF;
3588: x_return_status := fnd_api.g_ret_sts_error;
3593: CLOSE c_resource_id;
3594:
3595: IF l_resource_id IS NULL THEN
3596: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3597: FND_MESSAGE.set_name('OZF', 'OZF_SD_USER_IS_NOT_RESOURCE');
3598: FND_MSG_PUB.add;
3599: END IF;
3600: x_return_status := fnd_api.g_ret_sts_error;
3601: RETURN;
3603: END IF;
3604:
3605: ELSE
3606: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3607: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_USER_ID');
3608: --//User Id is Mandatory
3609: FND_MSG_PUB.add;
3610: END IF;
3611: x_return_status := fnd_api.g_ret_sts_error;
3647: AND (l_approver_flag IS NULL)
3648: AND(l_admin_flag IS NULL)) THEN
3649:
3650: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3651: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_USER_PERMISSIONS');
3652: --//User has no previlage to update the record.
3653: FND_MSG_PUB.add;
3654: END IF;
3655: x_return_status := fnd_api.g_ret_sts_error;
3701: ,p_external_flag =>l_external_flag);
3702:
3703: IF l_is_stat_trns_allowed = FND_API.g_false THEN
3704: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3705: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_STATUS_TRANS');
3706: --//Status transition is invalid
3707: FND_MSG_PUB.add;
3708: END IF;
3709: x_return_status := fnd_api.g_ret_sts_error;
4622: CLOSE c_resource_id;
4623:
4624: IF l_resource_id IS NULL THEN
4625: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4626: FND_MESSAGE.set_name('OZF', 'OZF_SD_USER_IS_NOT_RESOURCE');
4627: FND_MSG_PUB.add;
4628: END IF;
4629: x_return_status := fnd_api.g_ret_sts_error;
4630: RETURN;
4642: CLOSE c_source_request_header_id;
4643:
4644: IF l_source_rid IS NULL THEN
4645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4646: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_SOURCE_REQ_ID');
4647: --//Invalid source request id. Please re-enter
4648: FND_MSG_PUB.add;
4649: END IF;
4650: x_return_status := fnd_api.g_ret_sts_error;
4651: RETURN;
4652: END IF;
4653: ELSE
4654: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4655: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_SOURCE_REQ_ID');
4656: --//Invalid source request id. Please re-enter
4657: FND_MSG_PUB.add;
4658: END IF;
4659: x_return_status := fnd_api.g_ret_sts_error;
4667: CLOSE c_new_request_no;
4668:
4669: IF l_new_req_no IS NOT NULL THEN
4670: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4671: FND_MESSAGE.set_name('OZF', 'OZF_SD_DUP_SOURCE_REQ_NO');
4672: --//New request number entered is already exists.
4673: FND_MSG_PUB.add;
4674: END IF;
4675: x_return_status := fnd_api.g_ret_sts_error;
4684: ,p_lookup_code => p_accrual_type);
4685:
4686: IF l_lookup_stat = FND_API.g_false THEN
4687: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4688: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_ACCRUAL_TYPE');
4689: FND_MSG_PUB.add;
4690: END IF;
4691: x_return_status := fnd_api.g_ret_sts_error;
4692: RETURN;
4692: RETURN;
4693: END IF;
4694: ELSE
4695: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4696: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_ACCRUAL_TYPE');
4697: --//Accrual type is Mandatory
4698: FND_MSG_PUB.add;
4699: END IF;
4700: x_return_status := fnd_api.g_ret_sts_error;
4705: IF p_accrual_type ='INTERNAL' THEN
4706:
4707: IF p_cust_account_id IS NULL THEN
4708: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4709: FND_MESSAGE.set_name('OZF', 'OZF_SD_NO_CUST_ACCOUNT_ID');
4710: FND_MSG_PUB.add;
4711: END IF;
4712: x_return_status := fnd_api.g_ret_sts_error;
4713: RETURN;
4717: CLOSE c_cust_account_id;
4718:
4719: IF l_cust_account_id IS NULL THEN
4720: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4721: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_CUST_ACCOUNT_ID');
4722: FND_MSG_PUB.add;
4723: END IF;
4724: x_return_status := fnd_api.g_ret_sts_error;
4725: RETURN;
4767: END IF;
4768:
4769: IF p_request_source NOT IN ('API','Manual') THEN
4770: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4771: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_REQUEST_SOURCE');
4772: FND_MSG_PUB.add;
4773: END IF;
4774: x_return_status := fnd_api.g_ret_sts_error;
4775: RETURN;
4833: END IF;
4834:
4835: IF p_request_end_date < p_request_start_date THEN
4836: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4837: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_END_DATE');
4838: --//End date should be greater than start date
4839: FND_MSG_PUB.add;
4840: END IF;
4841: x_return_status := fnd_api.g_ret_sts_error;
4850:
4851: IF (l_sdr_source_rec.accrual_type ='INTERNAL') AND (p_accrual_type ='SUPPLIER') THEN
4852: --Invalid Copy Option
4853: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4854: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_COPY_OPTION');
4855: --//Internal to Supplier Copy option is invalid!
4856: FND_MSG_PUB.add;
4857: END IF;
4858: x_return_status := fnd_api.g_ret_sts_error;