DBA Data[Home] [Help]

APPS.AHL_UC_TREE_PVT dependencies on FND_MSG_PUB

Line 129: FND_MSG_PUB.initialize;

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
133: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 142: FND_MSG_PUB.add;

138: -- Validate the input parameter
139: IF (p_uc_parent_rec.node_type IS NULL OR p_uc_parent_rec.node_type NOT IN ('I', 'E', 'X') OR
140: (p_uc_parent_rec.instance_id IS NULL AND p_uc_parent_rec.relationship_id IS NULL))THEN
141: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
142: FND_MSG_PUB.add;
143: END IF;
144: IF p_uc_parent_rec.node_type = 'I' THEN
145: IF p_uc_parent_rec.instance_id IS NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
146: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );

Line 147: FND_MSG_PUB.add;

143: END IF;
144: IF p_uc_parent_rec.node_type = 'I' THEN
145: IF p_uc_parent_rec.instance_id IS NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
146: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
147: FND_MSG_PUB.add;
148: ELSE
149: OPEN check_installed_instance;
150: FETCH check_installed_instance INTO l_dummy;
151: IF check_installed_instance%NOTFOUND THEN

Line 153: FND_MSG_PUB.add;

149: OPEN check_installed_instance;
150: FETCH check_installed_instance INTO l_dummy;
151: IF check_installed_instance%NOTFOUND THEN
152: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
153: FND_MSG_PUB.add;
154: END IF;
155: CLOSE check_installed_instance;
156: END IF;
157: ELSIF p_uc_parent_rec.node_type = 'M' THEN

Line 160: FND_MSG_PUB.add;

156: END IF;
157: ELSIF p_uc_parent_rec.node_type = 'M' THEN
158: IF p_uc_parent_rec.instance_id IS NOT NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
159: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
160: FND_MSG_PUB.add;
161: ELSE
162: OPEN check_relationship;
163: FETCH check_relationship INTO l_dummy;
164: IF check_relationship%NOTFOUND THEN

Line 166: FND_MSG_PUB.add;

162: OPEN check_relationship;
163: FETCH check_relationship INTO l_dummy;
164: IF check_relationship%NOTFOUND THEN
165: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
166: FND_MSG_PUB.add;
167: END IF;
168: CLOSE check_relationship;
169: END IF;
170: ELSIF p_uc_parent_rec.node_type = 'X' THEN

Line 173: FND_MSG_PUB.add;

169: END IF;
170: ELSIF p_uc_parent_rec.node_type = 'X' THEN
171: IF p_uc_parent_rec.instance_id IS NULL THEN
172: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
173: FND_MSG_PUB.add;
174: ELSE
175: OPEN check_instance;
176: FETCH check_instance INTO l_dummy;
177: IF check_instance%NOTFOUND THEN

Line 179: FND_MSG_PUB.add;

175: OPEN check_instance;
176: FETCH check_instance INTO l_dummy;
177: IF check_instance%NOTFOUND THEN
178: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
179: FND_MSG_PUB.add;
180: END IF;
181: CLOSE check_instance;
182: END IF;
183: END IF;

Line 271: l_msg_count := FND_MSG_PUB.count_msg;

267: 'At the end of the procedure');
268: END IF;
269:
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;

Line 277: FND_MSG_PUB.count_and_get(

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,
279: p_count => x_msg_count,
280: p_data => x_msg_data);
281:

Line 285: FND_MSG_PUB.count_and_get(

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);
289:

Line 292: FND_MSG_PUB.count_and_get(

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);
296:

Line 299: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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,
303: p_procedure_name => l_api_name,

Line 301: FND_MSG_PUB.add_exc_msg(

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,
303: p_procedure_name => l_api_name,
304: p_error_text => SUBSTRB(SQLERRM,1,240));
305: END IF;

Line 306: FND_MSG_PUB.count_and_get(

302: p_pkg_name => G_PKG_NAME,
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:

Line 609: FND_MSG_PUB.add;

605: FETCH get_position_necessity INTO l_pos_necessity_meaning;
606: IF get_position_necessity%NOTFOUND THEN
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;

Line 636: FND_MSG_PUB.add;

632: FETCH get_part_info INTO l_part_info;
633: IF get_part_info%NOTFOUND THEN
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;

Line 661: FND_MSG_PUB.initialize;

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
665: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 676: FND_MSG_PUB.add;

672: FETCH get_uc_header_attr INTO l_root_instance_id, l_root_mc_hdr_id, l_root_relationship_id, l_root_ata_code;
673: IF get_uc_header_attr%NOTFOUND THEN
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;

Line 1059: l_msg_count := FND_MSG_PUB.count_msg;

1055: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': After normal execution',
1056: 'At the end of the procedure');
1057: END IF;
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;

Line 1065: FND_MSG_PUB.count_and_get(

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,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data);
1069:

Line 1073: FND_MSG_PUB.count_and_get(

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);
1077:

Line 1080: FND_MSG_PUB.count_and_get(

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);
1084:

Line 1087: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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,
1091: p_procedure_name => l_api_name,

Line 1089: FND_MSG_PUB.add_exc_msg(

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,
1091: p_procedure_name => l_api_name,
1092: p_error_text => SUBSTRB(SQLERRM,1,240));
1093: END IF;

Line 1094: FND_MSG_PUB.count_and_get(

1090: p_pkg_name => G_PKG_NAME,
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;

Line 1363: FND_MSG_PUB.initialize;

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
1367: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 1380: FND_MSG_PUB.add;

1376: IF check_uc_header%NOTFOUND THEN
1377: FND_MESSAGE.set_name( 'AHL','AHL_UC_API_PARAMETER_INVALID');
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:

Line 1388: FND_MSG_PUB.add;

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;
1391: END IF;
1392:

Line 1403: FND_MSG_PUB.add;

1399: IF (l_root_uc_status_code = 'APPROVAL_PENDING' OR
1400: l_root_active_uc_status_code = 'APPROVAL_PENDING') THEN
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;

Line 1422: FND_MSG_PUB.add;

1418: IF check_mc_header%NOTFOUND THEN
1419: FND_MESSAGE.set_name( 'AHL','AHL_UC_API_PARAMETER_INVALID');
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

Line 1430: FND_MSG_PUB.add;

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);
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' );

Line 1437: FND_MSG_PUB.add;

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);
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;

Line 1469: FND_MSG_PUB.add;

1465: --dbms_output.put_line('inventory_item_id='||l_uc_header_attr.inventory_item_id||' inventory_org_id='||l_uc_header_attr.inventory_org_id);
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;

Line 1491: FND_MSG_PUB.add;

1487: IF get_position_reference%NOTFOUND THEN
1488: FND_MESSAGE.set_name( 'AHL','AHL_UC_UNIT_UNINSTALLED' );
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;

Line 1516: FND_MSG_PUB.add;

1512: l_uc_header_attr.quantity,
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

Line 1563: FND_MSG_PUB.add;

1559: l_uc_header_attr.quantity,
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

Line 1596: FND_MSG_PUB.add;

1592: AND object_version_number = l_uc_header_attr.object_version_number;
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

Line 1605: FND_MSG_PUB.add;

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:
1608: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1609: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

Line 1774: FND_MSG_PUB.add;

1770: WHERE unit_config_header_id = l_root_uc_header_id
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

Line 1783: FND_MSG_PUB.add;

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
1786: UPDATE ahl_unit_config_headers
1787: SET unit_config_status_code = 'INCOMPLETE',

Line 1797: FND_MSG_PUB.add;

1793: WHERE unit_config_header_id = l_root_uc_header_id
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

Line 1806: FND_MSG_PUB.add;

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
1809: (l_root_active_uc_status_code IS NULL OR
1810: l_root_active_uc_status_code <> 'UNAPPROVED')) THEN

Line 1821: FND_MSG_PUB.add;

1817: WHERE unit_config_header_id = l_root_uc_header_id
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

Line 1830: FND_MSG_PUB.add;

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;
1833:
1834: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1841: l_msg_count := FND_MSG_PUB.count_msg;

1837: 'Status changed and at the end of the procedure');
1838: END IF;
1839:
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;

Line 1853: FND_MSG_PUB.count_and_get(

1849: COMMIT;
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:

Line 1862: FND_MSG_PUB.count_and_get(

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);
1866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1869: FND_MSG_PUB.count_and_get(

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);
1873: WHEN OTHERS THEN

Line 1876: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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,
1880: p_procedure_name => l_api_name,

Line 1878: FND_MSG_PUB.add_exc_msg(

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,
1880: p_procedure_name => l_api_name,
1881: p_error_text => SUBSTRB(SQLERRM,1,240));
1882: END IF;

Line 1883: FND_MSG_PUB.count_and_get(

1879: p_pkg_name => G_PKG_NAME,
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;

Line 2088: FND_MSG_PUB.initialize;

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,
2092: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||'.begin',

Line 2102: FND_MSG_PUB.add;

2098: IF check_uc_instance%NOTFOUND THEN
2099: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
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;

Line 2116: FND_MSG_PUB.add;

2112: IF check_mc_relationship%NOTFOUND THEN
2113: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
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;

Line 2143: FND_MSG_PUB.add;

2139: */
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

Line 2234: FND_MSG_PUB.add;

2230: --are unique across siblings.
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

Line 2284: l_msg_count := FND_MSG_PUB.count_msg;

2280: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||'.end',
2281: 'At the end of the procedure');
2282: END IF;
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;

Line 2294: FND_MSG_PUB.count_and_get(

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(
2295: p_encoded => FND_API.G_FALSE,
2296: p_count => x_msg_count,
2297: p_data => x_msg_data);
2298:

Line 2303: FND_MSG_PUB.count_and_get(

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);
2307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2310: FND_MSG_PUB.count_and_get(

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);
2314: WHEN OTHERS THEN

Line 2317: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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,
2321: p_procedure_name => l_api_name,

Line 2319: FND_MSG_PUB.add_exc_msg(

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,
2321: p_procedure_name => l_api_name,
2322: p_error_text => SUBSTRB(SQLERRM,1,240));
2323: END IF;

Line 2324: FND_MSG_PUB.count_and_get(

2320: p_pkg_name => G_PKG_NAME,
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;