[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';
2719: END;
2720: END IF;
2721: --end of code for bug 4754569--
2722:
2723: IF csi_item_instance_vld_pvt.Check_for_eam_item
2724: (p_inventory_item_id => l_inventory_item_id,
2725: p_organization_id => l_vld_organization_id)--bug 4754569
2726: THEN
2727: l_maint_organization_id := NULL;
2894: NULL;
2895: END;
2896: END IF;
2897:
2898: END IF; --
2900: END IF;
2901: END LOOP;
2902: END Resolve_id_columns;
4656: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
4657: END IF;
4658:
4659: -- Start API body
4660: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4661: ( p_instance_rec.INVENTORY_ITEM_ID ,
4662: ' p_instance_rec.INVENTORY_ITEM_ID ',
4663: l_api_name
4664: );
4663: l_api_name
4664: );
4665: /* Code commented by sk for bug 2198575
4666:
4667: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4668: ( p_instance_rec.INV_MASTER_ORGANIZATION_ID ,
4669: ' p_instance_rec.INV_MASTER_ORGANIZATION_ID ',
4670: l_api_name
4671: );
4669: ' p_instance_rec.INV_MASTER_ORGANIZATION_ID ',
4670: l_api_name
4671: );
4672: */
4673: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
4674: ( p_instance_rec.QUANTITY ,
4675: ' p_instance_rec.QUANTITY ',
4676: l_api_name
4677: );
4675: ' p_instance_rec.QUANTITY ',
4676: l_api_name
4677: );
4678:
4679: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Char
4680: ( p_instance_rec.UNIT_OF_MEASURE ,
4681: ' p_instance_rec.UNIT_OF_MEASURE ',
4682: l_api_name
4683: );
4729: (p_instance_rec.vld_organization_id = FND_API.G_MISS_NUM)) AND
4730: ((p_instance_rec.inv_master_organization_id IS NOT NULL) AND
4731: (p_instance_rec.inv_master_organization_id <> FND_API.G_MISS_NUM))
4732: THEN
4733: IF NOT (csi_Item_Instance_Vld_Pvt.Is_Valid_Master_Org
4734: (p_instance_rec.inv_master_organization_id)) THEN
4735: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_MAST_ORG');
4736: FND_MSG_PUB.Add;
4737: RAISE FND_API.G_EXC_ERROR;
4769: -- If the instance_id passed is null then generate from sequence
4770: -- and check if the value exists . If exists then generate
4771: -- again from the sequence till we get a value that does not exist
4772: WHILE l_process_flag LOOP
4773: p_instance_rec.INSTANCE_ID := CSI_Item_Instance_vld_pvt.get_instance_id;
4774: IF NOT(CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4775: FALSE )) THEN
4776: l_process_flag := FALSE;
4777: END IF;
4770: -- and check if the value exists . If exists then generate
4771: -- again from the sequence till we get a value that does not exist
4772: WHILE l_process_flag LOOP
4773: p_instance_rec.INSTANCE_ID := CSI_Item_Instance_vld_pvt.get_instance_id;
4774: IF NOT(CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4775: FALSE )) THEN
4776: l_process_flag := FALSE;
4777: END IF;
4778: END LOOP;
4777: END IF;
4778: END LOOP;
4779: ELSE
4780: -- Validate the instance_id if exist then raise CSI_API_INVALID_PRIMARY_KEY error
4781: IF CSI_Item_Instance_vld_pvt.InstanceExists(p_instance_rec.INSTANCE_ID,
4782: TRUE ) THEN
4783: RAISE FND_API.G_EXC_ERROR;
4784: END IF;
4785: END IF;
4841: END IF;
4842: -- END IF;
4843: -- End addition of code for eam integration
4844:
4845: IF csi_item_Instance_Vld_pvt.Is_InstanceNum_Valid(p_instance_rec.instance_id,
4846: p_instance_rec.instance_number,
4847: 'CREATE')
4848: THEN
4849: IF p_instance_rec.instance_number IS NULL OR
4980: END IF;
4981: -- End addition of code to fix bug 5506231
4982:
4983: -- Checking for Trackable Flag
4984: IF NOT csi_item_instance_vld_pvt.Is_Trackable
4985: (p_instance_rec.inventory_item_id,
4986: p_instance_rec.inv_master_organization_id,
4987: l_trackable_flag
4988: ) THEN
4991: --
4992: -- Added following code for eam integration
4993: -- Check if the item is a rebuildable or an asset group
4994:
4995: IF csi_item_instance_vld_pvt.Check_for_eam_item
4996: (p_inventory_item_id => p_instance_rec.inventory_item_id,
4997: p_organization_id => p_instance_rec.vld_organization_id,
4998: p_eam_item_type => l_eam_item_type)
4999: THEN
5074: END IF;
5075: -- End addition for eam
5076:
5077: -- Validation for the Revision
5078: csi_item_instance_vld_pvt.Validate_Revision
5079: (
5080: p_inv_item_id => p_instance_rec.inventory_item_id ,
5081: p_inv_org_id => p_instance_rec.vld_organization_id,
5082: p_creation_complete_flag => p_instance_rec.creation_complete_flag,
5088: IF l_return_value = FALSE THEN
5089: RAISE fnd_api.g_exc_error;
5090: END IF;
5091: -- Validation for the Lot Number
5092: csi_Item_Instance_Vld_pvt.Validate_Lot_Number
5093: (
5094: p_inv_org_id => p_instance_rec.vld_organization_id,
5095: p_inv_item_id => p_instance_rec.inventory_item_id ,
5096: p_lot_number => p_instance_rec.lot_number,
5109: IF ((p_instance_rec.lot_number <> FND_API.G_MISS_CHAR) AND
5110: (p_instance_rec.lot_number IS NOT NULL))
5111: THEN
5112: csi_gen_utility_pvt.put_line('Calling Create_Lot routine...');
5113: csi_item_instance_vld_pvt.Create_Lot
5114: (
5115: p_inv_org_id => p_instance_rec.vld_organization_id,
5116: p_inv_item_id => p_instance_rec.inventory_item_id,
5117: p_lot_number => p_instance_rec.lot_number,
5129: (p_instance_rec.serial_number IS NOT NULL)) /* AND
5130: (nvl(p_instance_rec.mfg_serial_number_flag,'N') <> 'Y') ) */
5131: THEN
5132: csi_gen_utility_pvt.put_line('Calling Create_Serial...');
5133: csi_item_instance_vld_pvt.Create_Serial
5134: (
5135: p_inv_org_id => p_instance_rec.vld_organization_id,
5136: p_inv_item_id => p_instance_rec.inventory_item_id,
5137: p_serial_number => p_instance_rec.serial_number,
5192: l_check_instance_rec.serial_number := p_instance_rec.serial_number;
5193: l_check_instance_rec.lot_number := p_instance_rec.lot_number;
5194: l_check_instance_rec.last_txn_line_detail_id := p_instance_rec.last_txn_line_detail_id;
5195: csi_gen_utility_pvt.put_line('Calling Check_Prior_Txn');
5196: csi_Item_Instance_Vld_pvt.Check_Prior_Txn
5197: (
5198: p_instance_rec => l_check_instance_rec
5199: ,p_txn_rec => p_txn_rec
5200: ,p_prior_txn_id => l_prior_txn_id
5206: END IF;
5207: END IF;
5208: -- Validation for the Serial Number
5209: csi_gen_utility_pvt.put_line('Calling Validate_Serial_Number...');
5210: csi_Item_Instance_Vld_pvt.Validate_Serial_Number
5211: (
5212: p_inv_org_id => p_instance_rec.vld_organization_id,
5213: p_inv_item_id => p_instance_rec.inventory_item_id ,
5214: p_serial_number => p_instance_rec.serial_number,
5225: END IF;
5226: -- Validation for the Unit of Measure
5227: -- validate/convert only if the uom is not a primary uom
5228: IF p_instance_rec.unit_of_measure <> l_uom_code THEN
5229: csi_item_instance_vld_pvt.Is_Valid_Uom
5230: (
5231: p_inv_org_id => p_instance_rec.inv_master_organization_id,
5232: p_inv_item_id => p_instance_rec.inventory_item_id ,
5233: p_uom_code => p_instance_rec.unit_of_measure,
5281: p_ins_count_rec.location_count := p_ins_count_rec.location_count + 1;
5282: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
5283: p_instance_rec.location_type_code;
5284: p_location_tbl(p_ins_count_rec.location_count).location_id := p_instance_rec.location_id;
5285: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
5286: (p_location_source_table => p_instance_rec.location_type_code
5287: ,p_location_id => p_instance_rec.location_id) THEN
5288: p_location_tbl(p_ins_count_rec.location_count).valid_flag := 'Y';
5289: ELSE
5291: RAISE fnd_api.g_exc_error;
5292: END IF;
5293: END IF;
5294: -- Validate Related Parameters
5295: IF NOT csi_item_instance_vld_pvt.Validate_Related_Loc_Params
5296: (
5297: p_location_source_table => p_instance_rec.location_type_code,
5298: p_location_id => p_instance_rec.location_id,
5299: p_organization_id => p_instance_rec.inv_organization_id,
5311: END IF; -- Location ID Valid
5312: END IF; -- Location Type code valid
5313: --
5314: -- Validation for the Quantity
5315: IF NOT csi_Item_Instance_Vld_pvt.Is_Quantity_Valid(
5316: p_instance_id => p_instance_rec.instance_id,
5317: p_inv_organization_id => p_instance_rec.vld_organization_id,
5318: p_quantity => p_instance_rec.quantity ,
5319: p_serial_control_code => l_serial_control,
5398: l_party_owner_rec := p_party_tbl(l_count);
5399: END IF;
5400: END IF;
5401: END LOOP;
5402: IF NOT csi_item_instance_vld_pvt.Validate_Uniqueness
5403: (p_instance_rec => p_instance_rec,
5404: p_party_rec => l_party_owner_rec,
5405: p_srl_control_code => l_serial_control,
5406: p_csi_txn_type_id => p_txn_rec.transaction_type_id)
5417: IF (p_instance_rec.active_end_date = FND_API.G_MISS_DATE) THEN
5418: p_instance_rec.active_end_date := NULL;
5419: END IF;
5420:
5421: IF NOT (csi_item_instance_vld_pvt.Is_StartDate_Valid
5422: (p_instance_rec.active_start_date,
5423: p_instance_rec.active_end_date
5424: )) THEN
5425: RAISE FND_API.G_EXC_ERROR;
5435: RAISE FND_API.G_EXC_ERROR;
5436: END IF;
5437:
5438: -- validating the effective active start date
5439: IF NOT (csi_item_instance_vld_pvt.Is_EndDate_Valid
5440: (p_instance_rec.active_start_date,
5441: p_instance_rec.active_end_date
5442: )) THEN
5443: RAISE FND_API.G_EXC_ERROR;
5470: IF l_exists_flag = 'N' THEN
5471: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
5472: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.instance_condition_id;
5473: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'INS_CONDITION';
5474: csi_item_instance_vld_pvt.Is_Valid_Condition
5475: (
5476: p_instance_condition_id => p_instance_rec.instance_condition_id,
5477: p_creation_complete_flag => p_instance_rec.creation_complete_flag,
5478: l_return_value => l_return_value
5603: IF l_exists_flag <> 'Y' THEN
5604: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
5605: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.system_id;
5606: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'SYSTEM';
5607: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_System_id(
5608: p_instance_rec.system_id) THEN
5609: p_generic_id_tbl(p_ins_count_rec.generic_count).valid_flag := 'N';
5610: RAISE fnd_api.g_exc_error;
5611: ELSE
5641: IF l_exists_flag <> 'Y' THEN
5642: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5643: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_TYPE';
5644: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_type_code;
5645: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_Instance_Type(
5646: p_instance_rec.instance_type_code) THEN
5647: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5648: RAISE fnd_api.g_exc_error;
5649: ELSE
5678: IF l_exists_flag <> 'Y' THEN
5679: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5680: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_USAGE';
5681: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_usage_code;
5682: IF NOT csi_Item_Instance_Vld_pvt.Valid_Inst_Usage_Code(
5683: p_instance_rec.instance_usage_code) THEN
5684: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5685: RAISE fnd_api.g_exc_error;
5686: ELSE
5717: IF l_exists_flag <> 'Y' THEN
5718: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
5719: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'OPERATIONAL_STATUS';
5720: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.operational_status_code;
5721: IF NOT csi_Item_Instance_Vld_pvt.Valid_operational_status(
5722: p_instance_rec.operational_status_code) THEN
5723: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
5724: RAISE fnd_api.g_exc_error;
5725: ELSE
5775: (p_instance_rec.purchase_currency_code <> FND_API.G_MISS_CHAR)
5776: )
5777: THEN
5778: p_instance_rec.purchase_currency_code := UPPER(p_instance_rec.purchase_currency_code);
5779: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5780: (p_currency_code => p_instance_rec.purchase_currency_code)
5781: THEN
5782: RAISE fnd_api.g_exc_error;
5783: END IF;
5787: (p_instance_rec.payables_currency_code <> FND_API.G_MISS_CHAR)
5788: )
5789: THEN
5790: p_instance_rec.payables_currency_code := UPPER(p_instance_rec.payables_currency_code);
5791: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5792: (p_currency_code => p_instance_rec.payables_currency_code)
5793: THEN
5794: RAISE fnd_api.g_exc_error;
5795: END IF;
5799: (p_instance_rec.sales_currency_code <> FND_API.G_MISS_CHAR)
5800: )
5801: THEN
5802: p_instance_rec.sales_currency_code := UPPER(p_instance_rec.sales_currency_code);
5803: IF NOT csi_item_instance_vld_pvt.valid_currency_code
5804: (p_currency_code => p_instance_rec.sales_currency_code)
5805: THEN
5806: RAISE fnd_api.g_exc_error;
5807: END IF;
5875: IF ((p_instance_rec.instance_id IS NOT NULL)
5876: AND (p_instance_rec.inventory_item_id IS NOT NULL)
5877: AND (p_instance_rec.inv_master_organization_id IS NOT NULL)
5878: -- AND (((l_serial_control IN (2,5,6))
5879: AND (((csi_Item_Instance_Vld_pvt.Is_treated_serialized
5880: ( p_serial_control_code => l_serial_control
5881: ,p_location_type_code => p_instance_rec.location_type_code
5882: ,p_transaction_type_id => p_txn_rec.transaction_type_id
5883: )) --Added by sk on 09/13/01
5883: )) --Added by sk on 09/13/01
5884: AND ((p_instance_rec.serial_number IS NOT NULL)
5885: AND (p_instance_rec.serial_number <> FND_API.G_MISS_CHAR)))
5886: -- OR (l_serial_control NOT IN (2,5,6)))
5887: OR ( NOT (csi_Item_Instance_Vld_pvt.Is_treated_serialized
5888: ( p_serial_control_code => l_serial_control
5889: ,p_location_type_code => p_instance_rec.location_type_code
5890: ,p_transaction_type_id => p_txn_rec.transaction_type_id
5891: )) ) ) --Added by sk on 09/13/01
5957: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
5958: p_instance_rec.install_location_type_code;
5959: p_location_tbl(p_ins_count_rec.location_count).location_id :=
5960: p_instance_rec.install_location_id;
5961: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
5962: (
5963: p_location_source_table => p_instance_rec.install_location_type_code
5964: ,p_location_id => p_instance_rec.install_location_id
5965: ) THEN
6275: END IF;
6276:
6277: -- Get a unique history item instance id from the sequence
6278: l_csi_item_instance_h_id :=
6279: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
6280:
6281: -- Create a row in csi_item_instances_history table
6282: CSI_ITEM_INSTANCES_H_PKG.Insert_Row
6283: ( px_INSTANCE_HISTORY_ID => l_csi_item_instance_h_id
6891: RAISE FND_API.G_EXC_ERROR;
6892: END;
6893:
6894:
6895: csi_item_instance_vld_pvt.get_valid_acct_class(p_instance_id => p_instance_id,
6896: p_curr_acct_class_code => NULL, --l_accounting_class,
6897: p_loc_type_code => l_loc_type_code,
6898: x_acct_class_code => l_acct_class_code
6899: );
7458: -- ADDED FOR BUG 2957236
7459: IF p_instance_rec.instance_status_id IS NOT NULL AND
7460: p_instance_rec.instance_status_id <> fnd_api.g_miss_num
7461: THEN
7462: IF csi_item_instance_vld_pvt.termination_status
7463: ( p_instance_status_id => p_instance_rec.instance_status_id )
7464: THEN
7465: l_termination_status := TRUE;
7466: l_config_inst_hdr_id := null;
7594: l_curr_instance_rec.install_date IS NULL THEN
7595: l_install_date := p_instance_rec.install_date;
7596: END IF;
7597: -- Start code addition for eam integration
7598: IF csi_item_instance_vld_pvt.Check_for_eam_item
7599: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
7600: p_organization_id => l_curr_instance_rec.last_vld_organization_id)
7601: THEN
7602: l_eam_item := TRUE;
7621: --
7622: -- validate instance status id
7623: IF NVL(l_instance_status_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
7624: THEN
7625: csi_item_instance_vld_pvt.is_valid_status(
7626: p_instance_status_id => l_instance_status_id,
7627: p_creation_complete_flag => l_creation_flag,
7628: l_return_value => l_valid);
7629: IF NOT(l_valid)
7635: IF l_instance_status_id IS NOT NULL AND
7636: l_instance_status_id <> FND_API.G_MISS_NUM AND
7637: l_instance_status_id <> l_curr_instance_rec.INSTANCE_STATUS_ID
7638: THEN
7639: IF NOT csi_item_instance_vld_pvt.is_status_updateable
7640: (p_instance_status => l_instance_status_id
7641: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
7642: THEN
7643: RAISE fnd_api.g_exc_error;
7792: END IF;
7793: --
7794: -- Get a unique history item instance id from the sequence
7795: l_csi_item_instance_h_id :=
7796: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
7797:
7798: SELECT MOD(p_instance_rec.object_version_number,l_full_dump_frequency)
7799: INTO l_mod_value
7800: FROM dual;
12117: -- Begin Add Code for Siebel Genesis Project
12118: l_mod_curr_instance_rec.SOURCE_CODE := l_curr_instance_rec.SOURCE_CODE;
12119: -- End Add Code for Siebel Genesis Project
12120:
12121: csi_item_instance_vld_pvt.get_merge_rec (p_instance_rec => p_instance_rec,
12122: l_curr_instance_rec => l_mod_curr_instance_rec,
12123: l_get_instance_rec => l_get_instance_rec
12124: );
12125: --Added for bug 2766787
12148: RAISE FND_API.G_EXC_ERROR;
12149: END IF;
12150:
12151: -- Check if all the required parameters are passed
12152: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
12153: ( p_instance_rec.INSTANCE_ID ,
12154: ' p_instance_rec.INSTANCE_ID ',
12155: l_api_name );
12156:
12154: ' p_instance_rec.INSTANCE_ID ',
12155: l_api_name );
12156:
12157: -- Check if the instance id is valid
12158: IF NOT(CSI_Item_Instance_vld_pvt.Is_InstanceID_Valid
12159: (p_instance_rec.INSTANCE_ID,
12160: TRUE )) THEN
12161: RAISE FND_API.G_EXC_ERROR;
12162: END IF;
12177: End;
12178: --
12179: -- Proceed with Forward SYnch check if the sequence does not return any value.
12180: IF l_current_val = -9999999 THEN
12181: IF NOT(CSI_Item_Instance_vld_pvt.Is_Forward_Synch
12182: (p_instance_id => p_instance_rec.INSTANCE_ID,
12183: p_stop_all_txn => fnd_api.g_true,
12184: p_mtl_txn_id => fnd_api.g_miss_num)) THEN
12185: FND_MESSAGE.Set_Name('CSI', 'CSI_API_NO_FORWARD_SYNCH');
12187: FND_MSG_PUB.ADD;
12188: RAISE FND_API.G_EXC_ERROR;
12189: END IF;
12190: ELSE -- Even if seq exists, stop later txns
12191: IF NOT(CSI_Item_Instance_vld_pvt.Is_Forward_Synch
12192: (p_instance_id => p_instance_rec.INSTANCE_ID,
12193: p_stop_all_txn => fnd_api.g_false, -- Stop only later txns
12194: p_mtl_txn_id => p_txn_rec.inv_material_transaction_id)) THEN
12195: FND_MESSAGE.Set_Name('CSI', 'CSI_API_NO_FORWARD_SYNCH');
12217: IF ((p_instance_rec.instance_number IS NULL) OR
12218: (p_instance_rec.instance_number <> l_curr_instance_rec.instance_number))
12219: THEN
12220: -- Added for eam integration
12221: IF NOT csi_item_Instance_Vld_pvt.Is_InstanceNum_Valid(p_instance_rec.instance_id,
12222: p_instance_rec.instance_number,
12223: 'UPDATE')
12224: THEN
12225: RAISE fnd_api.g_exc_error;
12302: /*ELSE -- Commented for bug 6965008
12303: -- Modified else block for the bug 6875664, base bug 6531599
12304: IF p_txn_rec.transaction_type_id = 1 THEN
12305: l_mtl_txn_tbl.DELETE;
12306: CSI_Item_Instance_vld_pvt.get_mtl_txn_for_srl(
12307: p_inventory_item_id => p_instance_rec.inventory_item_id,
12308: p_serial_number => p_instance_rec.serial_number,
12309: x_mtl_txn_tbl => l_mtl_txn_tbl);
12310: IF NVL(l_mtl_txn_tbl.Count,0) > 0 THEN
12464: END IF;
12465:
12466: -- validating the effective active end date
12467: IF ( p_instance_rec.ACTIVE_END_DATE <> FND_API.G_MISS_DATE) THEN
12468: IF NOT(CSI_Item_Instance_vld_pvt.EndDate_Valid
12469: (l_curr_instance_rec.ACTIVE_START_DATE,
12470: p_instance_rec.ACTIVE_END_DATE ,
12471: p_instance_rec.INSTANCE_ID )) THEN
12472: RAISE FND_API.G_EXC_ERROR;
12482: IF ( (p_instance_rec.instance_status_id <> FND_API.G_MISS_NUM)
12483: AND (p_instance_rec.instance_status_id IS NOT NULL)
12484: AND (p_instance_rec.instance_status_id <>
12485: l_curr_instance_rec.instance_status_id)
12486: AND (CSI_Item_Instance_vld_pvt.val_inst_ter_flag
12487: (p_instance_rec.instance_status_id)))
12488: THEN
12489: IF ((p_instance_rec.ACTIVE_END_DATE IS NULL) OR
12490: (p_instance_rec.ACTIVE_END_DATE = FND_API.G_MISS_DATE)) THEN
12491: FND_MESSAGE.Set_Name('CSI', 'CSI_API_TER_DATE');
12492: FND_MSG_PUB.ADD;
12493: RAISE FND_API.G_EXC_ERROR;
12494: ELSIF p_instance_rec.ACTIVE_END_DATE < sysdate THEN
12495: IF NOT(CSI_Item_Instance_vld_pvt.EndDate_Valid
12496: (l_curr_instance_rec.ACTIVE_START_DATE,
12497: p_instance_rec.ACTIVE_END_DATE ,
12498: p_instance_rec.INSTANCE_ID )) THEN
12499: RAISE FND_API.G_EXC_ERROR;
12611:
12612: -- Added following code for eam integration
12613: -- Check if the item is a rebuildable or an asset group
12614:
12615: IF csi_item_instance_vld_pvt.Check_for_eam_item
12616: (p_inventory_item_id => p_instance_rec.inventory_item_id,
12617: p_organization_id => p_instance_rec.vld_organization_id,
12618: p_eam_item_type => l_eam_item_type)
12619: THEN
12718:
12719: -- Validate System
12720: IF l_get_instance_rec.system_id IS NOT NULL AND
12721: l_get_instance_rec.system_id <> FND_API.G_MISS_NUM THEN
12722: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_System_id(
12723: l_get_instance_rec.system_id) THEN
12724: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_SYSTEM_ID');
12725: FND_MESSAGE.SET_TOKEN('SYSTEM_ID',l_get_instance_rec.system_id);
12726: FND_MSG_PUB.Add;
12737: l_get_instance_rec.lot_number <> FND_API.G_MISS_CHAR
12738: THEN
12739: csi_gen_utility_pvt.put_line('Calling Validate_Lot_Number..');
12740: -- Added for Bug# 4011408
12741: csi_Item_Instance_Vld_pvt.Validate_Lot_Number
12742: (
12743: p_inv_org_id => p_instance_rec.vld_organization_id,
12744: p_inv_item_id => l_get_instance_rec.inventory_item_id ,
12745: p_lot_number => l_get_instance_rec.lot_number,
12756: --
12757: -- Validates the lot uniqueness and creates lot numbers in MLNs for manually created Instances
12758: -- Bug# 4011408
12759: csi_gen_utility_pvt.put_line('Calling Create_Lot routine in Update_Item_Instance API...');
12760: csi_item_instance_vld_pvt.Create_Lot
12761: (
12762: p_inv_org_id => p_instance_rec.vld_organization_id,
12763: p_inv_item_id => l_get_instance_rec.inventory_item_id,
12764: p_lot_number => l_get_instance_rec.lot_number,
12795: IF p_instance_rec.serial_number IS NOT NULL AND
12796: p_instance_rec.serial_number <> fnd_api.g_miss_char AND
12797: p_instance_rec.serial_number <> nvl(l_curr_instance_rec.serial_number,fnd_api.g_miss_char)
12798: THEN
12799: csi_gen_utility_pvt.put_line('before csi_item_instance_vld_pvt.validate_serial_for_upd');
12800: csi_item_instance_vld_pvt.validate_serial_for_upd(
12801: p_instance_rec => l_get_instance_rec,
12802: p_txn_rec => p_txn_rec,
12803: p_old_serial_number => l_curr_instance_rec.serial_number,
12796: p_instance_rec.serial_number <> fnd_api.g_miss_char AND
12797: p_instance_rec.serial_number <> nvl(l_curr_instance_rec.serial_number,fnd_api.g_miss_char)
12798: THEN
12799: csi_gen_utility_pvt.put_line('before csi_item_instance_vld_pvt.validate_serial_for_upd');
12800: csi_item_instance_vld_pvt.validate_serial_for_upd(
12801: p_instance_rec => l_get_instance_rec,
12802: p_txn_rec => p_txn_rec,
12803: p_old_serial_number => l_curr_instance_rec.serial_number,
12804: x_return_status => l_return_status);
12826: IF l_get_instance_rec.serial_number IS NOT NULL AND
12827: l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR
12828: THEN
12829: csi_gen_utility_pvt.put_line('Calling Create_Serial...');
12830: csi_item_instance_vld_pvt.Create_Serial (
12831: p_inv_org_id => p_instance_rec.vld_organization_id,
12832: p_inv_item_id => l_get_instance_rec.inventory_item_id,
12833: p_serial_number => l_get_instance_rec.serial_number,
12834: p_mfg_srl_num_flag => l_get_instance_rec.mfg_serial_number_flag,
12902: l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR
12903: THEN
12904: IF nvl(l_get_instance_rec.instance_usage_code,'$#$') <> 'IN_RELATIONSHIP' THEN
12905: csi_gen_utility_pvt.put_line('Calling Validate_Srl_Num_for_Inst_Upd');
12906: csi_Item_Instance_Vld_pvt.Validate_Srl_Num_for_Inst_Upd(
12907: p_inv_org_id => p_instance_rec.vld_organization_id,
12908: p_inv_item_id => l_get_instance_rec.inventory_item_id , -- l_get
12909: p_serial_number => l_get_instance_rec.serial_number,
12910: p_mfg_serial_number_flag => l_get_instance_rec.mfg_serial_number_flag, -- l_get
12917: IF l_return_value = FALSE THEN
12918: RAISE fnd_api.g_exc_error;
12919: END IF;
12920: ELSE -- If this is a component then just validate serial uniqueness
12921: csi_Item_Instance_Vld_pvt.Validate_ser_uniqueness
12922: ( p_inv_org_id => p_instance_rec.vld_organization_id
12923: ,p_inv_item_id => l_get_instance_rec.inventory_item_id
12924: ,p_serial_number => l_get_instance_rec.serial_number
12925: ,p_instance_id => p_instance_rec.instance_id
12942: l_check_instance_rec.serial_number := l_get_instance_rec.serial_number;
12943: l_check_instance_rec.lot_number := l_get_instance_rec.lot_number;
12944: l_check_instance_rec.last_txn_line_detail_id := p_instance_rec.last_txn_line_detail_id;
12945: csi_gen_utility_pvt.put_line('Calling Check_Prior_Txn');
12946: csi_Item_Instance_Vld_pvt.Check_Prior_Txn
12947: (
12948: p_instance_rec => l_check_instance_rec
12949: ,p_txn_rec => p_txn_rec
12950: ,p_prior_txn_id => l_prior_txn_id
12961: IF l_get_instance_rec.inventory_revision IS NOT NULL AND
12962: l_get_instance_rec.inventory_revision <> FND_API.G_MISS_CHAR
12963: THEN
12964: csi_gen_utility_pvt.put_line('Calling Update_Revision');
12965: csi_item_instance_vld_pvt.Update_Revision
12966: (
12967: p_inv_item_id => l_get_instance_rec.inventory_item_id ,
12968: p_inv_org_id => p_instance_rec.vld_organization_id,
12969: p_revision => l_get_instance_rec.inventory_revision,
12979: --quantity validation
12980: IF ((p_instance_rec.quantity <> FND_API.G_MISS_NUM ) AND
12981: (p_instance_rec.quantity IS NOT NULL ))THEN
12982: IF p_instance_rec.quantity <> l_curr_instance_rec.quantity THEN
12983: IF NOT csi_Item_Instance_Vld_pvt.Is_Quantity_Valid(
12984: p_instance_id => p_instance_rec.instance_id,
12985: p_inv_organization_id => p_instance_rec.vld_organization_id,
12986: p_quantity => l_get_instance_rec.quantity ,
12987: p_serial_control_code => l_serial_control,
12997: END IF;
12998: IF nvl(l_get_instance_rec.instance_usage_code,'$#$') <> 'IN_RELATIONSHIP' THEN
12999: IF p_instance_rec.vld_organization_id <> l_cur_instance_rec.last_vld_organization_id
13000: THEN
13001: csi_item_instance_vld_pvt.validate_org_dependent_params
13002: ( p_instance_rec => l_get_instance_rec,
13003: p_txn_rec => p_txn_rec,
13004: l_return_value => l_return_value
13005: );
13017: IF ((p_instance_rec.unit_of_measure <> FND_API.G_MISS_CHAR) AND
13018: (p_instance_rec.unit_of_measure IS NOT NULL)) THEN
13019: IF ((p_instance_rec.unit_of_measure <> l_curr_instance_rec.unit_of_measure)
13020: AND (p_instance_rec.unit_of_measure <> l_uom_code)) THEN
13021: csi_item_instance_vld_pvt.Is_Valid_Uom
13022: (
13023: p_inv_org_id => l_get_instance_rec.inv_master_organization_id, -- srramakr
13024: p_inv_item_id => l_get_instance_rec.inventory_item_id , --l_get
13025: p_uom_code => p_instance_rec.unit_of_measure,
13036: --validation for accounting classification_code if
13037: --p_instance_rec.accounting_class_code is NULL OR <> FND_API.G_MISS_CHAR
13038: IF ((p_instance_rec.accounting_class_code IS NULL) OR
13039: (p_instance_rec.accounting_class_code <> FND_API.G_MISS_CHAR)) THEN
13040: csi_item_instance_vld_pvt.get_valid_acct_class
13041: ( p_instance_id => p_instance_rec.instance_id
13042: ,p_curr_acct_class_code => l_get_instance_rec.accounting_class_code
13043: ,p_loc_type_code => l_get_instance_rec.location_type_code
13044: ,x_acct_class_code => l_acct_class_code
13080: -- then the API should assign passed status. If the passed status doesn't have
13081: -- terminated_flag set to 'Y', then by default the status will be updated with an expired status.
13082: IF p_instance_rec.instance_status_id IS NOT NULL AND
13083: p_instance_rec.instance_status_id <> fnd_api.g_miss_num AND
13084: (CSI_Item_Instance_vld_pvt.val_inst_ter_flag
13085: (p_instance_rec.instance_status_id))
13086: THEN
13087: NULL;
13088: ELSE
13115: ELSIF
13116: (p_instance_rec.instance_status_id IS NOT NULL AND
13117: p_instance_rec.instance_status_id <> FND_API.G_MISS_NUM)
13118: THEN
13119: IF (CSI_Item_Instance_vld_pvt.val_inst_ter_flag --added first change
13120: (l_get_instance_rec.instance_status_id))
13121: THEN
13122: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INVALID_STATUS');
13123: FND_MSG_PUB.ADD;
13157: if l_exists_flag = 'N' then
13158: p_ins_count_rec.generic_count := p_ins_count_rec.generic_count + 1;
13159: p_generic_id_tbl(p_ins_count_rec.generic_count).generic_id := p_instance_rec.instance_condition_id;
13160: p_generic_id_tbl(p_ins_count_rec.generic_count).id_type := 'INS_CONDITION';
13161: csi_item_instance_vld_pvt.Is_Valid_Condition
13162: (
13163: p_instance_condition_id => p_instance_rec.instance_condition_id,
13164: p_creation_complete_flag => l_get_instance_rec.creation_complete_flag, -- l_get
13165: l_return_value => l_return_value
13174: end if;
13175: --
13176: OPEN party_owner_rec(p_instance_rec.instance_id);
13177: FETCH party_owner_rec INTO l_party_owner_rec;
13178: IF NOT (csi_item_instance_vld_pvt.Validate_Uniqueness
13179: (p_instance_rec => l_get_instance_rec,
13180: p_party_rec => l_party_owner_rec,
13181: p_srl_control_code => l_serial_control,
13182: p_csi_txn_type_id => p_txn_rec.transaction_type_id))
13213: If l_exists_flag <> 'Y' then
13214: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13215: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_TYPE';
13216: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_type_code;
13217: IF NOT csi_Item_Instance_Vld_pvt.Is_Valid_Instance_Type(
13218: p_instance_rec.instance_type_code) THEN
13219:
13220: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13221: RAISE fnd_api.g_exc_error;
13253: If l_exists_flag <> 'Y' then
13254: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13255: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'INSTANCE_USAGE';
13256: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.instance_usage_code;
13257: IF NOT csi_Item_Instance_Vld_pvt.Valid_Inst_Usage_Code(
13258: p_instance_rec.instance_usage_code) THEN
13259: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13260: RAISE fnd_api.g_exc_error;
13261: ELSE
13296: IF l_exists_flag <> 'Y' THEN
13297: p_ins_count_rec.lookup_count := p_ins_count_rec.lookup_count + 1;
13298: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_type := 'OPERATIONAL_STATUS';
13299: p_lookup_tbl(p_ins_count_rec.lookup_count).lookup_code := p_instance_rec.operational_status_code;
13300: IF NOT csi_Item_Instance_Vld_pvt.Valid_operational_status(
13301: p_instance_rec.operational_status_code) THEN
13302: p_lookup_tbl(p_ins_count_rec.lookup_count).valid_flag := 'N';
13303: RAISE fnd_api.g_exc_error;
13304: ELSE
13557: (p_instance_rec.purchase_currency_code <> nvl(l_curr_instance_rec.purchase_currency_code,'$$##$$'))
13558: )
13559: THEN
13560: p_instance_rec.purchase_currency_code := UPPER(p_instance_rec.purchase_currency_code);
13561: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13562: (p_currency_code => p_instance_rec.purchase_currency_code)
13563: THEN
13564: RAISE fnd_api.g_exc_error;
13565: END IF;
13570: (p_instance_rec.payables_currency_code <> nvl(l_curr_instance_rec.payables_currency_code,'$$##$$'))
13571: )
13572: THEN
13573: p_instance_rec.payables_currency_code := UPPER(p_instance_rec.payables_currency_code);
13574: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13575: (p_currency_code => p_instance_rec.payables_currency_code)
13576: THEN
13577: RAISE fnd_api.g_exc_error;
13578: END IF;
13583: (p_instance_rec.sales_currency_code <> nvl(l_curr_instance_rec.sales_currency_code,'$$##$$'))
13584: )
13585: THEN
13586: p_instance_rec.sales_currency_code := UPPER(p_instance_rec.sales_currency_code);
13587: IF NOT csi_item_instance_vld_pvt.valid_currency_code
13588: (p_currency_code => p_instance_rec.sales_currency_code)
13589: THEN
13590: RAISE fnd_api.g_exc_error;
13591: END IF;
13823: )
13824: ) THEN
13825:
13826: --bring has parent logic here
13827: IF csi_Item_Instance_Vld_Pvt.Instance_has_Parent(
13828: p_instance_id => p_instance_rec.instance_id
13829: ) THEN
13830: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INSTANCE_HAS_PARENT');
13831: FND_MSG_PUB.ADD;
13865: p_ins_count_rec.location_count := p_ins_count_rec.location_count + 1;
13866: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
13867: l_get_instance_rec.location_type_code;
13868: p_location_tbl(p_ins_count_rec.location_count).location_id := l_get_instance_rec.location_id;
13869: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
13870: (p_location_source_table => l_get_instance_rec.location_type_code
13871: ,p_location_id => l_get_instance_rec.location_id) THEN
13872: p_location_tbl(p_ins_count_rec.location_count).valid_flag := 'Y';
13873: ELSE
13875: RAISE fnd_api.g_exc_error;
13876: END IF;
13877: END IF;
13878: -- Validate Related Location Parameters
13879: IF NOT csi_item_instance_vld_pvt.Validate_Related_Loc_Params
13880: (
13881: p_location_source_table => l_get_instance_rec.location_type_code,
13882: p_location_id => l_get_instance_rec.location_id,
13883: p_organization_id => l_get_instance_rec.inv_organization_id,
13896: -- p_instance_rec.accounting_class_code = FND_API.G_MISS_CHAR
13897:
13898: IF ( p_instance_rec.accounting_class_code = FND_API.G_MISS_CHAR ) THEN
13899:
13900: csi_item_instance_vld_pvt.get_valid_acct_class
13901: ( p_instance_id => p_instance_rec.instance_id
13902: ,p_curr_acct_class_code => l_get_instance_rec.accounting_class_code
13903: ,p_loc_type_code => l_get_instance_rec.location_type_code
13904: ,x_acct_class_code => l_acct_class_code
13958:
13959: --validating the owner
13960: OPEN party_owner_rec(p_instance_rec.instance_id);
13961: FETCH party_owner_rec INTO l_party_owner_rec;
13962: IF NOT (csi_item_instance_vld_pvt.Validate_Uniqueness
13963: (p_instance_rec => l_get_instance_rec,
13964: p_party_rec => l_party_owner_rec,
13965: p_srl_control_code => l_serial_control,
13966: p_csi_txn_type_id => p_txn_rec.transaction_type_id))
13977: IF l_get_instance_rec.instance_id IS NOT NULL
13978: AND l_get_instance_rec.inventory_item_id IS NOT NULL
13979: AND l_get_instance_rec.inv_master_organization_id IS NOT NULL
13980: -- AND (((l_serial_control IN (2,5,6))
13981: AND (((csi_Item_Instance_Vld_pvt.Is_treated_serialized
13982: ( p_serial_control_code => l_serial_control
13983: ,p_location_type_code => l_get_instance_rec.location_type_code
13984: ,p_transaction_type_id => p_txn_rec.transaction_type_id
13985: )) -- Added by sk on 13/9/01
13984: ,p_transaction_type_id => p_txn_rec.transaction_type_id
13985: )) -- Added by sk on 13/9/01
13986: AND ((l_get_instance_rec.serial_number IS NOT NULL) AND (l_get_instance_rec.serial_number <> FND_API.G_MISS_CHAR)))
13987: -- OR (l_serial_control NOT IN (2,5,6)))
13988: OR (NOT (csi_Item_Instance_Vld_pvt.Is_treated_serialized
13989: ( p_serial_control_code => l_serial_control
13990: ,p_location_type_code => l_get_instance_rec.location_type_code
13991: ,p_transaction_type_id => p_txn_rec.transaction_type_id
13992: )) ) )
14033: p_instance_rec.config_inst_rev_num := NULL;
14034: p_instance_rec.config_inst_item_id := NULL;
14035: p_instance_rec.config_valid_status := NULL;
14036: --
14037: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
14038: p_instance_rec.instance_status_id)) THEN
14039: -- Added by sguthiva for bug 2520978
14040: p_instance_rec.instance_status_id:=fnd_profile.value('CSI_SYS_TERM_INST_STATUS_ID');
14041: IF p_instance_rec.instance_status_id IS NULL
14117: p_location_tbl(p_ins_count_rec.location_count).location_type_code :=
14118: p_instance_rec.install_location_type_code;
14119: p_location_tbl(p_ins_count_rec.location_count).location_id :=
14120: p_instance_rec.install_location_id;
14121: IF csi_item_instance_vld_pvt.Is_Valid_Location_ID
14122: (
14123: p_location_source_table => p_instance_rec.install_location_type_code
14124: ,p_location_id => p_instance_rec.install_location_id
14125: ) THEN
14153: -- validate instance status id
14154: IF NVL(p_instance_rec.INSTANCE_STATUS_ID,fnd_api.g_miss_num) <> fnd_api.g_miss_num
14155: THEN
14156: --debug('Validate instance status id .');
14157: csi_item_instance_vld_pvt.is_valid_status(
14158: p_instance_status_id => p_instance_rec.INSTANCE_STATUS_ID,
14159: p_creation_complete_flag => l_creation_flag,
14160: l_return_value => l_valid);
14161: IF NOT(l_valid)
14167: IF p_instance_rec.INSTANCE_STATUS_ID IS NOT NULL AND
14168: p_instance_rec.INSTANCE_STATUS_ID <> FND_API.G_MISS_NUM AND
14169: p_instance_rec.INSTANCE_STATUS_ID <> l_curr_instance_rec.INSTANCE_STATUS_ID
14170: THEN
14171: IF NOT csi_item_instance_vld_pvt.is_status_updateable
14172: (p_instance_status => p_instance_rec.INSTANCE_STATUS_ID
14173: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
14174: THEN
14175: RAISE fnd_api.g_exc_error;
14650: RAISE FND_API.G_EXC_ERROR;
14651: END IF;
14652: --
14653: -- Get a unique history item instance id from the sequence
14654: -- l_csi_item_instance_h_id := csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
14655:
14656:
14657: select mod(p_instance_rec.object_version_number,l_full_dump_frequency)
14658: into l_mod_value
19110: -- Modified by srramakr for enhancement 2315522.
19111: -- This will allow the user to pass a Terminable status during expiration.
19112: IF p_instance_rec.instance_status_id IS NOT NULL AND
19113: p_instance_rec.instance_status_id <> fnd_api.g_miss_num THEN
19114: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
19115: p_instance_rec.instance_status_id)) THEN
19116: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_TERM_STATUS');
19117: FND_MSG_PUB.ADD;
19118: RAISE FND_API.G_EXC_ERROR;
19146: ELSE
19147: l_vld_org := p_instance_rec.vld_organization_id;
19148: END IF;
19149:
19150: IF csi_item_instance_vld_pvt.Check_for_eam_item
19151: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
19152: p_organization_id => l_vld_org)
19153: THEN
19154: l_eam_item := TRUE;
19169: -- End code addition for eam integration
19170: -- validate instance status id
19171: IF NVL(l_instance_rec.instance_status_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
19172: THEN
19173: csi_item_instance_vld_pvt.is_valid_status(
19174: p_instance_status_id => l_instance_rec.instance_status_id,
19175: p_creation_complete_flag => l_creation_flag,
19176: l_return_value => l_valid);
19177: IF NOT(l_valid)
19183: IF l_instance_rec.instance_status_id IS NOT NULL AND
19184: l_instance_rec.instance_status_id <> FND_API.G_MISS_NUM AND
19185: l_instance_rec.instance_status_id <> l_curr_instance_rec.instance_status_id
19186: THEN
19187: IF NOT csi_item_instance_vld_pvt.is_status_updateable
19188: (p_instance_status => l_instance_rec.instance_status_id
19189: ,p_current_status => l_curr_instance_rec.instance_status_id)
19190: THEN
19191: RAISE fnd_api.g_exc_error;
19348: END IF;
19349:
19350: -- Get a unique history item instance id from the sequence
19351: l_csi_item_instance_h_id :=
19352: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
19353:
19354: SELECT MOD(p_instance_rec.object_version_number,l_full_dump_frequency)
19355: INTO l_mod_value
19356: FROM dual;
19838: OPEN instance_csr (l_rel_tbl(j).subject_id);
19839: FETCH instance_csr INTO l_instance_csr;
19840: CLOSE instance_csr;
19841:
19842: IF csi_item_instance_vld_pvt.termination_status
19843: ( p_instance_status_id => l_instance_csr.instance_status_id )
19844: THEN
19845: IF p_txn_rec.transaction_type_id in (53,54) THEN
19846: l_oks_txn_type := 'RET';
20153: END IF;
20154:
20155: -- Start API body
20156: -- Check if all the required parameters are passed
20157: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
20158: ( p_instance_rec.instance_id ,
20159: ' p_instance_rec.instance_id ',
20160: l_api_name );
20161:
20158: ( p_instance_rec.instance_id ,
20159: ' p_instance_rec.instance_id ',
20160: l_api_name );
20161:
20162: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_num
20163: ( p_instance_rec.object_version_number ,
20164: ' p_instance_rec.object_version_number ',
20165: l_api_name );
20166:
20164: ' p_instance_rec.object_version_number ',
20165: l_api_name );
20166:
20167: -- Check if the instance id is valid
20168: IF NOT(CSI_Item_Instance_vld_pvt.Is_InstanceID_Valid
20169: (p_instance_rec.instance_id,
20170: TRUE )) THEN
20171: RAISE FND_API.G_EXC_ERROR;
20172: END IF;
20291: -- Modified by srramakr for enhancement 2315522.
20292: -- This will allow the user to pass a Terminable status during expiration.
20293: IF p_instance_rec.instance_status_id IS NOT NULL AND
20294: p_instance_rec.instance_status_id <> fnd_api.g_miss_num THEN
20295: IF NOT (CSI_Item_Instance_vld_pvt.val_inst_ter_flag(
20296: p_instance_rec.instance_status_id)) THEN
20297: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_TERM_STATUS');
20298: FND_MSG_PUB.ADD;
20299: RAISE FND_API.G_EXC_ERROR;
20392: ELSE
20393: l_vld_org := p_instance_rec.vld_organization_id;
20394: END IF;
20395:
20396: IF csi_item_instance_vld_pvt.Check_for_eam_item
20397: (p_inventory_item_id => l_curr_instance_rec.inventory_item_id,
20398: p_organization_id => l_vld_org)
20399: THEN
20400: l_eam_item := TRUE;
20415: -- End code addition for eam integration
20416: -- validate instance status id
20417: IF NVL(l_instance_rec.INSTANCE_STATUS_ID,fnd_api.g_miss_num) <> fnd_api.g_miss_num
20418: THEN
20419: csi_item_instance_vld_pvt.is_valid_status(
20420: p_instance_status_id => l_instance_rec.INSTANCE_STATUS_ID,
20421: p_creation_complete_flag => l_creation_flag,
20422: l_return_value => l_valid);
20423: IF NOT(l_valid)
20429: IF l_instance_rec.INSTANCE_STATUS_ID IS NOT NULL AND
20430: l_instance_rec.INSTANCE_STATUS_ID <> FND_API.G_MISS_NUM AND
20431: l_instance_rec.INSTANCE_STATUS_ID <> l_curr_instance_rec.INSTANCE_STATUS_ID
20432: THEN
20433: IF NOT csi_item_instance_vld_pvt.is_status_updateable
20434: (p_instance_status => l_instance_rec.INSTANCE_STATUS_ID
20435: ,p_current_status => l_curr_instance_rec.INSTANCE_STATUS_ID)
20436: THEN
20437: RAISE fnd_api.g_exc_error;
20560: );
20561:
20562:
20563: -- calling the transaction api
20564: --IF CSI_Item_Instance_vld_pvt.Is_Inst_creation_complete( l_instance_rec.INSTANCE_ID ) THEN
20565:
20566: -- Call create_transaction to create txn log
20567: CSI_TRANSACTIONS_PVT.Create_transaction
20568: (
20587: -- END IF;
20588:
20589: -- Get a unique history item instance id from the sequence
20590: l_csi_item_instance_h_id :=
20591: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
20592:
20593: -- Get the full_dump_frequency from csi_install_parameter
20594: --
20595: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
20836: EXCEPTION
20837: WHEN NO_DATA_FOUND THEN
20838: -- Get a unique history item instance id from the sequence
20839: l_csi_item_instance_h_id :=
20840: csi_item_instance_vld_pvt.get_csi_item_instance_h_id;
20841:
20842: IF (l_mod_value = 0) THEN
20843: -- If the mod value is 0 then dump all the columns both changed and unchanged
20844: -- changed columns have old and new values while the unchanged values have old and new values
21325: OPEN instance_csr (p_instance_rec.instance_id);
21326: FETCH instance_csr INTO l_instance_csr;
21327: CLOSE instance_csr;
21328:
21329: IF csi_item_instance_vld_pvt.termination_status
21330: ( p_instance_status_id => l_instance_csr.instance_status_id )
21331: THEN
21332: IF p_txn_rec.transaction_type_id in (53,54) THEN
21333: l_oks_txn_type := 'RET';
21532:
21533: -- Start API body
21534:
21535: --check for the required parameters
21536: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
21537: ( p_source_instance_rec.INSTANCE_ID ,
21538: ' p_source_instance_rec.INSTANCE_ID ',
21539: l_api_name
21540: );
21567: OPEN C1;
21568: FETCH C1 into l_serialized;
21569: IF c1%FOUND THEN
21570: -- IF nvl(l_serialized,0) IN (2,5,6) then
21571: IF csi_Item_Instance_Vld_pvt.Is_treated_serialized
21572: ( p_serial_control_code => l_serialized
21573: ,p_location_type_code => p_source_instance_rec.location_type_code
21574: ,p_transaction_type_id => p_txn_rec.transaction_type_id
21575: ) -- Added by sk on 09/13/01
22031:
22032: -- Start API body
22033:
22034: --check for the required parameters
22035: CSI_Item_Instance_vld_pvt.Check_Reqd_Param_Num
22036: ( p_source_instance_rec.INSTANCE_ID ,
22037: ' p_source_instance_rec.INSTANCE_ID ',
22038: l_api_name
22039: );
22065: OPEN C1;
22066: FETCH C1 into l_serialized;
22067: IF C1%FOUND THEN
22068: -- IF nvl(l_serialized,0) IN (2,5,6) then
22069: IF csi_Item_Instance_Vld_pvt.Is_treated_serialized
22070: ( p_serial_control_code => l_serialized
22071: ,p_location_type_code => p_source_instance_rec.location_type_code
22072: ,p_transaction_type_id => p_txn_rec.transaction_type_id
22073: ) -- Added by sk on 09/13/01
23115: ( p_version_label_rec.ACTIVE_START_DATE = FND_API.G_MISS_DATE)) THEN
23116: p_version_label_rec.ACTIVE_START_DATE := SYSDATE;
23117: END IF;
23118: -- verify if the active_start_date is valid
23119: IF NOT(CSI_Item_Instance_Vld_Pvt.Is_Ver_StartDate_Valid
23120: (p_version_label_rec.ACTIVE_START_DATE,
23121: p_version_label_rec.ACTIVE_END_DATE ,
23122: p_version_label_rec.INSTANCE_ID )) THEN
23123: RAISE FND_API.G_EXC_ERROR;
23124: END IF;
23125: -- Verify if the active_end_date is valid
23126: IF ((p_version_label_rec.ACTIVE_END_DATE is NOT NULL) AND
23127: (p_version_label_rec.ACTIVE_END_DATE <> FND_API.G_MISS_DATE )) THEN
23128: IF NOT(CSI_Item_Instance_vld_pvt.Is_Ver_EndDate_Valid
23129: (p_version_label_rec.ACTIVE_START_DATE,
23130: p_version_label_rec.ACTIVE_END_DATE ,
23131: p_version_label_rec.INSTANCE_ID )) THEN
23132: RAISE FND_API.G_EXC_ERROR;
27435: (p_source_instance_rec.instance_id = FND_API.G_MISS_NUM) THEN
27436: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
27437: FND_MSG_PUB.Add;
27438: RAISE FND_API.G_EXC_ERROR;
27439: ELSIF NOT (csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
27440: p_source_instance_rec.instance_id ,
27441: l_curr_instance_rec )) THEN
27442: RAISE FND_API.G_EXC_ERROR;
27443: END IF;
28754: IF l_ext_attrib_tbl.COUNT > 0 THEN
28755: FOR tab_row IN l_ext_attrib_tbl.FIRST .. l_ext_attrib_tbl.LAST
28756: LOOP
28757: IF l_ext_attrib_tbl.EXISTS(tab_row) THEN
28758: IF NOT(csi_Item_Instance_Vld_pvt.get_ext_attrib_level(l_ext_attrib_tbl(tab_row).attribute_id,
28759: l_attribute_level ))THEN
28760: RAISE FND_API.G_EXC_ERROR;
28761: END IF;
28762:
29305: END IF;
29306: -- Start API body
29307: IF l_csi_explode_bom = 'Y' THEN
29308: -- Verify if the a Valid item and Org id is being passed
29309: IF NOT(csi_Item_Instance_Vld_pvt.val_item_org
29310: ( p_source_instance_rec.INVENTORY_ITEM_ID,
29311: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29312: RAISE FND_API.G_EXC_ERROR;
29313: END IF;
29311: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29312: RAISE FND_API.G_EXC_ERROR;
29313: END IF;
29314: -- Verify if the a Valid bom and Org id is being passed
29315: IF NOT(csi_Item_Instance_Vld_pvt.val_bom_org
29316: ( p_source_instance_rec.INVENTORY_ITEM_ID,
29317: p_source_instance_rec.VLD_ORGANIZATION_ID)) THEN
29318: RAISE FND_API.G_EXC_ERROR;
29319: END IF;
29339: ||to_char(p_source_instance_rec.VLD_ORGANIZATION_ID));
29340: RAISE FND_API.G_EXC_ERROR;
29341: END;
29342: --
29343: IF NOT csi_item_instance_vld_pvt.Is_Trackable
29344: (p_inv_item_id => p_source_instance_rec.INVENTORY_ITEM_ID,
29345: p_org_id => l_master_organization_id) THEN
29346: csi_gen_utility_pvt.put_line('Passed Inventory Item is not Trackable..');
29347: RAISE FND_API.G_EXC_ERROR;
29356: RAISE FND_API.G_EXC_ERROR;
29357: END IF;
29358: --
29359: -- Verify if configruation has been exploded before
29360: IF (csi_Item_Instance_Vld_pvt.Is_config_exploded
29361: ( p_source_instance_rec.INSTANCE_ID)) THEN
29362: csi_gen_utility_pvt.put_line('Configuration already Exploded');
29363: RAISE FND_API.G_EXC_ERROR;
29364: END IF;
29417: l_prev_parent := l_init_sort_code; -- By default this will be Top Most Parent
29418: --
29419: For v_rec in BOM_CSR(l_group_id)
29420: Loop
29421: IF csi_Item_Instance_Vld_pvt.Is_Trackable
29422: (p_inv_item_id => v_rec.component_item_id,
29423: p_org_id => v_rec.master_organization_id,
29424: p_stack_err_msg => FALSE) THEN
29425: --
32252: (p_source_instance_rec.instance_id = FND_API.G_MISS_NUM) THEN
32253: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
32254: FND_MSG_PUB.Add;
32255: RAISE FND_API.G_EXC_ERROR;
32256: ELSIF NOT (csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
32257: p_source_instance_rec.instance_id ,
32258: l_curr_instance_rec )) THEN
32259: RAISE FND_API.G_EXC_ERROR;
32260: END IF;
33516: IF l_ext_attrib_tbl.COUNT > 0 THEN
33517: FOR tab_row IN l_ext_attrib_tbl.FIRST .. l_ext_attrib_tbl.LAST
33518: LOOP
33519: IF l_ext_attrib_tbl.EXISTS(tab_row) THEN
33520: IF NOT(csi_Item_Instance_Vld_pvt.get_ext_attrib_level(l_ext_attrib_tbl(tab_row).attribute_id,
33521: l_attribute_level ))THEN
33522: RAISE FND_API.G_EXC_ERROR;
33523: END IF;
33524: IF (l_attribute_level = 'INSTANCE') THEN
33926: -- FOR inst_config_rec IN inst_children_cur( p_source_instance_rec.instance_id)
33927: IF l_rel_tbl.count > 0 THEN
33928: FOR j in l_rel_tbl.FIRST .. l_rel_tbl.LAST
33929: LOOP
33930: IF NOT(csi_Item_Instance_Vld_pvt.Val_and_get_inst_rec(
33931: l_rel_tbl(j).SUBJECT_ID,
33932: l_source_child_instance_rec)) THEN
33933: RAISE FND_API.G_EXC_ERROR;
33934: END IF;
34529: WHEN OTHERS THEN
34530: NULL;
34531: END;
34532:
34533: csi_item_instance_vld_pvt.get_link_locations
34534: (
34535: p_instance_header_tbl => l_instance_header_tbl,
34536: x_return_status => x_return_status
34537: );