[Home] [Help]
465: and rownum = 1;
466:
467: exception
468: when NO_DATA_FOUND then
469: dumm_status := INVPUOPI.mtl_log_interface_err(
470: cr.organization_id,
471: user_id,
472: login_id,
473: prog_appid,
502: when NO_DATA_FOUND then
503: -- 3108469
504: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_COST_OF_SALES_ACNT'
505: ,p_organization_id => cr.organization_id);
506: dumm_status := INVPUOPI.mtl_log_interface_err(
507: cr.organization_id,
508: user_id,
509: login_id,
510: prog_appid,
539: when NO_DATA_FOUND then
540: -- 3108469
541: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_SALES_ACCOUNT'
542: ,p_organization_id => cr.organization_id);
543: dumm_status := INVPUOPI.mtl_log_interface_err(
544: cr.organization_id,
545: user_id,
546: login_id,
547: prog_appid,
576: when NO_DATA_FOUND then
577: -- 3108469
578: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_EXEPENSE_ACCOUNT'
579: ,p_organization_id => cr.organization_id);
580: dumm_status := INVPUOPI.mtl_log_interface_err(
581: cr.organization_id,
582: user_id,
583: login_id,
584: prog_appid,
613: when NO_DATA_FOUND then
614: -- 3108469
615: l_msg_text := get_msg_text (p_message_name => 'INV_IOI_ENCUMB_ACCT'
616: ,p_organization_id => cr.organization_id);
617: dumm_status := INVPUOPI.mtl_log_interface_err(
618: cr.organization_id,
619: user_id,
620: login_id,
621: prog_appid,
635: end if;
636:
637: if (cr.material_billable_flag IN ('E', 'L') AND
638: ( cr.stock_enabled_flag = 'Y' OR cr.mtl_transactions_enabled_flag = 'Y')) then
639: dumm_status := INVPUOPI.mtl_log_interface_err(
640: cr.organization_id,
641: user_id,
642: login_id,
643: prog_appid,
656: end if ;
657: --Added for 11.5.10 Recovered Part Disposition should be null For LABOR and EXPENSE Item Billing Types
658: if (cr.material_billable_flag IN ('E', 'L') AND
659: cr.RECOVERED_PART_DISP_CODE IS NOT NULL) then
660: dumm_status := INVPUOPI.mtl_log_interface_err(
661: cr.organization_id,
662: user_id,
663: login_id,
664: prog_appid,
677: end if ;
678: --Added for 11.5.10 If Billing Enabled Flag is not set then Billing Type cannot be defined.
679: if (cr.material_billable_flag IS NOT NULL AND
680: NVL(cr.SERV_BILLING_ENABLED_FLAG,'N') = 'N') then
681: dumm_status := INVPUOPI.mtl_log_interface_err(
682: cr.organization_id,
683: user_id,
684: login_id,
685: prog_appid,
704: from MTL_PICKING_RULES
705: where PICKING_RULE_ID = cr.PICKING_RULE_ID;
706: exception
707: when NO_DATA_FOUND then
708: dumm_status := INVPUOPI.mtl_log_interface_err(
709: cr.organization_id,
710: user_id,
711: login_id,
712: prog_appid,
734: where INVENTORY_ITEM_STATUS_CODE = cr.INVENTORY_ITEM_STATUS_CODE
735: and SYSDATE < nvl(DISABLE_DATE, SYSDATE+1); /*NP 16OCT94*/
736: exception
737: when NO_DATA_FOUND then
738: dumm_status := INVPUOPI.mtl_log_interface_err(
739: cr.organization_id,
740: user_id,
741: login_id,
742: prog_appid,
764: where INVENTORY_ITEM_ID = cr.ENGINEERING_ITEM_ID
765: and ORGANIZATION_ID = cr.ORGANIZATION_ID;
766: exception
767: when NO_DATA_FOUND then
768: dumm_status := INVPUOPI.mtl_log_interface_err(
769: cr.organization_id,
770: user_id,
771: login_id,
772: prog_appid,
804: if cr.PRIMARY_UOM_CODE is null then
805: cr.PRIMARY_UOM_CODE := temp_uom_code;
806: else
807: if cr.PRIMARY_UOM_CODE <> temp_uom_code then
808: dumm_status := INVPUOPI.mtl_log_interface_err(
809: cr.organization_id,
810: user_id,
811: login_id,
812: prog_appid,
825: end if;
826: end if;
827: exception
828: when NO_DATA_FOUND then
829: dumm_status := INVPUOPI.mtl_log_interface_err(
830: cr.organization_id,
831: user_id,
832: login_id,
833: prog_appid,
859: cr.PRIMARY_UNIT_OF_MEASURE := temp_u_o_m;
860:
861: EXCEPTION
862: WHEN NO_DATA_FOUND THEN
863: dumm_status := INVPUOPI.mtl_log_interface_err(
864: cr.organization_id,
865: user_id,
866: login_id,
867: prog_appid,
918: ** else goto the exception and exit this validation
919: ** succesfully.
920: */
921:
922: dumm_status := INVPUOPI.mtl_log_interface_err(
923: cr.organization_id,
924: user_id,
925: login_id,
926: prog_appid,
968: and UOM_CODE = cr.PRIMARY_UOM_CODE;
969:
970: exception
971: when no_data_found then
972: dumm_status := INVPUOPI.mtl_log_interface_err (
973: cr.organization_id,
974: user_id,
975: login_id,
976: prog_appid,
1000: FETCH c_fndcomlookup_exists INTO temp_enabled_flag;
1001: CLOSE c_fndcomlookup_exists;
1002:
1003: if (temp_enabled_flag <> 'Y' OR temp_enabled_flag IS NULL) then
1004: dumm_status := INVPUOPI.mtl_log_interface_err(
1005: cr.organization_id,
1006: user_id,
1007: login_id,
1008: 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: from MTL_UNITS_OF_MEASURE
1059: where UOM_CODE = cr.VOLUME_UOM_CODE;
1060: exception
1061: when NO_DATA_FOUND then
1062: dumm_status := INVPUOPI.mtl_log_interface_err(
1063: cr.organization_id,
1064: user_id,
1065: login_id,
1066: prog_appid,
1088: from MTL_UNITS_OF_MEASURE
1089: where UOM_CODE = cr.WEIGHT_UOM_CODE;
1090: exception
1091: when NO_DATA_FOUND then
1092: dumm_status := INVPUOPI.mtl_log_interface_err(
1093: cr.organization_id,
1094: user_id,
1095: login_id,
1096: prog_appid,
1125: and item_creation_allowed_flag = 'Y'
1126: and NVL(inactive_date,sysdate+1) > sysdate;
1127: exception
1128: when NO_DATA_FOUND then
1129: dumm_status := INVPUOPI.mtl_log_interface_err(
1130: cr.organization_id,
1131: user_id,
1132: login_id,
1133: prog_appid,
1187: AND item_creation_allowed_flag = 'Y'
1188: AND (inactive_date IS NULL OR TRUNC(inactive_date) > TRUNC(SYSDATE));
1189: EXCEPTION
1190: WHEN NO_DATA_FOUND THEN
1191: dumm_status := INVPUOPI.mtl_log_interface_err(
1192: cr.organization_id,
1193: user_id,
1194: login_id,
1195: prog_appid,
1259: end;
1260: end if;
1261:
1262: if ( l_source_subinv_error ) then
1263: dumm_status := INVPUOPI.mtl_log_interface_err(
1264: cr.organization_id,
1265: user_id,
1266: login_id,
1267: prog_appid,
1289: where HAZARD_CLASS_ID = cr.HAZARD_CLASS_ID
1290: and (INACTIVE_DATE is null or INACTIVE_DATE > sysdate);
1291: exception
1292: when NO_DATA_FOUND then
1293: dumm_status := INVPUOPI.mtl_log_interface_err(
1294: cr.organization_id,
1295: user_id,
1296: login_id,
1297: prog_appid,
1318: from PO_UN_NUMBERS
1319: where UN_NUMBER_ID = cr.UN_NUMBER_ID;
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 FA_CATEGORIES
1348: where CATEGORY_ID = cr.ASSET_CATEGORY_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,
1377: where INVENTORY_ITEM_ID = cr.BASE_ITEM_ID
1378: and ORGANIZATION_ID = cr.ORGANIZATION_ID;
1379: exception
1380: when NO_DATA_FOUND then
1381: dumm_status := INVPUOPI.mtl_log_interface_err(
1382: cr.organization_id,
1383: user_id,
1384: login_id,
1385: prog_appid,
1397: status := 1;
1398: end;
1399: --Added for 11.5.10 If Base Model is null then Autocreated Configuration flag cannot be defined.
1400: elsif cr.AUTO_CREATED_CONFIG_FLAG = 'Y' then
1401: dumm_status := INVPUOPI.mtl_log_interface_err(
1402: cr.organization_id,
1403: user_id,
1404: login_id,
1405: prog_appid,
1451: END;
1452: END IF;
1453:
1454: IF l_wip_subinv_error THEN
1455: dumm_status := INVPUOPI.mtl_log_interface_err(
1456: cr.organization_id,
1457: user_id,
1458: login_id,
1459: prog_appid,
1516: END IF;
1517: */
1518: IF l_loc_mandatory
1519: AND cr.WIP_SUPPLY_LOCATOR_ID IS NULL THEN
1520: dumm_status := INVPUOPI.mtl_log_interface_err(
1521: cr.organization_id,
1522: user_id,
1523: login_id,
1524: prog_appid,
1574: END;
1575: END IF;
1576:
1577: IF l_wip_locator_error THEN
1578: dumm_status := INVPUOPI.mtl_log_interface_err(
1579: cr.organization_id,
1580: user_id,
1581: login_id,
1582: prog_appid,
1631: -- End of Bug 3845910 -- anmurali
1632:
1633: exception
1634: when NO_DATA_FOUND then
1635: dumm_status := INVPUOPI.mtl_log_interface_err(
1636: cr.organization_id,
1637: user_id,
1638: login_id,
1639: prog_appid,
1661: from RCV_ROUTING_HEADERS
1662: where ROUTING_HEADER_ID = cr.RECEIVING_ROUTING_ID;
1663: exception
1664: when NO_DATA_FOUND then
1665: dumm_status := INVPUOPI.mtl_log_interface_err(
1666: cr.organization_id,
1667: user_id,
1668: login_id,
1669: prog_appid,
1682: end;
1683: end if;
1684: if cr.SERV_REQ_ENABLED_CODE is not null AND
1685: cr.SERV_REQ_ENABLED_CODE not in ('E','D','I') then
1686: dumm_status := INVPUOPI.mtl_log_interface_err(
1687: cr.organization_id,
1688: user_id,
1689: login_id,
1690: prog_appid,
1703: end if;
1704: --Added for 11.5.10 SERV_REQ_ENABLED_CODE must be mutually exclusive with 'SERVICE,WARRANTY and USAGE'
1705: if cr.SERV_REQ_ENABLED_CODE ='E' AND
1706: cr.CONTRACT_ITEM_TYPE_CODE IN ('SERVICE', 'WARRANTY', 'USAGE') then
1707: dumm_status := INVPUOPI.mtl_log_interface_err(
1708: cr.organization_id,
1709: user_id,
1710: login_id,
1711: prog_appid,
1724: end if;
1725: --Added for 11.5.10 SERVICE_STARTING_DELAY cannot have a value if Item contract type is not 'SUBSCRIPTION' and not NULL
1726: if cr.SERVICE_STARTING_DELAY IS NOT NULL AND
1727: NVL(cr.CONTRACT_ITEM_TYPE_CODE,'SUBSCRIPTION') <> 'SUBSCRIPTION' then
1728: dumm_status := INVPUOPI.mtl_log_interface_err(
1729: cr.organization_id,
1730: user_id,
1731: login_id,
1732: prog_appid,
1744: status := 1;
1745: end if;
1746: /* Removed in 11.5.10
1747: if nvl(cr.SERV_IMPORTANCE_LEVEL,1) < 0 then
1748: dumm_status := INVPUOPI.mtl_log_interface_err(
1749: cr.organization_id,
1750: user_id,
1751: login_id,
1752: prog_appid,
1777: OPEN c_fndlookup_exists('INV_TRACKING_UOM_TYPE',cr.TRACKING_QUANTITY_IND);
1778: FETCH c_fndlookup_exists INTO temp;
1779: CLOSE c_fndlookup_exists;
1780: IF temp IS NULL THEN
1781: dumm_status := INVPUOPI.mtl_log_interface_err(
1782: cr.organization_id,
1783: user_id,
1784: login_id,
1785: prog_appid,
1813: --remove the condition "Pricing will be supported
1814: --only in OM.J and WMS.J installed environments."
1815: exception
1816: when NO_DATA_FOUND then
1817: dumm_status := INVPUOPI.mtl_log_interface_err(
1818: cr.organization_id,
1819: user_id,
1820: login_id,
1821: prog_appid,
1841: OPEN c_fndlookup_exists('INV_DEFAULTING_UOM_TYPE',cr.SECONDARY_DEFAULT_IND);
1842: FETCH c_fndlookup_exists INTO temp;
1843: CLOSE c_fndlookup_exists;
1844: IF temp IS NULL THEN
1845: dumm_status := INVPUOPI.mtl_log_interface_err(
1846: cr.organization_id,
1847: user_id,
1848: login_id,
1849: prog_appid,
1867: from MTL_UNITS_OF_MEASURE
1868: where UOM_CODE = cr.SECONDARY_UOM_CODE
1869: and SYSDATE < nvl(DISABLE_DATE, SYSDATE+1); /*NP 16OCT94*/
1870: if(cr.SECONDARY_UOM_CODE = cr.PRIMARY_UOM_CODE ) then
1871: dumm_status := INVPUOPI.mtl_log_interface_err(
1872: cr.organization_id,
1873: user_id,
1874: login_id,
1875: prog_appid,
1887: status := 1;
1888: end if;
1889: EXCEPTION
1890: WHEN NO_DATA_FOUND THEN
1891: dumm_status := INVPUOPI.mtl_log_interface_err(
1892: cr.organization_id,
1893: user_id,
1894: login_id,
1895: prog_appid,
1912: --Defaulting can be set to either Default or No Default.
1913: if (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'P'
1914: and (nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S'
1915: and nvl(cr.SECONDARY_DEFAULT_IND,'F') = 'F')) then
1916: dumm_status := INVPUOPI.mtl_log_interface_err(
1917: cr.organization_id,
1918: user_id,
1919: login_id,
1920: prog_appid,
1934:
1935: if (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'P'
1936: and nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'P') then
1937: if(cr.SECONDARY_DEFAULT_IND IS NOT NULL ) then
1938: dumm_status := INVPUOPI.mtl_log_interface_err(
1939: cr.organization_id,
1940: user_id,
1941: login_id,
1942: prog_appid,
1953: end if;
1954: status := 1;
1955: end if;
1956: if(cr.SECONDARY_UOM_CODE IS NOT NULL ) then
1957: dumm_status := INVPUOPI.mtl_log_interface_err(
1958: cr.organization_id,
1959: user_id,
1960: login_id,
1961: prog_appid,
1975: end if;
1976: if ( (cr.SECONDARY_DEFAULT_IND IS NULL OR cr.SECONDARY_DEFAULT_IND NOT IN('D','N'))--Bug:3574973
1977: and (cr.DUAL_UOM_DEVIATION_HIGH <> 0
1978: or cr.DUAL_UOM_DEVIATION_LOW <> 0))then
1979: dumm_status := INVPUOPI.mtl_log_interface_err(
1980: cr.organization_id,
1981: user_id,
1982: login_id,
1983: prog_appid,
1997: -- Required values check
1998: if ( (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'PS'
1999: or nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S')
2000: and cr.SECONDARY_UOM_CODE IS NULL) then
2001: dumm_status := INVPUOPI.mtl_log_interface_err(
2002: cr.organization_id,
2003: user_id,
2004: login_id,
2005: prog_appid,
2018: end if;
2019: if ( (nvl(cr.TRACKING_QUANTITY_IND,'P') = 'PS'
2020: or nvl(cr.ONT_PRICING_QTY_SOURCE,'P') = 'S')
2021: and cr.SECONDARY_DEFAULT_IND IS NULL) then
2022: dumm_status := INVPUOPI.mtl_log_interface_err(
2023: cr.organization_id,
2024: user_id,
2025: login_id,
2026: prog_appid,
2038: status := 1;
2039: end if;
2040: if ( NVL(cr.DUAL_UOM_DEVIATION_HIGH,-1) < 0
2041: or NVL(cr.DUAL_UOM_DEVIATION_LOW,-1) < 0) then
2042: dumm_status := INVPUOPI.mtl_log_interface_err(
2043: cr.organization_id,
2044: user_id,
2045: login_id,
2046: prog_appid,
2083: ** else goto the exception and exit this validation
2084: ** succesfully.
2085: */
2086:
2087: dumm_status := INVPUOPI.mtl_log_interface_err(
2088: cr.organization_id,
2089: user_id,
2090: login_id,
2091: prog_appid,
2112: END IF;--}
2113: /* Start Bug 3713912 */
2114: if (cr.TRACKING_QUANTITY_IND <> 'P'
2115: and nvl(cr.SERIAL_NUMBER_CONTROL_CODE,1) <> 1) then
2116: dumm_status := INVPUOPI.mtl_log_interface_err(
2117: cr.organization_id,
2118: user_id,
2119: login_id,
2120: prog_appid,
2142: from MTL_UNITS_OF_MEASURE
2143: where UOM_CODE = cr.DIMENSION_UOM_CODE;
2144: exception
2145: when NO_DATA_FOUND then
2146: dumm_status := INVPUOPI.mtl_log_interface_err(
2147: cr.organization_id,
2148: user_id,
2149: login_id,
2150: prog_appid,
2211: exception
2212: when LOGGING_ERR then
2213: return(dumm_status);
2214: when VALIDATE_ERR then
2215: dumm_status := INVPUOPI.mtl_log_interface_err(
2216: l_org_id,
2217: user_id,
2218: login_id,
2219: prog_appid,