[Home] [Help]
474: IF v_rec.component_item_id = p_inventory_item_id THEN
475: Raise Process_next;
476: END IF;
477: --
478: IF csi_item_instance_vld_pvt.Is_Trackable
479: (p_inv_item_id => v_rec.component_item_id,
480: p_org_id => v_rec.master_organization_id,
481: p_stack_err_msg => FALSE) THEN
482: l_exists_flag := 'Y';
2738: END;
2739: END IF;
2740: --end of code for bug 4754569--
2741:
2742: IF csi_item_instance_vld_pvt.Check_for_eam_item
2743: (p_inventory_item_id => l_inventory_item_id,
2744: p_organization_id => l_vld_organization_id)--bug 4754569
2745: THEN
2746: l_maint_organization_id := NULL;
2913: NULL;
2914: END;
2915: END IF;
2916:
2917: END IF; --
2919: END IF;
2920: END LOOP;
2921: END Resolve_id_columns;
4687: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
4688: END IF;
4689:
4690: -- Start API body
4691: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4692: ( p_instance_rec.INVENTORY_ITEM_ID ,
4693: ' p_instance_rec.INVENTORY_ITEM_ID ',
4694: l_api_name
4695: );
4694: l_api_name
4695: );
4696: /* Code commented by sk for bug 2198575
4697:
4698: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4699: ( p_instance_rec.INV_MASTER_ORGANIZATION_ID ,
4700: ' p_instance_rec.INV_MASTER_ORGANIZATION_ID ',
4701: l_api_name
4702: );
4700: ' p_instance_rec.INV_MASTER_ORGANIZATION_ID ',
4701: l_api_name
4702: );
4703: */
4704: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4705: ( p_instance_rec.QUANTITY ,
4706: ' p_instance_rec.QUANTITY ',
4707: l_api_name
4708: );
4706: ' p_instance_rec.QUANTITY ',
4707: l_api_name
4708: );
4709:
4710: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Char
4711: ( p_instance_rec.UNIT_OF_MEASURE ,
4712: ' p_instance_rec.UNIT_OF_MEASURE ',
4713: l_api_name
4714: );
4760: (p_instance_rec.vld_organization_id = FND_API.G_MISS_NUM)) AND
4761: ((p_instance_rec.inv_master_organization_id IS NOT NULL) AND
4762: (p_instance_rec.inv_master_organization_id <> FND_API.G_MISS_NUM))
4763: THEN
4764: IF NOT (csi_Item_Instance_Vld_Pvt.Is_Valid_Master_Org
4765: (p_instance_rec.inv_master_organization_id)) THEN
4766: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_MAST_ORG');
4767: FND_MSG_PUB.Add;
4768: RAISE FND_API.G_EXC_ERROR;
4800: -- If the instance_id passed is null then generate from sequence
4801: -- and check if the value exists . If exists then generate
4802: -- again from the sequence till we get a value that does not exist
4803: WHILE l_process_flag LOOP
4804: p_instance_rec.INSTANCE_ID := CSI_Item_Instance_vld_pvt.get_instance_id;
4805: IF NOT(CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4806: FALSE )) THEN
4807: l_process_flag := FALSE;
4808: END IF;
4801: -- and check if the value exists . If exists then generate
4802: -- again from the sequence till we get a value that does not exist
4803: WHILE l_process_flag LOOP
4804: p_instance_rec.INSTANCE_ID := CSI_Item_Instance_vld_pvt.get_instance_id;
4805: IF NOT(CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4806: FALSE )) THEN
4807: l_process_flag := FALSE;
4808: END IF;
4809: END LOOP;
4808: END IF;
4809: END LOOP;
4810: ELSE
4811: -- Validate the instance_id if exist then raise CSI_API_INVALID_PRIMARY_KEY error
4812: IF CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4813: TRUE ) THEN
4814: RAISE FND_API.G_EXC_ERROR;
4815: END IF;
4816: END IF;
4872: END IF;
4873: -- END IF;
4874: -- End addition of code for eam integration
4875:
4876: IF csi_item_Instance_Vld_pvt.Is_InstanceNum_Valid(p_instance_rec.instance_id,
4877: p_instance_rec.instance_number,
4878: 'CREATE')
4879: THEN
4880: IF p_instance_rec.instance_number IS NULL OR
5012: END IF;
5013: -- End addition of code to fix bug 5506231
5014:
5015: -- Checking for Trackable Flag
5016: IF NOT csi_item_instance_vld_pvt.Is_Trackable
5017: (p_instance_rec.inventory_item_id,
5018: p_instance_rec.inv_master_organization_id,
5019: l_trackable_flag
5020: ) THEN
5023: --
5024: -- Added following code for eam integration
5025: -- Check if the item is a rebuildable or an asset group
5026:
5027: IF csi_item_instance_vld_pvt.Check_for_eam_item
5028: (p_inventory_item_id => p_instance_rec.inventory_item_id,
5029: p_organization_id => p_instance_rec.vld_organization_id,
5030: p_eam_item_type => l_eam_item_type)
5031: THEN
5106: END IF;
5107: -- End addition for eam
5108:
5109: -- Validation for the Revision
5110: csi_item_instance_vld_pvt.Validate_Revision
5111: (
5112: p_inv_item_id => p_instance_rec.inventory_item_id ,
5113: p_inv_org_id => p_instance_rec.vld_organization_id,
5114: p_creation_complete_flag => p_instance_rec.creation_complete_flag,
5120: IF l_return_value = FALSE THEN
5121: RAISE fnd_api.g_exc_error;
5122: END IF;
5123: -- Validation for the Lot Number
5124: csi_Item_Instance_Vld_pvt.Validate_Lot_Number
5125: (
5126: p_inv_org_id => p_instance_rec.vld_organization_id,
5127: p_inv_item_id => p_instance_rec.inventory_item_id ,
5128: p_lot_number => p_instance_rec.lot_number,
5141: IF ((p_instance_rec.lot_number <> FND_API.G_MISS_CHAR) AND
5142: (p_instance_rec.lot_number IS NOT NULL))
5143: THEN
5144: csi_gen_utility_pvt.put_line('Calling Create_Lot routine...');
5145: csi_item_instance_vld_pvt.Create_Lot
5146: (
5147: p_inv_org_id => p_instance_rec.vld_organization_id,
5148: p_inv_item_id => p_instance_rec.inventory_item_id,
5149: p_lot_number => p_instance_rec.lot_number,
5161: (p_instance_rec.serial_number IS NOT NULL)) /* AND
5162: (nvl(p_instance_rec.mfg_serial_number_flag,'N') <> 'Y') ) */
5163: THEN
5164: csi_gen_utility_pvt.put_line('Calling Create_Serial...');
5165: csi_item_instance_vld_pvt.Create_Serial
5166: (
5167: p_inv_org_id => p_instance_rec.vld_organization_id,
5168: p_inv_item_id => p_instance_rec.inventory_item_id,
5169: p_serial_number => p_instance_rec.serial_number,
5224: l_check_instance_rec.serial_number := p_instance_rec.serial_number;
5225: l_check_instance_rec.lot_number := p_instance_rec.lot_number;
5226: l_check_instance_rec.last_txn_line_detail_id := p_instance_rec.last_txn_line_detail_id;
5227: csi_gen_utility_pvt.put_line('Calling Check_Prior_Txn');
5228: csi_Item_Instance_Vld_pvt.Check_Prior_Txn
5229: (
5230: p_instance_rec => l_check_instance_rec
5231: ,p_txn_rec => p_txn_rec
5232: ,p_prior_txn_id => l_prior_txn_id
5238: END IF;
5239: END IF;
5240: -- Validation for the Serial Number
5241: csi_gen_utility_pvt.put_line('Calling Validate_Serial_Number...');
5242: csi_Item_Instance_Vld_pvt.Validate_Serial_Number
5243: (
5244: p_inv_org_id => p_instance_rec.vld_organization_id,
5245: p_inv_item_id => p_instance_rec.inventory_item_id ,
5246: p_serial_number => p_instance_rec.serial_number,
5257: END IF;
5258: -- Validation for the Unit of Measure
5259: -- validate/convert only if the uom is not a primary uom
5260: IF p_instance_rec.unit_of_measure <> l_uom_code THEN
5261: csi_item_instance_vld_pvt.Is_Valid_Uom
5262: (
5263: --p_inv_org_id => p_instance_rec.inv_master_organization_id, --bug#13568912
5264: p_inv_org_id => p_instance_rec.vld_organization_id, --bug#13568912
5265: p_inv_item_id => p_instance_rec.inventory_item_id ,
5314: p_ins_count_rec.location_count := p_ins_count_rec.location_count + 1;
5315: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
5316: p_instance_rec.location_type_code;
5317: p_location_tbl(p_ins_count_rec.location_count).location_id := p_instance_rec.location_id;
5318: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
5319: (p_location_source_table => p_instance_rec.location_type_code
5320: ,p_location_id => p_instance_rec.location_id) THEN
5321: p_location_tbl(p_ins_count_rec.location_count).valid_flag := 'Y';
5322: ELSE
5324: RAISE fnd_api.g_exc_error;
5325: END IF;
5326: END IF;
5327: -- Validate Related Parameters
5328: IF NOT csi_item_instance_vld_pvt.Validate_Related_Loc_Params
5329: (
5330: p_location_source_table => p_instance_rec.location_type_code,
5331: p_location_id => p_instance_rec.location_id,
5332: p_organization_id => p_instance_rec.inv_organization_id,
5344: END IF; -- Location ID Valid
5345: END IF; -- Location Type code valid
5346: --
5347: -- Validation for the Quantity
5348: IF NOT csi_Item_Instance_Vld_pvt.Is_Quantity_Valid(
5349: p_instance_id => p_instance_rec.instance_id,
5350: p_inv_organization_id => p_instance_rec.vld_organization_id,
5351: p_quantity => p_instance_rec.quantity ,
5352: p_serial_control_code => l_serial_control,
5462: csi_gen_utility_pvt.put_line('Serial Tagging Control - '||l_serial_tagged);
5463:
5464: IF l_serial_tagged <> 2 THEN
5465: csi_gen_utility_pvt.put_line('l_serial_tagged is not 2');
5466: IF NOT csi_item_instance_vld_pvt.Validate_Uniqueness
5467: (p_instance_rec => p_instance_rec,
5468: p_party_rec => l_party_owner_rec,
5469: p_srl_control_code => l_serial_control,
5470: p_csi_txn_type_id => p_txn_rec.transaction_type_id) THEN
5481: IF (p_instance_rec.active_end_date = FND_API.G_MISS_DATE) THEN
5482: p_instance_rec.active_end_date := NULL;
5483: END IF;
5484:
5485: IF NOT (csi_item_instance_vld_pvt.Is_StartDate_Valid
5486: (p_instance_rec.active_start_date,
5487: p_instance_rec.active_end_date
5488: )) THEN
5489: RAISE FND_API.G_EXC_ERROR;
5499: RAISE FND_API.G_EXC_ERROR;
5500: END IF;
5501:
5502: -- validating the effective active start date
5503: IF NOT (csi_item_instance_vld_pvt.Is_EndDate_Valid
5504: (p_instance_rec.active_start_date,
5505: p_instance_rec.active_end_date
5506: )) THEN
5507: RAISE FND_API.G_EXC_ERROR;
5534: IF l_exists_flag = 'N' THEN
5535: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
5536: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.instance_condition_id;
5537: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'INS_CONDITION';
5538: csi_item_instance_vld_pvt.Is_Valid_Condition
5539: (
5540: p_instance_condition_id => p_instance_rec.instance_condition_id,
5541: p_creation_complete_flag => p_instance_rec.creation_complete_flag,
5542: l_return_value => l_return_value
5667: IF l_exists_flag <> 'Y' THEN
5668: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
5669: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.system_id;
5670: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'SYSTEM';
5671: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_System_id(
5672: p_instance_rec.system_id) THEN
5673: p_generic_id_tbl(p_ins_count_rec.generic_count).valid_flag := 'N';
5674: RAISE fnd_api.g_exc_error;
5675: ELSE
5705: IF l_exists_flag <> 'Y' THEN
5706: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5707: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_TYPE';
5708: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_type_code;
5709: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_Instance_Type(
5710: p_instance_rec.instance_type_code) THEN
5711: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5712: RAISE fnd_api.g_exc_error;
5713: ELSE
5742: IF l_exists_flag <> 'Y' THEN
5743: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5744: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_USAGE';
5745: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_usage_code;
5746: IF NOT csi_Item_Instance_Vld_pvt.Valid_Inst_Usage_Code(
5747: p_instance_rec.instance_usage_code) THEN
5748: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5749: RAISE fnd_api.g_exc_error;
5750: ELSE
5781: IF l_exists_flag <> 'Y' THEN
5782: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5783: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'OPERATIONAL_STATUS';
5784: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.operational_status_code;
5785: IF NOT csi_Item_Instance_Vld_pvt.Valid_operational_status(
5786: p_instance_rec.operational_status_code) THEN
5787: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5788: RAISE fnd_api.g_exc_error;
5789: ELSE
5839: (p_instance_rec.purchase_currency_code <> FND_API.G_MISS_CHAR)
5840: )
5841: THEN
5842: p_instance_rec.purchase_currency_code := UPPER(p_instance_rec.purchase_currency_code);
5843: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5844: (p_currency_code => p_instance_rec.purchase_currency_code)
5845: THEN
5846: RAISE fnd_api.g_exc_error;
5847: END IF;
5851: (p_instance_rec.payables_currency_code <> FND_API.G_MISS_CHAR)
5852: )
5853: THEN
5854: p_instance_rec.payables_currency_code := UPPER(p_instance_rec.payables_currency_code);
5855: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5856: (p_currency_code => p_instance_rec.payables_currency_code)
5857: THEN
5858: RAISE fnd_api.g_exc_error;
5859: END IF;
5863: (p_instance_rec.sales_currency_code <> FND_API.G_MISS_CHAR)
5864: )
5865: THEN
5866: p_instance_rec.sales_currency_code := UPPER(p_instance_rec.sales_currency_code);
5867: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5868: (p_currency_code => p_instance_rec.sales_currency_code)
5869: THEN
5870: RAISE fnd_api.g_exc_error;
5871: END IF;
5939: IF ((p_instance_rec.instance_id IS NOT NULL)
5940: AND (p_instance_rec.inventory_item_id IS NOT NULL)
5941: AND (p_instance_rec.inv_master_organization_id IS NOT NULL)
5942: -- AND (((l_serial_control IN (2,5,6))
5943: AND (((csi_Item_Instance_Vld_pvt.Is_treated_serialized
5944: ( p_serial_control_code => l_serial_control
5945: ,p_location_type_code => p_instance_rec.location_type_code
5946: ,p_transaction_type_id => p_txn_rec.transaction_type_id
5947: )) --Added by sk on 09/13/01
5947: )) --Added by sk on 09/13/01
5948: AND ((p_instance_rec.serial_number IS NOT NULL)
5949: AND (p_instance_rec.serial_number <> FND_API.G_MISS_CHAR)))
5950: -- OR (l_serial_control NOT IN (2,5,6)))
5951: OR ( NOT (csi_Item_Instance_Vld_pvt.Is_treated_serialized
5952: ( p_serial_control_code => l_serial_control
5953: ,p_location_type_code => p_instance_rec.location_type_code
5954: ,p_transaction_type_id => p_txn_rec.transaction_type_id
5955: )) ) ) --Added by sk on 09/13/01
6021: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
6022: p_instance_rec.install_location_type_code;
6023: p_location_tbl(p_ins_count_rec.location_count).location_id :=
6024: p_instance_rec.install_location_id;
6025: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
6026: (
6027: p_location_source_table => p_instance_rec.install_location_type_code
6028: ,p_location_id => p_instance_rec.install_location_id
6029: ) THEN
6348: END IF;
6349:
6350: -- Get a unique history item instance id from the sequence
6351: l_csi_item_instance_h_id :=
6352: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
6353:
6354: -- Create a row in csi_item_instances_history table
6355: CSI_ITEM_INSTANCES_H_PKG.Insert_Row
6356: ( px_INSTANCE_HISTORY_ID => l_csi_item_instance_h_id
6968: RAISE FND_API.G_EXC_ERROR;
6969: END;
6970:
6971:
6972: csi_item_instance_vld_pvt.get_valid_acct_class(p_instance_id => p_instance_id,
6973: p_curr_acct_class_code => NULL, --l_accounting_class,
6974: p_loc_type_code => l_loc_type_code,
6975: x_acct_class_code => l_acct_class_code
6976: );
7544: -- ADDED FOR BUG 2957236
7545: IF p_instance_rec.instance_status_id IS NOT NULL AND
7546: p_instance_rec.instance_status_id <> fnd_api.g_miss_num
7547: THEN
7548: IF csi_item_instance_vld_pvt.termination_status
7549: ( p_instance_status_id => p_instance_rec.instance_status_id )
7550: THEN
7551: l_termination_status := TRUE;
7552: l_config_inst_hdr_id := null;
7680: l_curr_instance_rec.install_date IS NULL THEN
7681: l_install_date := p_instance_rec.install_date;
7682: END IF;
7683: -- Start code addition for eam integration
7684: IF csi_item_instance_vld_pvt.Check_for_eam_item
7685: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
7686: p_organization_id => l_curr_instance_rec.last_vld_organization_id)
7687: THEN
7688: l_eam_item := TRUE;
7707: --
7708: -- validate instance status id
7709: IF NVL(l_instance_status_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
7710: THEN
7711: csi_item_instance_vld_pvt.is_valid_status(
7712: p_instance_status_id => l_instance_status_id,
7713: p_creation_complete_flag => l_creation_flag,
7714: l_return_value => l_valid);
7715: IF NOT(l_valid)
7721: IF l_instance_status_id IS NOT NULL AND
7722: l_instance_status_id <> FND_API.G_MISS_NUM AND
7723: l_instance_status_id <> l_curr_instance_rec.INSTANCE_STATUS_ID
7724: THEN
7725: IF NOT csi_item_instance_vld_pvt.is_status_updateable
7726: (p_instance_status => l_instance_status_id
7727: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
7728: THEN
7729: RAISE fnd_api.g_exc_error;
8007: END IF;
8008: --
8009: -- Get a unique history item instance id from the sequence
8010: l_csi_item_instance_h_id :=
8011: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
8012:
8013: SELECT MOD(p_instance_rec.object_version_number,l_full_dump_frequency)
8014: INTO l_mod_value
8015: FROM dual;
12435: -- Begin Add Code for Siebel Genesis Project
12436: l_mod_curr_instance_rec.SOURCE_CODE := l_curr_instance_rec.SOURCE_CODE;
12437: -- End Add Code for Siebel Genesis Project
12438:
12439: csi_item_instance_vld_pvt.get_merge_rec (p_instance_rec => p_instance_rec,
12440: l_curr_instance_rec => l_mod_curr_instance_rec,
12441: l_get_instance_rec => l_get_instance_rec
12442: );
12443: l_wip_loc_chgd := FALSE;
12489: RAISE FND_API.G_EXC_ERROR;
12490: END IF;
12491:
12492: -- Check if all the required parameters are passed
12493: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
12494: ( p_instance_rec.INSTANCE_ID ,
12495: ' p_instance_rec.INSTANCE_ID ',
12496: l_api_name );
12497:
12495: ' p_instance_rec.INSTANCE_ID ',
12496: l_api_name );
12497:
12498: -- Check if the instance id is valid
12499: IF NOT(CSI_Item_Instance_vld_pvt.Is_InstanceID_Valid
12500: (p_instance_rec.INSTANCE_ID,
12501: TRUE )) THEN
12502: RAISE FND_API.G_EXC_ERROR;
12503: END IF;
12518: End;
12519: --
12520: -- Proceed with Forward SYnch check if the sequence does not return any value.
12521: IF l_current_val = -9999999 THEN
12522: IF NOT(CSI_Item_Instance_vld_pvt.Is_Forward_Synch
12523: (p_instance_id => p_instance_rec.INSTANCE_ID,
12524: p_stop_all_txn => fnd_api.g_true,
12525: p_mtl_txn_id => fnd_api.g_miss_num)) THEN
12526: FND_MESSAGE.Set_Name('CSI', 'CSI_API_NO_FORWARD_SYNCH');
12528: FND_MSG_PUB.ADD;
12529: RAISE FND_API.G_EXC_ERROR;
12530: END IF;
12531: ELSE -- Even if seq exists, stop later txns
12532: IF NOT(CSI_Item_Instance_vld_pvt.Is_Forward_Synch
12533: (p_instance_id => p_instance_rec.INSTANCE_ID,
12534: p_stop_all_txn => fnd_api.g_false, -- Stop only later txns
12535: p_mtl_txn_id => p_txn_rec.inv_material_transaction_id)) THEN
12536: FND_MESSAGE.Set_Name('CSI', 'CSI_API_NO_FORWARD_SYNCH');
12558: IF ((p_instance_rec.instance_number IS NULL) OR
12559: (p_instance_rec.instance_number <> l_curr_instance_rec.instance_number))
12560: THEN
12561: -- Added for eam integration
12562: IF NOT csi_item_Instance_Vld_pvt.Is_InstanceNum_Valid(p_instance_rec.instance_id,
12563: p_instance_rec.instance_number,
12564: 'UPDATE')
12565: THEN
12566: RAISE fnd_api.g_exc_error;
12643: /*ELSE -- Commented for bug 6965008
12644: -- Modified else block for the bug 6875664, base bug 6531599
12645: IF p_txn_rec.transaction_type_id = 1 THEN
12646: l_mtl_txn_tbl.DELETE;
12647: CSI_Item_Instance_vld_pvt.get_mtl_txn_for_srl(
12648: p_inventory_item_id => p_instance_rec.inventory_item_id,
12649: p_serial_number => p_instance_rec.serial_number,
12650: x_mtl_txn_tbl => l_mtl_txn_tbl);
12651: IF NVL(l_mtl_txn_tbl.Count,0) > 0 THEN
12805: END IF;
12806:
12807: -- validating the effective active end date
12808: IF ( p_instance_rec.ACTIVE_END_DATE <> FND_API.G_MISS_DATE) THEN
12809: IF NOT(CSI_Item_Instance_vld_pvt.EndDate_Valid
12810: (l_curr_instance_rec.ACTIVE_START_DATE,
12811: p_instance_rec.ACTIVE_END_DATE ,
12812: p_instance_rec.INSTANCE_ID,
12813: p_txn_rec.transaction_id)) THEN -- Bug 9081875
12824: IF ( (p_instance_rec.instance_status_id <> FND_API.G_MISS_NUM)
12825: AND (p_instance_rec.instance_status_id IS NOT NULL)
12826: AND (p_instance_rec.instance_status_id <>
12827: l_curr_instance_rec.instance_status_id)
12828: AND (CSI_Item_Instance_vld_pvt.val_inst_ter_flag
12829: (p_instance_rec.instance_status_id)))
12830: THEN
12831: IF ((p_instance_rec.ACTIVE_END_DATE IS NULL) OR
12832: (p_instance_rec.ACTIVE_END_DATE = FND_API.G_MISS_DATE)) THEN
12833: FND_MESSAGE.Set_Name('CSI', 'CSI_API_TER_DATE');
12834: FND_MSG_PUB.ADD;
12835: RAISE FND_API.G_EXC_ERROR;
12836: ELSIF p_instance_rec.ACTIVE_END_DATE < sysdate THEN
12837: IF NOT(CSI_Item_Instance_vld_pvt.EndDate_Valid
12838: (l_curr_instance_rec.ACTIVE_START_DATE,
12839: p_instance_rec.ACTIVE_END_DATE ,
12840: p_instance_rec.INSTANCE_ID,
12841: p_txn_rec.transaction_id)) THEN -- Bug 9081875
12955:
12956: -- Added following code for eam integration
12957: -- Check if the item is a rebuildable or an asset group
12958:
12959: IF csi_item_instance_vld_pvt.Check_for_eam_item
12960: (p_inventory_item_id => p_instance_rec.inventory_item_id,
12961: p_organization_id => p_instance_rec.vld_organization_id,
12962: p_eam_item_type => l_eam_item_type)
12963: THEN
13062:
13063: -- Validate System
13064: IF l_get_instance_rec.system_id IS NOT NULL AND
13065: l_get_instance_rec.system_id <> FND_API.G_MISS_NUM THEN
13066: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_System_id(
13067: l_get_instance_rec.system_id) THEN
13068: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_SYSTEM_ID');
13069: FND_MESSAGE.SET_TOKEN('SYSTEM_ID',l_get_instance_rec.system_id);
13070: FND_MSG_PUB.Add;
13081: l_get_instance_rec.lot_number <> FND_API.G_MISS_CHAR
13082: THEN
13083: csi_gen_utility_pvt.put_line('Calling Validate_Lot_Number..');
13084: -- Added for Bug# 4011408
13085: csi_Item_Instance_Vld_pvt.Validate_Lot_Number
13086: (
13087: p_inv_org_id => p_instance_rec.vld_organization_id,
13088: p_inv_item_id => l_get_instance_rec.inventory_item_id ,
13089: p_lot_number => l_get_instance_rec.lot_number,
13100: --
13101: -- Validates the lot uniqueness and creates lot numbers in MLNs for manually created Instances
13102: -- Bug# 4011408
13103: csi_gen_utility_pvt.put_line('Calling Create_Lot routine in Update_Item_Instance API...');
13104: csi_item_instance_vld_pvt.Create_Lot
13105: (
13106: p_inv_org_id => p_instance_rec.vld_organization_id,
13107: p_inv_item_id => l_get_instance_rec.inventory_item_id,
13108: p_lot_number => l_get_instance_rec.lot_number,
13139: IF p_instance_rec.serial_number IS NOT NULL AND
13140: p_instance_rec.serial_number <> fnd_api.g_miss_char AND
13141: p_instance_rec.serial_number <> nvl(l_curr_instance_rec.serial_number,fnd_api.g_miss_char)
13142: THEN
13143: csi_gen_utility_pvt.put_line('before csi_item_instance_vld_pvt.validate_serial_for_upd');
13144: csi_item_instance_vld_pvt.validate_serial_for_upd(
13145: p_instance_rec => l_get_instance_rec,
13146: p_txn_rec => p_txn_rec,
13147: p_old_serial_number => l_curr_instance_rec.serial_number,
13140: p_instance_rec.serial_number <> fnd_api.g_miss_char AND
13141: p_instance_rec.serial_number <> nvl(l_curr_instance_rec.serial_number,fnd_api.g_miss_char)
13142: THEN
13143: csi_gen_utility_pvt.put_line('before csi_item_instance_vld_pvt.validate_serial_for_upd');
13144: csi_item_instance_vld_pvt.validate_serial_for_upd(
13145: p_instance_rec => l_get_instance_rec,
13146: p_txn_rec => p_txn_rec,
13147: p_old_serial_number => l_curr_instance_rec.serial_number,
13148: x_return_status => l_return_status);
13170: IF l_get_instance_rec.serial_number IS NOT NULL AND
13171: l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR
13172: THEN
13173: csi_gen_utility_pvt.put_line('Calling Create_Serial...');
13174: csi_item_instance_vld_pvt.Create_Serial (
13175: p_inv_org_id => p_instance_rec.vld_organization_id,
13176: p_inv_item_id => l_get_instance_rec.inventory_item_id,
13177: p_serial_number => l_get_instance_rec.serial_number,
13178: p_mfg_srl_num_flag => l_get_instance_rec.mfg_serial_number_flag,
13246: l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR
13247: THEN
13248: IF nvl(l_get_instance_rec.instance_usage_code,'$#$') <> 'IN_RELATIONSHIP' THEN
13249: csi_gen_utility_pvt.put_line('Calling Validate_Srl_Num_for_Inst_Upd');
13250: csi_Item_Instance_Vld_pvt.Validate_Srl_Num_for_Inst_Upd(
13251: p_inv_org_id => p_instance_rec.vld_organization_id,
13252: p_inv_item_id => l_get_instance_rec.inventory_item_id , -- l_get
13253: p_serial_number => l_get_instance_rec.serial_number,
13254: p_mfg_serial_number_flag => l_get_instance_rec.mfg_serial_number_flag, -- l_get
13261: IF l_return_value = FALSE THEN
13262: RAISE fnd_api.g_exc_error;
13263: END IF;
13264: ELSE -- If this is a component then just validate serial uniqueness
13265: csi_Item_Instance_Vld_pvt.Validate_ser_uniqueness
13266: ( p_inv_org_id => p_instance_rec.vld_organization_id
13267: ,p_inv_item_id => l_get_instance_rec.inventory_item_id
13268: ,p_serial_number => l_get_instance_rec.serial_number
13269: ,p_instance_id => p_instance_rec.instance_id
13287: l_check_instance_rec.serial_number := l_get_instance_rec.serial_number;
13288: l_check_instance_rec.lot_number := l_get_instance_rec.lot_number;
13289: l_check_instance_rec.last_txn_line_detail_id := p_instance_rec.last_txn_line_detail_id;
13290: csi_gen_utility_pvt.put_line('Calling Check_Prior_Txn');
13291: csi_Item_Instance_Vld_pvt.Check_Prior_Txn
13292: (
13293: p_instance_rec => l_check_instance_rec
13294: ,p_txn_rec => p_txn_rec
13295: ,p_prior_txn_id => l_prior_txn_id
13306: IF l_get_instance_rec.inventory_revision IS NOT NULL AND
13307: l_get_instance_rec.inventory_revision <> FND_API.G_MISS_CHAR
13308: THEN
13309: csi_gen_utility_pvt.put_line('Calling Update_Revision');
13310: csi_item_instance_vld_pvt.Update_Revision
13311: (
13312: p_inv_item_id => l_get_instance_rec.inventory_item_id ,
13313: p_inv_org_id => p_instance_rec.vld_organization_id,
13314: p_revision => l_get_instance_rec.inventory_revision,
13324: --quantity validation
13325: IF ((p_instance_rec.quantity <> FND_API.G_MISS_NUM ) AND
13326: (p_instance_rec.quantity IS NOT NULL ))THEN
13327: IF p_instance_rec.quantity <> l_curr_instance_rec.quantity THEN
13328: IF NOT csi_Item_Instance_Vld_pvt.Is_Quantity_Valid(
13329: p_instance_id => p_instance_rec.instance_id,
13330: p_inv_organization_id => p_instance_rec.vld_organization_id,
13331: p_quantity => l_get_instance_rec.quantity ,
13332: p_serial_control_code => l_serial_control,
13342: END IF;
13343: IF nvl(l_get_instance_rec.instance_usage_code,'$#$') <> 'IN_RELATIONSHIP' THEN
13344: IF p_instance_rec.vld_organization_id <> l_cur_instance_rec.last_vld_organization_id
13345: THEN
13346: csi_item_instance_vld_pvt.validate_org_dependent_params
13347: ( p_instance_rec => l_get_instance_rec,
13348: p_txn_rec => p_txn_rec,
13349: l_return_value => l_return_value
13350: );
13362: IF ((p_instance_rec.unit_of_measure <> FND_API.G_MISS_CHAR) AND
13363: (p_instance_rec.unit_of_measure IS NOT NULL)) THEN
13364: IF ((p_instance_rec.unit_of_measure <> l_curr_instance_rec.unit_of_measure)
13365: AND (p_instance_rec.unit_of_measure <> l_uom_code)) THEN
13366: csi_item_instance_vld_pvt.Is_Valid_Uom
13367: (
13368: p_inv_org_id => l_get_instance_rec.inv_master_organization_id, -- srramakr
13369: p_inv_item_id => l_get_instance_rec.inventory_item_id , --l_get
13370: p_uom_code => p_instance_rec.unit_of_measure,
13381: --validation for accounting classification_code if
13382: --p_instance_rec.accounting_class_code is NULL OR <> FND_API.G_MISS_CHAR
13383: IF ((p_instance_rec.accounting_class_code IS NULL) OR
13384: (p_instance_rec.accounting_class_code <> FND_API.G_MISS_CHAR)) THEN
13385: csi_item_instance_vld_pvt.get_valid_acct_class
13386: ( p_instance_id => p_instance_rec.instance_id
13387: ,p_curr_acct_class_code => l_get_instance_rec.accounting_class_code
13388: ,p_loc_type_code => l_get_instance_rec.location_type_code
13389: ,x_acct_class_code => l_acct_class_code
13425: -- then the API should assign passed status. If the passed status doesn't have
13426: -- terminated_flag set to 'Y', then by default the status will be updated with an expired status.
13427: IF p_instance_rec.instance_status_id IS NOT NULL AND
13428: p_instance_rec.instance_status_id <> fnd_api.g_miss_num AND
13429: (CSI_Item_Instance_vld_pvt.val_inst_ter_flag
13430: (p_instance_rec.instance_status_id))
13431: THEN
13432: NULL;
13433: ELSE
13462: ELSIF
13463: (p_instance_rec.instance_status_id IS NOT NULL AND
13464: p_instance_rec.instance_status_id <> FND_API.G_MISS_NUM)
13465: THEN
13466: IF (CSI_Item_Instance_vld_pvt.val_inst_ter_flag --added first change
13467: (l_get_instance_rec.instance_status_id))
13468: THEN
13469: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INVALID_STATUS');
13470: FND_MSG_PUB.ADD;
13504: if l_exists_flag = 'N' then
13505: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
13506: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.instance_condition_id;
13507: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'INS_CONDITION';
13508: csi_item_instance_vld_pvt.Is_Valid_Condition
13509: (
13510: p_instance_condition_id => p_instance_rec.instance_condition_id,
13511: p_creation_complete_flag => l_get_instance_rec.creation_complete_flag, -- l_get
13512: l_return_value => l_return_value
13547:
13548: csi_gen_utility_pvt.put_line('Serial Tagging Control - '||l_serial_tagged);
13549: IF l_serial_tagged <> 2 THEN
13550: csi_gen_utility_pvt.put_line('l_serial_tagged is not 2');
13551: IF NOT (csi_item_instance_vld_pvt.Validate_Uniqueness
13552: (p_instance_rec => l_get_instance_rec,
13553: p_party_rec => l_party_owner_rec,
13554: p_srl_control_code => l_serial_control,
13555: p_csi_txn_type_id => p_txn_rec.transaction_type_id))
13587: If l_exists_flag <> 'Y' then
13588: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13589: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_TYPE';
13590: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_type_code;
13591: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_Instance_Type(
13592: p_instance_rec.instance_type_code) THEN
13593:
13594: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13595: RAISE fnd_api.g_exc_error;
13627: If l_exists_flag <> 'Y' then
13628: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13629: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_USAGE';
13630: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_usage_code;
13631: IF NOT csi_Item_Instance_Vld_pvt.Valid_Inst_Usage_Code(
13632: p_instance_rec.instance_usage_code) THEN
13633: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13634: RAISE fnd_api.g_exc_error;
13635: ELSE
13670: IF l_exists_flag <> 'Y' THEN
13671: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13672: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'OPERATIONAL_STATUS';
13673: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.operational_status_code;
13674: IF NOT csi_Item_Instance_Vld_pvt.Valid_operational_status(
13675: p_instance_rec.operational_status_code) THEN
13676: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13677: RAISE fnd_api.g_exc_error;
13678: ELSE
13940: (p_instance_rec.purchase_currency_code <> nvl(l_curr_instance_rec.purchase_currency_code,'$$##$$'))
13941: )
13942: THEN
13943: p_instance_rec.purchase_currency_code := UPPER(p_instance_rec.purchase_currency_code);
13944: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13945: (p_currency_code => p_instance_rec.purchase_currency_code)
13946: THEN
13947: RAISE fnd_api.g_exc_error;
13948: END IF;
13953: (p_instance_rec.payables_currency_code <> nvl(l_curr_instance_rec.payables_currency_code,'$$##$$'))
13954: )
13955: THEN
13956: p_instance_rec.payables_currency_code := UPPER(p_instance_rec.payables_currency_code);
13957: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13958: (p_currency_code => p_instance_rec.payables_currency_code)
13959: THEN
13960: RAISE fnd_api.g_exc_error;
13961: END IF;
13966: (p_instance_rec.sales_currency_code <> nvl(l_curr_instance_rec.sales_currency_code,'$$##$$'))
13967: )
13968: THEN
13969: p_instance_rec.sales_currency_code := UPPER(p_instance_rec.sales_currency_code);
13970: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13971: (p_currency_code => p_instance_rec.sales_currency_code)
13972: THEN
13973: RAISE fnd_api.g_exc_error;
13974: END IF;
14206: )
14207: ) THEN
14208:
14209: --bring has parent logic here
14210: IF csi_Item_Instance_Vld_Pvt.Instance_has_Parent(
14211: p_instance_id => p_instance_rec.instance_id
14212: ) THEN
14213: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INSTANCE_HAS_PARENT');
14214: FND_MSG_PUB.ADD;
14248: p_ins_count_rec.location_count := p_ins_count_rec.location_count + 1;
14249: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
14250: l_get_instance_rec.location_type_code;
14251: p_location_tbl(p_ins_count_rec.location_count).location_id := l_get_instance_rec.location_id;
14252: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
14253: (p_location_source_table => l_get_instance_rec.location_type_code
14254: ,p_location_id => l_get_instance_rec.location_id) THEN
14255: p_location_tbl(p_ins_count_rec.location_count).valid_flag := 'Y';
14256: ELSE
14264: -- When WIP Issued item instance is returned the wip job id must be
14265: -- made NULL, so that the same item instance can be issued to different
14266: -- WIP Job. And teh WIP Job for which it was returned must be maintained in
14267: -- last wip job id
14268: IF NOT csi_item_instance_vld_pvt.Validate_Related_Loc_Params
14269: (
14270: p_location_source_table => l_get_instance_rec.location_type_code,
14271: p_location_id => l_get_instance_rec.location_id,
14272: p_organization_id => l_get_instance_rec.inv_organization_id,
14285: -- p_instance_rec.accounting_class_code = FND_API.G_MISS_CHAR
14286:
14287: IF ( p_instance_rec.accounting_class_code = FND_API.G_MISS_CHAR ) THEN
14288:
14289: csi_item_instance_vld_pvt.get_valid_acct_class
14290: ( p_instance_id => p_instance_rec.instance_id
14291: ,p_curr_acct_class_code => l_get_instance_rec.accounting_class_code
14292: ,p_loc_type_code => l_get_instance_rec.location_type_code
14293: ,x_acct_class_code => l_acct_class_code
14347:
14348: --validating the owner
14349: OPEN party_owner_rec(p_instance_rec.instance_id);
14350: FETCH party_owner_rec INTO l_party_owner_rec;
14351: IF NOT (csi_item_instance_vld_pvt.Validate_Uniqueness
14352: (p_instance_rec => l_get_instance_rec,
14353: p_party_rec => l_party_owner_rec,
14354: p_srl_control_code => l_serial_control,
14355: p_csi_txn_type_id => p_txn_rec.transaction_type_id))
14366: IF l_get_instance_rec.instance_id IS NOT NULL
14367: AND l_get_instance_rec.inventory_item_id IS NOT NULL
14368: AND l_get_instance_rec.inv_master_organization_id IS NOT NULL
14369: -- AND (((l_serial_control IN (2,5,6))
14370: AND (((csi_Item_Instance_Vld_pvt.Is_treated_serialized
14371: ( p_serial_control_code => l_serial_control
14372: ,p_location_type_code => l_get_instance_rec.location_type_code
14373: ,p_transaction_type_id => p_txn_rec.transaction_type_id
14374: )) -- Added by sk on 13/9/01
14373: ,p_transaction_type_id => p_txn_rec.transaction_type_id
14374: )) -- Added by sk on 13/9/01
14375: AND ((l_get_instance_rec.serial_number IS NOT NULL) AND (l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR)))
14376: -- OR (l_serial_control NOT IN (2,5,6)))
14377: OR (NOT (csi_Item_Instance_Vld_pvt.Is_treated_serialized
14378: ( p_serial_control_code => l_serial_control
14379: ,p_location_type_code => l_get_instance_rec.location_type_code
14380: ,p_transaction_type_id => p_txn_rec.transaction_type_id
14381: )) ) )
14425: p_instance_rec.config_inst_rev_num := NULL;
14426: p_instance_rec.config_inst_item_id := NULL;
14427: p_instance_rec.config_valid_status := NULL;
14428: --
14429: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
14430: p_instance_rec.instance_status_id)) THEN
14431: -- Added by sguthiva for bug 2520978
14432: p_instance_rec.instance_status_id:=fnd_profile.value('CSI_SYS_TERM_INST_STATUS_ID');
14433: IF p_instance_rec.instance_status_id IS NULL
14511: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
14512: p_instance_rec.install_location_type_code;
14513: p_location_tbl(p_ins_count_rec.location_count).location_id :=
14514: p_instance_rec.install_location_id;
14515: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
14516: (
14517: p_location_source_table => p_instance_rec.install_location_type_code
14518: ,p_location_id => p_instance_rec.install_location_id
14519: ) THEN
14601: -- validate instance status id
14602: IF NVL(p_instance_rec.INSTANCE_STATUS_ID,fnd_api.g_miss_num) <> fnd_api.g_miss_num
14603: THEN
14604: --debug('Validate instance status id .');
14605: csi_item_instance_vld_pvt.is_valid_status(
14606: p_instance_status_id => p_instance_rec.INSTANCE_STATUS_ID,
14607: p_creation_complete_flag => l_creation_flag,
14608: l_return_value => l_valid);
14609: IF NOT(l_valid)
14615: IF p_instance_rec.INSTANCE_STATUS_ID IS NOT NULL AND
14616: p_instance_rec.INSTANCE_STATUS_ID <> FND_API.G_MISS_NUM AND
14617: p_instance_rec.INSTANCE_STATUS_ID <> l_curr_instance_rec.INSTANCE_STATUS_ID
14618: THEN
14619: IF NOT csi_item_instance_vld_pvt.is_status_updateable
14620: (p_instance_status => p_instance_rec.INSTANCE_STATUS_ID
14621: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
14622: THEN
14623: RAISE fnd_api.g_exc_error;
15106: RAISE FND_API.G_EXC_ERROR;
15107: END IF;
15108: --
15109: -- Get a unique history item instance id from the sequence
15110: -- l_csi_item_instance_h_id := csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
15111:
15112:
15113: select mod(p_instance_rec.object_version_number,l_full_dump_frequency)
15114: into l_mod_value
19607: -- Modified by srramakr for enhancement 2315522.
19608: -- This will allow the user to pass a Terminable status during expiration.
19609: IF p_instance_rec.instance_status_id IS NOT NULL AND
19610: p_instance_rec.instance_status_id <> fnd_api.g_miss_num THEN
19611: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
19612: p_instance_rec.instance_status_id)) THEN
19613: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_TERM_STATUS');
19614: FND_MSG_PUB.ADD;
19615: RAISE FND_API.G_EXC_ERROR;
19643: ELSE
19644: l_vld_org := p_instance_rec.vld_organization_id;
19645: END IF;
19646:
19647: IF csi_item_instance_vld_pvt.Check_for_eam_item
19648: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
19649: p_organization_id => l_vld_org)
19650: THEN
19651: l_eam_item := TRUE;
19666: -- End code addition for eam integration
19667: -- validate instance status id
19668: IF NVL(l_instance_rec.instance_status_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
19669: THEN
19670: csi_item_instance_vld_pvt.is_valid_status(
19671: p_instance_status_id => l_instance_rec.instance_status_id,
19672: p_creation_complete_flag => l_creation_flag,
19673: l_return_value => l_valid);
19674: IF NOT(l_valid)
19680: IF l_instance_rec.instance_status_id IS NOT NULL AND
19681: l_instance_rec.instance_status_id <> FND_API.G_MISS_NUM AND
19682: l_instance_rec.instance_status_id <> l_curr_instance_rec.instance_status_id
19683: THEN
19684: IF NOT csi_item_instance_vld_pvt.is_status_updateable
19685: (p_instance_status => l_instance_rec.instance_status_id
19686: ,p_current_status => l_curr_instance_rec.instance_status_id)
19687: THEN
19688: RAISE fnd_api.g_exc_error;
19845: END IF;
19846:
19847: -- Get a unique history item instance id from the sequence
19848: l_csi_item_instance_h_id :=
19849: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
19850:
19851: SELECT MOD(p_instance_rec.object_version_number,l_full_dump_frequency)
19852: INTO l_mod_value
19853: FROM dual;
20335: OPEN instance_csr (l_rel_tbl(j).subject_id);
20336: FETCH instance_csr INTO l_instance_csr;
20337: CLOSE instance_csr;
20338:
20339: IF csi_item_instance_vld_pvt.termination_status
20340: ( p_instance_status_id => l_instance_csr.instance_status_id )
20341: THEN
20342: IF p_txn_rec.transaction_type_id in (53,54) THEN
20343: l_oks_txn_type := 'RET';
20657: END IF;
20658:
20659: -- Start API body
20660: -- Check if all the required parameters are passed
20661: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
20662: ( p_instance_rec.instance_id ,
20663: ' p_instance_rec.instance_id ',
20664: l_api_name );
20665:
20662: ( p_instance_rec.instance_id ,
20663: ' p_instance_rec.instance_id ',
20664: l_api_name );
20665:
20666: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
20667: ( p_instance_rec.object_version_number ,
20668: ' p_instance_rec.object_version_number ',
20669: l_api_name );
20670:
20668: ' p_instance_rec.object_version_number ',
20669: l_api_name );
20670:
20671: -- Check if the instance id is valid
20672: IF NOT(CSI_Item_Instance_vld_pvt.Is_InstanceID_Valid
20673: (p_instance_rec.instance_id,
20674: TRUE )) THEN
20675: RAISE FND_API.G_EXC_ERROR;
20676: END IF;
20825: -- Modified by srramakr for enhancement 2315522.
20826: -- This will allow the user to pass a Terminable status during expiration.
20827: IF p_instance_rec.instance_status_id IS NOT NULL AND
20828: p_instance_rec.instance_status_id <> fnd_api.g_miss_num THEN
20829: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
20830: p_instance_rec.instance_status_id)) THEN
20831: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_TERM_STATUS');
20832: FND_MSG_PUB.ADD;
20833: RAISE FND_API.G_EXC_ERROR;
20929: ELSE
20930: l_vld_org := p_instance_rec.vld_organization_id;
20931: END IF;
20932:
20933: IF csi_item_instance_vld_pvt.Check_for_eam_item
20934: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
20935: p_organization_id => l_vld_org)
20936: THEN
20937: l_eam_item := TRUE;
20952: -- End code addition for eam integration
20953: -- validate instance status id
20954: IF NVL(l_instance_rec.INSTANCE_STATUS_ID,fnd_api.g_miss_num) <> fnd_api.g_miss_num
20955: THEN
20956: csi_item_instance_vld_pvt.is_valid_status(
20957: p_instance_status_id => l_instance_rec.INSTANCE_STATUS_ID,
20958: p_creation_complete_flag => l_creation_flag,
20959: l_return_value => l_valid);
20960: IF NOT(l_valid)
20966: IF l_instance_rec.INSTANCE_STATUS_ID IS NOT NULL AND
20967: l_instance_rec.INSTANCE_STATUS_ID <> FND_API.G_MISS_NUM AND
20968: l_instance_rec.INSTANCE_STATUS_ID <> l_curr_instance_rec.INSTANCE_STATUS_ID
20969: THEN
20970: IF NOT csi_item_instance_vld_pvt.is_status_updateable
20971: (p_instance_status => l_instance_rec.INSTANCE_STATUS_ID
20972: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
20973: THEN
20974: RAISE fnd_api.g_exc_error;
21097: );
21098:
21099:
21100: -- calling the transaction api
21101: --IF CSI_Item_Instance_vld_pvt.Is_Inst_creation_complete( l_instance_rec.INSTANCE_ID ) THEN
21102:
21103: -- Call create_transaction to create txn log
21104: CSI_TRANSACTIONS_PVT.Create_transaction
21105: (
21124: -- END IF;
21125:
21126: -- Get a unique history item instance id from the sequence
21127: l_csi_item_instance_h_id :=
21128: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
21129:
21130: -- Get the full_dump_frequency from csi_install_parameter
21131: --
21132: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
21373: EXCEPTION
21374: WHEN NO_DATA_FOUND THEN
21375: -- Get a unique history item instance id from the sequence
21376: l_csi_item_instance_h_id :=
21377: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
21378:
21379: IF (l_mod_value = 0) THEN
21380: -- If the mod value is 0 then dump all the columns both changed and unchanged
21381: -- changed columns have old and new values while the unchanged values have old and new values
21862: OPEN instance_csr (p_instance_rec.instance_id);
21863: FETCH instance_csr INTO l_instance_csr;
21864: CLOSE instance_csr;
21865:
21866: IF csi_item_instance_vld_pvt.termination_status
21867: ( p_instance_status_id => l_instance_csr.instance_status_id )
21868: THEN
21869: IF p_txn_rec.transaction_type_id in (53,54) THEN
21870: l_oks_txn_type := 'RET';
22073:
22074: -- Start API body
22075:
22076: --check for the required parameters
22077: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
22078: ( p_source_instance_rec.INSTANCE_ID ,
22079: ' p_source_instance_rec.INSTANCE_ID ',
22080: l_api_name
22081: );
22108: OPEN C1;
22109: FETCH C1 into l_serialized;
22110: IF c1%FOUND THEN
22111: -- IF nvl(l_serialized,0) IN (2,5,6) then
22112: IF csi_Item_Instance_Vld_pvt.Is_treated_serialized
22113: ( p_serial_control_code => l_serialized
22114: ,p_location_type_code => p_source_instance_rec.location_type_code
22115: ,p_transaction_type_id => p_txn_rec.transaction_type_id
22116: ) -- Added by sk on 09/13/01
22576:
22577: -- Start API body
22578:
22579: --check for the required parameters
22580: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
22581: ( p_source_instance_rec.INSTANCE_ID ,
22582: ' p_source_instance_rec.INSTANCE_ID ',
22583: l_api_name
22584: );
22610: OPEN C1;
22611: FETCH C1 into l_serialized;
22612: IF C1%FOUND THEN
22613: -- IF nvl(l_serialized,0) IN (2,5,6) then
22614: IF csi_Item_Instance_Vld_pvt.Is_treated_serialized
22615: ( p_serial_control_code => l_serialized
22616: ,p_location_type_code => p_source_instance_rec.location_type_code
22617: ,p_transaction_type_id => p_txn_rec.transaction_type_id
22618: ) -- Added by sk on 09/13/01
23668: ( p_version_label_rec.ACTIVE_START_DATE = FND_API.G_MISS_DATE)) THEN
23669: p_version_label_rec.ACTIVE_START_DATE := SYSDATE;
23670: END IF;
23671: -- verify if the active_start_date is valid
23672: IF NOT(CSI_Item_Instance_Vld_Pvt.Is_Ver_StartDate_Valid
23673: (p_version_label_rec.ACTIVE_START_DATE,
23674: p_version_label_rec.ACTIVE_END_DATE ,
23675: p_version_label_rec.INSTANCE_ID )) THEN
23676: RAISE FND_API.G_EXC_ERROR;
23677: END IF;
23678: -- Verify if the active_end_date is valid
23679: IF ((p_version_label_rec.ACTIVE_END_DATE is NOT NULL) AND
23680: (p_version_label_rec.ACTIVE_END_DATE <> FND_API.G_MISS_DATE )) THEN
23681: IF NOT(CSI_Item_Instance_vld_pvt.Is_Ver_EndDate_Valid
23682: (p_version_label_rec.ACTIVE_START_DATE,
23683: p_version_label_rec.ACTIVE_END_DATE ,
23684: p_version_label_rec.INSTANCE_ID )) THEN
23685: RAISE FND_API.G_EXC_ERROR;
28012: (p_source_instance_rec.instance_id = FND_API.G_MISS_NUM) THEN
28013: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
28014: FND_MSG_PUB.Add;
28015: RAISE FND_API.G_EXC_ERROR;
28016: ELSIF NOT (csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
28017: p_source_instance_rec.instance_id ,
28018: l_curr_instance_rec )) THEN
28019: RAISE FND_API.G_EXC_ERROR;
28020: END IF;
29331: IF l_ext_attrib_tbl.COUNT > 0 THEN
29332: FOR tab_row IN l_ext_attrib_tbl.FIRST .. l_ext_attrib_tbl.LAST
29333: LOOP
29334: IF l_ext_attrib_tbl.EXISTS(tab_row) THEN
29335: IF NOT(csi_Item_Instance_Vld_pvt.get_ext_attrib_level(l_ext_attrib_tbl(tab_row).attribute_id,
29336: l_attribute_level ))THEN
29337: RAISE FND_API.G_EXC_ERROR;
29338: END IF;
29339:
29896: csi_gen_utility_pvt.put_line('l_bom_expl_org_flag - ' || l_bom_expl_org_flag);
29897:
29898: IF l_csi_explode_bom = 'Y' THEN
29899: -- Verify if the a Valid item and Org id is being passed
29900: IF NOT(csi_Item_Instance_Vld_pvt.val_item_org
29901: ( p_source_instance_rec.INVENTORY_ITEM_ID,
29902: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29903: RAISE FND_API.G_EXC_ERROR;
29904: END IF;
29902: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29903: RAISE FND_API.G_EXC_ERROR;
29904: END IF;
29905: -- Verify if the a Valid bom and Org id is being passed
29906: IF NOT(csi_Item_Instance_Vld_pvt.val_bom_org
29907: ( p_source_instance_rec.INVENTORY_ITEM_ID,
29908: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29909: RAISE FND_API.G_EXC_ERROR;
29910: END IF;
29930: ||to_char(p_source_instance_rec.VLD_ORGANIZATION_ID));
29931: RAISE FND_API.G_EXC_ERROR;
29932: END;
29933: --
29934: IF NOT csi_item_instance_vld_pvt.Is_Trackable
29935: (p_inv_item_id => p_source_instance_rec.INVENTORY_ITEM_ID,
29936: p_org_id => l_master_organization_id) THEN
29937: csi_gen_utility_pvt.put_line('Passed Inventory Item is not Trackable..');
29938: RAISE FND_API.G_EXC_ERROR;
29947: RAISE FND_API.G_EXC_ERROR;
29948: END IF;
29949: --
29950: -- Verify if configruation has been exploded before
29951: IF (csi_Item_Instance_Vld_pvt.Is_config_exploded
29952: ( p_source_instance_rec.INSTANCE_ID)) THEN
29953: csi_gen_utility_pvt.put_line('Configuration already Exploded');
29954: RAISE FND_API.G_EXC_ERROR;
29955: END IF;
30008: l_prev_parent := l_init_sort_code; -- By default this will be Top Most Parent
30009: --
30010: For v_rec in BOM_CSR(l_group_id)
30011: Loop
30012: IF csi_Item_Instance_Vld_pvt.Is_Trackable
30013: (p_inv_item_id => v_rec.component_item_id,
30014: p_org_id => v_rec.master_organization_id,
30015: p_stack_err_msg => FALSE) THEN
30016: --
32873: (p_source_instance_rec.instance_id = FND_API.G_MISS_NUM) THEN
32874: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
32875: FND_MSG_PUB.Add;
32876: RAISE FND_API.G_EXC_ERROR;
32877: ELSIF NOT (csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
32878: p_source_instance_rec.instance_id ,
32879: l_curr_instance_rec )) THEN
32880: RAISE FND_API.G_EXC_ERROR;
32881: END IF;
34144: IF l_ext_attrib_tbl.COUNT > 0 THEN
34145: FOR tab_row IN l_ext_attrib_tbl.FIRST .. l_ext_attrib_tbl.LAST
34146: LOOP
34147: IF l_ext_attrib_tbl.EXISTS(tab_row) THEN
34148: IF NOT(csi_Item_Instance_Vld_pvt.get_ext_attrib_level(l_ext_attrib_tbl(tab_row).attribute_id,
34149: l_attribute_level ))THEN
34150: RAISE FND_API.G_EXC_ERROR;
34151: END IF;
34152: IF (l_attribute_level = 'INSTANCE') THEN
34569: -- FOR inst_config_rec IN inst_children_cur( p_source_instance_rec.instance_id)
34570: IF l_rel_tbl.count > 0 THEN
34571: FOR j in l_rel_tbl.FIRST .. l_rel_tbl.LAST
34572: LOOP
34573: IF NOT(csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
34574: l_rel_tbl(j).SUBJECT_ID,
34575: l_source_child_instance_rec)) THEN
34576: RAISE FND_API.G_EXC_ERROR;
34577: END IF;
35180: WHEN OTHERS THEN
35181: NULL;
35182: END;
35183:
35184: csi_item_instance_vld_pvt.get_link_locations
35185: (
35186: p_instance_header_tbl => l_instance_header_tbl,
35187: x_return_status => x_return_status
35188: );