333: FETCH csi_txn_types_csr INTO l_txn_type_id;
334: IF (csi_txn_types_csr%NOTFOUND) THEN
335: FND_MESSAGE.Set_Name('AHL','AHL_UC_TXNCODE_INVALID');
336: FND_MESSAGE.Set_Token('CODE',p_txn_code);
337: FND_MSG_PUB.ADD;
338: --dbms_output.put_line('Transaction code not found');
339: l_return_val := FALSE;
340: END IF;
341: CLOSE csi_txn_types_csr;
369: FETCH csi_instance_statuses_csr INTO l_instance_status_id;
370: IF (csi_instance_statuses_csr%NOTFOUND) THEN
371: FND_MESSAGE.Set_Name('AHL','AHL_UC_INST_STATUS_MISSING');
372: FND_MESSAGE.Set_Token('CODE',p_status_name);
373: FND_MSG_PUB.ADD;
374: --dbms_output.put_line('Status code not found');
375: l_return_val := FALSE;
376: END IF;
377: CLOSE csi_instance_statuses_csr;
873: END IF;
874:
875: FND_MESSAGE.Set_Name('AHL','AHL_UC_INVGRP_MISMATCH');
876: FND_MESSAGE.Set_Token('POSN_REF',l_pos_ref_meaning);
877: FND_MSG_PUB.ADD;
878:
879: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
880: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, l_debug_key, 'Item invalid for l_pos_ref_meaning => '||l_pos_ref_meaning);
881: END IF;
945:
946: BEGIN
947:
948: -- Initialize the message stack.
949: FND_MSG_PUB.Initialize;
950:
951: -- Call Validate for position procedure.
952: Validate_for_Position(p_mc_relationship_id => p_mc_relationship_id,
953: p_Inventory_id => p_Inventory_id,
958: p_position_ref_meaning => NULL,
959: x_item_assoc_id => l_item_assoc_id);
960:
961: -- Check Error Message stack.
962: l_msg_count := FND_MSG_PUB.count_msg;
963: IF l_msg_count > 0 THEN
964: RETURN 0;
965: ELSE
966: RETURN l_item_assoc_id;
1114: END IF;
1115: CLOSE csi_item_instance_csr;
1116: FND_MESSAGE.Set_Name('AHL','AHL_UC_SUBTREE_MISMATCH');
1117: FND_MESSAGE.Set_Token('INSTANCE',l_instance_number);
1118: FND_MSG_PUB.ADD;
1119: x_match_flag := FALSE;
1120: RETURN;
1121: END IF;
1122:
1154: l_inventory_revision, l_instance_number;
1155: IF (csi_item_instance_csr%NOTFOUND) THEN
1156: FND_MESSAGE.Set_Name('AHL','AHL_UC_CHILD_DELETED');
1157: FND_MESSAGE.Set_Token('CHILD', l_part_tbl(i).subject_id);
1158: FND_MSG_PUB.ADD;
1159: CLOSE csi_item_instance_csr;
1160: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1161: END IF;
1162:
1205: l_instance_number := p_csi_item_instance_id;
1206: END IF;
1207: CLOSE csi_item_instance_csr;
1208: FND_MESSAGE.Set_Token('INSTANCE',l_instance_number);
1209: FND_MSG_PUB.ADD;
1210: x_match_flag := FALSE;
1211: END IF;
1212:
1213: -- set return parameters.
1240: END IF;
1241: CLOSE csi_item_instance_csr;
1242: FND_MESSAGE.Set_Name('AHL','AHL_UC_SUBTREE_MISMATCH');
1243: FND_MESSAGE.Set_Token('INSTANCE',l_instance_number);
1244: FND_MSG_PUB.ADD;
1245: x_match_flag := FALSE;
1246:
1247: WHEN VALUE_ERROR THEN
1248: OPEN csi_item_instance_csr (p_csi_item_instance_id);
1253: END IF;
1254: CLOSE csi_item_instance_csr;
1255: FND_MESSAGE.Set_Name('AHL','AHL_UC_SUBTREE_MISMATCH');
1256: FND_MESSAGE.Set_Token('INSTANCE',l_instance_number);
1257: FND_MSG_PUB.ADD;
1258: x_match_flag := FALSE;
1259:
1260:
1261: END Match_Tree_Components;
1396: END IF;
1397:
1398: -- Initialize message list if p_init_msg_list is set to TRUE
1399: IF FND_API.To_Boolean(p_init_msg_list) THEN
1400: FND_MSG_PUB.Initialize;
1401: END IF;
1402:
1403: -- Initialize API return status to success
1404: x_return_status := FND_API.G_RET_STS_SUCCESS;
1500:
1501: --Completed Processing
1502:
1503: -- Check Error Message stack.
1504: x_msg_count := FND_MSG_PUB.count_msg;
1505: IF x_msg_count > 0 THEN
1506: RAISE FND_API.G_EXC_ERROR;
1507: END IF;
1508:
1507: END IF;
1508:
1509:
1510: -- Standard call to get message count and if count is 1, get message info
1511: FND_MSG_PUB.Count_And_Get
1512: ( p_count => x_msg_count,
1513: p_data => x_msg_data,
1514: p_encoded => fnd_api.g_false
1515: );
1523: EXCEPTION
1524: WHEN FND_API.G_EXC_ERROR THEN
1525: x_return_status := FND_API.G_RET_STS_ERROR;
1526: Rollback to Invalidate_Instance;
1527: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1528: p_data => x_msg_data,
1529: p_encoded => fnd_api.g_false);
1530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1529: p_encoded => fnd_api.g_false);
1530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1532: Rollback to Invalidate_Instance;
1533: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1534: p_data => x_msg_data,
1535: p_encoded => fnd_api.g_false);
1536: WHEN OTHERS THEN
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1535: p_encoded => fnd_api.g_false);
1536: WHEN OTHERS THEN
1537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1538: Rollback to Invalidate_Instance;
1539: FND_MSG_PUB.add_exc_msg( p_pkg_name => G_PKG_NAME,
1540: p_procedure_name => 'Invalidate_Instance',
1541: p_error_text => SQLERRM);
1542:
1543: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1539: FND_MSG_PUB.add_exc_msg( p_pkg_name => G_PKG_NAME,
1540: p_procedure_name => 'Invalidate_Instance',
1541: p_error_text => SQLERRM);
1542:
1543: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1544: p_data => x_msg_data,
1545: p_encoded => fnd_api.g_false);
1546: END Invalidate_Instance;
1547:
2111: IF get_top_unit%NOTFOUND THEN
2112: FND_MESSAGE.set_name( 'AHL','AHL_UC_API_PARAMETER_INVALID');
2113: FND_MESSAGE.set_token('NAME', 'uc_header_id');
2114: FND_MESSAGE.set_token('VALUE', p_uc_header_id);
2115: FND_MSG_PUB.add;
2116: END IF;
2117: CLOSE get_top_unit;
2118: x_uc_header_id := l_uc_header_id;
2119: x_instance_id := l_instance_id;
2720: END IF;
2721:
2722: -- Initialize message list if p_init_msg_list is set to TRUE
2723: IF FND_API.To_Boolean(p_init_msg_list) THEN
2724: FND_MSG_PUB.Initialize;
2725: END IF;
2726:
2727: -- Initialize API return status to success
2728: x_return_status := FND_API.G_RET_STS_SUCCESS;
2829: END IF;
2830: FND_MESSAGE.Set_Token('UCLIST',l_valid_UC_lst);
2831: FND_MESSAGE.Set_Token('ITNAME',l_instance_tbl(i).concatenated_segments);
2832: FND_MESSAGE.Set_Token('ITREV',l_instance_tbl(i).revision);
2833: FND_MSG_PUB.ADD;
2834: END IF;
2835:
2836: END IF; -- c_check_item_group_csr%FOUND
2837: CLOSE c_check_item_group_csr;
2845:
2846: EXCEPTION
2847: WHEN FND_API.G_EXC_ERROR THEN
2848: x_return_status := FND_API.G_RET_STS_ERROR;
2849: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2850: p_data => x_msg_data,
2851: p_encoded => fnd_api.g_false);
2852:
2853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2851: p_encoded => fnd_api.g_false);
2852:
2853: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2855: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2856: p_data => x_msg_data,
2857: p_encoded => fnd_api.g_false);
2858:
2859: WHEN OTHERS THEN
2857: p_encoded => fnd_api.g_false);
2858:
2859: WHEN OTHERS THEN
2860: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2861: FND_MSG_PUB.add_exc_msg( p_pkg_name => G_PKG_NAME,
2862: p_procedure_name => 'Check_Invalidate_Instance',
2863: p_error_text => SQLERRM);
2864:
2865: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2861: FND_MSG_PUB.add_exc_msg( p_pkg_name => G_PKG_NAME,
2862: p_procedure_name => 'Check_Invalidate_Instance',
2863: p_error_text => SQLERRM);
2864:
2865: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2866: p_data => x_msg_data,
2867: p_encoded => fnd_api.g_false);
2868:
2869: END Check_Invalidate_Instance;