[Home] [Help]
461: ELSIF l_Error_Code > 0 THEN
462: csi_gen_utility_pvt.put_line (' Bom explosion error code < 0'|| l_Error_Code ||' '||l_err_msg);
463: END IF;
464: FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
465: FND_MSG_PUB.Add;
466: l_return_status := FALSE;
467: RETURN l_return_status;
468: END IF;
469: --
1202: IF p_time_stamp < l_time_stamp THEN
1203: FND_MESSAGE.SET_NAME('CSI','CSI_H_DATE_BEFORE_CRE_DATE');
1204: FND_MESSAGE.SET_TOKEN('CREATION_DATE',to_char(l_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
1205: FND_MESSAGE.SET_TOKEN('USER_DATE',to_char(p_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
1206: FND_MSG_PUB.Add;
1207: RAISE FND_API.G_EXC_ERROR;
1208: END IF;
1209: END IF;
1210: FOR C2 IN get_instance_hist(x_instance_rec.instance_id ,l_nearest_full_dump,p_time_stamp ) LOOP
1840: EXCEPTION
1841: WHEN NO_DATA_FOUND THEN
1842: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
1843: fnd_message.set_token('ORGANIZATION_ID',x_instance_rec.vld_organization_id);
1844: fnd_msg_pub.ADD;
1845: RAISE fnd_api.g_exc_error;
1846: END;
1847: END IF;
1848:
4055: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
4056: l_msg_index := 1;
4057: l_msg_count := x_msg_count;
4058: WHILE l_msg_count > 0 LOOP
4059: x_msg_data := FND_MSG_PUB.GET
4060: ( l_msg_index,
4061: FND_API.G_FALSE );
4062: csi_gen_utility_pvt.put_line( ' Error from OKS_ENTITLEMENTS_PUB.GET_CONTRACTS.. ');
4063: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4661: END IF;
4662:
4663: -- Initialize message list if p_init_msg_list is set to TRUE.
4664: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4665: FND_MSG_PUB.initialize;
4666: END IF;
4667:
4668: -- Initialize API return status to success
4669: x_return_status := FND_API.G_RET_STS_SUCCESS;
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;
4769: END IF;
4770: p_instance_rec.vld_organization_id := p_instance_rec.inv_master_organization_id;
4771: --If both vld_organization_id and inv_master_organization_id are
4783: AND master_organization_id = p_instance_rec.inv_master_organization_id;
4784: EXCEPTION
4785: WHEN NO_DATA_FOUND THEN
4786: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_VLD_MAST_COMB');
4787: FND_MSG_PUB.Add;
4788: RAISE FND_API.G_EXC_ERROR;
4789: END;
4790: ELSE
4791: FND_MESSAGE.SET_NAME('CSI','CSI_NO_VLD_ORG');
4788: RAISE FND_API.G_EXC_ERROR;
4789: END;
4790: ELSE
4791: FND_MESSAGE.SET_NAME('CSI','CSI_NO_VLD_ORG');
4792: FND_MSG_PUB.Add;
4793: RAISE FND_API.G_EXC_ERROR;
4794: END IF;
4795: -- End of modifications by sk on 02/19/02 for bug 2198575
4796:
4830: EXCEPTION
4831: WHEN NO_DATA_FOUND THEN
4832: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
4833: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4834: fnd_msg_pub.ADD;
4835: RAISE fnd_api.g_exc_error;
4836: END;
4837: IF p_instance_rec.location_id IS NULL
4838: THEN
4837: IF p_instance_rec.location_id IS NULL
4838: THEN
4839: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
4840: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4841: fnd_msg_pub.ADD;
4842: RAISE fnd_api.g_exc_error;
4843: END IF;
4844: END IF;
4845: END IF;
4857: EXCEPTION
4858: WHEN NO_DATA_FOUND THEN
4859: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
4860: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4861: fnd_msg_pub.ADD;
4862: RAISE fnd_api.g_exc_error;
4863: END;
4864: IF p_instance_rec.install_location_id IS NULL
4865: THEN
4864: IF p_instance_rec.install_location_id IS NULL
4865: THEN
4866: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
4867: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4868: fnd_msg_pub.ADD;
4869: RAISE fnd_api.g_exc_error;
4870: END IF;
4871: END IF;
4872: END IF;
4913: THEN
4914: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
4915: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
4916: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4917: FND_MSG_PUB.Add;
4918: RAISE fnd_api.g_exc_error;
4919: END IF;
4920: END IF;
4921: --
4943:
4944: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
4945: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
4946: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4947: FND_MSG_PUB.Add;
4948: RAISE fnd_api.g_exc_error;
4949: End;
4950: --
4951: BEGIN
4981: p_item_attribute_tbl(p_ins_count_rec.inv_count).valid_flag := 'N';
4982: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
4983: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
4984: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
4985: FND_MSG_PUB.Add;
4986: RAISE fnd_api.g_exc_error;
4987: END;
4988: End if;
4989: -- Added the following code to fix bug 5506231
5080: ,x_token => l_token
5081: )
5082: THEN
5083: -- FND_MESSAGE.SET_NAME('CSI', l_reason_failed); -- commented for bug 5351886
5084: -- FND_MSG_PUB.Add; -- commented for bug 5351886
5085: csi_gen_utility_pvt.put_line('Call to eam_assetnumber_pub.validate_fields failed with following reason');
5086: csi_gen_utility_pvt.put_line(l_reason_failed);
5087: RAISE FND_API.G_EXC_ERROR;
5088: END IF;
5087: RAISE FND_API.G_EXC_ERROR;
5088: END IF;
5089: ELSE
5090: FND_MESSAGE.SET_NAME('CSI', 'CSI_NON_EAM_ITEM');
5091: FND_MSG_PUB.Add;
5092: RAISE FND_API.G_EXC_ERROR;
5093: END IF;
5094: END IF;
5095: -- Adding the following code as there could be a case
5276: IF p_instance_rec.location_type_code = FND_API.G_MISS_CHAR OR
5277: p_instance_rec.location_type_code IS NULL THEN
5278: IF p_instance_rec.creation_complete_flag = 'Y' THEN
5279: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_LOCATION');
5280: FND_MSG_PUB.ADD;
5281: RAISE fnd_api.g_exc_error;
5282: ELSE
5283: p_instance_rec.creation_complete_flag := 'N';
5284: END IF;
5285: ELSE
5286: IF p_instance_rec.location_id IS NULL OR
5287: p_instance_rec.location_id = FND_API.G_MISS_NUM THEN
5288: FND_MESSAGE.SET_NAME('CSI','CSI_API_LOCATION_NOT_VALID');
5289: FND_MSG_PUB.ADD;
5290: RAISE fnd_api.g_exc_error;
5291: ELSE
5292: -- Validate location_id
5293: l_exists_flag := 'N';
5304: End Loop;
5305: --
5306: IF l_valid_flag <> 'Y' THEN
5307: FND_MESSAGE.SET_NAME('CSI','CSI_API_LOCATION_NOT_VALID');
5308: FND_MSG_PUB.ADD;
5309: RAISE fnd_api.g_exc_error;
5310: END IF;
5311: END IF; -- p_location_tbl count
5312: --
5359: END IF;
5360: --validation for accounting classification_code
5361: IF (p_party_tbl.count < 1) THEN
5362: FND_MESSAGE.SET_NAME('CSI','CSI_API_NO_PARTY_RECORD');
5363: FND_MSG_PUB.Add;
5364: RAISE FND_API.G_EXC_ERROR;
5365: ELSE
5366: FOR l_count IN p_party_tbl.FIRST..p_party_tbl.LAST LOOP
5367: IF p_party_tbl.EXISTS(l_count) THEN
5373: END LOOP;
5374: IF l_owner_count <> 1 THEN
5375: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_OWNER_EXISTS');
5376: FND_MESSAGE.SET_TOKEN('OWNER',l_owner);
5377: FND_MSG_PUB.Add;
5378: RAISE fnd_api.g_exc_error;
5379: END IF;
5380: --
5381: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
5385: l_int_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
5386: --
5387: IF l_int_party_id IS NULL THEN
5388: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
5389: FND_MSG_PUB.ADD;
5390: RAISE FND_API.G_EXC_ERROR;
5391: END IF;
5392: --
5393: -- Start code addition for eam integration
5415: ELSE
5416: IF ((p_instance_rec.accounting_class_code = 'WIP') OR
5417: (p_instance_rec.accounting_class_code = 'PROJECT')) THEN
5418: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ACCOUNT_CLASS');
5419: FND_MSG_PUB.Add;
5420: RAISE FND_API.G_EXC_ERROR;
5421: END IF;
5422: END IF;
5423: END IF;
5494: (p_instance_rec.active_start_date <> FND_API.G_MISS_DATE)) AND
5495: (p_instance_rec.active_start_date > SYSDATE)
5496: THEN
5497: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_START_DATE');
5498: FND_MSG_PUB.Add;
5499: RAISE FND_API.G_EXC_ERROR;
5500: END IF;
5501:
5502: -- validating the effective active start date
5525: --
5526: IF l_valid_flag <> 'Y' THEN
5527: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM_CONDITION');
5528: FND_MESSAGE.SET_TOKEN('INSTANCE_CONDITION_ID',p_instance_rec.instance_condition_id);
5529: FND_MSG_PUB.Add;
5530: RAISE fnd_api.g_exc_error;
5531: END IF;
5532: END IF;
5533: --
5565: --
5566: IF nvl(l_terminated_flag,'N') = 'Y' THEN
5567: FND_MESSAGE.SET_NAME('CSI','CSI_API_STATUS_NOT_ALLOWED');
5568: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5569: FND_MSG_PUB.Add;
5570: RAISE FND_API.G_EXC_ERROR;
5571: END IF;
5572: EXCEPTION
5573: WHEN NO_DATA_FOUND THEN
5572: EXCEPTION
5573: WHEN NO_DATA_FOUND THEN
5574: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_STATUS_ID');
5575: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5576: FND_MSG_PUB.Add;
5577: RAISE FND_API.G_EXC_ERROR;
5578: END;
5579: ELSIF (p_instance_rec.instance_status_id = 1) THEN
5580: FND_MESSAGE.SET_NAME('CSI','CSI_API_STATUS_NOT_ALLOWED');
5578: END;
5579: ELSIF (p_instance_rec.instance_status_id = 1) THEN
5580: FND_MESSAGE.SET_NAME('CSI','CSI_API_STATUS_NOT_ALLOWED');
5581: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5582: FND_MSG_PUB.Add;
5583: RAISE FND_API.G_EXC_ERROR;
5584: ELSE
5585: IF p_generic_id_tbl.count > 0 THEN
5586: For gen_count in p_generic_id_tbl.FIRST .. p_generic_id_tbl.LAST
5596: --
5597: IF l_valid_flag <> 'Y' THEN
5598: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_STATUS_ID');
5599: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5600: FND_MSG_PUB.Add;
5601: RAISE FND_API.G_EXC_ERROR;
5602: END IF;
5603: --
5604: IF nvl(l_terminated_flag,'N') = 'Y' THEN
5603: --
5604: IF nvl(l_terminated_flag,'N') = 'Y' THEN
5605: FND_MESSAGE.SET_NAME('CSI','CSI_API_STATUS_NOT_ALLOWED');
5606: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5607: FND_MSG_PUB.Add;
5608: RAISE FND_API.G_EXC_ERROR;
5609: END IF;
5610: END IF;
5611: --
5624: --
5625: IF nvl(l_terminated_flag,'N') = 'Y' THEN
5626: FND_MESSAGE.SET_NAME('CSI','CSI_API_STATUS_NOT_ALLOWED');
5627: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5628: FND_MSG_PUB.Add;
5629: RAISE FND_API.G_EXC_ERROR;
5630: END IF;
5631: Exception
5632: when others then
5633: p_generic_id_tbl(p_ins_count_rec.generic_count).valid_flag := 'N';
5634: p_generic_id_tbl(p_ins_count_rec.generic_count).terminated_flag := NULL;
5635: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_STATUS_ID');
5636: FND_MESSAGE.SET_TOKEN('INSTANCE_STATUS',p_instance_rec.instance_status_id);
5637: FND_MSG_PUB.Add;
5638: RAISE FND_API.G_EXC_ERROR;
5639: End;
5640: END IF;
5641: END IF;
5658: --
5659: IF l_valid_flag <> 'Y' THEN
5660: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_SYSTEM_ID');
5661: FND_MESSAGE.SET_TOKEN('SYSTEM_ID',p_instance_rec.system_id);
5662: FND_MSG_PUB.Add;
5663: RAISE fnd_api.g_exc_error;
5664: END IF;
5665: END IF;
5666: --
5696: --
5697: IF l_valid_flag <> 'Y' THEN
5698: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_INSTANCE_TYPE');
5699: FND_MESSAGE.SET_TOKEN('INSTANCE_TYPE_CODE',p_instance_rec.instance_type_code);
5700: FND_MSG_PUB.Add;
5701: RAISE fnd_api.g_exc_error;
5702: END IF;
5703: END IF;
5704: --
5733: --
5734: if l_valid_flag <> 'Y' then
5735: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_USAGE_CODE');
5736: FND_MESSAGE.SET_TOKEN('INSTANCE_USAGE_CODE',p_instance_rec.instance_usage_code);
5737: FND_MSG_PUB.Add;
5738: RAISE fnd_api.g_exc_error;
5739: end if;
5740: End if;
5741: --
5772: --
5773: if l_valid_flag <> 'Y' then
5774: FND_MESSAGE.SET_NAME('CSI','CSI_OPERATIONAL_STATUS_CODE');
5775: FND_MESSAGE.SET_TOKEN('OPERATIONAL_STATUS_CODE',p_instance_rec.operational_status_code);
5776: FND_MSG_PUB.Add;
5777: RAISE fnd_api.g_exc_error;
5778: end if;
5779: End if;
5780: --
5903: p_instance_rec.sales_unit_price <> FND_API.G_MISS_NUM))
5904: )
5905: THEN
5906: FND_MESSAGE.SET_NAME('CSI','CSI_NO_PRICE_OR_CODE');
5907: FND_MSG_PUB.Add;
5908: RAISE fnd_api.g_exc_error;
5909: END IF;
5910: -- End addition of columns for FA Integration
5911:
5991: THEN
5992: IF p_instance_rec.install_location_id IS NULL OR
5993: p_instance_rec.install_location_id = FND_API.G_MISS_NUM THEN
5994: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
5995: FND_MSG_PUB.ADD;
5996: RAISE fnd_api.g_exc_error;
5997: END IF;
5998: --
5999: l_exists_flag := 'N';
6010: End Loop;
6011: --
6012: IF l_valid_flag <> 'Y' THEN
6013: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
6014: FND_MSG_PUB.ADD;
6015: RAISE fnd_api.g_exc_error;
6016: END IF;
6017: END IF;
6018: --
6034: END IF;
6035: END IF;
6036: ELSE
6037: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
6038: FND_MSG_PUB.Add;
6039: RAISE FND_API.G_EXC_ERROR;
6040: END IF;
6041: END IF;
6042: csi_gen_utility_pvt.put_line('Before Insert row...');
6220: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
6221: THEN
6222: FND_MESSAGE.SET_NAME('CSI','CSI_API_NO_COUNTER_ASSOCIATION');
6223: FND_MESSAGE.SET_TOKEN('COUNTER','CSI_COUNTER_TEMPLATE_PUB.AUTOINSTANTIATE_COUNTERS');
6224: FND_MSG_PUB.Add;
6225: RAISE FND_API.G_EXC_ERROR;
6226: END IF;
6227: -- srramakr Bug # 2255391. In CTO, since the configured item is created as a part of Sales Order
6228: -- processing, there is no way a counter gets attached to this new item.
6294: );
6295: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6296: FND_MESSAGE.SET_NAME('CSI','CSI_API_NO_COUNTER_ASSOCIATION');
6297: FND_MESSAGE.SET_TOKEN('COUNTER','CSI_COUNTER_TEMPLATE_PUB.AUTOINSTANTIATE_COUNTERS');
6298: FND_MSG_PUB.Add;
6299: RAISE FND_API.G_EXC_ERROR;
6300: END IF; -- return status
6301: END IF; -- ctr. grp template exists1
6302: END IF; -- for l_base_item
6342:
6343: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6344: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_VALIDATE_TXN');
6345: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_txn_rec.transaction_id );
6346: FND_MSG_PUB.Add;
6347: RAISE FND_API.G_EXC_ERROR;
6348: END IF;
6349:
6350: -- Get a unique history item instance id from the sequence
6573:
6574:
6575: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6576: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_HISTORY');
6577: FND_MSG_PUB.Add;
6578: RAISE FND_API.G_EXC_ERROR;
6579: END IF;
6580:
6581: END IF; -- Check for p_called_from_grp
6586: COMMIT WORK;
6587: END IF;
6588:
6589: -- Standard call to get message count and IF count is get message info.
6590: FND_MSG_PUB.Count_And_Get
6591: (p_encoded => FND_API.G_FALSE, --Added for bug 7657438
6592: p_count => x_msg_count,
6593: p_data => x_msg_data
6594: );
6596: EXCEPTION
6597: WHEN FND_API.G_EXC_ERROR THEN
6598: ROLLBACK TO create_item_instance_pvt;
6599: x_return_status := FND_API.G_RET_STS_ERROR ;
6600: FND_MSG_PUB.Count_And_Get
6601: (p_encoded => FND_API.G_FALSE, --Added for bug 7657438
6602: p_count => x_msg_count,
6603: p_data => x_msg_data
6604: );
6604: );
6605: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6606: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6607: ROLLBACK TO create_item_instance_pvt;
6608: FND_MSG_PUB.Count_And_Get
6609: ( p_encoded => FND_API.G_FALSE,
6610: p_count => x_msg_count,
6611: p_data => x_msg_data
6612: );
6612: );
6613: WHEN OTHERS THEN
6614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6615: ROLLBACK TO create_item_instance_pvt;
6616: IF FND_MSG_PUB.Check_Msg_Level
6617: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6618: THEN
6619: FND_MSG_PUB.Add_Exc_Msg
6620: (G_PKG_NAME ,
6613: WHEN OTHERS THEN
6614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6615: ROLLBACK TO create_item_instance_pvt;
6616: IF FND_MSG_PUB.Check_Msg_Level
6617: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6618: THEN
6619: FND_MSG_PUB.Add_Exc_Msg
6620: (G_PKG_NAME ,
6621: l_api_name
6615: ROLLBACK TO create_item_instance_pvt;
6616: IF FND_MSG_PUB.Check_Msg_Level
6617: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6618: THEN
6619: FND_MSG_PUB.Add_Exc_Msg
6620: (G_PKG_NAME ,
6621: l_api_name
6622: );
6623: END IF;
6620: (G_PKG_NAME ,
6621: l_api_name
6622: );
6623: END IF;
6624: FND_MSG_PUB.Count_And_Get
6625: (p_encoded => FND_API.G_FALSE,
6626: p_count => x_msg_count,
6627: p_data => x_msg_data
6628: );
6921: END IF;
6922:
6923: -- Initialize message list if p_init_msg_list is set to TRUE.
6924: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6925: FND_MSG_PUB.initialize;
6926: END IF;
6927:
6928: -- Initialize API return status to success
6929: x_return_status := FND_API.G_RET_STS_SUCCESS;
6963: EXCEPTION
6964: WHEN NO_DATA_FOUND THEN
6965: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_INSTANCE_NUM');
6966: FND_MESSAGE.SET_TOKEN('INSTANCE_NUMBER', l_instance_rec.instance_id);
6967: FND_MSG_PUB.Add;
6968: RAISE FND_API.G_EXC_ERROR;
6969: END;
6970:
6971:
7001: );
7002:
7003: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7004: FOR i in 1..x_msg_Count LOOP
7005: FND_MSG_PUB.Get(p_msg_index => i,
7006: p_encoded => 'F',
7007: p_data => x_msg_data,
7008: p_msg_index_out => x_msg_index_out );
7009:
7018: COMMIT WORK;
7019: END IF;
7020:
7021: -- Standard call to get message count and IF count is get message info.
7022: FND_MSG_PUB.Count_And_Get
7023: (p_encoded => FND_API.G_FALSE,
7024: p_count => x_msg_count,
7025: p_data => x_msg_data
7026: );
7031: THEN
7032: ROLLBACK TO get_and_update_acct_class;
7033: END IF;
7034: x_return_status := FND_API.G_RET_STS_ERROR ;
7035: FND_MSG_PUB.Count_And_Get
7036: (p_encoded => FND_API.G_FALSE,
7037: p_count => x_msg_count,
7038: p_data => x_msg_data
7039: );
7042: IF FND_API.To_Boolean( p_commit )
7043: THEN
7044: ROLLBACK TO get_and_update_acct_class;
7045: END IF;
7046: FND_MSG_PUB.Count_And_Get
7047: ( p_encoded => FND_API.G_FALSE,
7048: p_count => x_msg_count,
7049: p_data => x_msg_data
7050: );
7053: IF FND_API.To_Boolean( p_commit )
7054: THEN
7055: ROLLBACK TO get_and_update_acct_class;
7056: END IF;
7057: IF FND_MSG_PUB.Check_Msg_Level
7058: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7059: THEN
7060: FND_MSG_PUB.Add_Exc_Msg
7061: (G_PKG_NAME ,
7054: THEN
7055: ROLLBACK TO get_and_update_acct_class;
7056: END IF;
7057: IF FND_MSG_PUB.Check_Msg_Level
7058: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7059: THEN
7060: FND_MSG_PUB.Add_Exc_Msg
7061: (G_PKG_NAME ,
7062: l_api_name
7056: END IF;
7057: IF FND_MSG_PUB.Check_Msg_Level
7058: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7059: THEN
7060: FND_MSG_PUB.Add_Exc_Msg
7061: (G_PKG_NAME ,
7062: l_api_name
7063: );
7064: END IF;
7061: (G_PKG_NAME ,
7062: l_api_name
7063: );
7064: END IF;
7065: FND_MSG_PUB.Count_And_Get
7066: (p_encoded => FND_API.G_FALSE,
7067: p_count => x_msg_count,
7068: p_data => x_msg_data
7069: );
7506: END IF;
7507:
7508: -- Initialize message list if p_init_msg_list is set to TRUE.
7509: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7510: FND_MSG_PUB.initialize;
7511: END IF;
7512: -- Initialize API return status to success
7513: x_return_status := FND_API.G_RET_STS_SUCCESS;
7514:
7536: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
7537: --
7538: IF l_internal_party_id IS NULL THEN
7539: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
7540: FND_MSG_PUB.ADD;
7541: RAISE FND_API.G_EXC_ERROR;
7542: END IF;
7543: --
7544: -- ADDED FOR BUG 2957236
7582: );
7583: --
7584: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7585: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
7586: FND_MSG_PUB.Add;
7587: RAISE FND_API.G_EXC_ERROR;
7588: END IF;
7589: ELSE
7590: csi_gen_utility_pvt.put_line ( 'Calling Get_Children for Regular Inheritance...');
7602: );
7603: --
7604: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7605: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
7606: FND_MSG_PUB.Add;
7607: RAISE FND_API.G_EXC_ERROR;
7608: END IF;
7609: END IF;
7610: END IF;
7621: OPEN curr_instance_rec(l_rel_tbl(j).subject_id);
7622: FETCH curr_instance_rec INTO l_curr_instance_rec;
7623: IF curr_instance_rec%NOTFOUND THEN
7624: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
7625: FND_MSG_PUB.ADD;
7626: RAISE FND_API.G_EXC_ERROR;
7627: END IF;
7628: CLOSE curr_instance_rec;
7629: --This code has been added to make sure that the expired child instance should not get inherited
7916: l_msg_index := 1;
7917: l_msg_count := x_msg_count;
7918:
7919: WHILE l_msg_count > 0 LOOP
7920: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
7921: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
7922: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7923: l_msg_index := l_msg_index + 1;
7924: l_msg_count := l_msg_count - 1;
7953: l_msg_index := 1;
7954: l_msg_count := x_msg_count;
7955:
7956: WHILE l_msg_count > 0 LOOP
7957: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
7958: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
7959: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7960: l_msg_index := l_msg_index + 1;
7961: l_msg_count := l_msg_count - 1;
7980: l_msg_index := 1;
7981: l_msg_count := x_msg_count;
7982:
7983: WHILE l_msg_count > 0 LOOP
7984: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
7985: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
7986: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
7987: l_msg_index := l_msg_index + 1;
7988: l_msg_count := l_msg_count - 1;
8001: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
8002: --
8003: IF l_full_dump_frequency IS NULL THEN
8004: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
8005: FND_MSG_PUB.ADD;
8006: RAISE FND_API.G_EXC_ERROR;
8007: END IF;
8008: --
8009: -- Get a unique history item instance id from the sequence
10219: OPEN new_instance_rec(l_rel_tbl(j).subject_id);
10220: FETCH new_instance_rec INTO l_new_instance_rec;
10221: IF new_instance_rec%NOTFOUND THEN
10222: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
10223: FND_MSG_PUB.ADD;
10224: RAISE FND_API.G_EXC_ERROR;
10225: END IF;
10226: CLOSE new_instance_rec;
10227: --
10283: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10284: l_msg_index := 1;
10285: l_msg_count := x_msg_count;
10286: WHILE l_msg_count > 0 LOOP
10287: x_msg_data := FND_MSG_PUB.GET
10288: ( l_msg_index,
10289: FND_API.G_FALSE
10290: );
10291: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
10347: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10348: l_msg_index := 1;
10349: l_msg_count := x_msg_count;
10350: WHILE l_msg_count > 0 LOOP
10351: x_msg_data := FND_MSG_PUB.GET
10352: ( l_msg_index,
10353: FND_API.G_FALSE
10354: );
10355: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
10393: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10394: l_msg_index := 1;
10395: l_msg_count := x_msg_count;
10396: WHILE l_msg_count > 0 LOOP
10397: x_msg_data := FND_MSG_PUB.GET
10398: ( l_msg_index,
10399: FND_API.G_FALSE
10400: );
10401: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
10896: COMMIT WORK;
10897: END IF;
10898:
10899: -- Standard call to get message count and if count is get message info.
10900: FND_MSG_PUB.Count_And_Get
10901: (p_encoded => FND_API.G_FALSE,
10902: p_count => x_msg_count ,
10903: p_data => x_msg_data
10904: );
10909: IF FND_API.To_Boolean( p_commit ) THEN
10910: ROLLBACK TO update_child_instance_pvt;
10911: END IF;
10912: x_return_status := FND_API.G_RET_STS_ERROR ;
10913: FND_MSG_PUB.Count_And_Get
10914: ( p_encoded => FND_API.G_FALSE,
10915: p_count => x_msg_count,
10916: p_data => x_msg_data
10917: );
10919: IF FND_API.To_Boolean( p_commit ) THEN
10920: ROLLBACK TO update_child_instance_pvt;
10921: END IF;
10922: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10923: FND_MSG_PUB.Count_And_Get
10924: ( p_encoded => FND_API.G_FALSE,
10925: p_count => x_msg_count,
10926: p_data => x_msg_data
10927: );
10930: ROLLBACK TO update_child_instance_pvt;
10931: END IF;
10932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10933:
10934: IF FND_MSG_PUB.Check_Msg_Level
10935: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10936: THEN
10937: FND_MSG_PUB.Add_Exc_Msg
10938: ( G_PKG_NAME ,
10931: END IF;
10932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10933:
10934: IF FND_MSG_PUB.Check_Msg_Level
10935: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10936: THEN
10937: FND_MSG_PUB.Add_Exc_Msg
10938: ( G_PKG_NAME ,
10939: l_api_name
10933:
10934: IF FND_MSG_PUB.Check_Msg_Level
10935: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10936: THEN
10937: FND_MSG_PUB.Add_Exc_Msg
10938: ( G_PKG_NAME ,
10939: l_api_name
10940: );
10941: END IF;
10938: ( G_PKG_NAME ,
10939: l_api_name
10940: );
10941: END IF;
10942: FND_MSG_PUB.Count_And_Get
10943: ( p_encoded => FND_API.G_FALSE,
10944: p_count => x_msg_count,
10945: p_data => x_msg_data
10946: );
11094: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
11095: --
11096: IF l_internal_party_id IS NULL THEN
11097: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
11098: FND_MSG_PUB.ADD;
11099: RAISE FND_API.G_EXC_ERROR;
11100: END IF;
11101: --
11102: OPEN instance_csr (p_instance_id);
11236: x_return_status := fnd_api.g_ret_sts_error ;
11237: fnd_message.set_name('CSI', 'CSI_HAS_TXNS_GT_SYS');
11238: fnd_message.set_token('INSTANCE_ID',p_instance_id );
11239: fnd_message.set_token('SOURCE_TXN_DATE',to_char(p_source_transaction_date, 'DD-MON-YYYY HH24:MI:SS'));
11240: fnd_msg_pub.add;
11241: RAISE fnd_api.g_exc_error;
11242: END IF;
11243: EXCEPTION
11244: WHEN fnd_api.g_exc_error THEN
11250: p_source_transaction_date <> fnd_api.g_miss_date THEN
11251: x_return_status := fnd_api.g_ret_sts_error ;
11252: fnd_message.set_name('CSI', 'CSI_PASS_TXNS_GT_SYS');
11253: fnd_message.set_token('SOURCE_TXN_DATE',to_char(p_source_transaction_date, 'DD-MON-YYYY HH24:MI:SS'));
11254: fnd_msg_pub.add;
11255: RAISE fnd_api.g_exc_error;
11256: END IF;
11257: p_oks_txn_inst_tbl(J).transfer_date := l_transaction_date;
11258: p_oks_txn_inst_tbl(J).transaction_date := l_txn_date;
11524: x_return_status := fnd_api.g_ret_sts_error ;
11525: fnd_message.set_name('CSI', 'CSI_HAS_TXNS_GT_SYS');
11526: fnd_message.set_token('INSTANCE_ID',p_instance_id );
11527: fnd_message.set_token('SOURCE_TXN_DATE',to_char(p_source_transaction_date, 'DD-MON-YYYY HH24:MI:SS'));
11528: fnd_msg_pub.add;
11529: RAISE fnd_api.g_exc_error;
11530: END IF;
11531: EXCEPTION
11532: WHEN fnd_api.g_exc_error THEN
11538: p_source_transaction_date <> fnd_api.g_miss_date THEN
11539: x_return_status := fnd_api.g_ret_sts_error ;
11540: fnd_message.set_name('CSI', 'CSI_PASS_TXNS_GT_SYS');
11541: fnd_message.set_token('SOURCE_TXN_DATE',to_char(p_source_transaction_date, 'DD-MON-YYYY HH24:MI:SS'));
11542: fnd_msg_pub.add;
11543: RAISE fnd_api.g_exc_error;
11544: END IF;
11545: p_oks_txn_inst_tbl(l_oks_txn_count).transfer_date := l_transaction_date;
11546: p_oks_txn_inst_tbl(l_oks_txn_count).transaction_date := l_txn_date;
11598: WHEN OTHERS THEN
11599: FND_MESSAGE.Set_Name('CSI', 'CSI_UNEXP_SQL_ERROR');
11600: FND_MESSAGE.Set_Token('API_NAME', 'Call_to_Contracts');
11601: FND_MESSAGE.Set_Token('SQL_ERROR', sqlerrm);
11602: FND_MSG_PUB.Add;
11603: RAISE fnd_api.g_exc_error;
11604: END Call_to_Contracts;
11605:
11606: PROCEDURE update_txn_status(
12218: END IF;
12219:
12220: -- Initialize message list if p_init_msg_list is set to TRUE.
12221: IF FND_API.to_Boolean( p_init_msg_list ) THEN
12222: FND_MSG_PUB.initialize;
12223: END IF;
12224:
12225: -- Initialize API return status to success
12226: x_return_status := FND_API.G_RET_STS_SUCCESS;
12271: OPEN curr_instance_rec(p_instance_rec.INSTANCE_ID);
12272: FETCH curr_instance_rec INTO l_curr_instance_rec;
12273: IF (l_curr_instance_rec.object_version_number <> nvl(p_instance_rec.OBJECT_VERSION_NUMBER,0)) THEN
12274: FND_MESSAGE.Set_Name('CSI', 'CSI_API_OBJ_VER_MISMATCH');
12275: FND_MSG_PUB.ADD;
12276: RAISE FND_API.G_EXC_ERROR;
12277: END IF;
12278: CLOSE curr_instance_rec;
12279:
12315: NULL;
12316: ELSE
12317: FND_MESSAGE.SET_NAME('CSI','CSI_INSTANCE_LOCKED');
12318: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',p_instance_rec.instance_id);
12319: FND_MSG_PUB.ADD;
12320: RAISE FND_API.G_EXC_ERROR;
12321: END IF;
12322: END IF;
12323: -- End addition for MACD lock functionality
12484: l_cur_instance_rec.last_vld_organization_id <> l_get_instance_rec.vld_organization_id
12485: AND l_curr_instance_rec.instance_usage_code <> 'IN_TRANSIT') --Added for bug 6188180
12486: THEN
12487: FND_MESSAGE.Set_Name('CSI', 'CSI_CANNOT_MODIFY_VLD_ORG');
12488: FND_MSG_PUB.ADD;
12489: RAISE FND_API.G_EXC_ERROR;
12490: END IF;
12491:
12492: -- Check if all the required parameters are passed
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');
12527: FND_MESSAGE.Set_Token('INSTANCE', p_instance_rec.INSTANCE_ID);
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
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');
12537: FND_MESSAGE.Set_Token('INSTANCE', p_instance_rec.INSTANCE_ID);
12538: FND_MSG_PUB.ADD;
12539: RAISE FND_API.G_EXC_ERROR;
12540: END IF;
12541: END IF;
12542: --
12546: IF ((p_instance_rec.instance_id IS NULL) OR
12547: (p_instance_rec.instance_id <> l_curr_instance_rec.instance_id)) THEN
12548: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12549: FND_MESSAGE.Set_Token('COLUMN', 'INSTANCE_ID');
12550: FND_MSG_PUB.ADD;
12551: RAISE FND_API.G_EXC_ERROR;
12552: END IF;
12553: END IF;
12554:
12568: -- End addition for eam integration
12569: /*
12570: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12571: FND_MESSAGE.Set_Token('COLUMN', 'INSTANCE_NUMBER');
12572: FND_MSG_PUB.ADD;
12573: RAISE FND_API.G_EXC_ERROR;
12574: */
12575: END IF;
12576: END IF;
12598: IF(l_number_open_ro>0)
12599: THEN
12600: FND_MESSAGE.Set_Name('CSI', 'CSI_OPEN_RO_EXISTS');
12601: FND_MESSAGE.Set_Token('COLUMN', 'INVENTORY_ITEM_ID OR SERIAL_NUMBER');
12602: FND_MSG_PUB.ADD;
12603: RAISE FND_API.G_EXC_ERROR;
12604:
12605: END IF;
12606: END IF;
12610: IF p_instance_rec.inventory_item_id IS NULL THEN
12611: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INVALID_ITEM');
12612: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
12613: fnd_message.set_token('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12614: FND_MSG_PUB.ADD;
12615: RAISE FND_API.G_EXC_ERROR;
12616: ELSE
12617: IF (p_instance_rec.inventory_item_id <> FND_API.G_MISS_NUM)
12618: AND
12624: l_part_or_serial_change := TRUE;
12625: ELSE
12626: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12627: FND_MESSAGE.Set_Token('COLUMN', 'INVENTORY_ITEM_ID');
12628: FND_MSG_PUB.ADD;
12629: RAISE FND_API.G_EXC_ERROR;
12630: END IF;
12631: END IF;
12632: END IF;
12650: x_mtl_txn_tbl => l_mtl_txn_tbl);
12651: IF NVL(l_mtl_txn_tbl.Count,0) > 0 THEN
12652: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12653: FND_MESSAGE.Set_Token('COLUMN', 'SERIAL_NUMBER');
12654: FND_MSG_PUB.ADD;
12655: RAISE FND_API.G_EXC_ERROR;
12656: END IF;
12657: ELSE
12658: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12656: END IF;
12657: ELSE
12658: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12659: FND_MESSAGE.Set_Token('COLUMN', 'SERIAL_NUMBER');
12660: FND_MSG_PUB.ADD;
12661: RAISE FND_API.G_EXC_ERROR;
12662: END IF;
12663: */ -- Commented for bug 6965008
12664: END IF;
12667:
12668: --
12669: IF p_instance_rec.instance_status_id IS NULL THEN
12670: FND_MESSAGE.Set_Name('CSI','CSI_API_MANDATORY_STATUS');
12671: FND_MSG_PUB.ADD;
12672: RAISE FND_API.G_EXC_ERROR;
12673: END IF;
12674: --
12675: IF p_instance_rec.quantity IS NULL THEN
12673: END IF;
12674: --
12675: IF p_instance_rec.quantity IS NULL THEN
12676: FND_MESSAGE.Set_Name('CSI','CSI_API_MANDATORY_QUANTITY');
12677: FND_MSG_PUB.ADD;
12678: RAISE FND_API.G_EXC_ERROR;
12679: END IF;
12680: --
12681: IF p_instance_rec.unit_of_measure IS NULL THEN
12679: END IF;
12680: --
12681: IF p_instance_rec.unit_of_measure IS NULL THEN
12682: FND_MESSAGE.Set_Name('CSI','CSI_API_MANDATORY_UOM');
12683: FND_MSG_PUB.ADD;
12684: RAISE FND_API.G_EXC_ERROR;
12685: END IF;
12686: --
12687: -- validation for Inv Master Organization Id
12704: AND master_organization_id = p_instance_rec.inv_master_organization_id;
12705: EXCEPTION
12706: WHEN NO_DATA_FOUND THEN
12707: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_VLD_MAST_COMB');
12708: FND_MSG_PUB.Add;
12709: RAISE FND_API.G_EXC_ERROR;
12710: END;
12711: /***** FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12712: FND_MESSAGE.Set_Token('COLUMN', 'INV_MASTER_ORGANIZATION_ID');
12709: RAISE FND_API.G_EXC_ERROR;
12710: END;
12711: /***** FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12712: FND_MESSAGE.Set_Token('COLUMN', 'INV_MASTER_ORGANIZATION_ID');
12713: FND_MSG_PUB.ADD;
12714: RAISE FND_API.G_EXC_ERROR; *****/
12715: END IF;
12716: END IF;
12717: --
12733: EXCEPTION
12734: WHEN NO_DATA_FOUND THEN
12735: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
12736: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12737: fnd_msg_pub.ADD;
12738: RAISE fnd_api.g_exc_error;
12739: END;
12740: IF p_instance_rec.location_id IS NULL
12741: THEN
12740: IF p_instance_rec.location_id IS NULL
12741: THEN
12742: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
12743: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12744: fnd_msg_pub.ADD;
12745: RAISE fnd_api.g_exc_error;
12746: END IF;
12747: END IF;
12748: END IF;
12760: EXCEPTION
12761: WHEN NO_DATA_FOUND THEN
12762: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
12763: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12764: fnd_msg_pub.ADD;
12765: RAISE fnd_api.g_exc_error;
12766: END;
12767: IF p_instance_rec.install_location_id IS NULL
12768: THEN
12767: IF p_instance_rec.install_location_id IS NULL
12768: THEN
12769: fnd_message.set_name('CSI','CSI_NO_HR_LOCATIONS');
12770: fnd_message.set_token('ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12771: fnd_msg_pub.ADD;
12772: RAISE fnd_api.g_exc_error;
12773: END IF;
12774: END IF;
12775: END IF;
12783: IF ((p_instance_rec.active_start_date IS NULL) OR
12784: (p_instance_rec.active_start_date <> l_curr_instance_rec.active_start_date)) THEN
12785: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
12786: FND_MESSAGE.Set_Token('COLUMN', 'ACTIVE_START_DATE');
12787: FND_MSG_PUB.ADD;
12788: RAISE FND_API.G_EXC_ERROR;
12789: END IF;
12790: END IF;
12791:
12796: IF (p_instance_rec.check_for_instance_expiry = fnd_api.g_true) THEN
12797: IF NOT (p_called_from_rel = fnd_api.g_true OR p_txn_rec.transaction_type_id = 401)
12798: THEN
12799: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANT_UPD_EXP_ITEM');
12800: FND_MSG_PUB.ADD;
12801: RAISE FND_API.G_EXC_ERROR;
12802: END IF;
12803: END IF;
12804: END IF;
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,
12843: END IF;
12844: ELSIF ((p_instance_rec.ACTIVE_END_DATE <> FND_API.G_MISS_DATE) AND
12845: (p_instance_rec.ACTIVE_END_DATE > sysdate)) THEN
12846: FND_MESSAGE.Set_Name('CSI', 'CSI_API_FUTURE_DATE');
12847: FND_MSG_PUB.ADD;
12848: RAISE FND_API.G_EXC_ERROR;
12849: END IF;
12850: END IF;
12851:
12876: IF l_valid_flag = 'N' then
12877: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
12878: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',p_instance_rec.inventory_item_id);
12879: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12880: FND_MSG_PUB.Add;
12881: RAISE fnd_api.g_exc_error;
12882: END IF;
12883: END IF;
12884: --
12908: p_item_attribute_tbl(p_ins_count_rec.inv_count).valid_flag := 'N';
12909: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
12910: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',l_get_instance_rec.inventory_item_id);
12911: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12912: FND_MSG_PUB.Add;
12913: RAISE fnd_api.g_exc_error;
12914: END;
12915:
12916: --
12947: p_item_attribute_tbl(p_ins_count_rec.inv_count).valid_flag := 'N';
12948: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM');
12949: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',l_get_instance_rec.inventory_item_id);
12950: FND_MESSAGE.SET_TOKEN('INVENTORY_ORGANIZATION_ID',p_instance_rec.vld_organization_id);
12951: FND_MSG_PUB.Add;
12952: RAISE fnd_api.g_exc_error;
12953: END;
12954: END IF;
12955:
13047: ,x_token => l_token
13048: )
13049: THEN
13050: -- FND_MESSAGE.SET_NAME('CSI', l_reason_failed); -- commented for bug 5351886
13051: -- FND_MSG_PUB.Add; -- commented for bug 5351886
13052: csi_gen_utility_pvt.put_line('Call to eam_assetnumber_pub.validate_fields failed with following reason');
13053: csi_gen_utility_pvt.put_line(l_reason_failed);
13054: RAISE FND_API.G_EXC_ERROR;
13055: END IF;
13054: RAISE FND_API.G_EXC_ERROR;
13055: END IF;
13056: ELSE
13057: FND_MESSAGE.SET_NAME('CSI', 'CSI_NON_EAM_ITEM');
13058: FND_MSG_PUB.Add;
13059: RAISE FND_API.G_EXC_ERROR;
13060: END IF;
13061: END IF;
13062:
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;
13071: RAISE FND_API.G_EXC_ERROR;
13072: END IF;
13073: END IF;
13074: --
13119: --start code fix for 6176621
13120:
13121: IF l_serial_control not in (2, 5) and l_part_or_serial_change THEN
13122: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANNOT_UPD_SRL');
13123: FND_MSG_PUB.Add;
13124: RAISE FND_API.g_exc_error;
13125: END IF;
13126:
13127: --end code fix for 6176621
13129: -- Updating a Serial Number to NULL is not allowed.
13130: IF l_curr_instance_rec.serial_number IS NOT NULL AND
13131: p_instance_rec.serial_number IS NULL THEN
13132: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANNOT_UPD_SRL_NULL');
13133: FND_MSG_PUB.Add;
13134: RAISE FND_API.G_EXC_ERROR;
13135: END IF;
13136: --
13137: -- Serial number changes for CMRO
13271: );
13272: IF l_return_value = FALSE THEN
13273: --Commented out code for bug 7657438, no need to raise more than one error message
13274: --fnd_message.set_name('CSI','CSI_FAIL_UNIQUENESS');
13275: --fnd_msg_pub.add;
13276: RAISE fnd_api.g_exc_error;
13277: END IF;
13278: END IF;
13279: END IF;
13351:
13352: IF l_return_value = FALSE
13353: THEN
13354: FND_MESSAGE.Set_Name('CSI', 'CSI_CHANGE_VLD_ORG');
13355: FND_MSG_PUB.ADD;
13356: RAISE FND_API.G_EXC_ERROR;
13357: END IF;
13358: END IF;
13359: END IF;
13401: -- END IF;
13402: ELSE
13403: IF (p_instance_rec.accounting_class_code <> l_acct_class_code) THEN
13404: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ACCOUNT_CLASS');
13405: FND_MSG_PUB.Add;
13406: RAISE FND_API.G_EXC_ERROR;
13407: END IF;
13408: END IF; -- not null
13409:
13443: --AND ((p_instance_rec.active_end_date IS NULL) OR (p_instance_rec.active_end_date > SYSDATE))
13444: AND ((p_instance_rec.active_end_date IS NULL) OR (p_instance_rec.active_end_date > l_curr_instance_rec.active_end_date))
13445: THEN
13446: FND_MESSAGE.Set_Name('CSI', 'CSI_API_CANNOT_UNEXPIRE');
13447: FND_MSG_PUB.ADD;
13448: RAISE FND_API.G_EXC_ERROR;
13449: END IF;
13450:
13451: -- added by rtalluri for Bugfix 2318211 on 04/16/02
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;
13471: RAISE FND_API.G_EXC_ERROR;
13472: END IF;
13473: END IF;
13474: END IF;
13495: --
13496: if l_valid_flag <> 'Y' then
13497: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ITEM_CONDITION');
13498: FND_MESSAGE.SET_TOKEN('INSTANCE_CONDITION_ID',p_instance_rec.instance_condition_id);
13499: FND_MSG_PUB.Add;
13500: RAISE fnd_api.g_exc_error;
13501: end if;
13502: end if;
13503: --
13578: --
13579: if l_valid_flag <> 'Y' then
13580: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_INSTANCE_TYPE');
13581: FND_MESSAGE.SET_TOKEN('INSTANCE_TYPE_CODE',p_instance_rec.instance_type_code);
13582: FND_MSG_PUB.Add;
13583: RAISE fnd_api.g_exc_error;
13584: end if;
13585: End if;
13586: --
13618: --
13619: if l_valid_flag <> 'Y' then
13620: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_USAGE_CODE');
13621: FND_MESSAGE.SET_TOKEN('INSTANCE_USAGE_CODE',p_instance_rec.instance_usage_code);
13622: FND_MSG_PUB.Add;
13623: RAISE fnd_api.g_exc_error;
13624: end if;
13625: End if;
13626: --
13661: --
13662: if l_valid_flag <> 'Y' then
13663: FND_MESSAGE.SET_NAME('CSI','CSI_OPERATIONAL_STATUS_CODE');
13664: FND_MESSAGE.SET_TOKEN('OPERATIONAL_STATUS_CODE',p_instance_rec.operational_status_code);
13665: FND_MSG_PUB.Add;
13666: RAISE fnd_api.g_exc_error;
13667: end if;
13668: End if;
13669: --
13696: from csi_install_parameters;
13697:
13698: IF l_int_party_id IS NULL THEN
13699: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
13700: FND_MSG_PUB.ADD;
13701: RAISE FND_API.G_EXC_ERROR;
13702: END IF;
13703: END IF;
13704:
14042: )
14043: )
14044: THEN
14045: FND_MESSAGE.SET_NAME('CSI','CSI_NO_PRICE_OR_CODE');
14046: FND_MSG_PUB.Add;
14047: RAISE fnd_api.g_exc_error;
14048: END IF;
14049: -- End addition of columns for FA Integration
14050:
14077: l_get_instance_rec.instance_usage_code = fnd_api.g_miss_char) AND
14078: l_temp_rec IS NOT NULL
14079: THEN
14080: FND_MESSAGE.Set_Name('CSI', 'CSI_INVALID_USAGE_CODE');
14081: FND_MSG_PUB.ADD;
14082: RAISE fnd_api.g_exc_error;
14083: END IF;
14084:
14085:
14108: IF l_temp_rec1 IS NOT NULL
14109: THEN
14110: FND_MESSAGE.Set_Name('CSI', 'CSI_MODIFY_USAGE_CODE');
14111: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',p_instance_rec.instance_id);
14112: FND_MSG_PUB.ADD;
14113: RAISE fnd_api.g_exc_error;
14114: END IF;
14115: EXCEPTION
14116: WHEN NO_DATA_FOUND THEN
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;
14215: RAISE fnd_api.g_exc_error;
14216: END IF;
14217: -- Validate Location ID
14218: IF l_get_instance_rec.location_type_code IS NULL OR
14219: l_get_instance_rec.location_type_code = FND_API.G_MISS_CHAR OR
14220: l_get_instance_rec.location_id IS NULL OR
14221: l_get_instance_rec.location_id = FND_API.G_MISS_NUM THEN
14222: FND_MESSAGE.SET_NAME('CSI','CSI_API_LOCATION_NOT_VALID');
14223: FND_MSG_PUB.ADD;
14224: RAISE fnd_api.g_exc_error;
14225: END IF;
14226: --
14227: l_exists_flag := 'N';
14238: End Loop;
14239: --
14240: IF l_valid_flag <> 'Y' THEN
14241: FND_MESSAGE.SET_NAME('CSI','CSI_API_LOCATION_NOT_VALID');
14242: FND_MSG_PUB.ADD;
14243: RAISE fnd_api.g_exc_error;
14244: END IF;
14245: END IF; -- p_location_tbl count
14246: --
14403: IF ((l_serial_control = 6) and (l_get_instance_rec.serial_number is null)) THEN
14404: p_instance_rec.creation_complete_flag := 'N';
14405: ELSE
14406: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ATTRIBUTES');
14407: FND_MSG_PUB.Add;
14408: RAISE fnd_api.g_exc_error;
14409: END IF;
14410: ELSE
14411: p_instance_rec.creation_complete_flag := 'N';
14450: AND csi.customer_product_id = p_instance_rec.instance_id
14451: AND NVL(close_flag,'N')<>'Y';
14452:
14453: FND_MESSAGE.SET_NAME('CSI','CSI_IB_HAS_OPEN_SR');
14454: FND_MSG_PUB.ADD;
14455: RAISE FND_API.G_EXC_ERROR;
14456:
14457: EXCEPTION
14458: WHEN TOO_MANY_ROWS THEN
14456:
14457: EXCEPTION
14458: WHEN TOO_MANY_ROWS THEN
14459: FND_MESSAGE.SET_NAME('CSI','CSI_IB_HAS_OPEN_SR');
14460: FND_MSG_PUB.ADD;
14461: RAISE FND_API.G_EXC_ERROR;
14462:
14463: WHEN NO_DATA_FOUND THEN -- modfied for bug 3693511
14464: NULL;
14481: THEN
14482: IF p_instance_rec.install_location_id IS NULL OR
14483: p_instance_rec.install_location_id = FND_API.G_MISS_NUM THEN
14484: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
14485: FND_MSG_PUB.ADD;
14486: RAISE fnd_api.g_exc_error;
14487: END IF;
14488: --
14489: l_exists_flag := 'N';
14500: End Loop;
14501: --
14502: IF l_valid_flag <> 'Y' THEN
14503: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
14504: FND_MSG_PUB.ADD;
14505: RAISE fnd_api.g_exc_error;
14506: END IF;
14507: END IF;
14508: --
14524: END IF;
14525: END IF;
14526: ELSE
14527: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INSTALL_LOC');
14528: FND_MSG_PUB.Add;
14529: RAISE FND_API.G_EXC_ERROR;
14530: END IF;
14531: END IF;
14532:
14574: NVL(l_shipped_date, fnd_api.g_miss_date) <> fnd_api.g_miss_date AND
14575: TRUNC(l_shipped_date) > TRUNC(p_instance_rec.INSTALL_DATE) THEN --Changed for bug#12818015
14576:
14577: FND_MESSAGE.Set_Name('CSI', 'CSI_INVALID_INSTALL_DATE');
14578: FND_MSG_PUB.ADD;
14579: RAISE FND_API.G_EXC_ERROR;
14580: END IF;
14581:
14582: END IF;
14876: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
14877: THEN
14878: FND_MESSAGE.SET_NAME('CSI','CSI_API_NO_COUNTER_ASSOCIATION');
14879: FND_MESSAGE.SET_TOKEN('COUNTER','CSI_COUNTER_TEMPLATE_PUB.AUTOINSTANTIATE_COUNTERS');
14880: FND_MSG_PUB.Add;
14881: RAISE FND_API.G_EXC_ERROR;
14882: END IF;
14883: END IF;
14884:
14952: );
14953: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
14954: FND_MESSAGE.SET_NAME('CSI','CSI_API_NO_COUNTER_ASSOCIATION');
14955: FND_MESSAGE.SET_TOKEN('COUNTER','CSI_COUNTER_TEMPLATE_PUB.AUTOINSTANTIATE_COUNTERS');
14956: FND_MSG_PUB.Add;
14957: RAISE FND_API.G_EXC_ERROR;
14958: END IF;
14959: END IF; -- COunter template existance check for the new item
14960: END IF; -- Base Item ID check
15087:
15088: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
15089: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_VALIDATE_TXN');
15090: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_txn_rec.transaction_id );
15091: FND_MSG_PUB.Add;
15092: RAISE FND_API.G_EXC_ERROR;
15093: END IF;
15094:
15095: -- Get the full_dump_frequency from csi_install_parameter
15101: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
15102: --
15103: IF l_full_dump_frequency IS NULL THEN
15104: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
15105: FND_MSG_PUB.ADD;
15106: RAISE FND_API.G_EXC_ERROR;
15107: END IF;
15108: --
15109: -- Get a unique history item instance id from the sequence
19262: COMMIT WORK;
19263: END IF;
19264:
19265: -- Standard call to get message count and if count is get message info.
19266: FND_MSG_PUB.Count_And_Get
19267: (p_encoded => FND_API.G_FALSE,
19268: p_count => x_msg_count ,
19269: p_data => x_msg_data
19270: );
19276: THEN
19277: ROLLBACK TO update_item_instance_pvt;
19278: END IF;
19279: x_return_status := FND_API.G_RET_STS_ERROR ;
19280: FND_MSG_PUB.Count_And_Get
19281: ( p_encoded => FND_API.G_FALSE,
19282: p_count => x_msg_count,
19283: p_data => x_msg_data
19284: );
19289: THEN
19290: ROLLBACK TO update_item_instance_pvt;
19291: END IF;
19292: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
19293: FND_MSG_PUB.Count_And_Get
19294: ( p_encoded => FND_API.G_FALSE,
19295: p_count => x_msg_count,
19296: p_data => x_msg_data
19297: );
19301: ROLLBACK TO update_item_instance_pvt;
19302: END IF;
19303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
19304:
19305: IF FND_MSG_PUB.Check_Msg_Level
19306: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
19307: THEN
19308: FND_MSG_PUB.Add_Exc_Msg
19309: ( G_PKG_NAME ,
19302: END IF;
19303: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
19304:
19305: IF FND_MSG_PUB.Check_Msg_Level
19306: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
19307: THEN
19308: FND_MSG_PUB.Add_Exc_Msg
19309: ( G_PKG_NAME ,
19310: l_api_name
19304:
19305: IF FND_MSG_PUB.Check_Msg_Level
19306: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
19307: THEN
19308: FND_MSG_PUB.Add_Exc_Msg
19309: ( G_PKG_NAME ,
19310: l_api_name
19311: );
19312: END IF;
19309: ( G_PKG_NAME ,
19310: l_api_name
19311: );
19312: END IF;
19313: FND_MSG_PUB.Count_And_Get
19314: ( p_encoded => FND_API.G_FALSE,
19315: p_count => x_msg_count,
19316: p_data => x_msg_data
19317: );
19505: END IF;
19506:
19507: -- Initialize message list if p_init_msg_list is set to TRUE.
19508: IF FND_API.to_Boolean( p_init_msg_list ) THEN
19509: FND_MSG_PUB.initialize;
19510: END IF;
19511:
19512: -- Initialize API return status to success
19513: x_return_status := FND_API.G_RET_STS_SUCCESS;
19547: x_msg_data => x_msg_data
19548: );
19549: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
19550: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
19551: FND_MSG_PUB.Add;
19552: RAISE FND_API.G_EXC_ERROR;
19553: END IF;
19554: END IF;
19555: --
19563: OPEN curr_instance_rec(l_rel_tbl(j).subject_id);
19564: FETCH curr_instance_rec INTO l_curr_instance_rec;
19565: IF curr_instance_rec%NOTFOUND THEN
19566: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
19567: FND_MSG_PUB.ADD;
19568: RAISE FND_API.G_EXC_ERROR;
19569: END IF;
19570: CLOSE curr_instance_rec;
19571:
19586: THEN
19587: x_return_status := FND_API.G_RET_STS_ERROR ;
19588: FND_MESSAGE.Set_Name('CSI', 'CSI_CHILD_HAS_TXN');
19589: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_curr_instance_rec.instance_number);
19590: FND_MSG_PUB.ADD;
19591: RAISE FND_API.G_EXC_ERROR;
19592: END IF;
19593: EXCEPTION
19594: WHEN FND_API.G_EXC_ERROR THEN
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;
19616: END IF;
19617: l_instance_rec.instance_status_id := p_instance_rec.instance_status_id;
19618: ELSE
19637: EXCEPTION
19638: WHEN NO_DATA_FOUND THEN
19639: fnd_message.set_name('CSI','CSI_API_INVALID_INSTANCE_ID');
19640: fnd_message.set_token('INSTANCE_ID',p_instance_rec.instance_id);
19641: fnd_msg_pub.ADD;
19642: END;
19643: ELSE
19644: l_vld_org := p_instance_rec.vld_organization_id;
19645: END IF;
19826: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
19827:
19828: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_VALIDATE_TXN');
19829: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_txn_rec.transaction_id );
19830: FND_MSG_PUB.Add;
19831: RAISE FND_API.G_EXC_ERROR;
19832: END IF;
19833:
19834: -- Get the full_dump_frequency from csi_install_parameter
19839: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
19840: --
19841: IF l_full_dump_frequency IS NULL THEN
19842: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
19843: FND_MSG_PUB.ADD;
19844: RAISE FND_API.G_EXC_ERROR;
19845: END IF;
19846:
19847: -- Get a unique history item instance id from the sequence
20365: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
20366: l_msg_index := 1;
20367: l_msg_count := x_msg_count;
20368: WHILE l_msg_count > 0 LOOP
20369: x_msg_data := FND_MSG_PUB.GET
20370: ( l_msg_index,
20371: FND_API.G_FALSE
20372: );
20373: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
20380:
20381: END LOOP;
20382: END IF; -- l_rel_tbl count check
20383: -- Standard call to get message count and if count is get message info.
20384: FND_MSG_PUB.Count_And_Get
20385: (p_encoded => FND_API.G_FALSE,
20386: p_count => x_msg_count ,
20387: p_data => x_msg_data
20388: );
20391:
20392: WHEN FND_API.G_EXC_ERROR THEN
20393: ROLLBACK TO expire_child_instance_pvt;
20394: x_return_status := FND_API.G_RET_STS_ERROR ;
20395: FND_MSG_PUB.Count_And_Get
20396: (p_encoded => FND_API.G_FALSE,
20397: p_count => x_msg_count,
20398: p_data => x_msg_data
20399: );
20400:
20401: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
20402: ROLLBACK TO expire_child_instance_pvt;
20403: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
20404: FND_MSG_PUB.Count_And_Get
20405: (p_encoded => FND_API.G_FALSE,
20406: p_count => x_msg_count,
20407: p_data => x_msg_data
20408: );
20408: );
20409: WHEN OTHERS THEN
20410: ROLLBACK TO expire_child_instance_pvt;
20411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
20412: IF FND_MSG_PUB.Check_Msg_Level
20413: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
20414: THEN
20415: FND_MSG_PUB.Add_Exc_Msg
20416: ( G_PKG_NAME, l_api_name );
20409: WHEN OTHERS THEN
20410: ROLLBACK TO expire_child_instance_pvt;
20411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
20412: IF FND_MSG_PUB.Check_Msg_Level
20413: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
20414: THEN
20415: FND_MSG_PUB.Add_Exc_Msg
20416: ( G_PKG_NAME, l_api_name );
20417: END IF;
20411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
20412: IF FND_MSG_PUB.Check_Msg_Level
20413: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
20414: THEN
20415: FND_MSG_PUB.Add_Exc_Msg
20416: ( G_PKG_NAME, l_api_name );
20417: END IF;
20418: FND_MSG_PUB.Count_And_Get
20419: ( p_encoded => FND_API.G_FALSE,
20414: THEN
20415: FND_MSG_PUB.Add_Exc_Msg
20416: ( G_PKG_NAME, l_api_name );
20417: END IF;
20418: FND_MSG_PUB.Count_And_Get
20419: ( p_encoded => FND_API.G_FALSE,
20420: p_count => x_msg_count,
20421: p_data => x_msg_data
20422: );
20629: END IF;
20630:
20631: -- Initialize message list if p_init_msg_list is set to TRUE.
20632: IF FND_API.to_Boolean( p_init_msg_list ) THEN
20633: FND_MSG_PUB.initialize;
20634: END IF;
20635:
20636: -- Initialize API return status to success
20637: x_return_status := FND_API.G_RET_STS_SUCCESS;
20680: OPEN get_instance_rec(p_instance_rec.instance_id);
20681: FETCH get_instance_rec INTO l_curr_instance_rec;
20682: IF (l_curr_instance_rec.object_version_number <> nvl(p_instance_rec.OBJECT_VERSION_NUMBER,0)) THEN
20683: FND_MESSAGE.Set_Name('CSI', 'CSI_API_OBJ_VER_MISMATCH');
20684: FND_MSG_PUB.ADD;
20685: RAISE FND_API.G_EXC_ERROR;
20686: END IF;
20687:
20688: IF get_instance_rec%NOTFOUND THEN
20686: END IF;
20687:
20688: IF get_instance_rec%NOTFOUND THEN
20689: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
20690: FND_MSG_PUB.ADD;
20691: RAISE FND_API.G_EXC_ERROR;
20692: END IF;
20693: CLOSE get_instance_rec;
20694:
20740: x_return_status := FND_API.G_RET_STS_ERROR ;
20741: FND_MESSAGE.Set_Name('CSI', 'CSI_PARENT_HAS_TXN');
20742: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_curr_instance_rec.instance_number );
20743: FND_MESSAGE.SET_TOKEN('TXN_DATE',to_char(l_txn_date, 'DD-MON-YYYY HH24:MI:SS'));
20744: FND_MSG_PUB.ADD;
20745: RAISE FND_API.G_EXC_ERROR;
20746: END IF;
20747: END IF;
20748: EXCEPTION
20782: );
20783: --
20784: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
20785: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
20786: FND_MSG_PUB.Add;
20787: RAISE FND_API.G_EXC_ERROR;
20788: END IF;
20789: END IF;
20790: --
20798:
20799: IF l_has_unexpired_children = TRUE THEN
20800: IF p_expire_children = 'F' THEN
20801: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANT_EXPIRE_INSTANCE');
20802: FND_MSG_PUB.Add;
20803: RAISE FND_API.G_EXC_ERROR;
20804:
20805: ELSE
20806: -- Call the expire_child_instances api
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;
20834: END IF;
20835: l_instance_rec.instance_status_id := p_instance_rec.instance_status_id;
20836: ELSE
20860: AND csi.customer_product_id = p_instance_rec.instance_id
20861: AND NVL(close_flag,'N')<>'Y';
20862:
20863: FND_MESSAGE.SET_NAME('CSI','CSI_IB_HAS_OPEN_SR');
20864: FND_MSG_PUB.ADD;
20865: RAISE FND_API.G_EXC_ERROR;
20866:
20867: EXCEPTION
20868: WHEN TOO_MANY_ROWS THEN
20866:
20867: EXCEPTION
20868: WHEN TOO_MANY_ROWS THEN
20869: FND_MESSAGE.SET_NAME('CSI','CSI_IB_HAS_OPEN_SR');
20870: FND_MSG_PUB.ADD;
20871: RAISE FND_API.G_EXC_ERROR;
20872:
20873: WHEN NO_DATA_FOUND THEN -- modfied for bug 3693511
20874: NULL;
20923: EXCEPTION
20924: WHEN NO_DATA_FOUND THEN
20925: fnd_message.set_name('CSI','CSI_API_INVALID_INSTANCE_ID');
20926: fnd_message.set_token('INSTANCE_ID',p_instance_rec.instance_id);
20927: fnd_msg_pub.ADD;
20928: END;
20929: ELSE
20930: l_vld_org := p_instance_rec.vld_organization_id;
20931: END IF;
21117: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
21118:
21119: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_VALIDATE_TXN');
21120: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_txn_rec.transaction_id );
21121: FND_MSG_PUB.Add;
21122: RAISE FND_API.G_EXC_ERROR;
21123: END IF;
21124: -- END IF;
21125:
21136: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
21137: --
21138: IF l_full_dump_frequency IS NULL THEN
21139: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
21140: FND_MSG_PUB.ADD;
21141: RAISE FND_API.G_EXC_ERROR;
21142: END IF;
21143:
21144: SELECT MOD(l_instance_rec.object_version_number,l_full_dump_frequency)
21892: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
21893: l_msg_index := 1;
21894: l_msg_count := x_msg_count;
21895: WHILE l_msg_count > 0 LOOP
21896: x_msg_data := FND_MSG_PUB.GET
21897: ( l_msg_index,
21898: FND_API.G_FALSE
21899: );
21900: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
21913: COMMIT WORK;
21914: END IF;
21915:
21916: -- Standard call to get message count and if count is get message info.
21917: FND_MSG_PUB.Count_And_Get
21918: (p_encoded => FND_API.G_FALSE,
21919: p_count => x_msg_count ,
21920: p_data => x_msg_data
21921: );
21924:
21925: WHEN FND_API.G_EXC_ERROR THEN
21926: ROLLBACK TO expire_item_instance_pvt;
21927: x_return_status := FND_API.G_RET_STS_ERROR ;
21928: FND_MSG_PUB.Count_And_Get
21929: (p_encoded => FND_API.G_FALSE,
21930: p_count => x_msg_count,
21931: p_data => x_msg_data
21932: );
21933:
21934: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
21935: ROLLBACK TO expire_item_instance_pvt;
21936: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
21937: FND_MSG_PUB.Count_And_Get
21938: (p_encoded => FND_API.G_FALSE,
21939: p_count => x_msg_count,
21940: p_data => x_msg_data
21941: );
21941: );
21942: WHEN OTHERS THEN
21943: ROLLBACK TO expire_item_instance_pvt;
21944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
21945: IF FND_MSG_PUB.Check_Msg_Level
21946: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
21947: THEN
21948: FND_MSG_PUB.Add_Exc_Msg
21949: ( G_PKG_NAME, l_api_name );
21942: WHEN OTHERS THEN
21943: ROLLBACK TO expire_item_instance_pvt;
21944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
21945: IF FND_MSG_PUB.Check_Msg_Level
21946: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
21947: THEN
21948: FND_MSG_PUB.Add_Exc_Msg
21949: ( G_PKG_NAME, l_api_name );
21950: END IF;
21944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
21945: IF FND_MSG_PUB.Check_Msg_Level
21946: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
21947: THEN
21948: FND_MSG_PUB.Add_Exc_Msg
21949: ( G_PKG_NAME, l_api_name );
21950: END IF;
21951: FND_MSG_PUB.Count_And_Get
21952: ( p_encoded => FND_API.G_FALSE,
21947: THEN
21948: FND_MSG_PUB.Add_Exc_Msg
21949: ( G_PKG_NAME, l_api_name );
21950: END IF;
21951: FND_MSG_PUB.Count_And_Get
21952: ( p_encoded => FND_API.G_FALSE,
21953: p_count => x_msg_count,
21954: p_data => x_msg_data
21955: );
22045: END IF;
22046:
22047: -- Initialize message list if p_init_msg_list is set to TRUE.
22048: IF FND_API.to_Boolean( p_init_msg_list ) THEN
22049: FND_MSG_PUB.initialize;
22050: END IF;
22051:
22052: -- Initialize API return status to success
22053: x_return_status := FND_API.G_RET_STS_SUCCESS;
22085: OR p_source_instance_rec.location_type_code = 'WIP'
22086: OR p_source_instance_rec.location_type_code = 'PROJECT'
22087: THEN
22088: FND_MESSAGE.SET_NAME('CSI','CSI_CANNOT_SPLIT');
22089: FND_MSG_PUB.ADD;
22090: RAISE FND_API.G_EXC_ERROR;
22091: END IF;
22092:
22093: BEGIN
22096: FROM csi_i_assets
22097: WHERE instance_id =p_source_instance_rec.instance_id;
22098:
22099: FND_MESSAGE.SET_NAME('CSI','CSI_CANNOT_SPLIT');
22100: FND_MSG_PUB.ADD;
22101: RAISE FND_API.G_EXC_ERROR;
22102: EXCEPTION
22103: WHEN OTHERS THEN
22104: NULL;
22117: THEN
22118: l_return_value := FALSE;
22119: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANNOT_BE_SERIALIZED');
22120: FND_MESSAGE.SET_TOKEN('SERIAL_NUMBER', 'serial_number');
22121: FND_MSG_PUB.ADD;
22122: RAISE FND_API.G_EXC_ERROR;
22123: END IF;
22124: END IF;
22125: CLOSE C1;
22133: WHERE instance_id = p_source_instance_rec.instance_id;
22134: EXCEPTION
22135: WHEN NO_DATA_FOUND THEN
22136: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_QUANITY');
22137: FND_MSG_PUB.Add;
22138: RAISE FND_API.G_EXC_ERROR;
22139: END;
22140:
22141: --verifying the quantity
22140:
22141: --verifying the quantity
22142: IF (p_quantity1 + p_quantity2) <> l_quantity THEN
22143: FND_MESSAGE.SET_NAME('CSI','CSI_API_INCORRECT_QUANTITY');
22144: FND_MSG_PUB.Add;
22145: RAISE FND_API.G_EXC_ERROR;
22146: END IF;
22147:
22148: -- Added by sk for bug 2186683
22187: );
22188:
22189: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22190: FOR i in 1..x_msg_Count LOOP
22191: FND_MSG_PUB.Get(p_msg_index => i,
22192: p_encoded => 'F',
22193: p_data => x_msg_data,
22194: p_msg_index_out => x_msg_index_out );
22195:
22282: x_msg_count => x_msg_count,
22283: x_msg_data => x_msg_data);
22284: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22285: FOR i in 1..x_msg_Count LOOP
22286: FND_MSG_PUB.Get(p_msg_index => i,
22287: p_encoded => 'F',
22288: p_data => x_msg_data,
22289: p_msg_index_out => x_msg_index_out );
22290: END LOOP;
22301: WHERE instance_id = p_source_instance_rec.instance_id;
22302: EXCEPTION
22303: WHEN NO_DATA_FOUND THEN
22304: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_OBJ_NUM');
22305: FND_MSG_PUB.ADD;
22306: RAISE FND_API.G_EXC_ERROR;
22307: END;
22308: l_new_instance_rec.instance_id := p_source_instance_rec.instance_id;
22309: l_new_instance_rec.quantity := p_quantity1;
22335: );
22336:
22337: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22338: FOR i in 1..x_msg_Count LOOP
22339: FND_MSG_PUB.Get(p_msg_index => i,
22340: p_encoded => 'F',
22341: p_data => x_msg_data,
22342: p_msg_index_out => x_msg_index_out );
22343: End LOOP;
22400: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22401: l_msg_index := 1;
22402: l_msg_count := x_msg_count;
22403: WHILE l_msg_count > 0 LOOP
22404: x_msg_data := FND_MSG_PUB.GET
22405: ( l_msg_index,
22406: FND_API.G_FALSE );
22407: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
22408: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
22423:
22424: -- End disable trace
22425:
22426: -- Standard call to get message count and IF count is get message info.
22427: FND_MSG_PUB.Count_And_Get
22428: (p_encoded => FND_API.G_FALSE,
22429: p_count => x_msg_count ,
22430: p_data => x_msg_data
22431: );
22434:
22435: WHEN FND_API.G_EXC_ERROR THEN
22436: ROLLBACK TO split_item_instance_pvt;
22437: x_return_status := FND_API.G_RET_STS_ERROR ;
22438: FND_MSG_PUB.Count_And_Get
22439: ( p_encoded => FND_API.G_FALSE,
22440: p_count => x_msg_count,
22441: p_data => x_msg_data
22442: );
22442: );
22443: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
22444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22445: ROLLBACK TO split_item_instance_pvt;
22446: FND_MSG_PUB.Count_And_Get
22447: ( p_encoded => FND_API.G_FALSE,
22448: p_count => x_msg_count,
22449: p_data => x_msg_data
22450: );
22450: );
22451: WHEN OTHERS THEN
22452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22453: ROLLBACK TO split_item_instance_pvt;
22454: IF FND_MSG_PUB.Check_Msg_Level
22455: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22456: THEN
22457: FND_MSG_PUB.Add_Exc_Msg
22458: ( G_PKG_NAME ,
22451: WHEN OTHERS THEN
22452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22453: ROLLBACK TO split_item_instance_pvt;
22454: IF FND_MSG_PUB.Check_Msg_Level
22455: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22456: THEN
22457: FND_MSG_PUB.Add_Exc_Msg
22458: ( G_PKG_NAME ,
22459: l_api_name
22453: ROLLBACK TO split_item_instance_pvt;
22454: IF FND_MSG_PUB.Check_Msg_Level
22455: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22456: THEN
22457: FND_MSG_PUB.Add_Exc_Msg
22458: ( G_PKG_NAME ,
22459: l_api_name
22460: );
22461: END IF;
22458: ( G_PKG_NAME ,
22459: l_api_name
22460: );
22461: END IF;
22462: FND_MSG_PUB.Count_And_Get
22463: ( p_encoded => FND_API.G_FALSE,
22464: p_count => x_msg_count,
22465: p_data => x_msg_data
22466: );
22548: END IF;
22549:
22550: -- Initialize message list if p_init_msg_list is set to TRUE.
22551: IF FND_API.to_Boolean( p_init_msg_list ) THEN
22552: FND_MSG_PUB.initialize;
22553: END IF;
22554:
22555: -- Initialize API return status to success
22556: x_return_status := FND_API.G_RET_STS_SUCCESS;
22588: OR p_source_instance_rec.location_type_code = 'WIP'
22589: OR p_source_instance_rec.location_type_code = 'PROJECT'
22590: THEN
22591: FND_MESSAGE.SET_NAME('CSI','CSI_CANNOT_SPLIT');
22592: FND_MSG_PUB.ADD;
22593: RAISE FND_API.G_EXC_ERROR;
22594: END IF;
22595:
22596: BEGIN
22599: FROM csi_i_assets
22600: WHERE instance_id =p_source_instance_rec.instance_id;
22601:
22602: FND_MESSAGE.SET_NAME('CSI','CSI_CANNOT_SPLIT');
22603: FND_MSG_PUB.ADD;
22604: RAISE FND_API.G_EXC_ERROR;
22605: EXCEPTION
22606: WHEN OTHERS THEN
22607: NULL;
22619: THEN
22620: l_return_value := FALSE;
22621: FND_MESSAGE.SET_NAME('CSI','CSI_API_CANNOT_BE_SERIALIZED');
22622: FND_MESSAGE.SET_TOKEN('SERIAL_NUMBER', 'serial_number');
22623: FND_MSG_PUB.ADD;
22624: RAISE FND_API.G_EXC_ERROR;
22625: END IF;
22626: END IF;
22627: CLOSE C1;
22634: WHERE instance_id = p_source_instance_rec.instance_id;
22635: EXCEPTION
22636: WHEN NO_DATA_FOUND THEN
22637: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_QUANITY');
22638: FND_MSG_PUB.Add;
22639: RAISE FND_API.G_EXC_ERROR;
22640: END;
22641: -- Added by sk for bug 2186683
22642: IF p_source_instance_rec.vld_organization_id IS NULL OR
22687:
22688: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22689: -- x_error_message := 'copy_item_instance failed ' ;
22690: FOR i in 1..x_msg_Count LOOP
22691: FND_MSG_PUB.Get(p_msg_index => i,
22692: p_encoded => 'F',
22693: p_data => x_msg_data,
22694: p_msg_index_out => x_msg_index_out );
22695: End LOOP;
22773: x_msg_count => x_msg_count,
22774: x_msg_data => x_msg_data);
22775: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22776: FOR i in 1..x_msg_Count LOOP
22777: FND_MSG_PUB.Get(p_msg_index => i,
22778: p_encoded => 'F',
22779: p_data => x_msg_data,
22780: p_msg_index_out => x_msg_index_out );
22781: END LOOP;
22844: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22845: l_msg_index := 1;
22846: l_msg_count := x_msg_count;
22847: WHILE l_msg_count > 0 LOOP
22848: x_msg_data := FND_MSG_PUB.GET
22849: ( l_msg_index,
22850: FND_API.G_FALSE );
22851: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
22852: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
22865: Else --l_quantity is <= 1
22866:
22867: FND_MESSAGE.SET_NAME('CSI','CSI_API_QUANTITY_NOT_VALID');
22868: FND_MESSAGE.SET_TOKEN('QUANTITY', l_quantity);
22869: FND_MSG_PUB.ADD;
22870: -- RAISE fnd_api.g_exc_error;
22871: End If;
22872:
22873: --update the existing record with 'p_quantity1')
22878: WHERE instance_id = p_source_instance_rec.instance_id;
22879: EXCEPTION
22880: WHEN NO_DATA_FOUND THEN
22881: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_OBJ_NUM');
22882: FND_MSG_PUB.ADD;
22883: RAISE FND_API.G_EXC_ERROR;
22884: END;
22885: --
22886: px_oks_txn_inst_tbl.DELETE;
22913: );
22914:
22915: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
22916: FOR i in 1..x_msg_Count LOOP
22917: FND_MSG_PUB.Get(p_msg_index => i,
22918: p_encoded => 'F',
22919: p_data => x_msg_data,
22920: p_msg_index_out => x_msg_index_out );
22921: End LOOP;
22942:
22943: -- End disable trace
22944:
22945: -- Standard call to get message count and IF count is get message info.
22946: FND_MSG_PUB.Count_And_Get
22947: (p_encoded => FND_API.G_FALSE,
22948: p_count => x_msg_count ,
22949: p_data => x_msg_data
22950: );
22953:
22954: WHEN FND_API.G_EXC_ERROR THEN
22955: ROLLBACK TO split_item_instance_lines_pvt;
22956: x_return_status := FND_API.G_RET_STS_ERROR ;
22957: FND_MSG_PUB.Count_And_Get
22958: ( p_encoded => FND_API.G_FALSE,
22959: p_count => x_msg_count,
22960: p_data => x_msg_data
22961: );
22961: );
22962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
22963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22964: ROLLBACK TO split_item_instance_lines_pvt;
22965: FND_MSG_PUB.Count_And_Get
22966: ( p_encoded => FND_API.G_FALSE,
22967: p_count => x_msg_count,
22968: p_data => x_msg_data
22969: );
22969: );
22970: WHEN OTHERS THEN
22971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22972: ROLLBACK TO split_item_instance_lines_pvt;
22973: IF FND_MSG_PUB.Check_Msg_Level
22974: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22975: THEN
22976: FND_MSG_PUB.Add_Exc_Msg
22977: ( G_PKG_NAME ,
22970: WHEN OTHERS THEN
22971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
22972: ROLLBACK TO split_item_instance_lines_pvt;
22973: IF FND_MSG_PUB.Check_Msg_Level
22974: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22975: THEN
22976: FND_MSG_PUB.Add_Exc_Msg
22977: ( G_PKG_NAME ,
22978: l_api_name
22972: ROLLBACK TO split_item_instance_lines_pvt;
22973: IF FND_MSG_PUB.Check_Msg_Level
22974: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
22975: THEN
22976: FND_MSG_PUB.Add_Exc_Msg
22977: ( G_PKG_NAME ,
22978: l_api_name
22979: );
22980: END IF;
22977: ( G_PKG_NAME ,
22978: l_api_name
22979: );
22980: END IF;
22981: FND_MSG_PUB.Count_And_Get
22982: ( p_encoded => FND_API.G_FALSE,
22983: p_count => x_msg_count,
22984: p_data => x_msg_data
22985: );
23229: IF p_time_stamp < l_time_stamp THEN
23230: FND_MESSAGE.SET_NAME('CSI','CSI_H_DATE_BEFORE_CRE_DATE');
23231: FND_MESSAGE.SET_TOKEN('CREATION_DATE',to_char(l_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
23232: FND_MESSAGE.SET_TOKEN('USER_DATE',to_char(p_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
23233: FND_MSG_PUB.Add;
23234: RAISE FND_API.G_EXC_ERROR;
23235: END IF;
23236:
23237: END IF;
23616: END IF;
23617:
23618: -- Initialize message list if p_init_msg_list is set to TRUE.
23619: IF FND_API.to_Boolean( p_init_msg_list ) THEN
23620: FND_MSG_PUB.initialize;
23621: END IF;
23622:
23623: -- Initialize API return status to success
23624: x_return_status := FND_API.G_RET_STS_SUCCESS;
23770:
23771: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
23772: l_msg_index := 1;
23773: WHILE x_msg_count > 0 LOOP
23774: x_msg_data := FND_MSG_PUB.GET(
23775: l_msg_index,
23776: FND_API.G_FALSE );
23777: CSI_gen_utility_pvt.put_line( 'message data = '||x_msg_data);
23778: l_msg_index := l_msg_index + 1;
23851: COMMIT WORK;
23852: END IF;
23853:
23854: -- Standard call to get message count and if count is get message info.
23855: FND_MSG_PUB.Count_And_Get
23856: (p_encoded => FND_API.G_FALSE,
23857: p_count => x_msg_count ,
23858: p_data => x_msg_data );
23859:
23860: EXCEPTION
23861: WHEN FND_API.G_EXC_ERROR THEN
23862: ROLLBACK TO create_version_label_pvt;
23863: x_return_status := FND_API.G_RET_STS_ERROR ;
23864: FND_MSG_PUB.Count_And_Get
23865: ( p_encoded => FND_API.G_FALSE,
23866: p_count => x_msg_count,
23867: p_data => x_msg_data);
23868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
23867: p_data => x_msg_data);
23868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
23869: ROLLBACK TO create_version_label_pvt;
23870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
23871: FND_MSG_PUB.Count_And_Get
23872: ( p_encoded => FND_API.G_FALSE,
23873: p_count => x_msg_count,
23874: p_data => x_msg_data);
23875: WHEN OTHERS THEN
23874: p_data => x_msg_data);
23875: WHEN OTHERS THEN
23876: ROLLBACK TO create_version_label_pvt;
23877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
23878: IF FND_MSG_PUB.Check_Msg_Level
23879: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
23880: THEN
23881: FND_MSG_PUB.Add_Exc_Msg
23882: ( G_PKG_NAME, l_api_name );
23875: WHEN OTHERS THEN
23876: ROLLBACK TO create_version_label_pvt;
23877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
23878: IF FND_MSG_PUB.Check_Msg_Level
23879: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
23880: THEN
23881: FND_MSG_PUB.Add_Exc_Msg
23882: ( G_PKG_NAME, l_api_name );
23883: END IF;
23877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
23878: IF FND_MSG_PUB.Check_Msg_Level
23879: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
23880: THEN
23881: FND_MSG_PUB.Add_Exc_Msg
23882: ( G_PKG_NAME, l_api_name );
23883: END IF;
23884: FND_MSG_PUB.Count_And_Get
23885: ( p_encoded => FND_API.G_FALSE,
23880: THEN
23881: FND_MSG_PUB.Add_Exc_Msg
23882: ( G_PKG_NAME, l_api_name );
23883: END IF;
23884: FND_MSG_PUB.Count_And_Get
23885: ( p_encoded => FND_API.G_FALSE,
23886: p_count => x_msg_count,
23887: p_data => x_msg_data);
23888: END create_version_label;
23979: END IF;
23980:
23981: -- Initialize message list if p_init_msg_list is set to TRUE.
23982: IF FND_API.to_Boolean( p_init_msg_list ) THEN
23983: FND_MSG_PUB.initialize;
23984: END IF;
23985:
23986: -- Initialize API return status to success
23987: x_return_status := FND_API.G_RET_STS_SUCCESS;
24033: OPEN get_curr_ver_label_rec(p_version_label_rec.VERSION_LABEL_ID);
24034: FETCH get_curr_ver_label_rec INTO l_curr_ver_label_rec;
24035: IF (l_curr_ver_label_rec.object_version_number <> nvl(p_version_label_rec.OBJECT_VERSION_NUMBER,-1)) THEN
24036: FND_MESSAGE.Set_Name('CSI', 'CSI_API_OBJ_VER_MISMATCH');
24037: FND_MSG_PUB.ADD;
24038: RAISE FND_API.G_EXC_ERROR;
24039: END IF;
24040: IF get_curr_ver_label_rec%NOTFOUND THEN
24041: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
24038: RAISE FND_API.G_EXC_ERROR;
24039: END IF;
24040: IF get_curr_ver_label_rec%NOTFOUND THEN
24041: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
24042: FND_MSG_PUB.ADD;
24043: RAISE FND_API.G_EXC_ERROR;
24044: END IF;
24045: CLOSE get_curr_ver_label_rec;
24046:
24096: ,x_msg_data => x_msg_data );
24097:
24098: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
24099: FOR i in 1..x_msg_Count LOOP
24100: FND_MSG_PUB.Get(p_msg_index => i,
24101: p_encoded => 'F',
24102: p_data => x_msg_data,
24103: p_msg_index_out => x_msg_index_out );
24104: CSI_gen_utility_pvt.put_line( 'message data = '||x_msg_data);
24118: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
24119: --
24120: IF l_full_dump_frequency IS NULL THEN
24121: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
24122: FND_MSG_PUB.ADD;
24123: RAISE FND_API.G_EXC_ERROR;
24124: END IF;
24125: --
24126: select mod(l_object_version_number,l_full_dump_frequency)
24982: COMMIT WORK;
24983: END IF;
24984:
24985: -- Standard call to get message count and if count is get message info.
24986: FND_MSG_PUB.Count_And_Get
24987: (p_encoded => FND_API.G_FALSE,
24988: p_count => x_msg_count ,
24989: p_data => x_msg_data );
24990:
24991: EXCEPTION
24992: WHEN FND_API.G_EXC_ERROR THEN
24993: ROLLBACK TO update_version_label_pvt;
24994: x_return_status := FND_API.G_RET_STS_ERROR ;
24995: FND_MSG_PUB.Count_And_Get
24996: ( p_encoded => FND_API.G_FALSE,
24997: p_count => x_msg_count,
24998: p_data => x_msg_data);
24999: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
24998: p_data => x_msg_data);
24999: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
25000: ROLLBACK TO update_version_label_pvt;
25001: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25002: FND_MSG_PUB.Count_And_Get
25003: ( p_encoded => FND_API.G_FALSE,
25004: p_count => X_msg_count,
25005: p_data => X_msg_data);
25006: WHEN OTHERS THEN
25005: p_data => X_msg_data);
25006: WHEN OTHERS THEN
25007: ROLLBACK TO update_version_label_pvt;
25008: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25009: IF FND_MSG_PUB.Check_Msg_Level
25010: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25011: THEN
25012: FND_MSG_PUB.Add_Exc_Msg
25013: ( G_PKG_NAME, l_api_name );
25006: WHEN OTHERS THEN
25007: ROLLBACK TO update_version_label_pvt;
25008: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25009: IF FND_MSG_PUB.Check_Msg_Level
25010: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25011: THEN
25012: FND_MSG_PUB.Add_Exc_Msg
25013: ( G_PKG_NAME, l_api_name );
25014: END IF;
25008: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25009: IF FND_MSG_PUB.Check_Msg_Level
25010: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25011: THEN
25012: FND_MSG_PUB.Add_Exc_Msg
25013: ( G_PKG_NAME, l_api_name );
25014: END IF;
25015: FND_MSG_PUB.Count_And_Get
25016: ( p_encoded => FND_API.G_FALSE,
25011: THEN
25012: FND_MSG_PUB.Add_Exc_Msg
25013: ( G_PKG_NAME, l_api_name );
25014: END IF;
25015: FND_MSG_PUB.Count_And_Get
25016: ( p_encoded => FND_API.G_FALSE,
25017: p_count => x_msg_count,
25018: p_data => x_msg_data );
25019: END update_version_label;
25097: END IF;
25098:
25099: -- Initialize message list if p_init_msg_list is set to TRUE.
25100: IF FND_API.to_Boolean( p_init_msg_list ) THEN
25101: FND_MSG_PUB.initialize;
25102: END IF;
25103: -- Initialize API return status to success
25104: x_return_status := FND_API.G_RET_STS_SUCCESS;
25105:
25151: OPEN get_curr_ver_label_rec(p_version_label_rec.version_label_id);
25152: FETCH get_curr_ver_label_rec INTO l_curr_ver_label_rec;
25153: IF (l_curr_ver_label_rec.object_version_number <> nvl(p_version_label_rec.OBJECT_VERSION_NUMBER,-1)) THEN
25154: FND_MESSAGE.Set_Name('CSI', 'CSI_API_OBJ_VER_MISMATCH');
25155: FND_MSG_PUB.ADD;
25156: RAISE FND_API.G_EXC_ERROR;
25157: END IF;
25158:
25159: IF get_curr_ver_label_rec%NOTFOUND THEN
25157: END IF;
25158:
25159: IF get_curr_ver_label_rec%NOTFOUND THEN
25160: FND_MESSAGE.Set_Name('CSI', 'CSI_API_RECORD_LOCKED');
25161: FND_MSG_PUB.ADD;
25162: RAISE FND_API.G_EXC_ERROR;
25163: END IF;
25164: CLOSE get_curr_ver_label_rec;
25165:
25212: ,x_msg_data => x_msg_data );
25213:
25214: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
25215: FOR i in 1..x_msg_Count LOOP
25216: FND_MSG_PUB.Get(p_msg_index => i,
25217: p_encoded => 'F',
25218: p_data => x_msg_data,
25219: p_msg_index_out => x_msg_index_out );
25220: CSI_gen_utility_pvt.put_line( 'message data = '||x_msg_data);
25233: l_full_dump_frequency := csi_datastructures_pub.g_install_param_rec.history_full_dump_frequency;
25234: --
25235: IF l_full_dump_frequency IS NULL THEN
25236: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_FULL_DUMP_FAILED');
25237: FND_MSG_PUB.ADD;
25238: RAISE FND_API.G_EXC_ERROR;
25239: END IF;
25240:
25241: select mod(l_object_version_number,l_full_dump_frequency)
25374: COMMIT WORK;
25375: END IF;
25376:
25377: -- Standard call to get message count and if count is get message info.
25378: FND_MSG_PUB.Count_And_Get
25379: (p_encoded => FND_API.G_FALSE,
25380: p_count => x_msg_count ,
25381: p_data => x_msg_data );
25382: EXCEPTION
25382: EXCEPTION
25383: WHEN FND_API.G_EXC_ERROR THEN
25384: ROLLBACK TO expire_version_label_pvt;
25385: x_return_status := FND_API.G_RET_STS_ERROR ;
25386: FND_MSG_PUB.Count_And_Get
25387: ( p_encoded => FND_API.G_FALSE,
25388: p_count => x_msg_count,
25389: p_data => x_msg_data);
25390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
25389: p_data => x_msg_data);
25390: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
25391: ROLLBACK TO expire_version_label_pvt;
25392: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25393: FND_MSG_PUB.Count_And_Get
25394: ( p_encoded => FND_API.G_FALSE,
25395: p_count => x_msg_count,
25396: p_data => x_msg_data);
25397: WHEN OTHERS THEN
25396: p_data => x_msg_data);
25397: WHEN OTHERS THEN
25398: ROLLBACK TO expire_version_label_pvt;
25399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25400: IF FND_MSG_PUB.Check_Msg_Level
25401: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25402: THEN
25403: FND_MSG_PUB.Add_Exc_Msg
25404: ( G_PKG_NAME, l_api_name );
25397: WHEN OTHERS THEN
25398: ROLLBACK TO expire_version_label_pvt;
25399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25400: IF FND_MSG_PUB.Check_Msg_Level
25401: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25402: THEN
25403: FND_MSG_PUB.Add_Exc_Msg
25404: ( G_PKG_NAME, l_api_name );
25405: END IF;
25399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
25400: IF FND_MSG_PUB.Check_Msg_Level
25401: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
25402: THEN
25403: FND_MSG_PUB.Add_Exc_Msg
25404: ( G_PKG_NAME, l_api_name );
25405: END IF;
25406: FND_MSG_PUB.Count_And_Get
25407: ( p_encoded => FND_API.G_FALSE,
25402: THEN
25403: FND_MSG_PUB.Add_Exc_Msg
25404: ( G_PKG_NAME, l_api_name );
25405: END IF;
25406: FND_MSG_PUB.Count_And_Get
25407: ( p_encoded => FND_API.G_FALSE,
25408: p_count => x_msg_count,
25409: p_data => x_msg_data);
25410: END expire_version_label;
25643: -- Messages Commented for bug 2423342. Records that do not qualify should get deleted.
25644: -- FND_MESSAGE.SET_NAME('CSI','CSI_H_DATE_BEFORE_CRE_DATE');
25645: -- FND_MESSAGE.SET_TOKEN('CREATION_DATE',to_char(l_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
25646: -- FND_MESSAGE.SET_TOKEN('USER_DATE',to_char(p_time_stamp, 'DD-MON-YYYY HH24:MI:SS'));
25647: -- FND_MSG_PUB.Add;
25648: -- RAISE FND_API.G_EXC_ERROR;
25649: l_ext_tbl.DELETE(i);
25650: RAISE Process_next;
25651: END IF;
26028:
26029:
26030: -- Initialize message list if p_init_msg_list is set to TRUE.
26031: IF FND_API.to_Boolean( p_init_msg_list ) THEN
26032: FND_MSG_PUB.initialize;
26033: END IF;
26034:
26035:
26036: -- Initialize API return status to success
26099: IF l_valid_flag <> 'Y'
26100: THEN
26101: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_INSTANCE_ID');
26102: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',p_ext_attrib_rec.instance_id);
26103: FND_MSG_PUB.Add;
26104: RAISE fnd_api.g_exc_error;
26105: END IF;
26106: END IF;
26107: --
26151: IF l_valid_flag <> 'Y'
26152: THEN
26153: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ATTRIBUTE_ID');
26154: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_ID',p_ext_attrib_rec.attribute_id);
26155: FND_MSG_PUB.Add;
26156: RAISE fnd_api.g_exc_error;
26157: END IF;
26158: END IF;
26159: --
26182: END IF;
26183: ELSE
26184: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_ATTRIBUTE_ID');
26185: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_ID',p_ext_attrib_rec.attribute_id);
26186: FND_MSG_PUB.Add;
26187: END IF;
26188: --
26189:
26190: -- Added by sk for bug 2232880
26231: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
26232: l_msg_index := 1;
26233: l_msg_count := x_msg_count;
26234: WHILE l_msg_count > 0 LOOP
26235: x_msg_data := FND_MSG_PUB.GET
26236: (l_msg_index,
26237: FND_API.G_FALSE );
26238:
26239: csi_gen_utility_pvt.put_line( ' Failed Pvt:update_extended_attrib_values..');
26303: FND_MESSAGE.SET_NAME('CSI','CSI_API_INV_ATT_LEV_CAT');
26304: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_LEVEL_ITEM',l_ori_inventory_item_id);
26305: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_LEVEL_ORG',l_ori_master_org_id);
26306: FND_MESSAGE.SET_TOKEN('ATTRIBUTE_LEVEL_CAT',l_item_category_id);
26307: FND_MSG_PUB.Add;
26308: RAISE fnd_api.g_exc_error;
26309: END IF;
26310: END IF;
26311: --
26422: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
26423: l_msg_index := 1;
26424: l_msg_count := x_msg_count;
26425: WHILE l_msg_count > 0 LOOP
26426: x_msg_data := FND_MSG_PUB.GET
26427: (l_msg_index,
26428: FND_API.G_FALSE );
26429:
26430: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
26502: COMMIT WORK;
26503: END IF;
26504:
26505: -- Standard call to get message count and if count is get message info.
26506: FND_MSG_PUB.Count_And_Get
26507: (p_encoded => FND_API.G_FALSE,
26508: p_count => x_msg_count ,
26509: p_data => x_msg_data
26510: );
26514:
26515: WHEN FND_API.G_EXC_ERROR THEN
26516: ROLLBACK TO create_extended_attrib_values;
26517: x_return_status := FND_API.G_RET_STS_ERROR ;
26518: FND_MSG_PUB.Count_And_Get
26519: ( p_encoded => FND_API.G_FALSE,
26520: p_count => x_msg_count,
26521: p_data => x_msg_data
26522: );
26523:
26524: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
26525: ROLLBACK TO create_extended_attrib_values;
26526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
26527: FND_MSG_PUB.Count_And_Get
26528: ( p_encoded => FND_API.G_FALSE,
26529: p_count => x_msg_count,
26530: p_data => x_msg_data
26531: );
26534:
26535: ROLLBACK TO create_extended_attrib_values;
26536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
26537:
26538: IF FND_MSG_PUB.Check_Msg_Level
26539: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
26540: THEN
26541: FND_MSG_PUB.Add_Exc_Msg
26542: ( g_pkg_name,
26535: ROLLBACK TO create_extended_attrib_values;
26536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
26537:
26538: IF FND_MSG_PUB.Check_Msg_Level
26539: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
26540: THEN
26541: FND_MSG_PUB.Add_Exc_Msg
26542: ( g_pkg_name,
26543: l_api_name
26537:
26538: IF FND_MSG_PUB.Check_Msg_Level
26539: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
26540: THEN
26541: FND_MSG_PUB.Add_Exc_Msg
26542: ( g_pkg_name,
26543: l_api_name
26544: );
26545: END IF;
26543: l_api_name
26544: );
26545: END IF;
26546:
26547: FND_MSG_PUB.Count_And_Get
26548: ( p_encoded => FND_API.G_FALSE,
26549: p_count => x_msg_count,
26550: p_data => x_msg_data
26551: );
26612:
26613:
26614: -- Initialize message list if p_init_msg_list is set to TRUE.
26615: IF FND_API.to_Boolean( p_init_msg_list ) THEN
26616: FND_MSG_PUB.initialize;
26617: END IF;
26618:
26619:
26620: -- Initialize API return status to success
26698: IF ( p_ext_attrib_rec.active_start_date <> FND_API.G_MISS_DATE) THEN
26699: IF (p_ext_attrib_rec.active_start_date <> l_ext_attrib_rec.active_start_date) THEN
26700: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
26701: FND_MESSAGE.Set_Token('COLUMN', 'EXTENDED ATTRIBUTE START_DATE');
26702: FND_MSG_PUB.ADD;
26703: RAISE FND_API.G_EXC_ERROR;
26704: END IF;
26705: END IF;
26706:
26724: IF ( p_ext_attrib_rec.attribute_id <> FND_API.G_MISS_NUM) THEN
26725: IF (l_ext_attrib_rec.attribute_id <> l_ext_attrib_rec.attribute_id) THEN
26726: FND_MESSAGE.Set_Name('CSI', 'CSI_API_UPD_NOT_ALLOWED');
26727: FND_MESSAGE.Set_Token('COLUMN', 'EXTENDED ATTRIBUTE_ID');
26728: FND_MSG_PUB.ADD;
26729: RAISE FND_API.G_EXC_ERROR;
26730: END IF;
26731: END IF;
26732:
26787: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
26788: l_msg_index := 1;
26789: l_msg_count := x_msg_count;
26790: WHILE l_msg_count > 0 LOOP
26791: x_msg_data := FND_MSG_PUB.GET
26792: (l_msg_index,
26793: FND_API.G_FALSE );
26794:
26795: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
27598: COMMIT WORK;
27599: END IF;
27600:
27601: -- Standard call to get message count and if count is get message info.
27602: FND_MSG_PUB.Count_And_Get
27603: (p_encoded => FND_API.G_FALSE,
27604: p_count => x_msg_count ,
27605: p_data => x_msg_data
27606: );
27609:
27610: WHEN FND_API.G_EXC_ERROR THEN
27611: ROLLBACK TO update_extended_attrib_values;
27612: x_return_status := FND_API.G_RET_STS_ERROR ;
27613: FND_MSG_PUB.Count_And_Get
27614: ( p_encoded => FND_API.G_FALSE,
27615: p_count => x_msg_count,
27616: p_data => x_msg_data
27617: );
27618:
27619: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
27620: ROLLBACK TO update_extended_attrib_values;
27621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
27622: FND_MSG_PUB.Count_And_Get
27623: ( p_encoded => FND_API.G_FALSE,
27624: p_count => x_msg_count,
27625: p_data => x_msg_data
27626: );
27628: WHEN OTHERS THEN
27629: ROLLBACK TO update_extended_attrib_values;
27630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
27631:
27632: IF FND_MSG_PUB.Check_Msg_Level
27633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27634: THEN
27635: FND_MSG_PUB.Add_Exc_Msg
27636: ( g_pkg_name,
27629: ROLLBACK TO update_extended_attrib_values;
27630: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
27631:
27632: IF FND_MSG_PUB.Check_Msg_Level
27633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27634: THEN
27635: FND_MSG_PUB.Add_Exc_Msg
27636: ( g_pkg_name,
27637: l_api_name
27631:
27632: IF FND_MSG_PUB.Check_Msg_Level
27633: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27634: THEN
27635: FND_MSG_PUB.Add_Exc_Msg
27636: ( g_pkg_name,
27637: l_api_name
27638: );
27639: END IF;
27637: l_api_name
27638: );
27639: END IF;
27640:
27641: FND_MSG_PUB.Count_And_Get
27642: ( p_encoded => FND_API.G_FALSE,
27643: p_count => x_msg_count,
27644: p_data => x_msg_data
27645: );
27691: END IF;
27692:
27693: -- Initialize message list if p_init_msg_list is set to TRUE.
27694: IF FND_API.to_Boolean( p_init_msg_list ) THEN
27695: FND_MSG_PUB.initialize;
27696: END IF;
27697:
27698: -- Initialize API return status to success
27699: x_return_status := FND_API.G_RET_STS_SUCCESS;
27774: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
27775: l_msg_index := 1;
27776: l_msg_count := x_msg_count;
27777: WHILE l_msg_count > 0 LOOP
27778: x_msg_data := FND_MSG_PUB.GET
27779: (l_msg_index,
27780: FND_API.G_FALSE );
27781:
27782: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
27795: COMMIT WORK;
27796: END IF;
27797:
27798: -- Standard call to get message count and if count is get message info.
27799: FND_MSG_PUB.Count_And_Get
27800: (p_encoded => FND_API.G_FALSE,
27801: p_count => x_msg_count ,
27802: p_data => x_msg_data
27803: );
27807:
27808: WHEN FND_API.G_EXC_ERROR THEN
27809: ROLLBACK TO expire_extended_attrib_values;
27810: x_return_status := FND_API.G_RET_STS_ERROR ;
27811: FND_MSG_PUB.Count_And_Get
27812: ( p_encoded => FND_API.G_FALSE,
27813: p_count => x_msg_count,
27814: p_data => x_msg_data
27815: );
27816:
27817: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
27818: ROLLBACK TO expire_extended_attrib_values;
27819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
27820: FND_MSG_PUB.Count_And_Get
27821: ( p_encoded => FND_API.G_FALSE,
27822: p_count => x_msg_count,
27823: p_data => x_msg_data
27824: );
27826: WHEN OTHERS THEN
27827: ROLLBACK TO expire_extended_attrib_values;
27828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
27829:
27830: IF FND_MSG_PUB.Check_Msg_Level
27831: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27832: THEN
27833: FND_MSG_PUB.Add_Exc_Msg
27834: (g_pkg_name,
27827: ROLLBACK TO expire_extended_attrib_values;
27828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
27829:
27830: IF FND_MSG_PUB.Check_Msg_Level
27831: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27832: THEN
27833: FND_MSG_PUB.Add_Exc_Msg
27834: (g_pkg_name,
27835: l_api_name
27829:
27830: IF FND_MSG_PUB.Check_Msg_Level
27831: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
27832: THEN
27833: FND_MSG_PUB.Add_Exc_Msg
27834: (g_pkg_name,
27835: l_api_name
27836: );
27837: END IF;
27835: l_api_name
27836: );
27837: END IF;
27838:
27839: FND_MSG_PUB.Count_And_Get
27840: ( p_encoded => FND_API.G_FALSE,
27841: p_count => x_msg_count,
27842: p_data => x_msg_data
27843: );
27945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
27946: END IF;
27947: -- Initialize message list if p_init_msg_list is set to TRUE.
27948: IF FND_API.to_Boolean( p_init_msg_list ) THEN
27949: FND_MSG_PUB.initialize;
27950: END IF;
27951: -- Initialize API return status to success
27952: x_return_status := FND_API.G_RET_STS_SUCCESS;
27953: -- Check the profile option debug_level for debug message reporting
27984: /*
27985: IF ((p_source_instance_rec.VLD_ORGANIZATION_ID = FND_API.G_MISS_NUM)
27986: OR (p_source_instance_rec.VLD_ORGANIZATION_ID IS NULL)) THEN
27987: FND_MESSAGE.SET_NAME('CSI','CSI_API_VLD_ORG_ID_NULL');
27988: FND_MSG_PUB.Add;
27989: RAISE FND_API.G_EXC_ERROR;
27990: ELSE
27991: l_new_instance_rec.VLD_ORGANIZATION_ID := p_source_instance_rec.VLD_ORGANIZATION_ID;
27992: END IF;
28010:
28011: IF (p_source_instance_rec.instance_id IS NULL) OR
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
28022: -- Check if the user has not passed incorrect options for contacts
28023: IF ((p_copy_parties = fnd_api.g_false)
28024: AND (p_copy_contacts = fnd_api.g_true)) THEN
28025: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_PTY_CONTACT_OPT');
28026: FND_MSG_PUB.Add;
28027: RAISE FND_API.G_EXC_ERROR;
28028: END IF;
28029: -- If the user has passed p_copy_parties as false get only the owner, else get all the parties
28030: IF (p_copy_parties = fnd_api.g_true) THEN
28049: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
28050: l_msg_index := 1;
28051: l_msg_count := x_msg_count;
28052: WHILE l_msg_count > 0 LOOP
28053: x_msg_data := FND_MSG_PUB.GET
28054: (l_msg_index,
28055: FND_API.G_FALSE );
28056: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
28057: l_msg_index := l_msg_index + 1;
28081: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
28082: l_msg_index := 1;
28083: l_msg_count := x_msg_count;
28084: WHILE l_msg_count > 0 LOOP
28085: x_msg_data := FND_MSG_PUB.GET
28086: (l_msg_index,
28087: FND_API.G_FALSE );
28088:
28089: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
28194: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
28195: l_msg_index := 1;
28196: l_msg_count := x_msg_count;
28197: WHILE l_msg_count > 0 LOOP
28198: x_msg_data := FND_MSG_PUB.GET
28199: (l_msg_index,
28200: FND_API.G_FALSE );
28201: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
28202: l_msg_index := l_msg_index + 1;
28975: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
28976: l_msg_index := 1;
28977: l_msg_count := x_msg_count;
28978: WHILE l_msg_count > 0 LOOP
28979: x_msg_data := FND_MSG_PUB.GET
28980: (l_msg_index,
28981: FND_API.G_FALSE );
28982:
28983: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29020: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29021: l_msg_index := 1;
29022: l_msg_count := x_msg_count;
29023: WHILE l_msg_count > 0 LOOP
29024: x_msg_data := FND_MSG_PUB.GET
29025: (l_msg_index,
29026: FND_API.G_FALSE );
29027: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29028: l_msg_index := l_msg_index + 1;
29143: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29144: l_msg_index := 1;
29145: l_msg_count := x_msg_count;
29146: WHILE l_msg_count > 0 LOOP
29147: x_msg_data := FND_MSG_PUB.GET
29148: (l_msg_index,
29149: FND_API.G_FALSE );
29150:
29151: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29196: OR NOT(l_contact_found_flag) ) THEN
29197: FND_MESSAGE.SET_NAME('CSI','CSI_API_CONTACT_IP_ID_NULL');
29198: FND_MESSAGE.SET_TOKEN('INSTANCE_PARTY_ID',
29199: l_contact_tbl(tab_row_contact).instance_party_id);
29200: FND_MSG_PUB.Add;
29201: RAISE FND_API.G_EXC_ERROR;
29202: END IF;
29203:
29204: -- Build other fiels of the contact table
29228: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29229: l_msg_index := 1;
29230: l_msg_count := x_msg_count;
29231: WHILE l_msg_count > 0 LOOP
29232: x_msg_data := FND_MSG_PUB.GET
29233: (l_msg_index,
29234: FND_API.G_FALSE );
29235: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29236: l_msg_index := l_msg_index + 1;
29283: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29284: l_msg_index := 1;
29285: l_msg_count := x_msg_count;
29286: WHILE l_msg_count > 0 LOOP
29287: x_msg_data := FND_MSG_PUB.GET
29288: (l_msg_index,
29289: FND_API.G_FALSE );
29290: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29291: l_msg_index := l_msg_index + 1;
29318: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29319: l_msg_index := 1;
29320: l_msg_count := x_msg_count;
29321: WHILE l_msg_count > 0 LOOP
29322: x_msg_data := FND_MSG_PUB.GET
29323: (l_msg_index,
29324: FND_API.G_FALSE );
29325: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29326: l_msg_index := l_msg_index + 1;
29365: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29366: l_msg_index := 1;
29367: l_msg_count := x_msg_count;
29368: WHILE l_msg_count > 0 LOOP
29369: x_msg_data := FND_MSG_PUB.GET
29370: (l_msg_index,
29371: FND_API.G_FALSE );
29372: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29373: l_msg_index := l_msg_index + 1;
29404: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29405: l_msg_index := 1;
29406: l_msg_count := x_msg_count;
29407: WHILE l_msg_count > 0 LOOP
29408: x_msg_data := FND_MSG_PUB.GET
29409: (l_msg_index,
29410: FND_API.G_FALSE );
29411: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29412: l_msg_index := l_msg_index + 1;
29471: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29472: l_msg_index := 1;
29473: l_msg_count := x_msg_count;
29474: WHILE l_msg_count > 0 LOOP
29475: x_msg_data := FND_MSG_PUB.GET
29476: (l_msg_index,
29477: FND_API.G_FALSE );
29478:
29479: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29505: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29506: l_msg_index := 1;
29507: l_msg_count := x_msg_count;
29508: WHILE l_msg_count > 0 LOOP
29509: x_msg_data := FND_MSG_PUB.GET
29510: (l_msg_index,
29511: FND_API.G_FALSE );
29512: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29513: l_msg_index := l_msg_index + 1;
29540: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29541: l_msg_index := 1;
29542: l_msg_count := x_msg_count;
29543: WHILE l_msg_count > 0 LOOP
29544: x_msg_data := FND_MSG_PUB.GET
29545: (l_msg_index,
29546: FND_API.G_FALSE );
29547: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
29548: l_msg_index := l_msg_index + 1;
29559: (p_source_instance_rec.VERSION_LABEL = FND_API.G_MISS_CHAR) THEN
29560: l_version_label := FND_PROFILE.VALUE('CSI_DEFAULT_VERSION_LABEL');
29561: IF l_version_label IS NULL THEN
29562: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_VERSION_LABEL');
29563: FND_MSG_PUB.ADD;
29564: RAISE FND_API.G_EXC_ERROR;
29565: ELSE
29566: l_new_instance_rec.version_label := l_version_label;
29567: END IF;
29594: csi_gen_utility_pvt.put_line( ' Error from COPY_SINGLE_ITEM_INSTANCE.CREATE_VERSION_LABEL..');
29595: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
29596: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
29597: FND_MESSAGE.SET_TOKEN('API_ERROR','CREATE_VERSION_LABEL');
29598: FND_MSG_PUB.Add;
29599: RAISE FND_API.G_EXC_ERROR;
29600: END IF;
29601: -- End of Addition by rtalluri for Bug: 2420897 on 08/19/02
29602:
29614: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
29615: --
29616: IF l_internal_party_id IS NULL THEN
29617: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
29618: FND_MSG_PUB.ADD;
29619: RAISE FND_API.G_EXC_ERROR;
29620: END IF;
29621: --
29622: BEGIN
29656: THEN
29657: l_msg_index := 1;
29658: l_msg_count := x_msg_count;
29659: WHILE l_msg_count > 0 LOOP
29660: x_msg_data := FND_MSG_PUB.GET
29661: ( l_msg_index,
29662: FND_API.G_FALSE
29663: );
29664: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
29700: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
29701: l_msg_index := 1;
29702: l_msg_count := x_msg_count;
29703: WHILE l_msg_count > 0 LOOP
29704: x_msg_data := FND_MSG_PUB.GET
29705: ( l_msg_index,
29706: FND_API.G_FALSE );
29707: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
29708: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
29721: IF FND_API.To_Boolean( p_commit ) THEN
29722: COMMIT WORK;
29723: END IF;
29724: -- Standard call to get message count and if count is get message info.
29725: FND_MSG_PUB.Count_And_Get
29726: (p_encoded => FND_API.G_FALSE,
29727: p_count => x_msg_count ,
29728: p_data => x_msg_data
29729: );
29730: EXCEPTION
29731: WHEN FND_API.G_EXC_ERROR THEN
29732: ROLLBACK TO copy_single_item_instance;
29733: x_return_status := FND_API.G_RET_STS_ERROR ;
29734: FND_MSG_PUB.Count_And_Get
29735: ( p_encoded => FND_API.G_FALSE,
29736: p_count => x_msg_count,
29737: p_data => x_msg_data
29738: );
29738: );
29739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
29740: ROLLBACK TO copy_single_item_instance;
29741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
29742: FND_MSG_PUB.Count_And_Get
29743: ( p_encoded => FND_API.G_FALSE,
29744: p_count => x_msg_count,
29745: p_data => x_msg_data
29746: );
29747:
29748: WHEN OTHERS THEN
29749: ROLLBACK TO copy_single_item_instance;
29750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
29751: IF FND_MSG_PUB.Check_Msg_Level
29752: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
29753: THEN
29754: FND_MSG_PUB.Add_Exc_Msg
29755: ( G_PKG_NAME ,
29748: WHEN OTHERS THEN
29749: ROLLBACK TO copy_single_item_instance;
29750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
29751: IF FND_MSG_PUB.Check_Msg_Level
29752: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
29753: THEN
29754: FND_MSG_PUB.Add_Exc_Msg
29755: ( G_PKG_NAME ,
29756: l_api_name
29750: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
29751: IF FND_MSG_PUB.Check_Msg_Level
29752: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
29753: THEN
29754: FND_MSG_PUB.Add_Exc_Msg
29755: ( G_PKG_NAME ,
29756: l_api_name
29757: );
29758: END IF;
29755: ( G_PKG_NAME ,
29756: l_api_name
29757: );
29758: END IF;
29759: FND_MSG_PUB.Count_And_Get
29760: ( p_encoded => FND_API.G_FALSE,
29761: p_count => x_msg_count,
29762: p_data => x_msg_data
29763: );
29863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
29864: END IF;
29865: -- Initialize message list if p_init_msg_list is set to TRUE.
29866: IF FND_API.to_Boolean( p_init_msg_list ) THEN
29867: FND_MSG_PUB.initialize;
29868: END IF;
29869: -- Initialize API return status to success
29870: x_return_status := FND_API.G_RET_STS_SUCCESS;
29871: -- Check the profile option debug_level for debug message reporting
29913: OR (p_source_instance_rec.QUANTITY = FND_API.G_MISS_NUM )
29914: OR (p_source_instance_rec.QUANTITY <> 1)) THEN
29915: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_QUANTITY');
29916: FND_MESSAGE.SET_TOKEN('QUANTITY',p_source_instance_rec.QUANTITY);
29917: FND_MSG_PUB.Add;
29918: RAISE FND_API.G_EXC_ERROR;
29919: END IF;
29920: -- Verify the Passed Inventory Item is Trackable
29921: -- Get the Master Organization ID
29942: IF p_create_instance = FND_API.G_TRUE THEN
29943: IF (p_source_instance_rec.instance_id IS NULL) OR
29944: (p_source_instance_rec.instance_id = FND_API.G_MISS_NUM) THEN
29945: FND_MESSAGE.SET_NAME('CSI','CSI_API_INSTANCE_ID_NULL');
29946: FND_MSG_PUB.Add;
29947: RAISE FND_API.G_EXC_ERROR;
29948: END IF;
29949: --
29950: -- Verify if configruation has been exploded before
29988: ELSIF l_Error_Code > 0 THEN
29989: csi_gen_utility_pvt.put_line (' Bom explosion error code < 0'|| l_Error_Code ||' '||l_err_msg);
29990: END IF;
29991: FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
29992: FND_MSG_PUB.Add;
29993: RAISE FND_API.G_EXC_ERROR;
29994: END IF; -- error
29995: --
29996: l_init_sort_code := Bom_Common_Definitions.get_initial_sort_code;
30253: );
30254: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
30255: csi_gen_utility_pvt.put_line('Error while trying to Copy the Instance..');
30256: FOR i in 1..x_msg_Count LOOP
30257: FND_MSG_PUB.Get(p_msg_index => i,
30258: p_encoded => 'F',
30259: p_data => x_msg_data,
30260: p_msg_index_out => x_msg_index_out );
30261: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
30301: );
30302: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
30303: csi_gen_utility_pvt.put_line('Error while trying to Create II Relationships..');
30304: FOR i in 1..x_msg_Count LOOP
30305: FND_MSG_PUB.Get(p_msg_index => i,
30306: p_encoded => 'F',
30307: p_data => x_msg_data,
30308: p_msg_index_out => x_msg_index_out );
30309: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
30326: IF FND_API.To_Boolean( p_commit ) THEN
30327: COMMIT WORK;
30328: END IF;
30329: -- Standard call to get message count and if count is get message info.
30330: FND_MSG_PUB.Count_And_Get
30331: ( p_encoded => FND_API.G_FALSE,
30332: p_count => x_msg_count ,
30333: p_data => x_msg_data
30334: );
30335: EXCEPTION
30336: WHEN FND_API.G_EXC_ERROR THEN
30337: ROLLBACK TO explode_bom;
30338: x_return_status := FND_API.G_RET_STS_ERROR ;
30339: FND_MSG_PUB.Count_And_Get
30340: ( p_encoded => FND_API.G_FALSE,
30341: p_count => x_msg_count,
30342: p_data => x_msg_data
30343: );
30343: );
30344: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
30345: ROLLBACK TO explode_bom;
30346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
30347: FND_MSG_PUB.Count_And_Get
30348: ( p_encoded => FND_API.G_FALSE,
30349: p_count => x_msg_count,
30350: p_data => x_msg_data
30351: );
30351: );
30352: WHEN OTHERS THEN
30353: ROLLBACK TO explode_bom;
30354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
30355: IF FND_MSG_PUB.Check_Msg_Level
30356: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
30357: THEN
30358: FND_MSG_PUB.Add_Exc_Msg
30359: ( G_PKG_NAME ,
30352: WHEN OTHERS THEN
30353: ROLLBACK TO explode_bom;
30354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
30355: IF FND_MSG_PUB.Check_Msg_Level
30356: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
30357: THEN
30358: FND_MSG_PUB.Add_Exc_Msg
30359: ( G_PKG_NAME ,
30360: l_api_name
30354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
30355: IF FND_MSG_PUB.Check_Msg_Level
30356: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
30357: THEN
30358: FND_MSG_PUB.Add_Exc_Msg
30359: ( G_PKG_NAME ,
30360: l_api_name
30361: );
30362: END IF;
30359: ( G_PKG_NAME ,
30360: l_api_name
30361: );
30362: END IF;
30363: FND_MSG_PUB.Count_And_Get
30364: ( p_encoded => FND_API.G_FALSE,
30365: p_count => x_msg_count,
30366: p_data => x_msg_data
30367: );
30426: END IF;
30427:
30428: -- Initialize message list if p_init_msg_list is set to TRUE.
30429: IF FND_API.to_Boolean( p_init_msg_list ) THEN
30430: FND_MSG_PUB.initialize;
30431: END IF;
30432:
30433: -- Initialize API return status to success
30434: x_return_status := FND_API.G_RET_STS_SUCCESS;
32265: -- End disable trace
32266: ****/
32267:
32268: -- Standard call to get message count and if count is get message info.
32269: FND_MSG_PUB.Count_And_Get
32270: (p_encoded => FND_API.G_FALSE,
32271: p_count => x_msg_count ,
32272: p_data => x_msg_data );
32273: EXCEPTION
32278: THEN
32279: ROLLBACK TO get_instance_hist;
32280: END IF;
32281: */
32282: IF FND_MSG_PUB.Check_Msg_Level
32283: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32284: THEN
32285: FND_MSG_PUB.Add_Exc_Msg
32286: ( G_PKG_NAME, l_api_name );
32279: ROLLBACK TO get_instance_hist;
32280: END IF;
32281: */
32282: IF FND_MSG_PUB.Check_Msg_Level
32283: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32284: THEN
32285: FND_MSG_PUB.Add_Exc_Msg
32286: ( G_PKG_NAME, l_api_name );
32287: END IF;
32281: */
32282: IF FND_MSG_PUB.Check_Msg_Level
32283: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32284: THEN
32285: FND_MSG_PUB.Add_Exc_Msg
32286: ( G_PKG_NAME, l_api_name );
32287: END IF;
32288: FND_MSG_PUB.Count_And_Get
32289: ( p_encoded => FND_API.G_FALSE,
32284: THEN
32285: FND_MSG_PUB.Add_Exc_Msg
32286: ( G_PKG_NAME, l_api_name );
32287: END IF;
32288: FND_MSG_PUB.Count_And_Get
32289: ( p_encoded => FND_API.G_FALSE,
32290: p_count => x_msg_count,
32291: p_data => x_msg_data);
32292:
32388: END IF;
32389:
32390: -- Initialize message list if p_init_msg_list is set to TRUE.
32391: IF FND_API.to_Boolean( p_init_msg_list ) THEN
32392: FND_MSG_PUB.initialize;
32393: END IF;
32394:
32395: -- Initialize API return status to success
32396: x_return_status := FND_API.G_RET_STS_SUCCESS;
32650: -- End disable trace
32651: ****/
32652:
32653: -- Standard call to get message count and if count is get message info.
32654: FND_MSG_PUB.Count_And_Get
32655: (p_encoded => FND_API.G_FALSE,
32656: p_count => x_msg_count ,
32657: p_data => x_msg_data );
32658: EXCEPTION
32663: THEN
32664: ROLLBACK TO get_ext_attrib_val_hist;
32665: END IF;
32666: */
32667: IF FND_MSG_PUB.Check_Msg_Level
32668: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32669: THEN
32670: FND_MSG_PUB.Add_Exc_Msg
32671: ( G_PKG_NAME, l_api_name );
32664: ROLLBACK TO get_ext_attrib_val_hist;
32665: END IF;
32666: */
32667: IF FND_MSG_PUB.Check_Msg_Level
32668: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32669: THEN
32670: FND_MSG_PUB.Add_Exc_Msg
32671: ( G_PKG_NAME, l_api_name );
32672: END IF;
32666: */
32667: IF FND_MSG_PUB.Check_Msg_Level
32668: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
32669: THEN
32670: FND_MSG_PUB.Add_Exc_Msg
32671: ( G_PKG_NAME, l_api_name );
32672: END IF;
32673: FND_MSG_PUB.Count_And_Get
32674: ( p_encoded => FND_API.G_FALSE,
32669: THEN
32670: FND_MSG_PUB.Add_Exc_Msg
32671: ( G_PKG_NAME, l_api_name );
32672: END IF;
32673: FND_MSG_PUB.Count_And_Get
32674: ( p_encoded => FND_API.G_FALSE,
32675: p_count => x_msg_count,
32676: p_data => x_msg_data);
32677:
32807: END IF;
32808:
32809: -- Initialize message list if p_init_msg_list is set to TRUE.
32810: IF FND_API.to_Boolean( p_init_msg_list ) THEN
32811: FND_MSG_PUB.initialize;
32812: END IF;
32813:
32814: -- Initialize API return status to success
32815: x_return_status := FND_API.G_RET_STS_SUCCESS;
32871:
32872: IF (p_source_instance_rec.instance_id IS NULL) OR
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
32884: -- Check if the user has not passed incorrect options for contacts
32885: IF ((p_copy_parties = fnd_api.g_false)
32886: AND (p_copy_contacts = fnd_api.g_true)) THEN
32887: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_PTY_CONTACT_OPT');
32888: FND_MSG_PUB.Add;
32889: RAISE FND_API.G_EXC_ERROR;
32890: END IF;
32891:
32892:
32916: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
32917: l_msg_index := 1;
32918: l_msg_count := x_msg_count;
32919: WHILE l_msg_count > 0 LOOP
32920: x_msg_data := FND_MSG_PUB.GET
32921: (l_msg_index,
32922: FND_API.G_FALSE );
32923: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
32924: l_msg_index := l_msg_index + 1;
32950: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
32951: l_msg_index := 1;
32952: l_msg_count := x_msg_count;
32953: WHILE l_msg_count > 0 LOOP
32954: x_msg_data := FND_MSG_PUB.GET
32955: (l_msg_index,
32956: FND_API.G_FALSE );
32957: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
32958: l_msg_index := l_msg_index + 1;
33061: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
33062: l_msg_index := 1;
33063: l_msg_count := x_msg_count;
33064: WHILE l_msg_count > 0 LOOP
33065: x_msg_data := FND_MSG_PUB.GET
33066: (l_msg_index,
33067: FND_API.G_FALSE );
33068: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
33069: l_msg_index := l_msg_index + 1;
33780: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
33781: l_msg_index := 1;
33782: l_msg_count := x_msg_count;
33783: WHILE l_msg_count > 0 LOOP
33784: x_msg_data := FND_MSG_PUB.GET
33785: (l_msg_index,
33786: FND_API.G_FALSE );
33787:
33788: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
33831: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
33832: l_msg_index := 1;
33833: l_msg_count := x_msg_count;
33834: WHILE l_msg_count > 0 LOOP
33835: x_msg_data := FND_MSG_PUB.GET
33836: (l_msg_index,
33837: FND_API.G_FALSE );
33838: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
33839: l_msg_index := l_msg_index + 1;
33963: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
33964: l_msg_index := 1;
33965: l_msg_count := x_msg_count;
33966: WHILE l_msg_count > 0 LOOP
33967: x_msg_data := FND_MSG_PUB.GET
33968: (l_msg_index,
33969: FND_API.G_FALSE );
33970: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
33971: l_msg_index := l_msg_index + 1;
34011: OR NOT(l_contact_found_flag) ) THEN
34012: FND_MESSAGE.SET_NAME('CSI','CSI_API_CONTACT_IP_ID_NULL');
34013: FND_MESSAGE.SET_TOKEN('INSTANCE_PARTY_ID',
34014: l_contact_tbl(tab_row_contact).instance_party_id);
34015: FND_MSG_PUB.Add;
34016: RAISE FND_API.G_EXC_ERROR;
34017: END IF;
34018: -- Build other fiels of the contact table
34019: l_contact_tbl(tab_row_contact).instance_party_id := FND_API.G_MISS_NUM;
34042: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34043: l_msg_index := 1;
34044: l_msg_count := x_msg_count;
34045: WHILE l_msg_count > 0 LOOP
34046: x_msg_data := FND_MSG_PUB.GET
34047: (l_msg_index,
34048: FND_API.G_FALSE );
34049: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34050: l_msg_index := l_msg_index + 1;
34096: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34097: l_msg_index := 1;
34098: l_msg_count := x_msg_count;
34099: WHILE l_msg_count > 0 LOOP
34100: x_msg_data := FND_MSG_PUB.GET
34101: (l_msg_index,
34102: FND_API.G_FALSE );
34103: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34104: l_msg_index := l_msg_index + 1;
34131: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34132: l_msg_index := 1;
34133: l_msg_count := x_msg_count;
34134: WHILE l_msg_count > 0 LOOP
34135: x_msg_data := FND_MSG_PUB.GET
34136: (l_msg_index,
34137: FND_API.G_FALSE );
34138: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34139: l_msg_index := l_msg_index + 1;
34175: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34176: l_msg_index := 1;
34177: l_msg_count := x_msg_count;
34178: WHILE l_msg_count > 0 LOOP
34179: x_msg_data := FND_MSG_PUB.GET
34180: (l_msg_index,
34181: FND_API.G_FALSE );
34182: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34183: l_msg_index := l_msg_index + 1;
34211: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34212: l_msg_index := 1;
34213: l_msg_count := x_msg_count;
34214: WHILE l_msg_count > 0 LOOP
34215: x_msg_data := FND_MSG_PUB.GET
34216: (l_msg_index,
34217: FND_API.G_FALSE );
34218: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34219: l_msg_index := l_msg_index + 1;
34275: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34276: l_msg_index := 1;
34277: l_msg_count := x_msg_count;
34278: WHILE l_msg_count > 0 LOOP
34279: x_msg_data := FND_MSG_PUB.GET
34280: (l_msg_index,
34281: FND_API.G_FALSE );
34282: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34283: l_msg_index := l_msg_index + 1;
34308: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34309: l_msg_index := 1;
34310: l_msg_count := x_msg_count;
34311: WHILE l_msg_count > 0 LOOP
34312: x_msg_data := FND_MSG_PUB.GET
34313: (l_msg_index,
34314: FND_API.G_FALSE );
34315: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34316: l_msg_index := l_msg_index + 1;
34346: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34347: l_msg_index := 1;
34348: l_msg_count := x_msg_count;
34349: WHILE l_msg_count > 0 LOOP
34350: x_msg_data := FND_MSG_PUB.GET
34351: (l_msg_index,
34352: FND_API.G_FALSE );
34353: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34354: l_msg_index := l_msg_index + 1;
34366: (p_source_instance_rec.VERSION_LABEL = FND_API.G_MISS_CHAR) THEN
34367: l_version_label := FND_PROFILE.VALUE('CSI_DEFAULT_VERSION_LABEL');
34368: IF l_version_label IS NULL THEN
34369: FND_MESSAGE.SET_NAME('CSI','CSI_API_INVALID_VERSION_LABEL');
34370: FND_MSG_PUB.ADD;
34371: RAISE FND_API.G_EXC_ERROR;
34372: ELSE
34373: l_new_instance_rec.version_label := l_version_label;
34374: END IF;
34401: csi_gen_utility_pvt.put_line( ' Error from COPY_ITEM_INSTANCE.CREATE_VERSION_LABEL..');
34402: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
34403: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
34404: FND_MESSAGE.SET_TOKEN('API_ERROR','CREATE_VERSION_LABEL');
34405: FND_MSG_PUB.Add;
34406: RAISE FND_API.G_EXC_ERROR;
34407: END IF;
34408: -- End of Addition by rtalluri for Bug: 2420897 on 08/19/02
34409:
34421: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
34422: --
34423: IF l_internal_party_id IS NULL THEN
34424: FND_MESSAGE.SET_NAME('CSI','CSI_API_UNINSTALLED_PARAMETER');
34425: FND_MSG_PUB.ADD;
34426: RAISE FND_API.G_EXC_ERROR;
34427: END IF;
34428:
34429: BEGIN
34477: THEN
34478: l_msg_index := 1;
34479: l_msg_count := x_msg_count;
34480: WHILE l_msg_count > 0 LOOP
34481: x_msg_data := FND_MSG_PUB.GET
34482: ( l_msg_index,
34483: FND_API.G_FALSE
34484: );
34485: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
34521: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34522: l_msg_index := 1;
34523: l_msg_count := x_msg_count;
34524: WHILE l_msg_count > 0 LOOP
34525: x_msg_data := FND_MSG_PUB.GET
34526: ( l_msg_index,
34527: FND_API.G_FALSE );
34528: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
34529: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
34560: );
34561: --
34562: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
34563: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
34564: FND_MSG_PUB.Add;
34565: RAISE FND_API.G_EXC_ERROR;
34566: END IF;
34567: END IF;
34568: --
34611: ,x_msg_data => x_msg_data
34612: );
34613: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34614: FOR i in 1..x_msg_Count LOOP
34615: FND_MSG_PUB.Get(p_msg_index => i,
34616: p_encoded => 'F',
34617: p_data => x_msg_data,
34618: p_msg_index_out => x_msg_index_out );
34619: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34670: );
34671:
34672: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
34673: FOR i in 1..x_msg_Count LOOP
34674: FND_MSG_PUB.Get(p_msg_index => i,
34675: p_encoded => 'F',
34676: p_data => x_msg_data,
34677: p_msg_index_out => x_msg_index_out );
34678: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
34728: l_msg_index := 1;
34729: l_msg_count := x_msg_count;
34730:
34731: WHILE l_msg_count > 0 LOOP
34732: x_msg_data := FND_MSG_PUB.GET
34733: (l_msg_index,
34734: FND_API.G_FALSE );
34735: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
34736: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
34769: l_msg_index := 1;
34770: l_msg_count := x_msg_count;
34771:
34772: WHILE l_msg_count > 0 LOOP
34773: x_msg_data := FND_MSG_PUB.GET
34774: (l_msg_index,
34775: FND_API.G_FALSE );
34776: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
34777: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
34794: END IF;
34795:
34796:
34797: -- Standard call to get message count and if count is get message info.
34798: FND_MSG_PUB.Count_And_Get
34799: (p_encoded => FND_API.G_FALSE,
34800: p_count => x_msg_count ,
34801: p_data => x_msg_data
34802: );
34804:
34805: WHEN FND_API.G_EXC_ERROR THEN
34806: ROLLBACK TO copy_item_instance;
34807: x_return_status := FND_API.G_RET_STS_ERROR ;
34808: FND_MSG_PUB.Count_And_Get
34809: ( p_encoded => FND_API.G_FALSE,
34810: p_count => x_msg_count,
34811: p_data => x_msg_data
34812: );
34813:
34814: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
34815: ROLLBACK TO copy_item_instance;
34816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
34817: FND_MSG_PUB.Count_And_Get
34818: ( p_encoded => FND_API.G_FALSE,
34819: p_count => x_msg_count,
34820: p_data => x_msg_data
34821: );
34822:
34823: WHEN OTHERS THEN
34824: ROLLBACK TO copy_item_instance;
34825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
34826: IF FND_MSG_PUB.Check_Msg_Level
34827: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
34828: THEN
34829: FND_MSG_PUB.Add_Exc_Msg
34830: ( G_PKG_NAME ,
34823: WHEN OTHERS THEN
34824: ROLLBACK TO copy_item_instance;
34825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
34826: IF FND_MSG_PUB.Check_Msg_Level
34827: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
34828: THEN
34829: FND_MSG_PUB.Add_Exc_Msg
34830: ( G_PKG_NAME ,
34831: l_api_name
34825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
34826: IF FND_MSG_PUB.Check_Msg_Level
34827: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
34828: THEN
34829: FND_MSG_PUB.Add_Exc_Msg
34830: ( G_PKG_NAME ,
34831: l_api_name
34832: );
34833: END IF;
34831: l_api_name
34832: );
34833: END IF;
34834:
34835: FND_MSG_PUB.Count_And_Get
34836: ( p_encoded => FND_API.G_FALSE,
34837: p_count => x_msg_count,
34838: p_data => x_msg_data
34839: );
34939: END IF;
34940:
34941: -- Initialize message list if p_init_msg_list is set to TRUE.
34942: IF FND_API.to_Boolean( p_init_msg_list ) THEN
34943: FND_MSG_PUB.initialize;
34944: END IF;
34945:
34946: -- Initialize API return status to success
34947: x_return_status := FND_API.G_RET_STS_SUCCESS;
35049: -- End disable trace
35050: ****/
35051:
35052: -- Standard call to get message count and if count is get message info.
35053: FND_MSG_PUB.Count_And_Get
35054: (p_encoded => FND_API.G_FALSE,
35055: p_count => x_msg_count ,
35056: p_data => x_msg_data );
35057: EXCEPTION
35057: EXCEPTION
35058: WHEN FND_API.G_EXC_ERROR THEN
35059: -- ROLLBACK TO get_version_label_history;
35060: x_return_status := FND_API.G_RET_STS_ERROR ;
35061: FND_MSG_PUB.Count_And_Get
35062: ( p_encoded => FND_API.G_FALSE,
35063: p_count => x_msg_count,
35064: p_data => x_msg_data );
35065: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35064: p_data => x_msg_data );
35065: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35066: -- ROLLBACK TO get_version_label_history;
35067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35068: FND_MSG_PUB.Count_And_Get
35069: ( p_encoded => FND_API.G_FALSE,
35070: p_count => x_msg_count,
35071: p_data => x_msg_data );
35072: WHEN OTHERS THEN
35071: p_data => x_msg_data );
35072: WHEN OTHERS THEN
35073: -- ROLLBACK TO get_version_label_history;
35074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35075: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
35076: FND_MSG_PUB.Add_Exc_Msg
35077: ( g_pkg_name ,
35078: l_api_name );
35079: END IF;
35072: WHEN OTHERS THEN
35073: -- ROLLBACK TO get_version_label_history;
35074: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35075: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
35076: FND_MSG_PUB.Add_Exc_Msg
35077: ( g_pkg_name ,
35078: l_api_name );
35079: END IF;
35080: FND_MSG_PUB.Count_And_Get
35076: FND_MSG_PUB.Add_Exc_Msg
35077: ( g_pkg_name ,
35078: l_api_name );
35079: END IF;
35080: FND_MSG_PUB.Count_And_Get
35081: ( p_encoded => FND_API.G_FALSE,
35082: p_count => x_msg_count,
35083: p_data => x_msg_data );
35084:
35126: END IF;
35127:
35128: -- Initialize message list if p_init_msg_list is set to TRUE.
35129: IF FND_API.to_Boolean( p_init_msg_list ) THEN
35130: FND_MSG_PUB.initialize;
35131: END IF;
35132:
35133: -- Initialize API return status to success
35134: x_return_status := FND_API.G_RET_STS_SUCCESS;
35162: IF (p_instance_id IS NULL)
35163: THEN
35164: FND_MESSAGE.Set_Name('CSI', 'CSI_API_INVALID_INSTANCE_ID');
35165: FND_MESSAGE.Set_Token('INSTANCE_ID', p_instance_id);
35166: FND_MSG_PUB.ADD;
35167: RAISE FND_API.G_EXC_ERROR;
35168: END IF;
35169:
35170: l_instance_header_tbl(1).instance_id := p_instance_id;
35224: -- End disable trace
35225: ****/
35226:
35227: -- Standard call to get message count and if count is get message info.
35228: FND_MSG_PUB.Count_And_Get
35229: (p_encoded => FND_API.G_FALSE,
35230: p_count => x_msg_count ,
35231: p_data => x_msg_data
35232: );
35235:
35236: WHEN FND_API.G_EXC_ERROR THEN
35237: -- ROLLBACK TO get_instance_link_locations;
35238: x_return_status := FND_API.G_RET_STS_ERROR ;
35239: FND_MSG_PUB.Count_And_Get
35240: ( p_encoded => FND_API.G_FALSE,
35241: p_count => x_msg_count,
35242: p_data => x_msg_data );
35243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35242: p_data => x_msg_data );
35243: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35244: -- ROLLBACK TO get_instance_link_locations;
35245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35246: FND_MSG_PUB.Count_And_Get
35247: ( p_encoded => FND_API.G_FALSE,
35248: p_count => x_msg_count,
35249: p_data => x_msg_data );
35250: WHEN OTHERS THEN
35249: p_data => x_msg_data );
35250: WHEN OTHERS THEN
35251: -- ROLLBACK TO get_instance_link_locations;
35252: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35253: IF FND_MSG_PUB.Check_Msg_Level
35254: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
35255: THEN
35256: FND_MSG_PUB.Add_Exc_Msg
35257: ( G_PKG_NAME, l_api_name );
35250: WHEN OTHERS THEN
35251: -- ROLLBACK TO get_instance_link_locations;
35252: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35253: IF FND_MSG_PUB.Check_Msg_Level
35254: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
35255: THEN
35256: FND_MSG_PUB.Add_Exc_Msg
35257: ( G_PKG_NAME, l_api_name );
35258: END IF;
35252: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35253: IF FND_MSG_PUB.Check_Msg_Level
35254: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
35255: THEN
35256: FND_MSG_PUB.Add_Exc_Msg
35257: ( G_PKG_NAME, l_api_name );
35258: END IF;
35259: FND_MSG_PUB.Count_And_Get
35260: ( p_encoded => FND_API.G_FALSE,
35255: THEN
35256: FND_MSG_PUB.Add_Exc_Msg
35257: ( G_PKG_NAME, l_api_name );
35258: END IF;
35259: FND_MSG_PUB.Count_And_Get
35260: ( p_encoded => FND_API.G_FALSE,
35261: p_count => x_msg_count,
35262: p_data => x_msg_data );
35263:
35315: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
35316: l_msg_index := 1;
35317: l_msg_count := x_msg_count;
35318: WHILE l_msg_count > 0 LOOP
35319: x_msg_data := FND_MSG_PUB.GET
35320: ( l_msg_index,
35321: FND_API.G_FALSE );
35322: csi_gen_utility_pvt.put_line( ' Error from update_version_label..');
35323: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
35332: NULL;
35333: WHEN FND_API.G_EXC_ERROR THEN
35334: ROLLBACK TO Update_version_time;
35335: x_return_status := FND_API.G_RET_STS_ERROR ;
35336: FND_MSG_PUB.Count_And_Get
35337: ( p_encoded => FND_API.G_FALSE,
35338: p_count => x_msg_count,
35339: p_data => x_msg_data );
35340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35339: p_data => x_msg_data );
35340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35341: ROLLBACK TO Update_version_time;
35342: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35343: FND_MSG_PUB.Count_And_Get
35344: ( p_encoded => FND_API.G_FALSE,
35345: p_count => x_msg_count,
35346: p_data => x_msg_data );
35347: END Update_version_time;
35492: END IF;
35493:
35494: -- Initialize message list if p_init_msg_list is set to TRUE.
35495: IF FND_API.to_Boolean( p_init_msg_list ) THEN
35496: FND_MSG_PUB.initialize;
35497: END IF;
35498:
35499: -- Initialize API return status to success
35500: x_return_status := FND_API.G_RET_STS_SUCCESS;
35574: IF l_dup_count > 1
35575: THEN
35576: FND_MESSAGE.SET_NAME('CSI','CSI_DUPLICATE_INS_KEY');
35577: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',px_config_tbl(i).instance_id);
35578: FND_MSG_PUB.Add;
35579: RAISE FND_API.G_EXC_ERROR;
35580: END IF;
35581: END IF;
35582:
35610: FND_MESSAGE.SET_NAME('CSI','CSI_DUPLICATE_KEYS_LOCKED');
35611: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',px_config_tbl(i).config_inst_hdr_id);
35612: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',px_config_tbl(i).config_inst_item_id);
35613: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',px_config_tbl(i).config_inst_rev_num);
35614: FND_MSG_PUB.Add;
35615: RAISE FND_API.G_EXC_ERROR;
35616: END IF;
35617: END IF;
35618:
35623: IF csi_item_instance_pvt.check_item_instance_lock (p_instance_id => px_config_tbl(i).instance_id)
35624: THEN
35625: FND_MESSAGE.SET_NAME('CSI','CSI_INS_ALREADY_LOCKED');
35626: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',px_config_tbl(i).instance_id);
35627: FND_MSG_PUB.Add;
35628: RAISE FND_API.G_EXC_ERROR;
35629: ELSE
35630: l_found:='N';
35631: IF l_lock_tbl.COUNT > 0
35670:
35671:
35672: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
35673: FND_MESSAGE.SET_NAME('CSI','CSI_API_GET_CHILDREN_ERROR');
35674: FND_MSG_PUB.Add;
35675: RAISE FND_API.G_EXC_ERROR;
35676: END IF;
35677: l_lock_count:=l_lock_tbl.COUNT+1;
35678: l_lock_tbl(l_lock_count).instance_id:=l_root_node;
35703: IF csi_item_instance_pvt.check_item_instance_lock (p_instance_id => l_rel_tbl(l_chld_csr).subject_id)
35704: THEN
35705: FND_MESSAGE.SET_NAME('CSI','CSI_INS_ALREADY_LOCKED');
35706: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_lock_tbl(l_lock_count).instance_id);
35707: FND_MSG_PUB.Add;
35708: RAISE FND_API.G_EXC_ERROR;
35709: END IF;
35710: l_lock_tbl(l_lock_count).root_instance_id:=l_root_node;
35711: l_lock_tbl(l_lock_count).root_config_inst_hdr_id := l_root_hdr_id;
35730: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_KEYS_LOCKED');
35731: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',px_config_tbl(i).config_inst_hdr_id);
35732: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',px_config_tbl(i).config_inst_item_id);
35733: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',px_config_tbl(i).config_inst_rev_num);
35734: FND_MSG_PUB.Add;
35735: RAISE FND_API.G_EXC_ERROR;
35736: ELSE
35737: l_lock_count:=l_lock_tbl.COUNT+1;
35738: l_lock_tbl(l_lock_count).config_inst_hdr_id :=px_config_tbl(i).config_inst_hdr_id;
35766: END IF;
35767: END IF;
35768: ELSE
35769: FND_MESSAGE.SET_NAME('CSI','CSI_PASSED_INVALID_KEYS');
35770: FND_MSG_PUB.Add;
35771: RAISE FND_API.G_EXC_ERROR;
35772: END IF;
35773:
35774: END IF;
35968:
35969: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
35970: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_VALIDATE_TXN');
35971: FND_MESSAGE.SET_TOKEN('TRANSACTION_ID',p_txn_rec.transaction_id );
35972: FND_MSG_PUB.Add;
35973: RAISE FND_API.G_EXC_ERROR;
35974: END IF;
35975: */
35976: END IF;
35979: COMMIT WORK;
35980: END IF;
35981:
35982: -- Standard call to get message count and if count is get message info.
35983: FND_MSG_PUB.Count_And_Get
35984: (p_encoded => FND_API.G_FALSE,
35985: p_count => x_msg_count ,
35986: p_data => x_msg_data );
35987:
35988: EXCEPTION
35989: WHEN FND_API.G_EXC_ERROR THEN
35990: ROLLBACK TO csi_lock_item_instance;
35991: x_return_status := FND_API.G_RET_STS_ERROR ;
35992: FND_MSG_PUB.Count_And_Get
35993: ( p_encoded => FND_API.G_FALSE,
35994: p_count => x_msg_count,
35995: p_data => x_msg_data );
35996: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35995: p_data => x_msg_data );
35996: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
35997: ROLLBACK TO csi_lock_item_instance;
35998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
35999: FND_MSG_PUB.Count_And_Get
36000: ( p_encoded => FND_API.G_FALSE,
36001: p_count => x_msg_count,
36002: p_data => x_msg_data );
36003: WHEN OTHERS THEN
36002: p_data => x_msg_data );
36003: WHEN OTHERS THEN
36004: ROLLBACK TO csi_lock_item_instance;
36005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36006: IF FND_MSG_PUB.Check_Msg_Level
36007: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36008: THEN
36009: FND_MSG_PUB.Add_Exc_Msg
36010: ( g_pkg_name, l_api_name );
36003: WHEN OTHERS THEN
36004: ROLLBACK TO csi_lock_item_instance;
36005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36006: IF FND_MSG_PUB.Check_Msg_Level
36007: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36008: THEN
36009: FND_MSG_PUB.Add_Exc_Msg
36010: ( g_pkg_name, l_api_name );
36011: END IF;
36005: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36006: IF FND_MSG_PUB.Check_Msg_Level
36007: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36008: THEN
36009: FND_MSG_PUB.Add_Exc_Msg
36010: ( g_pkg_name, l_api_name );
36011: END IF;
36012: FND_MSG_PUB.Count_And_Get
36013: ( p_encoded => FND_API.G_FALSE,
36008: THEN
36009: FND_MSG_PUB.Add_Exc_Msg
36010: ( g_pkg_name, l_api_name );
36011: END IF;
36012: FND_MSG_PUB.Count_And_Get
36013: ( p_encoded => FND_API.G_FALSE,
36014: p_count => x_msg_count,
36015: p_data => x_msg_data );
36016: END lock_item_instances;
36271: END IF;
36272:
36273: -- Initialize message list if p_init_msg_list is set to TRUE.
36274: IF FND_API.to_Boolean( p_init_msg_list ) THEN
36275: FND_MSG_PUB.initialize;
36276: END IF;
36277:
36278: -- Initialize API return status to success
36279: x_return_status := FND_API.G_RET_STS_SUCCESS;
36409: FND_MESSAGE.SET_NAME('CSI','CSI_CANT_UNLOCK_TREE');
36410: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',l_bld_unlock_tbl(l_bld).config_inst_hdr_id);
36411: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',l_bld_unlock_tbl(l_bld).config_inst_item_id);
36412: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',l_bld_unlock_tbl(l_bld).config_inst_rev_num);
36413: FND_MSG_PUB.Add;
36414: RAISE FND_API.G_EXC_ERROR;
36415: ELSIF (p_config_tbl(i).lock_status IS NULL OR
36416: p_config_tbl(i).lock_status NOT IN (0,1)) OR
36417: p_config_tbl(i).lock_status > l_bld_unlock_tbl(l_bld).lock_status
36421: FND_MESSAGE.SET_TOKEN('LOCK_STATUS',p_config_tbl(i).lock_status);
36422: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',l_bld_unlock_tbl(l_bld).config_inst_hdr_id);
36423: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',l_bld_unlock_tbl(l_bld).config_inst_item_id);
36424: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',l_bld_unlock_tbl(l_bld).config_inst_rev_num);
36425: FND_MSG_PUB.Add;
36426: RAISE FND_API.G_EXC_ERROR;
36427: END IF;
36428: END IF;
36429: END LOOP;
36520: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INS_STATUS');
36521: FND_MESSAGE.SET_TOKEN('ORIGINAL_STATUS',l_valid_lock_status);
36522: FND_MESSAGE.SET_TOKEN('LOCK_STATUS',p_config_tbl(i).lock_status);
36523: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',p_config_tbl(i).instance_id);
36524: FND_MSG_PUB.Add;
36525: RAISE FND_API.G_EXC_ERROR;
36526: END IF;
36527: ELSE
36528: IF l_valid_lock_status=3
36594: FND_MESSAGE.SET_TOKEN('LOCK_STATUS',p_config_tbl(i).lock_status);
36595: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',p_config_tbl(i).config_inst_hdr_id);
36596: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',p_config_tbl(i).config_inst_item_id);
36597: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',p_config_tbl(i).config_inst_rev_num);
36598: FND_MSG_PUB.Add;
36599: RAISE FND_API.G_EXC_ERROR;
36600: END IF;
36601: ELSE
36602: IF l_valid_lock_status=3
36621:
36622: IF l_warning = 'Y'
36623: THEN
36624: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_LOCKS');
36625: FND_MSG_PUB.Add;
36626: ELSIF l_warning = 'E'
36627: THEN
36628: FND_MESSAGE.SET_NAME('CSI','CSI_LOCKID_NOT_PASSED');
36629: FND_MSG_PUB.Add;
36625: FND_MSG_PUB.Add;
36626: ELSIF l_warning = 'E'
36627: THEN
36628: FND_MESSAGE.SET_NAME('CSI','CSI_LOCKID_NOT_PASSED');
36629: FND_MSG_PUB.Add;
36630: RAISE FND_API.G_EXC_ERROR;
36631: END IF;
36632: csi_gen_utility_pvt.put_line('Count of l_unlock_tbl is :'||l_unlock_tbl.count);
36633: IF l_unlock_tbl.COUNT>0
36663: IF l_instance_ctr >1 -- this includes root
36664: THEN
36665: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_INST_STATUS');
36666: FND_MESSAGE.SET_TOKEN('INSTANCE_ID',l_unlock_ins_tbl(i).instance_id);
36667: FND_MSG_PUB.Add;
36668: RAISE FND_API.G_EXC_ERROR;
36669: END IF;
36670: END IF;
36671: END IF;
36696: FND_MESSAGE.SET_NAME('CSI','CSI_INVALID_CONF_STATUS');
36697: FND_MESSAGE.SET_TOKEN('CONFIG_INST_HDR_ID',l_unlock_root(i).config_inst_hdr_id);
36698: FND_MESSAGE.SET_TOKEN('CONFIG_INST_ITEM_ID',l_unlock_root(i).config_inst_item_id);
36699: FND_MESSAGE.SET_TOKEN('CONFIG_INST_REV_NUM',l_unlock_root(i).config_inst_rev_num);
36700: FND_MSG_PUB.Add;
36701: RAISE FND_API.G_EXC_ERROR;
36702: END IF;
36703: END IF;
36704: END IF;
36712: COMMIT WORK;
36713: END IF;
36714:
36715: -- Standard call to get message count and if count is get message info.
36716: FND_MSG_PUB.Count_And_Get
36717: (p_encoded => FND_API.G_FALSE,
36718: p_count => x_msg_count ,
36719: p_data => x_msg_data );
36720:
36723: EXCEPTION
36724: WHEN FND_API.G_EXC_ERROR THEN
36725: ROLLBACK TO csi_unlock_item_instance;
36726: x_return_status := FND_API.G_RET_STS_ERROR ;
36727: FND_MSG_PUB.Count_And_Get
36728: ( p_encoded => FND_API.G_FALSE,
36729: p_count => x_msg_count,
36730: p_data => x_msg_data );
36731: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
36730: p_data => x_msg_data );
36731: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
36732: ROLLBACK TO csi_unlock_item_instance;
36733: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36734: FND_MSG_PUB.Count_And_Get
36735: ( p_encoded => FND_API.G_FALSE,
36736: p_count => x_msg_count,
36737: p_data => x_msg_data );
36738: WHEN OTHERS THEN
36737: p_data => x_msg_data );
36738: WHEN OTHERS THEN
36739: ROLLBACK TO csi_unlock_item_instance;
36740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36741: IF FND_MSG_PUB.Check_Msg_Level
36742: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36743: THEN
36744: FND_MSG_PUB.Add_Exc_Msg
36745: ( g_pkg_name, l_api_name );
36738: WHEN OTHERS THEN
36739: ROLLBACK TO csi_unlock_item_instance;
36740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36741: IF FND_MSG_PUB.Check_Msg_Level
36742: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36743: THEN
36744: FND_MSG_PUB.Add_Exc_Msg
36745: ( g_pkg_name, l_api_name );
36746: END IF;
36740: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
36741: IF FND_MSG_PUB.Check_Msg_Level
36742: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
36743: THEN
36744: FND_MSG_PUB.Add_Exc_Msg
36745: ( g_pkg_name, l_api_name );
36746: END IF;
36747: FND_MSG_PUB.Count_And_Get
36748: ( p_encoded => FND_API.G_FALSE,
36743: THEN
36744: FND_MSG_PUB.Add_Exc_Msg
36745: ( g_pkg_name, l_api_name );
36746: END IF;
36747: FND_MSG_PUB.Count_And_Get
36748: ( p_encoded => FND_API.G_FALSE,
36749: p_count => x_msg_count,
36750: p_data => x_msg_data );
36751: END unlock_item_instances;