[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,
650: -- check expense a/c for the item which is costed and purchased
651: elsif cr.inventory_asset_flag = 'N' and
652: cr.inventory_item_flag = 'Y' and
653: cr.EXPENSE_ACCOUNT is NULL then
654: dumm_status := INVPUOPI.mtl_log_interface_err(
655: cr.organization_id,
656: user_id,
657: login_id,
658: prog_appid,
674:
675: if cr.costing_enabled_flag = 'N' and
676: cr.inventory_asset_flag = 'Y'
677: then
678: dumm_status := INVPUOPI.mtl_log_interface_err(
679: cr.organization_id,
680: user_id,
681: login_id,
682: prog_appid,
697: -- validate POSTPROCESSING_LEAD_TIME
698: if (cr.POSTPROCESSING_LEAD_TIME > 0 or
699: cr.POSTPROCESSING_LEAD_TIME < 0) and
700: cr.PLANNING_MAKE_BUY_CODE = 1 then
701: dumm_status := INVPUOPI.mtl_log_interface_err(
702: cr.organization_id,
703: user_id,
704: login_id,
705: prog_appid,
720: -- validate LEAD_TIME_LOT_SIZE
721: if (cr.LEAD_TIME_LOT_SIZE > 1 or
722: cr.LEAD_TIME_LOT_SIZE < 1) and
723: cr.REPETITIVE_PLANNING_FLAG = 'Y' then
724: dumm_status := INVPUOPI.mtl_log_interface_err(
725: cr.organization_id,
726: user_id,
727: login_id,
728: prog_appid,
746: if (Prof_INV_CTP <> 4 and cr.WIP_SUPPLY_TYPE <> 6 ) and
747: cr.ATP_COMPONENTS_FLAG <> 'N' and
748: cr.PICK_COMPONENTS_FLAG = 'N' and
749: cr.REPLENISH_TO_ORDER_FLAG = 'N' then
750: dumm_status := INVPUOPI.mtl_log_interface_err(
751: cr.organization_id,
752: user_id,
753: login_id,
754: prog_appid,
776: cr.BOM_ITEM_TYPE in (1,2,4, 5)) or
777: (Prof_INV_CTP = 4 and
778: cr.ATP_COMPONENTS_FLAG in ('C','Y') and
779: cr.BOM_ITEM_TYPE = 5)) then
780: dumm_status := INVPUOPI.mtl_log_interface_err(
781: cr.organization_id,
782: user_id,
783: login_id,
784: prog_appid,
799: -- validate REPETITIVE_PLANNING_FLAG
800: if (cr.MRP_PLANNING_CODE = 3 or
801: cr.MRP_PLANNING_CODE = 4) and
802: cr.REPETITIVE_PLANNING_FLAG is null then
803: dumm_status := INVPUOPI.mtl_log_interface_err(
804: cr.organization_id,
805: user_id,
806: login_id,
807: prog_appid,
821:
822: -- validate MTL_TRANSACTIONS_ENABLED_FLAG
823: if cr.MTL_TRANSACTIONS_ENABLED_FLAG = 'Y' and
824: cr.STOCK_ENABLED_FLAG = 'N' then
825: dumm_status := INVPUOPI.mtl_log_interface_err(
826: cr.organization_id,
827: user_id,
828: login_id,
829: prog_appid,
843:
844: -- validate INTERNAL_ORDER_ENABLED_FLAG
845: if cr.INTERNAL_ORDER_ENABLED_FLAG = 'Y' and
846: cr.INTERNAL_ORDER_FLAG = 'N' then
847: dumm_status := INVPUOPI.mtl_log_interface_err(
848: cr.organization_id,
849: user_id,
850: login_id,
851: prog_appid,
866: -- BugFix # 1402975
867: --Validate INTERNAL_ORDER_FLAG and PICK_COMPONENTS_FLAG
868: if cr.INTERNAL_ORDER_FLAG = 'Y' and
869: cr.PICK_COMPONENTS_FLAG = 'Y' then
870: dumm_status := INVPUOPI.mtl_log_interface_err(
871: cr.organization_id,
872: user_id,
873: login_id,
874: prog_appid,
889:
890: /*NP 20AUG96 new validation for 10.7 columns*/
891: -- validate CONTAINER_ITEM_FLAG
892: if cr.CONTAINER_ITEM_FLAG not in ('Y', 'N') then
893: dumm_status := INVPUOPI.mtl_log_interface_err(
894: cr.organization_id,
895: user_id,
896: login_id,
897: prog_appid,
910: end if;
911:
912: -- validate VEHICLE_ITEM_FLAG
913: if cr.VEHICLE_ITEM_FLAG not in ('Y', 'N') then
914: dumm_status := INVPUOPI.mtl_log_interface_err(
915: cr.organization_id,
916: user_id,
917: login_id,
918: prog_appid,
932:
933: -- validate MINIMUM_FILL_PERCENTAGE
934: if (cr.MINIMUM_FILL_PERCENT < 0
935: OR cr.MINIMUM_FILL_PERCENT > 100) then
936: dumm_status := INVPUOPI.mtl_log_interface_err(
937: cr.organization_id,
938: user_id,
939: login_id,
940: prog_appid,
954:
955: -- validate CONTAINER_ITEM_CODE
956: if (cr.CONTAINER_ITEM_FLAG = 'N'
957: AND cr.CONTAINER_TYPE_CODE IS NOT NULL ) then
958: dumm_status := INVPUOPI.mtl_log_interface_err(
959: cr.organization_id,
960: user_id,
961: login_id,
962: prog_appid,
977: -- validate MAXIMUM_LOAD_WEIGHT
978: if (cr.CONTAINER_ITEM_FLAG = 'N'
979: AND cr.VEHICLE_ITEM_FLAG = 'N'
980: AND cr.MAXIMUM_LOAD_WEIGHT IS NOT NULL ) then
981: dumm_status := INVPUOPI.mtl_log_interface_err(
982: cr.organization_id,
983: user_id,
984: login_id,
985: prog_appid,
1000: -- validate MINIMUM_FILL_PERCENT
1001: if (cr.CONTAINER_ITEM_FLAG = 'N'
1002: AND cr.VEHICLE_ITEM_FLAG = 'N'
1003: AND cr.MINIMUM_FILL_PERCENT IS NOT NULL ) then
1004: dumm_status := INVPUOPI.mtl_log_interface_err(
1005: cr.organization_id,
1006: user_id,
1007: login_id,
1008: prog_appid,
1023: -- validate INTERNAL_VOLUME
1024: if (cr.CONTAINER_ITEM_FLAG = 'N'
1025: AND cr.VEHICLE_ITEM_FLAG = 'N'
1026: AND cr.INTERNAL_VOLUME IS NOT NULL ) then
1027: dumm_status := INVPUOPI.mtl_log_interface_err(
1028: cr.organization_id,
1029: user_id,
1030: login_id,
1031: prog_appid,
1045:
1046: -- validate RELEASE_TIME_FENCE_CODE (RELEASE_TIME_FENCE_CODE)
1047: -- Added value 7 to existing values of Release Time Fence Code - R12 - Anmurali
1048: if (cr.RELEASE_TIME_FENCE_CODE not in (1,2,3,4,5,6,7)) then
1049: dumm_status := INVPUOPI.mtl_log_interface_err(
1050: cr.organization_id,
1051: user_id,
1052: login_id,
1053: prog_appid,
1067:
1068: -- validate RELEASE_TIME_FENCE_DAYS
1069: if cr.RELEASE_TIME_FENCE_CODE = 4 and
1070: nvl(cr.RELEASE_TIME_FENCE_DAYS,-9) < 0 then
1071: dumm_status := INVPUOPI.mtl_log_interface_err(
1072: cr.organization_id,
1073: user_id,
1074: login_id,
1075: prog_appid,
1094: */
1095: -- validate AUTO_REL_TIME_FENCE_DAYS
1096: if (cr.RELEASE_TIME_FENCE_CODE <> 4 OR cr.RELEASE_TIME_FENCE_CODE IS NULL) and
1097: cr.RELEASE_TIME_FENCE_DAYS is NOT NULL then
1098: dumm_status := INVPUOPI.mtl_log_interface_err(
1099: cr.organization_id,
1100: user_id,
1101: login_id,
1102: prog_appid,
1117:
1118: -- validate PICK_COMPONENTS_FLAG
1119: if cr.SHIP_MODEL_COMPLETE_FLAG = 'Y' and
1120: cr.PICK_COMPONENTS_FLAG = 'N' then
1121: dumm_status := INVPUOPI.mtl_log_interface_err(
1122: cr.organization_id,
1123: user_id,
1124: login_id,
1125: prog_appid,
1140: /** Bug 1649399 added validation for shrinkage rate */
1141:
1142: -- validate SHRINKAGE_RATE
1143: if (cr.SHRINKAGE_RATE >= 1) or (cr.SHRINKAGE_RATE < 0) then
1144: dumm_status := INVPUOPI.mtl_log_interface_err(
1145: cr.organization_id,
1146: user_id,
1147: login_id,
1148: prog_appid,
1202: exception
1203: when LOGGING_ERR then
1204: return(dumm_status);
1205: when VALIDATE_ERR then
1206: dumm_status := INVPUOPI.mtl_log_interface_err(
1207: l_org_id,
1208: user_id,
1209: login_id,
1210: prog_appid,