[Home] [Help]
309: -- Check for the second set of integrity rules/restrictions for item attributes
310:
311: -- Validate Fixed Order Qty
312: IF cr.fixed_order_quantity <= 0 THEN
313: dumm_status := INVPUOPI.mtl_log_interface_err(
314: cr.organization_id,
315: user_id,
316: login_id,
317: prog_appid,
330: END IF;
331:
332: -- Validate Fixed Days Supply
333: IF cr.fixed_days_supply < 0 THEN
334: dumm_status := INVPUOPI.mtl_log_interface_err(
335: cr.organization_id,
336: user_id,
337: login_id,
338: prog_appid,
372: END;
373: FND_MESSAGE.SET_NAME ('INV', 'INV_IOI_ENC_ACCT_REQ');
374: FND_MESSAGE.SET_TOKEN ('ORGANIZATION', l_org_name);
375: l_msg_text := FND_MESSAGE.GET;
376: dumm_status := INVPUOPI.mtl_log_interface_err(
377: cr.organization_id,
378: user_id,
379: login_id,
380: prog_appid,
395: stmt := 10;
396: -- validate SERVICE_DURATION
397: IF cr.service_duration_period_code IS NOT NULL AND
398: cr.service_duration IS NULL THEN
399: dumm_status := INVPUOPI.mtl_log_interface_err(
400: cr.organization_id,
401: user_id,
402: login_id,
403: prog_appid,
416: END IF;
417: /* Bug 1529024 : Validation of warranty_vendor_id is not required
418: if cr.vendor_warranty_flag = 'Y' and
419: cr.WARRANTY_VENDOR_ID is NULL then
420: dumm_status := INVPUOPI.mtl_log_interface_err(
421: cr.organization_id,
422: user_id,
423: login_id,
424: prog_appid,
439: -- validate INSPECTION_REQUIRED_FLAG
440: if cr.INSPECTION_REQUIRED_FLAG = 'Y' and
441: (cr.RECEIVING_ROUTING_ID <> 2 or
442: cr.RECEIVING_ROUTING_ID is NULL)then
443: dumm_status := INVPUOPI.mtl_log_interface_err(
444: cr.organization_id,
445: user_id,
446: login_id,
447: prog_appid,
461:
462: -- validate RESPONSE_TIME_VALUE
463: if cr.response_time_period_code is not null and
464: cr.RESPONSE_TIME_VALUE is NULL then
465: dumm_status := INVPUOPI.mtl_log_interface_err(
466: cr.organization_id,
467: user_id,
468: login_id,
469: prog_appid,
483:
484: -- validate DEMAND_TIME_FENCE_DAYS
485: if cr.demand_time_fence_code = 4 and
486: nvl(cr.DEMAND_TIME_FENCE_DAYS,-9) < 0 then
487: dumm_status := INVPUOPI.mtl_log_interface_err(
488: cr.organization_id,
489: user_id,
490: login_id,
491: prog_appid,
507: -- Bug 4485018 - Adding a clause to check for DEMAND_TIME_FENCE_CODE with null value
508:
509: if ((cr.demand_time_fence_code <> 4 or cr.demand_time_fence_code is null) and
510: (cr.DEMAND_TIME_FENCE_DAYS is NOT NULL)) then
511: dumm_status := INVPUOPI.mtl_log_interface_err(
512: cr.organization_id,
513: user_id,
514: login_id,
515: prog_appid,
529:
530: -- validate PLANNING_TIME_FENCE_DAYS
531: if cr.planning_time_fence_code = 4 and
532: nvl(cr.PLANNING_TIME_FENCE_DAYS,-9) < 0 then
533: dumm_status := INVPUOPI.mtl_log_interface_err(
534: cr.organization_id,
535: user_id,
536: login_id,
537: prog_appid,
551:
552: -- validate PLANNING_TIME_FENCE_DAYS
553: if cr.planning_time_fence_code <> 4 and
554: cr.PLANNING_TIME_FENCE_DAYS is NOT NULL then
555: dumm_status := INVPUOPI.mtl_log_interface_err(
556: cr.organization_id,
557: user_id,
558: login_id,
559: prog_appid,
573:
574: -- validate RESTRICT_LOCATORS_CODE
575: if cr.location_control_code = 3 and
576: cr.RESTRICT_LOCATORS_CODE <> 2 then
577: dumm_status := INVPUOPI.mtl_log_interface_err(
578: cr.organization_id,
579: user_id,
580: login_id,
581: prog_appid,
599: ** incorrect validation taken out: see bug 383278
600: */
601: if cr.RESTRICT_LOCATORS_CODE = 1 then
602: if cr.RESTRICT_SUBINVENTORIES_CODE <> 1 then
603: dumm_status := INVPUOPI.mtl_log_interface_err(
604: cr.organization_id,
605: user_id,
606: login_id,
607: prog_appid,
619: status := 1;
620: end if;
621: if (cr.LOCATION_CONTROL_CODE <> 1 and
622: cr.LOCATION_CONTROL_CODE <> 2) then
623: dumm_status := INVPUOPI.mtl_log_interface_err(
624: cr.organization_id,
625: user_id,
626: login_id,
627: prog_appid,
643: -- validate EXPENSE_ACCOUNT
644: if cr.inventory_asset_flag = 'N' and
645: cr.inventory_item_flag = 'Y' and
646: cr.EXPENSE_ACCOUNT is NULL then
647: dumm_status := INVPUOPI.mtl_log_interface_err(
648: cr.organization_id,
649: user_id,
650: login_id,
651: prog_appid,
667:
668: if cr.costing_enabled_flag = 'N' and
669: cr.inventory_asset_flag = 'Y'
670: then
671: dumm_status := INVPUOPI.mtl_log_interface_err(
672: cr.organization_id,
673: user_id,
674: login_id,
675: prog_appid,
690: -- validate POSTPROCESSING_LEAD_TIME
691: if (cr.POSTPROCESSING_LEAD_TIME > 0 or
692: cr.POSTPROCESSING_LEAD_TIME < 0) and
693: cr.PLANNING_MAKE_BUY_CODE = 1 then
694: dumm_status := INVPUOPI.mtl_log_interface_err(
695: cr.organization_id,
696: user_id,
697: login_id,
698: prog_appid,
713: -- validate LEAD_TIME_LOT_SIZE
714: if (cr.LEAD_TIME_LOT_SIZE > 1 or
715: cr.LEAD_TIME_LOT_SIZE < 1) and
716: cr.REPETITIVE_PLANNING_FLAG = 'Y' then
717: dumm_status := INVPUOPI.mtl_log_interface_err(
718: cr.organization_id,
719: user_id,
720: login_id,
721: prog_appid,
739: if (Prof_INV_CTP <> 4 and cr.WIP_SUPPLY_TYPE <> 6 ) and
740: cr.ATP_COMPONENTS_FLAG <> 'N' and
741: cr.PICK_COMPONENTS_FLAG = 'N' and
742: cr.REPLENISH_TO_ORDER_FLAG = 'N' then
743: dumm_status := INVPUOPI.mtl_log_interface_err(
744: cr.organization_id,
745: user_id,
746: login_id,
747: prog_appid,
769: cr.BOM_ITEM_TYPE in (1,2,4, 5)) or
770: (Prof_INV_CTP = 4 and
771: cr.ATP_COMPONENTS_FLAG in ('C','Y') and
772: cr.BOM_ITEM_TYPE = 5)) then
773: dumm_status := INVPUOPI.mtl_log_interface_err(
774: cr.organization_id,
775: user_id,
776: login_id,
777: prog_appid,
792: -- validate REPETITIVE_PLANNING_FLAG
793: if (cr.MRP_PLANNING_CODE = 3 or
794: cr.MRP_PLANNING_CODE = 4) and
795: cr.REPETITIVE_PLANNING_FLAG is null then
796: dumm_status := INVPUOPI.mtl_log_interface_err(
797: cr.organization_id,
798: user_id,
799: login_id,
800: prog_appid,
814:
815: -- validate MTL_TRANSACTIONS_ENABLED_FLAG
816: if cr.MTL_TRANSACTIONS_ENABLED_FLAG = 'Y' and
817: cr.STOCK_ENABLED_FLAG = 'N' then
818: dumm_status := INVPUOPI.mtl_log_interface_err(
819: cr.organization_id,
820: user_id,
821: login_id,
822: prog_appid,
836:
837: -- validate INTERNAL_ORDER_ENABLED_FLAG
838: if cr.INTERNAL_ORDER_ENABLED_FLAG = 'Y' and
839: cr.INTERNAL_ORDER_FLAG = 'N' then
840: dumm_status := INVPUOPI.mtl_log_interface_err(
841: cr.organization_id,
842: user_id,
843: login_id,
844: prog_appid,
859: -- BugFix # 1402975
860: --Validate INTERNAL_ORDER_FLAG and PICK_COMPONENTS_FLAG
861: if cr.INTERNAL_ORDER_FLAG = 'Y' and
862: cr.PICK_COMPONENTS_FLAG = 'Y' then
863: dumm_status := INVPUOPI.mtl_log_interface_err(
864: cr.organization_id,
865: user_id,
866: login_id,
867: prog_appid,
882:
883: /*NP 20AUG96 new validation for 10.7 columns*/
884: -- validate CONTAINER_ITEM_FLAG
885: if cr.CONTAINER_ITEM_FLAG not in ('Y', 'N') then
886: dumm_status := INVPUOPI.mtl_log_interface_err(
887: cr.organization_id,
888: user_id,
889: login_id,
890: prog_appid,
903: end if;
904:
905: -- validate VEHICLE_ITEM_FLAG
906: if cr.VEHICLE_ITEM_FLAG not in ('Y', 'N') then
907: dumm_status := INVPUOPI.mtl_log_interface_err(
908: cr.organization_id,
909: user_id,
910: login_id,
911: prog_appid,
925:
926: -- validate MINIMUM_FILL_PERCENTAGE
927: if (cr.MINIMUM_FILL_PERCENT < 0
928: OR cr.MINIMUM_FILL_PERCENT > 100) then
929: dumm_status := INVPUOPI.mtl_log_interface_err(
930: cr.organization_id,
931: user_id,
932: login_id,
933: prog_appid,
947:
948: -- validate CONTAINER_ITEM_CODE
949: if (cr.CONTAINER_ITEM_FLAG = 'N'
950: AND cr.CONTAINER_TYPE_CODE IS NOT NULL ) then
951: dumm_status := INVPUOPI.mtl_log_interface_err(
952: cr.organization_id,
953: user_id,
954: login_id,
955: prog_appid,
970: -- validate MAXIMUM_LOAD_WEIGHT
971: if (cr.CONTAINER_ITEM_FLAG = 'N'
972: AND cr.VEHICLE_ITEM_FLAG = 'N'
973: AND cr.MAXIMUM_LOAD_WEIGHT IS NOT NULL ) then
974: dumm_status := INVPUOPI.mtl_log_interface_err(
975: cr.organization_id,
976: user_id,
977: login_id,
978: prog_appid,
993: -- validate MINIMUM_FILL_PERCENT
994: if (cr.CONTAINER_ITEM_FLAG = 'N'
995: AND cr.VEHICLE_ITEM_FLAG = 'N'
996: AND cr.MINIMUM_FILL_PERCENT IS NOT NULL ) then
997: dumm_status := INVPUOPI.mtl_log_interface_err(
998: cr.organization_id,
999: user_id,
1000: login_id,
1001: prog_appid,
1016: -- validate INTERNAL_VOLUME
1017: if (cr.CONTAINER_ITEM_FLAG = 'N'
1018: AND cr.VEHICLE_ITEM_FLAG = 'N'
1019: AND cr.INTERNAL_VOLUME IS NOT NULL ) then
1020: dumm_status := INVPUOPI.mtl_log_interface_err(
1021: cr.organization_id,
1022: user_id,
1023: login_id,
1024: prog_appid,
1038:
1039: -- validate RELEASE_TIME_FENCE_CODE (RELEASE_TIME_FENCE_CODE)
1040: -- Added value 7 to existing values of Release Time Fence Code - R12 - Anmurali
1041: if (cr.RELEASE_TIME_FENCE_CODE not in (1,2,3,4,5,6,7)) then
1042: dumm_status := INVPUOPI.mtl_log_interface_err(
1043: cr.organization_id,
1044: user_id,
1045: login_id,
1046: prog_appid,
1060:
1061: -- validate RELEASE_TIME_FENCE_DAYS
1062: if cr.RELEASE_TIME_FENCE_CODE = 4 and
1063: nvl(cr.RELEASE_TIME_FENCE_DAYS,-9) < 0 then
1064: dumm_status := INVPUOPI.mtl_log_interface_err(
1065: cr.organization_id,
1066: user_id,
1067: login_id,
1068: prog_appid,
1087: */
1088: -- validate AUTO_REL_TIME_FENCE_DAYS
1089: if (cr.RELEASE_TIME_FENCE_CODE <> 4 OR cr.RELEASE_TIME_FENCE_CODE IS NULL) and
1090: cr.RELEASE_TIME_FENCE_DAYS is NOT NULL then
1091: dumm_status := INVPUOPI.mtl_log_interface_err(
1092: cr.organization_id,
1093: user_id,
1094: login_id,
1095: prog_appid,
1110:
1111: -- validate PICK_COMPONENTS_FLAG
1112: if cr.SHIP_MODEL_COMPLETE_FLAG = 'Y' and
1113: cr.PICK_COMPONENTS_FLAG = 'N' then
1114: dumm_status := INVPUOPI.mtl_log_interface_err(
1115: cr.organization_id,
1116: user_id,
1117: login_id,
1118: prog_appid,
1133: /** Bug 1649399 added validation for shrinkage rate */
1134:
1135: -- validate SHRINKAGE_RATE
1136: if (cr.SHRINKAGE_RATE >= 1) or (cr.SHRINKAGE_RATE < 0) then
1137: dumm_status := INVPUOPI.mtl_log_interface_err(
1138: cr.organization_id,
1139: user_id,
1140: login_id,
1141: prog_appid,
1194: exception
1195: when LOGGING_ERR then
1196: return(dumm_status);
1197: when VALIDATE_ERR then
1198: dumm_status := INVPUOPI.mtl_log_interface_err(
1199: l_org_id,
1200: user_id,
1201: login_id,
1202: prog_appid,