[Home] [Help]
467: and rownum = 1;
468:
469: exception
470: when NO_DATA_FOUND then
471: dumm_status := INVPUOPI.mtl_log_interface_err(
472: cr.organization_id,
473: user_id,
474: login_id,
475: prog_appid,
510: when NO_DATA_FOUND then
511: -- 3108469
512: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_COST_OF_SALES_ACNT'
513: ,p_organization_id => cr.organization_id);
514: dumm_status := INVPUOPI.mtl_log_interface_err(
515: cr.organization_id,
516: user_id,
517: login_id,
518: prog_appid,
553: when NO_DATA_FOUND then
554: -- 3108469
555: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_SALES_ACCOUNT'
556: ,p_organization_id => cr.organization_id);
557: dumm_status := INVPUOPI.mtl_log_interface_err(
558: cr.organization_id,
559: user_id,
560: login_id,
561: prog_appid,
596: when NO_DATA_FOUND then
597: -- 3108469
598: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_EXEPENSE_ACCOUNT'
599: ,p_organization_id => cr.organization_id);
600: dumm_status := INVPUOPI.mtl_log_interface_err(
601: cr.organization_id,
602: user_id,
603: login_id,
604: prog_appid,
633: when NO_DATA_FOUND then
634: -- 3108469
635: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_ENCUMB_ACCT'
636: ,p_organization_id => cr.organization_id);
637: dumm_status := INVPUOPI.mtl_log_interface_err(
638: cr.organization_id,
639: user_id,
640: login_id,
641: prog_appid,
655: end if;
656:
657: if (cr.material_billable_flag IN ('E', 'L') AND
658: ( cr.stock_enabled_flag = 'Y' OR cr.mtl_transactions_enabled_flag = 'Y')) then
659: dumm_status := INVPUOPI.mtl_log_interface_err(
660: cr.organization_id,
661: user_id,
662: login_id,
663: prog_appid,
676: end if ;
677: --Added for 11.5.10 Recovered Part Disposition should be null For LABOR and EXPENSE Item Billing Types
678: if (cr.material_billable_flag IN ('E', 'L') AND
679: cr.RECOVERED_PART_DISP_CODE IS NOT NULL) then
680: dumm_status := INVPUOPI.mtl_log_interface_err(
681: cr.organization_id,
682: user_id,
683: login_id,
684: prog_appid,
697: end if ;
698: --Added for 11.5.10 If Billing Enabled Flag is not set then Billing Type cannot be defined.
699: if (cr.material_billable_flag IS NOT NULL AND
700: NVL(cr.SERV_BILLING_ENABLED_FLAG,'N') = 'N') then
701: dumm_status := INVPUOPI.mtl_log_interface_err(
702: cr.organization_id,
703: user_id,
704: login_id,
705: prog_appid,
724: from MTL_PICKING_RULES
725: where PICKING_RULE_ID = cr.PICKING_RULE_ID;
726: exception
727: when NO_DATA_FOUND then
728: dumm_status := INVPUOPI.mtl_log_interface_err(
729: cr.organization_id,
730: user_id,
731: login_id,
732: prog_appid,
754: where INVENTORY_ITEM_STATUS_CODE = cr.INVENTORY_ITEM_STATUS_CODE
755: and SYSDATE < nvl(DISABLE_DATE, SYSDATE+1); /*NP 16OCT94*/
756: exception
757: when NO_DATA_FOUND then
758: dumm_status := INVPUOPI.mtl_log_interface_err(
759: cr.organization_id,
760: user_id,
761: login_id,
762: prog_appid,
784: where INVENTORY_ITEM_ID = cr.ENGINEERING_ITEM_ID
785: and ORGANIZATION_ID = cr.ORGANIZATION_ID;
786: exception
787: when NO_DATA_FOUND then
788: dumm_status := INVPUOPI.mtl_log_interface_err(
789: cr.organization_id,
790: user_id,
791: login_id,
792: prog_appid,
824: if cr.PRIMARY_UOM_CODE is null then
825: cr.PRIMARY_UOM_CODE := temp_uom_code;
826: else
827: if cr.PRIMARY_UOM_CODE <> temp_uom_code then
828: dumm_status := INVPUOPI.mtl_log_interface_err(
829: cr.organization_id,
830: user_id,
831: login_id,
832: prog_appid,
846: end if;
847: end if;
848: exception
849: when NO_DATA_FOUND then
850: dumm_status := INVPUOPI.mtl_log_interface_err(
851: cr.organization_id,
852: user_id,
853: login_id,
854: prog_appid,
881: cr.PRIMARY_UNIT_OF_MEASURE := temp_u_o_m;
882:
883: EXCEPTION
884: WHEN NO_DATA_FOUND THEN
885: dumm_status := INVPUOPI.mtl_log_interface_err(
886: cr.organization_id,
887: user_id,
888: login_id,
889: prog_appid,
944: ** else goto the exception and exit this validation
945: ** succesfully.
946: */
947:
948: dumm_status := INVPUOPI.mtl_log_interface_err(
949: cr.organization_id,
950: user_id,
951: login_id,
952: prog_appid,
997: and UOM_CODE = cr.PRIMARY_UOM_CODE;
998:
999: exception
1000: when no_data_found then
1001: dumm_status := INVPUOPI.mtl_log_interface_err (
1002: cr.organization_id,
1003: user_id,
1004: login_id,
1005: prog_appid,
1029: FETCH c_fndcomlookup_exists INTO temp_enabled_flag;
1030: CLOSE c_fndcomlookup_exists;
1031:
1032: if (temp_enabled_flag <> 'Y' OR temp_enabled_flag IS NULL) then
1033: dumm_status := INVPUOPI.mtl_log_interface_err(
1034: cr.organization_id,
1035: user_id,
1036: login_id,
1037: prog_appid,
1058: FETCH c_fndcomlookup_exists INTO temp_enabled_flag;
1059: CLOSE c_fndcomlookup_exists;
1060:
1061: if (temp_enabled_flag <> 'Y' OR temp_enabled_flag IS NULL) then
1062: dumm_status := INVPUOPI.mtl_log_interface_err(
1063: cr.organization_id,
1064: user_id,
1065: login_id,
1066: prog_appid,
1087: from MTL_UNITS_OF_MEASURE
1088: where UOM_CODE = cr.VOLUME_UOM_CODE;
1089: exception
1090: when NO_DATA_FOUND then
1091: dumm_status := INVPUOPI.mtl_log_interface_err(
1092: cr.organization_id,
1093: user_id,
1094: login_id,
1095: prog_appid,
1117: from MTL_UNITS_OF_MEASURE
1118: where UOM_CODE = cr.WEIGHT_UOM_CODE;
1119: exception
1120: when NO_DATA_FOUND then
1121: dumm_status := INVPUOPI.mtl_log_interface_err(
1122: cr.organization_id,
1123: user_id,
1124: login_id,
1125: prog_appid,
1154: and item_creation_allowed_flag = 'Y'
1155: and NVL(inactive_date,sysdate+1) > sysdate;
1156: exception
1157: when NO_DATA_FOUND then
1158: dumm_status := INVPUOPI.mtl_log_interface_err(
1159: cr.organization_id,
1160: user_id,
1161: login_id,
1162: prog_appid,
1216: AND item_creation_allowed_flag = 'Y'
1217: AND (inactive_date IS NULL OR TRUNC(inactive_date) > TRUNC(SYSDATE));
1218: EXCEPTION
1219: WHEN NO_DATA_FOUND THEN
1220: dumm_status := INVPUOPI.mtl_log_interface_err(
1221: cr.organization_id,
1222: user_id,
1223: login_id,
1224: prog_appid,
1288: end;
1289: end if;
1290:
1291: if ( l_source_subinv_error ) then
1292: dumm_status := INVPUOPI.mtl_log_interface_err(
1293: cr.organization_id,
1294: user_id,
1295: login_id,
1296: prog_appid,
1318: where HAZARD_CLASS_ID = cr.HAZARD_CLASS_ID
1319: and (INACTIVE_DATE is null or INACTIVE_DATE > sysdate);
1320: exception
1321: when NO_DATA_FOUND then
1322: dumm_status := INVPUOPI.mtl_log_interface_err(
1323: cr.organization_id,
1324: user_id,
1325: login_id,
1326: prog_appid,
1347: from PO_UN_NUMBERS
1348: where UN_NUMBER_ID = cr.UN_NUMBER_ID;
1349: exception
1350: when NO_DATA_FOUND then
1351: dumm_status := INVPUOPI.mtl_log_interface_err(
1352: cr.organization_id,
1353: user_id,
1354: login_id,
1355: prog_appid,
1376: from FA_CATEGORIES
1377: where CATEGORY_ID = cr.ASSET_CATEGORY_ID;
1378: exception
1379: when NO_DATA_FOUND then
1380: dumm_status := INVPUOPI.mtl_log_interface_err(
1381: cr.organization_id,
1382: user_id,
1383: login_id,
1384: prog_appid,
1406: where INVENTORY_ITEM_ID = cr.BASE_ITEM_ID
1407: and ORGANIZATION_ID = cr.ORGANIZATION_ID;
1408: exception
1409: when NO_DATA_FOUND then
1410: dumm_status := INVPUOPI.mtl_log_interface_err(
1411: cr.organization_id,
1412: user_id,
1413: login_id,
1414: prog_appid,
1426: status := 1;
1427: end;
1428: --Added for 11.5.10 If Base Model is null then Autocreated Configuration flag cannot be defined.
1429: elsif cr.AUTO_CREATED_CONFIG_FLAG = 'Y' then
1430: dumm_status := INVPUOPI.mtl_log_interface_err(
1431: cr.organization_id,
1432: user_id,
1433: login_id,
1434: prog_appid,
1480: END;
1481: END IF;
1482:
1483: IF l_wip_subinv_error THEN
1484: dumm_status := INVPUOPI.mtl_log_interface_err(
1485: cr.organization_id,
1486: user_id,
1487: login_id,
1488: prog_appid,
1545: END IF;
1546: */
1547: IF l_loc_mandatory
1548: AND cr.WIP_SUPPLY_LOCATOR_ID IS NULL THEN
1549: dumm_status := INVPUOPI.mtl_log_interface_err(
1550: cr.organization_id,
1551: user_id,
1552: login_id,
1553: prog_appid,
1603: END;
1604: END IF;
1605:
1606: IF l_wip_locator_error THEN
1607: dumm_status := INVPUOPI.mtl_log_interface_err(
1608: cr.organization_id,
1609: user_id,
1610: login_id,
1611: prog_appid,
1660: -- End of Bug 3845910 -- anmurali
1661:
1662: exception
1663: when NO_DATA_FOUND then
1664: dumm_status := INVPUOPI.mtl_log_interface_err(
1665: cr.organization_id,
1666: user_id,
1667: login_id,
1668: prog_appid,
1690: from RCV_ROUTING_HEADERS
1691: where ROUTING_HEADER_ID = cr.RECEIVING_ROUTING_ID;
1692: exception
1693: when NO_DATA_FOUND then
1694: dumm_status := INVPUOPI.mtl_log_interface_err(
1695: cr.organization_id,
1696: user_id,
1697: login_id,
1698: prog_appid,
1711: end;
1712: end if;
1713: if cr.SERV_REQ_ENABLED_CODE is not null AND
1714: cr.SERV_REQ_ENABLED_CODE not in ('E','D','I') then
1715: dumm_status := INVPUOPI.mtl_log_interface_err(
1716: cr.organization_id,
1717: user_id,
1718: login_id,
1719: prog_appid,
1732: end if;
1733: --Added for 11.5.10 SERV_REQ_ENABLED_CODE must be mutually exclusive with 'SERVICE,WARRANTY and USAGE'
1734: if cr.SERV_REQ_ENABLED_CODE ='E' AND
1735: cr.CONTRACT_ITEM_TYPE_CODE IN ('SERVICE', 'WARRANTY', 'USAGE') then
1736: dumm_status := INVPUOPI.mtl_log_interface_err(
1737: cr.organization_id,
1738: user_id,
1739: login_id,
1740: prog_appid,
1753: end if;
1754: --Added for 11.5.10 SERVICE_STARTING_DELAY cannot have a value if Item contract type is not 'SUBSCRIPTION' and not NULL
1755: if cr.SERVICE_STARTING_DELAY IS NOT NULL AND
1756: NVL(cr.CONTRACT_ITEM_TYPE_CODE,'SUBSCRIPTION') <> 'SUBSCRIPTION' then
1757: dumm_status := INVPUOPI.mtl_log_interface_err(
1758: cr.organization_id,
1759: user_id,
1760: login_id,
1761: prog_appid,
1773: status := 1;
1774: end if;
1775: /* Removed in 11.5.10
1776: if nvl(cr.SERV_IMPORTANCE_LEVEL,1) < 0 then
1777: dumm_status := INVPUOPI.mtl_log_interface_err(
1778: cr.organization_id,
1779: user_id,
1780: login_id,
1781: prog_appid,
1806: OPEN c_fndlookup_exists('INV_TRACKING_UOM_TYPE',cr.TRACKING_QUANTITY_IND);
1807: FETCH c_fndlookup_exists INTO temp;
1808: CLOSE c_fndlookup_exists;
1809: IF temp IS NULL THEN
1810: dumm_status := INVPUOPI.mtl_log_interface_err(
1811: cr.organization_id,
1812: user_id,
1813: login_id,
1814: prog_appid,
1842: --remove the condition "Pricing will be supported
1843: --only in OM.J and WMS.J installed environments."
1844: exception
1845: when NO_DATA_FOUND then
1846: dumm_status := INVPUOPI.mtl_log_interface_err(
1847: cr.organization_id,
1848: user_id,
1849: login_id,
1850: prog_appid,
1870: OPEN c_fndlookup_exists('INV_DEFAULTING_UOM_TYPE',cr.SECONDARY_DEFAULT_IND);
1871: FETCH c_fndlookup_exists INTO temp;
1872: CLOSE c_fndlookup_exists;
1873: IF temp IS NULL THEN
1874: dumm_status := INVPUOPI.mtl_log_interface_err(
1875: cr.organization_id,
1876: user_id,
1877: login_id,
1878: prog_appid,
1896: from MTL_UNITS_OF_MEASURE
1897: where UOM_CODE = cr.SECONDARY_UOM_CODE
1898: and SYSDATE < nvl(DISABLE_DATE, SYSDATE+1); /*NP 16OCT94*/
1899: if(cr.SECONDARY_UOM_CODE = cr.PRIMARY_UOM_CODE ) then
1900: dumm_status := INVPUOPI.mtl_log_interface_err(
1901: cr.organization_id,
1902: user_id,
1903: login_id,
1904: prog_appid,
1916: status := 1;
1917: end if;
1918: EXCEPTION
1919: WHEN NO_DATA_FOUND THEN
1920: dumm_status := INVPUOPI.mtl_log_interface_err(
1921: cr.organization_id,
1922: user_id,
1923: login_id,
1924: prog_appid,
1941: --Defaulting can be set to either Default or No Default.
1942: if (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'P'
1943: and (nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S'
1944: and nvl(cr.SECONDARY_DEFAULT_IND,'F') = 'F')) then
1945: dumm_status := INVPUOPI.mtl_log_interface_err(
1946: cr.organization_id,
1947: user_id,
1948: login_id,
1949: prog_appid,
1963:
1964: if (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'P'
1965: and nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'P') then
1966: if(cr.SECONDARY_DEFAULT_IND IS NOT NULL ) then
1967: dumm_status := INVPUOPI.mtl_log_interface_err(
1968: cr.organization_id,
1969: user_id,
1970: login_id,
1971: prog_appid,
1982: end if;
1983: status := 1;
1984: end if;
1985: if(cr.SECONDARY_UOM_CODE IS NOT NULL ) then
1986: dumm_status := INVPUOPI.mtl_log_interface_err(
1987: cr.organization_id,
1988: user_id,
1989: login_id,
1990: prog_appid,
2004: end if;
2005: if ( (cr.SECONDARY_DEFAULT_IND IS NULL OR cr.SECONDARY_DEFAULT_IND NOT IN('D','N'))--Bug:3574973
2006: and (cr.DUAL_UOM_DEVIATION_HIGH <> 0
2007: or cr.DUAL_UOM_DEVIATION_LOW <> 0))then
2008: dumm_status := INVPUOPI.mtl_log_interface_err(
2009: cr.organization_id,
2010: user_id,
2011: login_id,
2012: prog_appid,
2026: -- Required values check
2027: if ( (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'PS'
2028: or nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S')
2029: and cr.SECONDARY_UOM_CODE IS NULL) then
2030: dumm_status := INVPUOPI.mtl_log_interface_err(
2031: cr.organization_id,
2032: user_id,
2033: login_id,
2034: prog_appid,
2047: end if;
2048: if ( (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'PS'
2049: or nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S')
2050: and cr.SECONDARY_DEFAULT_IND IS NULL) then
2051: dumm_status := INVPUOPI.mtl_log_interface_err(
2052: cr.organization_id,
2053: user_id,
2054: login_id,
2055: prog_appid,
2067: status := 1;
2068: end if;
2069: if ( NVL(cr.DUAL_UOM_DEVIATION_HIGH,-1) < 0
2070: or NVL(cr.DUAL_UOM_DEVIATION_LOW,-1) < 0) then
2071: dumm_status := INVPUOPI.mtl_log_interface_err(
2072: cr.organization_id,
2073: user_id,
2074: login_id,
2075: prog_appid,
2112: ** else goto the exception and exit this validation
2113: ** succesfully.
2114: */
2115:
2116: dumm_status := INVPUOPI.mtl_log_interface_err(
2117: cr.organization_id,
2118: user_id,
2119: login_id,
2120: prog_appid,
2141: END IF;--}
2142: /* Start Bug 3713912 */
2143: if (cr.TRACKING_QUANTITY_IND <> 'P'
2144: and nvl(cr.SERIAL_NUMBER_CONTROL_CODE,1) <> 1) then
2145: dumm_status := INVPUOPI.mtl_log_interface_err(
2146: cr.organization_id,
2147: user_id,
2148: login_id,
2149: prog_appid,
2171: from MTL_UNITS_OF_MEASURE
2172: where UOM_CODE = cr.DIMENSION_UOM_CODE;
2173: exception
2174: when NO_DATA_FOUND then
2175: dumm_status := INVPUOPI.mtl_log_interface_err(
2176: cr.organization_id,
2177: user_id,
2178: login_id,
2179: prog_appid,
2241: exception
2242: when LOGGING_ERR then
2243: return(dumm_status);
2244: when VALIDATE_ERR then
2245: dumm_status := INVPUOPI.mtl_log_interface_err(
2246: l_org_id,
2247: user_id,
2248: login_id,
2249: prog_appid,