DBA Data[Home] [Help]

APPS.AHL_UC_TREE_PVT dependencies on FND_API

Line 33: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

29: -- immediate children nodes.
30: /*
31: PROCEDURE get_immediate_children(
32: p_api_version IN NUMBER := 1.0,
33: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
34: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,

Line 34: --p_commit IN VARCHAR2 := FND_API.G_FALSE,

30: /*
31: PROCEDURE get_immediate_children(
32: p_api_version IN NUMBER := 1.0,
33: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
34: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,
38: x_msg_data OUT NOCOPY VARCHAR2,

Line 35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

31: PROCEDURE get_immediate_children(
32: p_api_version IN NUMBER := 1.0,
33: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
34: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
35: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,
38: x_msg_data OUT NOCOPY VARCHAR2,
39: p_uc_parent_rec IN uc_child_rec_type,

Line 115: x_return_status := FND_API.G_RET_STS_SUCCESS;

111: WHERE object_id = c_instance_id
112: AND nvl(trunc(active_end_date), trunc(SYSDATE)+1) > trunc(SYSDATE);
113: BEGIN
114: -- Initialize API return status to success
115: x_return_status := FND_API.G_RET_STS_SUCCESS;
116:
117: -- Standard call to check for call compatibility.
118: IF NOT FND_API.compatible_api_call(
119: l_api_version,

Line 118: IF NOT FND_API.compatible_api_call(

114: -- Initialize API return status to success
115: x_return_status := FND_API.G_RET_STS_SUCCESS;
116:
117: -- Standard call to check for call compatibility.
118: IF NOT FND_API.compatible_api_call(
119: l_api_version,
120: p_api_version,
121: l_api_name,
122: G_PKG_NAME)

Line 124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

120: p_api_version,
121: l_api_name,
122: G_PKG_NAME)
123: THEN
124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
125: END IF;
126:
127: -- Initialize message list if p_init_msg_list is set to TRUE.
128: IF FND_API.to_boolean( p_init_msg_list ) THEN

Line 128: IF FND_API.to_boolean( p_init_msg_list ) THEN

124: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
125: END IF;
126:
127: -- Initialize message list if p_init_msg_list is set to TRUE.
128: IF FND_API.to_boolean( p_init_msg_list ) THEN
129: FND_MSG_PUB.initialize;
130: END IF;
131:
132: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 274: RAISE FND_API.G_EXC_ERROR;

270: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
271: l_msg_count := FND_MSG_PUB.count_msg;
272: IF l_msg_count > 0 THEN
273: x_msg_count := l_msg_count;
274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: -- Count and Get messages (optional)
277: FND_MSG_PUB.count_and_get(
278: p_encoded => FND_API.G_FALSE,

Line 278: p_encoded => FND_API.G_FALSE,

274: RAISE FND_API.G_EXC_ERROR;
275: END IF;
276: -- Count and Get messages (optional)
277: FND_MSG_PUB.count_and_get(
278: p_encoded => FND_API.G_FALSE,
279: p_count => x_msg_count,
280: p_data => x_msg_data);
281:
282: EXCEPTION

Line 283: WHEN FND_API.G_EXC_ERROR THEN

279: p_count => x_msg_count,
280: p_data => x_msg_data);
281:
282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: x_return_status := FND_API.G_RET_STS_ERROR ;
285: FND_MSG_PUB.count_and_get(
286: p_encoded => FND_API.G_FALSE,
287: p_count => x_msg_count,

Line 284: x_return_status := FND_API.G_RET_STS_ERROR ;

280: p_data => x_msg_data);
281:
282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: x_return_status := FND_API.G_RET_STS_ERROR ;
285: FND_MSG_PUB.count_and_get(
286: p_encoded => FND_API.G_FALSE,
287: p_count => x_msg_count,
288: p_data => x_msg_data);

Line 286: p_encoded => FND_API.G_FALSE,

282: EXCEPTION
283: WHEN FND_API.G_EXC_ERROR THEN
284: x_return_status := FND_API.G_RET_STS_ERROR ;
285: FND_MSG_PUB.count_and_get(
286: p_encoded => FND_API.G_FALSE,
287: p_count => x_msg_count,
288: p_data => x_msg_data);
289:
290: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 290: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

286: p_encoded => FND_API.G_FALSE,
287: p_count => x_msg_count,
288: p_data => x_msg_data);
289:
290: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: FND_MSG_PUB.count_and_get(
293: p_encoded => FND_API.G_FALSE,
294: p_count => x_msg_count,

Line 291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

287: p_count => x_msg_count,
288: p_data => x_msg_data);
289:
290: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: FND_MSG_PUB.count_and_get(
293: p_encoded => FND_API.G_FALSE,
294: p_count => x_msg_count,
295: p_data => x_msg_data);

Line 293: p_encoded => FND_API.G_FALSE,

289:
290: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
292: FND_MSG_PUB.count_and_get(
293: p_encoded => FND_API.G_FALSE,
294: p_count => x_msg_count,
295: p_data => x_msg_data);
296:
297: WHEN OTHERS THEN

Line 298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

294: p_count => x_msg_count,
295: p_data => x_msg_data);
296:
297: WHEN OTHERS THEN
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
299: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
300: THEN
301: FND_MSG_PUB.add_exc_msg(
302: p_pkg_name => G_PKG_NAME,

Line 307: p_encoded => FND_API.G_FALSE,

303: p_procedure_name => l_api_name,
304: p_error_text => SUBSTRB(SQLERRM,1,240));
305: END IF;
306: FND_MSG_PUB.count_and_get(
307: p_encoded => FND_API.G_FALSE,
308: p_count => x_msg_count,
309: p_data => x_msg_data);
310:
311: END get_immediate_children;

Line 316: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

312: */
313:
314: PROCEDURE get_whole_uc_tree(
315: p_api_version IN NUMBER := 1.0,
316: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
317: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
319: x_return_status OUT NOCOPY VARCHAR2,
320: x_msg_count OUT NOCOPY NUMBER,

Line 317: --p_commit IN VARCHAR2 := FND_API.G_FALSE,

313:
314: PROCEDURE get_whole_uc_tree(
315: p_api_version IN NUMBER := 1.0,
316: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
317: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
319: x_return_status OUT NOCOPY VARCHAR2,
320: x_msg_count OUT NOCOPY NUMBER,
321: x_msg_data OUT NOCOPY VARCHAR2,

Line 318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

314: PROCEDURE get_whole_uc_tree(
315: p_api_version IN NUMBER := 1.0,
316: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
317: --p_commit IN VARCHAR2 := FND_API.G_FALSE,
318: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
319: x_return_status OUT NOCOPY VARCHAR2,
320: x_msg_count OUT NOCOPY NUMBER,
321: x_msg_data OUT NOCOPY VARCHAR2,
322: p_uc_header_id IN NUMBER,

Line 611: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

607: FND_MESSAGE.set_name( 'AHL','AHL_UC_POSITION_INVALID' );
608: FND_MESSAGE.set_token('POSITION', p_relationship_id);
609: FND_MSG_PUB.add;
610: CLOSE get_position_necessity;
611: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
612: ELSE
613: CLOSE get_position_necessity;
614: END IF;
615: END IF;

Line 638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

634: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_INVALID' );
635: FND_MESSAGE.set_token('INSTANCE', p_instance_id);
636: FND_MSG_PUB.add;
637: CLOSE get_part_info;
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: ELSE
640: CLOSE get_part_info;
641: END IF;
642: RETURN l_part_info;

Line 648: x_return_status := FND_API.G_RET_STS_SUCCESS;

644:
645:
646: BEGIN
647: --Initialize API return status to success
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
649:
650: --Standard call to check for call compatibility.
651: IF NOT FND_API.compatible_api_call(
652: l_api_version,

Line 651: IF NOT FND_API.compatible_api_call(

647: --Initialize API return status to success
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
649:
650: --Standard call to check for call compatibility.
651: IF NOT FND_API.compatible_api_call(
652: l_api_version,
653: p_api_version,
654: l_api_name,
655: G_PKG_NAME)

Line 657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

653: p_api_version,
654: l_api_name,
655: G_PKG_NAME)
656: THEN
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
658: END IF;
659: --Initialize message list if p_init_msg_list is set to TRUE.
660: IF FND_API.to_boolean( p_init_msg_list ) THEN
661: FND_MSG_PUB.initialize;

Line 660: IF FND_API.to_boolean( p_init_msg_list ) THEN

656: THEN
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
658: END IF;
659: --Initialize message list if p_init_msg_list is set to TRUE.
660: IF FND_API.to_boolean( p_init_msg_list ) THEN
661: FND_MSG_PUB.initialize;
662: END IF;
663:
664: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

674: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_ID_INVALID' );
675: FND_MESSAGE.set_token('UC_HEADER_ID', p_uc_header_id);
676: FND_MSG_PUB.add;
677: CLOSE get_uc_header_attr;
678: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
679: ELSE
680: CLOSE get_uc_header_attr;
681: END IF;
682:

Line 725: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

721: x_msg_count => x_msg_count,
722: x_msg_data => x_msg_data
723: );
724:
725: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
726: IF (l_log_statement >= l_log_current_level) THEN
727: FND_LOG.string(l_log_statement, 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name,
728: ' AHL_SB_RULES_PVT.Get_Violated_Instances call errored out');
729: END IF;

Line 730: RAISE FND_API.G_EXC_ERROR;

726: IF (l_log_statement >= l_log_current_level) THEN
727: FND_LOG.string(l_log_statement, 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name,
728: ' AHL_SB_RULES_PVT.Get_Violated_Instances call errored out');
729: END IF;
730: RAISE FND_API.G_EXC_ERROR;
731: END IF;
732:
733: --Loop through all of the non leaf nodes of the UC tree, including the root node and extra node
734: FOR l_non_leaf_node IN get_non_leaf_nodes(l_root_instance_id) LOOP

Line 1062: RAISE FND_API.G_EXC_ERROR;

1058: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1059: l_msg_count := FND_MSG_PUB.count_msg;
1060: IF l_msg_count > 0 THEN
1061: x_msg_count := l_msg_count;
1062: RAISE FND_API.G_EXC_ERROR;
1063: END IF;
1064: -- Count and Get messages (optional)
1065: FND_MSG_PUB.count_and_get(
1066: p_encoded => FND_API.G_FALSE,

Line 1066: p_encoded => FND_API.G_FALSE,

1062: RAISE FND_API.G_EXC_ERROR;
1063: END IF;
1064: -- Count and Get messages (optional)
1065: FND_MSG_PUB.count_and_get(
1066: p_encoded => FND_API.G_FALSE,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data);
1069:
1070: EXCEPTION

Line 1071: WHEN FND_API.G_EXC_ERROR THEN

1067: p_count => x_msg_count,
1068: p_data => x_msg_data);
1069:
1070: EXCEPTION
1071: WHEN FND_API.G_EXC_ERROR THEN
1072: x_return_status := FND_API.G_RET_STS_ERROR ;
1073: FND_MSG_PUB.count_and_get(
1074: p_encoded => FND_API.G_FALSE,
1075: p_count => x_msg_count,

Line 1072: x_return_status := FND_API.G_RET_STS_ERROR ;

1068: p_data => x_msg_data);
1069:
1070: EXCEPTION
1071: WHEN FND_API.G_EXC_ERROR THEN
1072: x_return_status := FND_API.G_RET_STS_ERROR ;
1073: FND_MSG_PUB.count_and_get(
1074: p_encoded => FND_API.G_FALSE,
1075: p_count => x_msg_count,
1076: p_data => x_msg_data);

Line 1074: p_encoded => FND_API.G_FALSE,

1070: EXCEPTION
1071: WHEN FND_API.G_EXC_ERROR THEN
1072: x_return_status := FND_API.G_RET_STS_ERROR ;
1073: FND_MSG_PUB.count_and_get(
1074: p_encoded => FND_API.G_FALSE,
1075: p_count => x_msg_count,
1076: p_data => x_msg_data);
1077:
1078: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1078: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1074: p_encoded => FND_API.G_FALSE,
1075: p_count => x_msg_count,
1076: p_data => x_msg_data);
1077:
1078: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1080: FND_MSG_PUB.count_and_get(
1081: p_encoded => FND_API.G_FALSE,
1082: p_count => x_msg_count,

Line 1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1075: p_count => x_msg_count,
1076: p_data => x_msg_data);
1077:
1078: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1080: FND_MSG_PUB.count_and_get(
1081: p_encoded => FND_API.G_FALSE,
1082: p_count => x_msg_count,
1083: p_data => x_msg_data);

Line 1081: p_encoded => FND_API.G_FALSE,

1077:
1078: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1079: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1080: FND_MSG_PUB.count_and_get(
1081: p_encoded => FND_API.G_FALSE,
1082: p_count => x_msg_count,
1083: p_data => x_msg_data);
1084:
1085: WHEN OTHERS THEN

Line 1086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1082: p_count => x_msg_count,
1083: p_data => x_msg_data);
1084:
1085: WHEN OTHERS THEN
1086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1087: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1088: THEN
1089: FND_MSG_PUB.add_exc_msg(
1090: p_pkg_name => G_PKG_NAME,

Line 1095: p_encoded => FND_API.G_FALSE,

1091: p_procedure_name => l_api_name,
1092: p_error_text => SUBSTRB(SQLERRM,1,240));
1093: END IF;
1094: FND_MSG_PUB.count_and_get(
1095: p_encoded => FND_API.G_FALSE,
1096: p_count => x_msg_count,
1097: p_data => x_msg_data);
1098: END;
1099:

Line 1104: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1100: -- Define Procedure migrate_uc_tree --
1101: -- This API is used to migrate a UC tree to a new MC revision or copy
1102: PROCEDURE migrate_uc_tree(
1103: p_api_version IN NUMBER,
1104: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1105: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1106: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1107: x_return_status OUT NOCOPY VARCHAR2,
1108: x_msg_count OUT NOCOPY NUMBER,

Line 1105: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1101: -- This API is used to migrate a UC tree to a new MC revision or copy
1102: PROCEDURE migrate_uc_tree(
1103: p_api_version IN NUMBER,
1104: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1105: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1106: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1107: x_return_status OUT NOCOPY VARCHAR2,
1108: x_msg_count OUT NOCOPY NUMBER,
1109: x_msg_data OUT NOCOPY VARCHAR2,

Line 1106: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1102: PROCEDURE migrate_uc_tree(
1103: p_api_version IN NUMBER,
1104: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1105: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1106: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1107: x_return_status OUT NOCOPY VARCHAR2,
1108: x_msg_count OUT NOCOPY NUMBER,
1109: x_msg_data OUT NOCOPY VARCHAR2,
1110: p_uc_header_id IN NUMBER,

Line 1346: x_return_status := FND_API.G_RET_STS_SUCCESS;

1342: l_position_info get_position_reference%ROWTYPE;
1343:
1344: BEGIN
1345: --Initialize API return status to success
1346: x_return_status := FND_API.G_RET_STS_SUCCESS;
1347:
1348: -- Standard Start of API savepoint
1349: SAVEPOINT migrate_uc_tree;
1350:

Line 1352: IF NOT FND_API.compatible_api_call(

1348: -- Standard Start of API savepoint
1349: SAVEPOINT migrate_uc_tree;
1350:
1351: --Standard call to check for call compatibility.
1352: IF NOT FND_API.compatible_api_call(
1353: l_api_version,
1354: p_api_version,
1355: l_api_name,
1356: G_PKG_NAME)

Line 1358: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1354: p_api_version,
1355: l_api_name,
1356: G_PKG_NAME)
1357: THEN
1358: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1359: END IF;
1360:
1361: --Initialize message list if p_init_msg_list is set to TRUE.
1362: IF FND_API.to_boolean( p_init_msg_list ) THEN

Line 1362: IF FND_API.to_boolean( p_init_msg_list ) THEN

1358: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1359: END IF;
1360:
1361: --Initialize message list if p_init_msg_list is set to TRUE.
1362: IF FND_API.to_boolean( p_init_msg_list ) THEN
1363: FND_MSG_PUB.initialize;
1364: END IF;
1365:
1366: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1378: FND_MESSAGE.set_token('NAME', 'uc_header_id');
1379: FND_MESSAGE.set_token('VALUE', p_uc_header_id);
1380: FND_MSG_PUB.add;
1381: CLOSE check_uc_header;
1382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1383: ELSE
1384:
1385: -- ACL :: Changes for R12
1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN

Line 1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN

1382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1383: ELSE
1384:
1385: -- ACL :: Changes for R12
1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN
1387: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
1388: FND_MSG_PUB.add;
1389: CLOSE check_uc_header;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1386: IF (ahl_util_uc_pkg.IS_UNIT_QUARANTINED(p_unit_header_id => p_uc_header_id , p_instance_id => null) = FND_API.G_TRUE) THEN
1387: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
1388: FND_MSG_PUB.add;
1389: CLOSE check_uc_header;
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1391: END IF;
1392:
1393: ahl_util_uc_pkg.get_root_uc_attr(p_uc_header_id,
1394: l_root_uc_header_id,

Line 1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1401: FND_MESSAGE.set_name( 'AHL','AHL_UC_STATUS_PENDING' );
1402: FND_MESSAGE.set_token('UC_HEADER_ID', l_root_uc_header_id);
1403: FND_MSG_PUB.add;
1404: CLOSE check_uc_header;
1405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1406: ELSE
1407: CLOSE check_uc_header;
1408: END IF;
1409: END IF;

Line 1424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1420: FND_MESSAGE.set_token('NAME', 'mc_header_id');
1421: FND_MESSAGE.set_token('VALUE', p_mc_header_id);
1422: FND_MSG_PUB.add;
1423: CLOSE check_mc_header;
1424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1425: ELSE
1426: IF l_mc_status_code <> 'COMPLETE' THEN
1427: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_NOT_COMPLETE' );
1428: FND_MESSAGE.set_token('NAME', l_mc_name);

Line 1432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1428: FND_MESSAGE.set_token('NAME', l_mc_name);
1429: FND_MESSAGE.set_token('REVISION', l_mc_revision);
1430: FND_MSG_PUB.add;
1431: CLOSE check_mc_header;
1432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1433: ELSIF l_mc_header_id = l_uc_header_attr.mc_header_id THEN
1434: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_MIGRATE_SAME' );
1435: FND_MESSAGE.set_token('NAME', l_mc_name);
1436: FND_MESSAGE.set_token('REVISION', l_mc_revision);

Line 1439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1435: FND_MESSAGE.set_token('NAME', l_mc_name);
1436: FND_MESSAGE.set_token('REVISION', l_mc_revision);
1437: FND_MSG_PUB.add;
1438: CLOSE check_mc_header;
1439: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1440: ELSE
1441: CLOSE check_mc_header;
1442: END IF;
1443: END IF;

Line 1449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1445: --The following lines are used to update the position_reference column in csi_ii_relationships
1446: --First, get transaction_type_id .
1447: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
1448: IF NOT l_return_value THEN
1449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1450: END IF;
1451:
1452: --For UC root node, only need to ensure item matches, no need to check position key
1453: --and position_reference

Line 1470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1466: --dbms_output.put_line('revision='||l_uc_header_attr.inventory_revision||' quantity='||l_uc_header_attr.quantity);
1467: --dbms_output.put_line('uom='||l_uc_header_attr.unit_of_measure);
1468: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1469: FND_MSG_PUB.add;
1470: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1471: ELSE
1472: --Item matches, can be migrated and thus change the mc_header_id of the UC header
1473: NULL;
1474: END IF;

Line 1493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1489: FND_MESSAGE.set_token('CHILD',l_uc_header_attr.instance_id);
1490: FND_MESSAGE.set_token('PARENT',l_parent_instance_id);
1491: FND_MSG_PUB.add;
1492: CLOSE get_position_reference;
1493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1494: END IF;
1495: CLOSE get_position_reference;
1496: --Check whether the new mc_header_id to which to be migrated could be an alternate sub MC
1497: --in position

Line 1517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1513: l_uc_header_attr.unit_of_measure);
1514: IF NOT l_item_match THEN
1515: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1516: FND_MSG_PUB.add;
1517: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1518: ELSE
1519: --Make the sub unit an extra node in its parent unit context and
1520: --update its own mc_header_id to the new p_mc_header_id
1521:

Line 1540: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1536: p_txn_rec => l_csi_transaction_rec,
1537: x_return_status => l_return_status,
1538: x_msg_count => l_msg_count,
1539: x_msg_data => l_msg_data);
1540: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: RAISE FND_API.G_EXC_ERROR;
1542: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1544: END IF;

Line 1541: RAISE FND_API.G_EXC_ERROR;

1537: x_return_status => l_return_status,
1538: x_msg_count => l_msg_count,
1539: x_msg_data => l_msg_data);
1540: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: RAISE FND_API.G_EXC_ERROR;
1542: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1544: END IF;
1545: --Could be migrated and thus change the mc_header_id of the UC header

Line 1542: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1538: x_msg_count => l_msg_count,
1539: x_msg_data => l_msg_data);
1540: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: RAISE FND_API.G_EXC_ERROR;
1542: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1544: END IF;
1545: --Could be migrated and thus change the mc_header_id of the UC header
1546: NULL;

Line 1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1539: x_msg_data => l_msg_data);
1540: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: RAISE FND_API.G_EXC_ERROR;
1542: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1543: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1544: END IF;
1545: --Could be migrated and thus change the mc_header_id of the UC header
1546: NULL;
1547: END IF;

Line 1564: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1560: l_uc_header_attr.unit_of_measure);
1561: IF NOT l_item_match THEN
1562: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1563: FND_MSG_PUB.add;
1564: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1565: ELSE
1566: --Could be migrated but will be still extra node to its parent unit
1567: --Not necessary to update position_reference to NULL because it is already an
1568: --extra node to its parent unit

Line 1597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1593: END IF;
1594: IF SQL%ROWCOUNT = 0 THEN
1595: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1596: FND_MSG_PUB.add;
1597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1598: END IF;
1599:
1600: --Copy the change to UC history table
1601: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);

Line 1603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1599:
1600: --Copy the change to UC history table
1601: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);
1602: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1603: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1604: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1605: FND_MSG_PUB.add;
1606: END IF;
1607:

Line 1720: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1716: p_txn_rec => l_csi_transaction_rec,
1717: x_return_status => l_return_status,
1718: x_msg_count => l_msg_count,
1719: x_msg_data => l_msg_data);
1720: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1721: RAISE FND_API.G_EXC_ERROR;
1722: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;

Line 1721: RAISE FND_API.G_EXC_ERROR;

1717: x_return_status => l_return_status,
1718: x_msg_count => l_msg_count,
1719: x_msg_data => l_msg_data);
1720: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1721: RAISE FND_API.G_EXC_ERROR;
1722: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;
1725: END IF; --whether the UC node is an extra node

Line 1722: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1718: x_msg_count => l_msg_count,
1719: x_msg_data => l_msg_data);
1720: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1721: RAISE FND_API.G_EXC_ERROR;
1722: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;
1725: END IF; --whether the UC node is an extra node
1726: END LOOP; --of all the UC children

Line 1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1719: x_msg_data => l_msg_data);
1720: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1721: RAISE FND_API.G_EXC_ERROR;
1722: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1723: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1724: END IF;
1725: END IF; --whether the UC node is an extra node
1726: END LOOP; --of all the UC children
1727: END IF; --whether it is a node belonging to subuc or extra node branch

Line 1741: p_init_msg_list => FND_API.G_FALSE,

1737: --Call check_completeness API to check the completeness of the root UC
1738: IF (l_root_uc_status_code IN ('COMPLETE', 'INCOMPLETE')) THEN
1739: AHL_UC_VALIDATION_PUB.check_completeness(
1740: p_api_version => 1.0,
1741: p_init_msg_list => FND_API.G_FALSE,
1742: p_commit => FND_API.G_FALSE,
1743: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1744: x_return_status => l_return_status,
1745: x_msg_count => l_msg_count,

Line 1742: p_commit => FND_API.G_FALSE,

1738: IF (l_root_uc_status_code IN ('COMPLETE', 'INCOMPLETE')) THEN
1739: AHL_UC_VALIDATION_PUB.check_completeness(
1740: p_api_version => 1.0,
1741: p_init_msg_list => FND_API.G_FALSE,
1742: p_commit => FND_API.G_FALSE,
1743: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1744: x_return_status => l_return_status,
1745: x_msg_count => l_msg_count,
1746: x_msg_data => l_msg_data,

Line 1743: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1739: AHL_UC_VALIDATION_PUB.check_completeness(
1740: p_api_version => 1.0,
1741: p_init_msg_list => FND_API.G_FALSE,
1742: p_commit => FND_API.G_FALSE,
1743: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1744: x_return_status => l_return_status,
1745: x_msg_count => l_msg_count,
1746: x_msg_data => l_msg_data,
1747: p_unit_header_id => l_root_uc_header_id,

Line 1749: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1745: x_msg_count => l_msg_count,
1746: x_msg_data => l_msg_data,
1747: p_unit_header_id => l_root_uc_header_id,
1748: x_evaluation_status => l_evaluation_status);
1749: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1753: END IF;

Line 1750: RAISE FND_API.G_EXC_ERROR;

1746: x_msg_data => l_msg_data,
1747: p_unit_header_id => l_root_uc_header_id,
1748: x_evaluation_status => l_evaluation_status);
1749: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1753: END IF;
1754: END IF;

Line 1751: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1747: p_unit_header_id => l_root_uc_header_id,
1748: x_evaluation_status => l_evaluation_status);
1749: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1753: END IF;
1754: END IF;
1755: --dbms_output.put_line('l_root_uc_ovn(a)='||l_root_uc_ovn);

Line 1752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1748: x_evaluation_status => l_evaluation_status);
1749: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1753: END IF;
1754: END IF;
1755: --dbms_output.put_line('l_root_uc_ovn(a)='||l_root_uc_ovn);
1756: select object_version_number into l_root_uc_ovn

Line 1775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1771: AND object_version_number = l_root_uc_ovn;
1772: IF SQL%ROWCOUNT = 0 THEN
1773: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1774: FND_MSG_PUB.add;
1775: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1776: END IF;
1777:
1778: --Copy the change to UC history table
1779: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

Line 1781: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1777:
1778: --Copy the change to UC history table
1779: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1780: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1781: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1782: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1783: FND_MSG_PUB.add;
1784: END IF;
1785: ELSIF (l_evaluation_status = 'F' AND l_root_uc_status_code = 'COMPLETE') THEN

Line 1798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1794: AND object_version_number = l_root_uc_ovn;
1795: IF SQL%ROWCOUNT = 0 THEN
1796: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1797: FND_MSG_PUB.add;
1798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1799: END IF;
1800:
1801: --Copy the change to UC history table
1802: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

Line 1804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1800:
1801: --Copy the change to UC history table
1802: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1803: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1805: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1806: FND_MSG_PUB.add;
1807: END IF;
1808: ELSIF (l_root_uc_status_code IN ('COMPLETE', 'INCOMPLETE') AND

Line 1822: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1818: AND object_version_number = l_root_uc_ovn;
1819: IF SQL%ROWCOUNT = 0 THEN
1820: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1821: FND_MSG_PUB.add;
1822: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1823: END IF;
1824:
1825: --Copy the change to UC history table
1826: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);

Line 1828: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1824:
1825: --Copy the change to UC history table
1826: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1827: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1828: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1829: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1830: FND_MSG_PUB.add;
1831: END IF;
1832: END IF;

Line 1844: RAISE FND_API.G_EXC_ERROR;

1840: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1841: l_msg_count := FND_MSG_PUB.count_msg;
1842: IF l_msg_count > 0 THEN
1843: x_msg_count := l_msg_count;
1844: RAISE FND_API.G_EXC_ERROR;
1845: END IF;
1846:
1847: -- Perform the Commit (if requested)
1848: IF FND_API.to_boolean(p_commit) THEN

Line 1848: IF FND_API.to_boolean(p_commit) THEN

1844: RAISE FND_API.G_EXC_ERROR;
1845: END IF;
1846:
1847: -- Perform the Commit (if requested)
1848: IF FND_API.to_boolean(p_commit) THEN
1849: COMMIT;
1850: END IF;
1851:
1852: -- Count and Get messages (optional)

Line 1854: p_encoded => FND_API.G_FALSE,

1850: END IF;
1851:
1852: -- Count and Get messages (optional)
1853: FND_MSG_PUB.count_and_get(
1854: p_encoded => FND_API.G_FALSE,
1855: p_count => x_msg_count,
1856: p_data => x_msg_data);
1857:
1858: EXCEPTION

Line 1859: WHEN FND_API.G_EXC_ERROR THEN

1855: p_count => x_msg_count,
1856: p_data => x_msg_data);
1857:
1858: EXCEPTION
1859: WHEN FND_API.G_EXC_ERROR THEN
1860: ROLLBACK TO migrate_uc_tree;
1861: x_return_status := FND_API.G_RET_STS_ERROR ;
1862: FND_MSG_PUB.count_and_get(
1863: p_encoded => FND_API.G_FALSE,

Line 1861: x_return_status := FND_API.G_RET_STS_ERROR ;

1857:
1858: EXCEPTION
1859: WHEN FND_API.G_EXC_ERROR THEN
1860: ROLLBACK TO migrate_uc_tree;
1861: x_return_status := FND_API.G_RET_STS_ERROR ;
1862: FND_MSG_PUB.count_and_get(
1863: p_encoded => FND_API.G_FALSE,
1864: p_count => x_msg_count,
1865: p_data => x_msg_data);

Line 1863: p_encoded => FND_API.G_FALSE,

1859: WHEN FND_API.G_EXC_ERROR THEN
1860: ROLLBACK TO migrate_uc_tree;
1861: x_return_status := FND_API.G_RET_STS_ERROR ;
1862: FND_MSG_PUB.count_and_get(
1863: p_encoded => FND_API.G_FALSE,
1864: p_count => x_msg_count,
1865: p_data => x_msg_data);
1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1867: ROLLBACK TO migrate_uc_tree;

Line 1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1862: FND_MSG_PUB.count_and_get(
1863: p_encoded => FND_API.G_FALSE,
1864: p_count => x_msg_count,
1865: p_data => x_msg_data);
1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1867: ROLLBACK TO migrate_uc_tree;
1868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1869: FND_MSG_PUB.count_and_get(
1870: p_encoded => FND_API.G_FALSE,

Line 1868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1864: p_count => x_msg_count,
1865: p_data => x_msg_data);
1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1867: ROLLBACK TO migrate_uc_tree;
1868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1869: FND_MSG_PUB.count_and_get(
1870: p_encoded => FND_API.G_FALSE,
1871: p_count => x_msg_count,
1872: p_data => x_msg_data);

Line 1870: p_encoded => FND_API.G_FALSE,

1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1867: ROLLBACK TO migrate_uc_tree;
1868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1869: FND_MSG_PUB.count_and_get(
1870: p_encoded => FND_API.G_FALSE,
1871: p_count => x_msg_count,
1872: p_data => x_msg_data);
1873: WHEN OTHERS THEN
1874: ROLLBACK TO migrate_uc_tree;

Line 1875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1871: p_count => x_msg_count,
1872: p_data => x_msg_data);
1873: WHEN OTHERS THEN
1874: ROLLBACK TO migrate_uc_tree;
1875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1876: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1877: THEN
1878: FND_MSG_PUB.add_exc_msg(
1879: p_pkg_name => G_PKG_NAME,

Line 1884: p_encoded => FND_API.G_FALSE,

1880: p_procedure_name => l_api_name,
1881: p_error_text => SUBSTRB(SQLERRM,1,240));
1882: END IF;
1883: FND_MSG_PUB.count_and_get(
1884: p_encoded => FND_API.G_FALSE,
1885: p_count => x_msg_count,
1886: p_data => x_msg_data);
1887: END;
1888:

Line 1894: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1890: -- This API is used to remap a UC subtree (not a sub-unit) to a MC branch. It is called
1891: -- by ahl_uc_instnace_pvt.install_existing_instance.
1892: PROCEDURE remap_uc_subtree (
1893: p_api_version IN NUMBER,
1894: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1895: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_return_status OUT NOCOPY VARCHAR2,
1898: x_msg_count OUT NOCOPY NUMBER,

Line 1895: p_commit IN VARCHAR2 := FND_API.G_FALSE,

1891: -- by ahl_uc_instnace_pvt.install_existing_instance.
1892: PROCEDURE remap_uc_subtree (
1893: p_api_version IN NUMBER,
1894: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1895: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_return_status OUT NOCOPY VARCHAR2,
1898: x_msg_count OUT NOCOPY NUMBER,
1899: x_msg_data OUT NOCOPY VARCHAR2,

Line 1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1892: PROCEDURE remap_uc_subtree (
1893: p_api_version IN NUMBER,
1894: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1895: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1896: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1897: x_return_status OUT NOCOPY VARCHAR2,
1898: x_msg_count OUT NOCOPY NUMBER,
1899: x_msg_data OUT NOCOPY VARCHAR2,
1900: p_instance_id IN NUMBER,

Line 2072: x_return_status := FND_API.G_RET_STS_SUCCESS;

2068: AND trunc(nvl(active_start_date,SYSDATE)) <= trunc(SYSDATE)
2069: AND trunc(nvl(active_end_date, SYSDATE+1)) > trunc(SYSDATE);
2070: BEGIN
2071: --Initialize API return status to success
2072: x_return_status := FND_API.G_RET_STS_SUCCESS;
2073:
2074: -- Standard Start of API savepoint
2075: SAVEPOINT remap_uc_subtree;
2076:

Line 2078: IF NOT FND_API.compatible_api_call(

2074: -- Standard Start of API savepoint
2075: SAVEPOINT remap_uc_subtree;
2076:
2077: --Standard call to check for call compatibility.
2078: IF NOT FND_API.compatible_api_call(
2079: l_api_version,
2080: p_api_version,
2081: l_api_name,
2082: G_PKG_NAME)

Line 2084: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2080: p_api_version,
2081: l_api_name,
2082: G_PKG_NAME)
2083: THEN
2084: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2085: END IF;
2086: --Initialize message list if p_init_msg_list is set to TRUE.
2087: IF FND_API.to_boolean( p_init_msg_list ) THEN
2088: FND_MSG_PUB.initialize;

Line 2087: IF FND_API.to_boolean( p_init_msg_list ) THEN

2083: THEN
2084: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2085: END IF;
2086: --Initialize message list if p_init_msg_list is set to TRUE.
2087: IF FND_API.to_boolean( p_init_msg_list ) THEN
2088: FND_MSG_PUB.initialize;
2089: END IF;
2090: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2091: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 2104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2100: FND_MESSAGE.set_token('NAME', 'instance_id');
2101: FND_MESSAGE.set_token('VALUE', p_instance_id);
2102: FND_MSG_PUB.add;
2103: CLOSE check_uc_instance;
2104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2105: ELSE
2106: CLOSE check_uc_instance;
2107: END IF;
2108:

Line 2118: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2114: FND_MESSAGE.set_token('NAME', 'relationship_id');
2115: FND_MESSAGE.set_token('VALUE', p_relationship_id);
2116: FND_MSG_PUB.add;
2117: CLOSE check_mc_relationship;
2118: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2119: ELSE
2120: CLOSE check_mc_relationship;
2121: END IF;
2122:

Line 2144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2140: IF NOT l_item_match THEN
2141: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_NOT_MATCH' );
2142: FND_MESSAGE.set_token('INSTANCE', p_instance_id);
2143: FND_MSG_PUB.add;
2144: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2145: END IF;
2146:
2147: --Loop through all the non leaf nodes including the top node
2148: FOR l_get_non_leaf_node IN get_non_leaf_nodes(p_instance_id) LOOP

Line 2235: RAISE FND_API.G_EXC_ERROR;

2231: IF NOT l_matched THEN
2232: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_HARD_FAIL' );
2233: FND_MESSAGE.set_token('INSTANCE', l_get_csi_child.instance_id);
2234: FND_MSG_PUB.add;
2235: RAISE FND_API.G_EXC_ERROR;
2236: END IF;
2237: END IF; --whether position_key or position_ref_code matches
2238: END IF; --whether the MC chilren node has already been matched
2239: END LOOP; --of all the MC children

Line 2244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2240: --The following lines are used to update the position_reference column in csi_ii_relationships
2241: --First, get transaction_type_id .
2242: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE',l_transaction_type_id, l_return_value);
2243: IF NOT l_return_value THEN
2244: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2245: END IF;
2246: --Set the CSI transaction record
2247: l_csi_transaction_rec.source_transaction_date := SYSDATE;
2248: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;

Line 2264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

2260: p_txn_rec => l_csi_transaction_rec,
2261: x_return_status => l_return_status,
2262: x_msg_count => l_msg_count,
2263: x_msg_data => l_msg_data);
2264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2265: RAISE FND_API.G_EXC_ERROR;
2266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2268: END IF;

Line 2265: RAISE FND_API.G_EXC_ERROR;

2261: x_return_status => l_return_status,
2262: x_msg_count => l_msg_count,
2263: x_msg_data => l_msg_data);
2264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2265: RAISE FND_API.G_EXC_ERROR;
2266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2268: END IF;
2269: END IF; --whether the UC node is an extra node

Line 2266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

2262: x_msg_count => l_msg_count,
2263: x_msg_data => l_msg_data);
2264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2265: RAISE FND_API.G_EXC_ERROR;
2266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2268: END IF;
2269: END IF; --whether the UC node is an extra node
2270: END LOOP; --of all the UC children

Line 2267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2263: x_msg_data => l_msg_data);
2264: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2265: RAISE FND_API.G_EXC_ERROR;
2266: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2267: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2268: END IF;
2269: END IF; --whether the UC node is an extra node
2270: END LOOP; --of all the UC children
2271: END IF; --whether it is a node belonging to subuc or extra node branch

Line 2287: RAISE FND_API.G_EXC_ERROR;

2283: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
2284: l_msg_count := FND_MSG_PUB.count_msg;
2285: IF l_msg_count > 0 THEN
2286: x_msg_count := l_msg_count;
2287: RAISE FND_API.G_EXC_ERROR;
2288: END IF;
2289: -- Perform the Commit (if requested)
2290: IF FND_API.to_boolean(p_commit) THEN
2291: COMMIT;

Line 2290: IF FND_API.to_boolean(p_commit) THEN

2286: x_msg_count := l_msg_count;
2287: RAISE FND_API.G_EXC_ERROR;
2288: END IF;
2289: -- Perform the Commit (if requested)
2290: IF FND_API.to_boolean(p_commit) THEN
2291: COMMIT;
2292: END IF;
2293: -- Count and Get messages (optional)
2294: FND_MSG_PUB.count_and_get(

Line 2295: p_encoded => FND_API.G_FALSE,

2291: COMMIT;
2292: END IF;
2293: -- Count and Get messages (optional)
2294: FND_MSG_PUB.count_and_get(
2295: p_encoded => FND_API.G_FALSE,
2296: p_count => x_msg_count,
2297: p_data => x_msg_data);
2298:
2299: EXCEPTION

Line 2300: WHEN FND_API.G_EXC_ERROR THEN

2296: p_count => x_msg_count,
2297: p_data => x_msg_data);
2298:
2299: EXCEPTION
2300: WHEN FND_API.G_EXC_ERROR THEN
2301: ROLLBACK TO remap_uc_subtree;
2302: x_return_status := FND_API.G_RET_STS_ERROR ;
2303: FND_MSG_PUB.count_and_get(
2304: p_encoded => FND_API.G_FALSE,

Line 2302: x_return_status := FND_API.G_RET_STS_ERROR ;

2298:
2299: EXCEPTION
2300: WHEN FND_API.G_EXC_ERROR THEN
2301: ROLLBACK TO remap_uc_subtree;
2302: x_return_status := FND_API.G_RET_STS_ERROR ;
2303: FND_MSG_PUB.count_and_get(
2304: p_encoded => FND_API.G_FALSE,
2305: p_count => x_msg_count,
2306: p_data => x_msg_data);

Line 2304: p_encoded => FND_API.G_FALSE,

2300: WHEN FND_API.G_EXC_ERROR THEN
2301: ROLLBACK TO remap_uc_subtree;
2302: x_return_status := FND_API.G_RET_STS_ERROR ;
2303: FND_MSG_PUB.count_and_get(
2304: p_encoded => FND_API.G_FALSE,
2305: p_count => x_msg_count,
2306: p_data => x_msg_data);
2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2308: ROLLBACK TO remap_uc_subtree;

Line 2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2303: FND_MSG_PUB.count_and_get(
2304: p_encoded => FND_API.G_FALSE,
2305: p_count => x_msg_count,
2306: p_data => x_msg_data);
2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2308: ROLLBACK TO remap_uc_subtree;
2309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2310: FND_MSG_PUB.count_and_get(
2311: p_encoded => FND_API.G_FALSE,

Line 2309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2305: p_count => x_msg_count,
2306: p_data => x_msg_data);
2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2308: ROLLBACK TO remap_uc_subtree;
2309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2310: FND_MSG_PUB.count_and_get(
2311: p_encoded => FND_API.G_FALSE,
2312: p_count => x_msg_count,
2313: p_data => x_msg_data);

Line 2311: p_encoded => FND_API.G_FALSE,

2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2308: ROLLBACK TO remap_uc_subtree;
2309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2310: FND_MSG_PUB.count_and_get(
2311: p_encoded => FND_API.G_FALSE,
2312: p_count => x_msg_count,
2313: p_data => x_msg_data);
2314: WHEN OTHERS THEN
2315: ROLLBACK TO remap_uc_subtree;

Line 2316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2312: p_count => x_msg_count,
2313: p_data => x_msg_data);
2314: WHEN OTHERS THEN
2315: ROLLBACK TO remap_uc_subtree;
2316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2317: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2318: THEN
2319: FND_MSG_PUB.add_exc_msg(
2320: p_pkg_name => G_PKG_NAME,

Line 2325: p_encoded => FND_API.G_FALSE,

2321: p_procedure_name => l_api_name,
2322: p_error_text => SUBSTRB(SQLERRM,1,240));
2323: END IF;
2324: FND_MSG_PUB.count_and_get(
2325: p_encoded => FND_API.G_FALSE,
2326: p_count => x_msg_count,
2327: p_data => x_msg_data);
2328: END;
2329:

Line 2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2419:
2420: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2421: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2422: IF NOT l_return_value THEN
2423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2424: END IF;
2425: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;
2426: l_csi_transaction_rec.source_transaction_date := SYSDATE;
2427: l_csi_relationship_rec.relationship_type_code := 'COMPONENT-OF';

Line 2466: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

2462: p_txn_rec => l_csi_transaction_rec,
2463: x_return_status => l_return_status,
2464: x_msg_count => l_msg_count,
2465: x_msg_data => l_msg_data);
2466: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;

Line 2467: RAISE FND_API.G_EXC_ERROR;

2463: x_return_status => l_return_status,
2464: x_msg_count => l_msg_count,
2465: x_msg_data => l_msg_data);
2466: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471: ELSE

Line 2468: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

2464: x_msg_count => l_msg_count,
2465: x_msg_data => l_msg_data);
2466: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471: ELSE
2472: -- Position Matches at current level: Drill down by calling Remap_IB_Tree recursively

Line 2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2465: x_msg_data => l_msg_data);
2466: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2467: RAISE FND_API.G_EXC_ERROR;
2468: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2470: END IF;
2471: ELSE
2472: -- Position Matches at current level: Drill down by calling Remap_IB_Tree recursively
2473: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2579:
2580: -- Get the transaction_type_id for use later by the CSI_II_RELATIONSHIPS_PUB.update_relationship API
2581: AHL_UTIL_UC_PKG.getcsi_transaction_id('UC_UPDATE', l_transaction_type_id, l_return_value);
2582: IF NOT l_return_value THEN
2583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2584: END IF;
2585: l_csi_transaction_rec.transaction_type_id := l_transaction_type_id;
2586: l_csi_transaction_rec.source_transaction_date := SYSDATE;
2587: l_csi_relationship_rec.relationship_type_code := 'COMPONENT-OF';

Line 2682: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

2678: p_txn_rec => l_csi_transaction_rec,
2679: x_return_status => l_return_status,
2680: x_msg_count => l_msg_count,
2681: x_msg_data => l_msg_data);
2682: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2683: RAISE FND_API.G_EXC_ERROR;
2684: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2686: END IF;

Line 2683: RAISE FND_API.G_EXC_ERROR;

2679: x_return_status => l_return_status,
2680: x_msg_count => l_msg_count,
2681: x_msg_data => l_msg_data);
2682: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2683: RAISE FND_API.G_EXC_ERROR;
2684: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2686: END IF;
2687: -- Now recursively match all the children of the current instance/position

Line 2684: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

2680: x_msg_count => l_msg_count,
2681: x_msg_data => l_msg_data);
2682: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2683: RAISE FND_API.G_EXC_ERROR;
2684: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2686: END IF;
2687: -- Now recursively match all the children of the current instance/position
2688: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2681: x_msg_data => l_msg_data);
2682: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
2683: RAISE FND_API.G_EXC_ERROR;
2684: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2685: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2686: END IF;
2687: -- Now recursively match all the children of the current instance/position
2688: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2689: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY,