DBA Data[Home] [Help]

APPS.AHL_UC_TREE_PVT dependencies on FND_MSG_PUB

Line 118: FND_MSG_PUB.initialize;

114: END IF;
115:
116: -- Initialize message list if p_init_msg_list is set to TRUE.
117: IF FND_API.to_boolean( p_init_msg_list ) THEN
118: FND_MSG_PUB.initialize;
119: END IF;
120:
121: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
122: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 131: FND_MSG_PUB.add;

127: -- Validate the input parameter
128: IF (p_uc_parent_rec.node_type IS NULL OR p_uc_parent_rec.node_type NOT IN ('I', 'E', 'X') OR
129: (p_uc_parent_rec.instance_id IS NULL AND p_uc_parent_rec.relationship_id IS NULL))THEN
130: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
131: FND_MSG_PUB.add;
132: END IF;
133: IF p_uc_parent_rec.node_type = 'I' THEN
134: IF p_uc_parent_rec.instance_id IS NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
135: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );

Line 136: FND_MSG_PUB.add;

132: END IF;
133: IF p_uc_parent_rec.node_type = 'I' THEN
134: IF p_uc_parent_rec.instance_id IS NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
135: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
136: FND_MSG_PUB.add;
137: ELSE
138: OPEN check_installed_instance;
139: FETCH check_installed_instance INTO l_dummy;
140: IF check_installed_instance%NOTFOUND THEN

Line 142: FND_MSG_PUB.add;

138: OPEN check_installed_instance;
139: FETCH check_installed_instance INTO l_dummy;
140: IF check_installed_instance%NOTFOUND THEN
141: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
142: FND_MSG_PUB.add;
143: END IF;
144: CLOSE check_installed_instance;
145: END IF;
146: ELSIF p_uc_parent_rec.node_type = 'M' THEN

Line 149: FND_MSG_PUB.add;

145: END IF;
146: ELSIF p_uc_parent_rec.node_type = 'M' THEN
147: IF p_uc_parent_rec.instance_id IS NOT NULL OR p_uc_parent_rec.relationship_id IS NULL THEN
148: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
149: FND_MSG_PUB.add;
150: ELSE
151: OPEN check_relationship;
152: FETCH check_relationship INTO l_dummy;
153: IF check_relationship%NOTFOUND THEN

Line 155: FND_MSG_PUB.add;

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

Line 162: FND_MSG_PUB.add;

158: END IF;
159: ELSIF p_uc_parent_rec.node_type = 'X' THEN
160: IF p_uc_parent_rec.instance_id IS NULL THEN
161: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
162: FND_MSG_PUB.add;
163: ELSE
164: OPEN check_instance;
165: FETCH check_instance INTO l_dummy;
166: IF check_instance%NOTFOUND THEN

Line 168: FND_MSG_PUB.add;

164: OPEN check_instance;
165: FETCH check_instance INTO l_dummy;
166: IF check_instance%NOTFOUND THEN
167: FND_MESSAGE.set_name( 'AHL','AHL_UC_NODE_INVALID' );
168: FND_MSG_PUB.add;
169: END IF;
170: CLOSE check_instance;
171: END IF;
172: END IF;

Line 260: l_msg_count := FND_MSG_PUB.count_msg;

256: 'At the end of the procedure');
257: END IF;
258:
259: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
260: l_msg_count := FND_MSG_PUB.count_msg;
261: IF l_msg_count > 0 THEN
262: x_msg_count := l_msg_count;
263: RAISE FND_API.G_EXC_ERROR;
264: END IF;

Line 266: FND_MSG_PUB.count_and_get(

262: x_msg_count := l_msg_count;
263: RAISE FND_API.G_EXC_ERROR;
264: END IF;
265: -- Count and Get messages (optional)
266: FND_MSG_PUB.count_and_get(
267: p_encoded => FND_API.G_FALSE,
268: p_count => x_msg_count,
269: p_data => x_msg_data);
270:

Line 274: FND_MSG_PUB.count_and_get(

270:
271: EXCEPTION
272: WHEN FND_API.G_EXC_ERROR THEN
273: x_return_status := FND_API.G_RET_STS_ERROR ;
274: FND_MSG_PUB.count_and_get(
275: p_encoded => FND_API.G_FALSE,
276: p_count => x_msg_count,
277: p_data => x_msg_data);
278:

Line 281: FND_MSG_PUB.count_and_get(

277: p_data => x_msg_data);
278:
279: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
281: FND_MSG_PUB.count_and_get(
282: p_encoded => FND_API.G_FALSE,
283: p_count => x_msg_count,
284: p_data => x_msg_data);
285:

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

284: p_data => x_msg_data);
285:
286: WHEN OTHERS THEN
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
288: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
289: THEN
290: FND_MSG_PUB.add_exc_msg(
291: p_pkg_name => G_PKG_NAME,
292: p_procedure_name => l_api_name,

Line 290: FND_MSG_PUB.add_exc_msg(

286: WHEN OTHERS THEN
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
288: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
289: THEN
290: FND_MSG_PUB.add_exc_msg(
291: p_pkg_name => G_PKG_NAME,
292: p_procedure_name => l_api_name,
293: p_error_text => SUBSTRB(SQLERRM,1,240));
294: END IF;

Line 295: FND_MSG_PUB.count_and_get(

291: p_pkg_name => G_PKG_NAME,
292: p_procedure_name => l_api_name,
293: p_error_text => SUBSTRB(SQLERRM,1,240));
294: END IF;
295: FND_MSG_PUB.count_and_get(
296: p_encoded => FND_API.G_FALSE,
297: p_count => x_msg_count,
298: p_data => x_msg_data);
299:

Line 595: FND_MSG_PUB.add;

591: FETCH get_position_necessity INTO l_pos_necessity_meaning;
592: IF get_position_necessity%NOTFOUND THEN
593: FND_MESSAGE.set_name( 'AHL','AHL_UC_POSITION_INVALID' );
594: FND_MESSAGE.set_token('POSITION', p_relationship_id);
595: FND_MSG_PUB.add;
596: CLOSE get_position_necessity;
597: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
598: ELSE
599: CLOSE get_position_necessity;

Line 622: FND_MSG_PUB.add;

618: FETCH get_part_info INTO l_part_info;
619: IF get_part_info%NOTFOUND THEN
620: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_INVALID' );
621: FND_MESSAGE.set_token('INSTANCE', p_instance_id);
622: FND_MSG_PUB.add;
623: CLOSE get_part_info;
624: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
625: ELSE
626: CLOSE get_part_info;

Line 647: FND_MSG_PUB.initialize;

643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
644: END IF;
645: --Initialize message list if p_init_msg_list is set to TRUE.
646: IF FND_API.to_boolean( p_init_msg_list ) THEN
647: FND_MSG_PUB.initialize;
648: END IF;
649:
650: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
651: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 662: FND_MSG_PUB.add;

658: FETCH get_uc_header_attr INTO l_root_instance_id, l_root_mc_hdr_id, l_root_relationship_id, l_root_ata_code;
659: IF get_uc_header_attr%NOTFOUND THEN
660: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_ID_INVALID' );
661: FND_MESSAGE.set_token('UC_HEADER_ID', p_uc_header_id);
662: FND_MSG_PUB.add;
663: CLOSE get_uc_header_attr;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: ELSE
666: CLOSE get_uc_header_attr;

Line 1017: l_msg_count := FND_MSG_PUB.count_msg;

1013: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||': After normal execution',
1014: 'At the end of the procedure');
1015: END IF;
1016: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1017: l_msg_count := FND_MSG_PUB.count_msg;
1018: IF l_msg_count > 0 THEN
1019: x_msg_count := l_msg_count;
1020: RAISE FND_API.G_EXC_ERROR;
1021: END IF;

Line 1023: FND_MSG_PUB.count_and_get(

1019: x_msg_count := l_msg_count;
1020: RAISE FND_API.G_EXC_ERROR;
1021: END IF;
1022: -- Count and Get messages (optional)
1023: FND_MSG_PUB.count_and_get(
1024: p_encoded => FND_API.G_FALSE,
1025: p_count => x_msg_count,
1026: p_data => x_msg_data);
1027:

Line 1031: FND_MSG_PUB.count_and_get(

1027:
1028: EXCEPTION
1029: WHEN FND_API.G_EXC_ERROR THEN
1030: x_return_status := FND_API.G_RET_STS_ERROR ;
1031: FND_MSG_PUB.count_and_get(
1032: p_encoded => FND_API.G_FALSE,
1033: p_count => x_msg_count,
1034: p_data => x_msg_data);
1035:

Line 1038: FND_MSG_PUB.count_and_get(

1034: p_data => x_msg_data);
1035:
1036: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1038: FND_MSG_PUB.count_and_get(
1039: p_encoded => FND_API.G_FALSE,
1040: p_count => x_msg_count,
1041: p_data => x_msg_data);
1042:

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

1041: p_data => x_msg_data);
1042:
1043: WHEN OTHERS THEN
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1045: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1046: THEN
1047: FND_MSG_PUB.add_exc_msg(
1048: p_pkg_name => G_PKG_NAME,
1049: p_procedure_name => l_api_name,

Line 1047: FND_MSG_PUB.add_exc_msg(

1043: WHEN OTHERS THEN
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1045: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1046: THEN
1047: FND_MSG_PUB.add_exc_msg(
1048: p_pkg_name => G_PKG_NAME,
1049: p_procedure_name => l_api_name,
1050: p_error_text => SUBSTRB(SQLERRM,1,240));
1051: END IF;

Line 1052: FND_MSG_PUB.count_and_get(

1048: p_pkg_name => G_PKG_NAME,
1049: p_procedure_name => l_api_name,
1050: p_error_text => SUBSTRB(SQLERRM,1,240));
1051: END IF;
1052: FND_MSG_PUB.count_and_get(
1053: p_encoded => FND_API.G_FALSE,
1054: p_count => x_msg_count,
1055: p_data => x_msg_data);
1056: END;

Line 1300: FND_MSG_PUB.initialize;

1296: END IF;
1297:
1298: --Initialize message list if p_init_msg_list is set to TRUE.
1299: IF FND_API.to_boolean( p_init_msg_list ) THEN
1300: FND_MSG_PUB.initialize;
1301: END IF;
1302:
1303: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1304: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

Line 1317: FND_MSG_PUB.add;

1313: IF check_uc_header%NOTFOUND THEN
1314: FND_MESSAGE.set_name( 'AHL','AHL_UC_API_PARAMETER_INVALID');
1315: FND_MESSAGE.set_token('NAME', 'uc_header_id');
1316: FND_MESSAGE.set_token('VALUE', p_uc_header_id);
1317: FND_MSG_PUB.add;
1318: CLOSE check_uc_header;
1319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1320: ELSE
1321:

Line 1325: FND_MSG_PUB.add;

1321:
1322: -- ACL :: Changes for R12
1323: 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
1324: FND_MESSAGE.set_name( 'AHL','AHL_UC_INVALID_Q_ACTION' );
1325: FND_MSG_PUB.add;
1326: CLOSE check_uc_header;
1327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1328: END IF;
1329:

Line 1340: FND_MSG_PUB.add;

1336: IF (l_root_uc_status_code = 'APPROVAL_PENDING' OR
1337: l_root_active_uc_status_code = 'APPROVAL_PENDING') THEN
1338: FND_MESSAGE.set_name( 'AHL','AHL_UC_STATUS_PENDING' );
1339: FND_MESSAGE.set_token('UC_HEADER_ID', l_root_uc_header_id);
1340: FND_MSG_PUB.add;
1341: CLOSE check_uc_header;
1342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1343: ELSE
1344: CLOSE check_uc_header;

Line 1359: FND_MSG_PUB.add;

1355: IF check_mc_header%NOTFOUND THEN
1356: FND_MESSAGE.set_name( 'AHL','AHL_UC_API_PARAMETER_INVALID');
1357: FND_MESSAGE.set_token('NAME', 'mc_header_id');
1358: FND_MESSAGE.set_token('VALUE', p_mc_header_id);
1359: FND_MSG_PUB.add;
1360: CLOSE check_mc_header;
1361: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1362: ELSE
1363: IF l_mc_status_code <> 'COMPLETE' THEN

Line 1367: FND_MSG_PUB.add;

1363: IF l_mc_status_code <> 'COMPLETE' THEN
1364: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_NOT_COMPLETE' );
1365: FND_MESSAGE.set_token('NAME', l_mc_name);
1366: FND_MESSAGE.set_token('REVISION', l_mc_revision);
1367: FND_MSG_PUB.add;
1368: CLOSE check_mc_header;
1369: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1370: ELSIF l_mc_header_id = l_uc_header_attr.mc_header_id THEN
1371: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_MIGRATE_SAME' );

Line 1374: FND_MSG_PUB.add;

1370: ELSIF l_mc_header_id = l_uc_header_attr.mc_header_id THEN
1371: FND_MESSAGE.set_name( 'AHL','AHL_UC_MC_MIGRATE_SAME' );
1372: FND_MESSAGE.set_token('NAME', l_mc_name);
1373: FND_MESSAGE.set_token('REVISION', l_mc_revision);
1374: FND_MSG_PUB.add;
1375: CLOSE check_mc_header;
1376: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1377: ELSE
1378: CLOSE check_mc_header;

Line 1406: FND_MSG_PUB.add;

1402: --dbms_output.put_line('inventory_item_id='||l_uc_header_attr.inventory_item_id||' inventory_org_id='||l_uc_header_attr.inventory_org_id);
1403: --dbms_output.put_line('revision='||l_uc_header_attr.inventory_revision||' quantity='||l_uc_header_attr.quantity);
1404: --dbms_output.put_line('uom='||l_uc_header_attr.unit_of_measure);
1405: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1406: FND_MSG_PUB.add;
1407: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1408: ELSE
1409: --Item matches, can be migrated and thus change the mc_header_id of the UC header
1410: NULL;

Line 1428: FND_MSG_PUB.add;

1424: IF get_position_reference%NOTFOUND THEN
1425: FND_MESSAGE.set_name( 'AHL','AHL_UC_UNIT_UNINSTALLED' );
1426: FND_MESSAGE.set_token('CHILD',l_uc_header_attr.instance_id);
1427: FND_MESSAGE.set_token('PARENT',l_parent_instance_id);
1428: FND_MSG_PUB.add;
1429: CLOSE get_position_reference;
1430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1431: END IF;
1432: CLOSE get_position_reference;

Line 1453: FND_MSG_PUB.add;

1449: l_uc_header_attr.quantity,
1450: l_uc_header_attr.unit_of_measure);
1451: IF NOT l_item_match THEN
1452: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1453: FND_MSG_PUB.add;
1454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1455: ELSE
1456: --Make the sub unit an extra node in its parent unit context and
1457: --update its own mc_header_id to the new p_mc_header_id

Line 1500: FND_MSG_PUB.add;

1496: l_uc_header_attr.quantity,
1497: l_uc_header_attr.unit_of_measure);
1498: IF NOT l_item_match THEN
1499: FND_MESSAGE.set_name( 'AHL','AHL_UC_HEADER_NOT_MATCH' );
1500: FND_MSG_PUB.add;
1501: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1502: ELSE
1503: --Could be migrated but will be still extra node to its parent unit
1504: --Not necessary to update position_reference to NULL because it is already an

Line 1533: FND_MSG_PUB.add;

1529: AND object_version_number = l_uc_header_attr.object_version_number;
1530: END IF;
1531: IF SQL%ROWCOUNT = 0 THEN
1532: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1533: FND_MSG_PUB.add;
1534: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1535: END IF;
1536:
1537: --Copy the change to UC history table

Line 1542: FND_MSG_PUB.add;

1538: ahl_util_uc_pkg.copy_uc_header_to_history(p_uc_header_id, l_return_status);
1539: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1540: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1541: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1542: FND_MSG_PUB.add;
1543: END IF;
1544:
1545: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1546: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

Line 1711: FND_MSG_PUB.add;

1707: WHERE unit_config_header_id = l_root_uc_header_id
1708: AND object_version_number = l_root_uc_ovn;
1709: IF SQL%ROWCOUNT = 0 THEN
1710: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1711: FND_MSG_PUB.add;
1712: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1713: END IF;
1714:
1715: --Copy the change to UC history table

Line 1720: FND_MSG_PUB.add;

1716: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1717: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1718: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1719: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1720: FND_MSG_PUB.add;
1721: END IF;
1722: ELSIF (l_evaluation_status = 'F' AND l_root_uc_status_code = 'COMPLETE') THEN
1723: UPDATE ahl_unit_config_headers
1724: SET unit_config_status_code = 'INCOMPLETE',

Line 1734: FND_MSG_PUB.add;

1730: WHERE unit_config_header_id = l_root_uc_header_id
1731: AND object_version_number = l_root_uc_ovn;
1732: IF SQL%ROWCOUNT = 0 THEN
1733: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1734: FND_MSG_PUB.add;
1735: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1736: END IF;
1737:
1738: --Copy the change to UC history table

Line 1743: FND_MSG_PUB.add;

1739: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1740: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1742: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1743: FND_MSG_PUB.add;
1744: END IF;
1745: ELSIF (l_root_uc_status_code IN ('COMPLETE', 'INCOMPLETE') AND
1746: (l_root_active_uc_status_code IS NULL OR
1747: l_root_active_uc_status_code <> 'UNAPPROVED')) THEN

Line 1758: FND_MSG_PUB.add;

1754: WHERE unit_config_header_id = l_root_uc_header_id
1755: AND object_version_number = l_root_uc_ovn;
1756: IF SQL%ROWCOUNT = 0 THEN
1757: FND_MESSAGE.set_name( 'AHL','AHL_COM_RECORD_CHANGED' );
1758: FND_MSG_PUB.add;
1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1760: END IF;
1761:
1762: --Copy the change to UC history table

Line 1767: FND_MSG_PUB.add;

1763: ahl_util_uc_pkg.copy_uc_header_to_history(l_root_uc_header_id, l_return_status);
1764: --IF history copy failed, then don't raise exception, just add the messageto the message stack
1765: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1766: FND_MESSAGE.set_name('AHL', 'AHL_UC_HISTORY_COPY_FAILED');
1767: FND_MSG_PUB.add;
1768: END IF;
1769: END IF;
1770:
1771: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1778: l_msg_count := FND_MSG_PUB.count_msg;

1774: 'Status changed and at the end of the procedure');
1775: END IF;
1776:
1777: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
1778: l_msg_count := FND_MSG_PUB.count_msg;
1779: IF l_msg_count > 0 THEN
1780: x_msg_count := l_msg_count;
1781: RAISE FND_API.G_EXC_ERROR;
1782: END IF;

Line 1790: FND_MSG_PUB.count_and_get(

1786: COMMIT;
1787: END IF;
1788:
1789: -- Count and Get messages (optional)
1790: FND_MSG_PUB.count_and_get(
1791: p_encoded => FND_API.G_FALSE,
1792: p_count => x_msg_count,
1793: p_data => x_msg_data);
1794:

Line 1799: FND_MSG_PUB.count_and_get(

1795: EXCEPTION
1796: WHEN FND_API.G_EXC_ERROR THEN
1797: ROLLBACK TO migrate_uc_tree;
1798: x_return_status := FND_API.G_RET_STS_ERROR ;
1799: FND_MSG_PUB.count_and_get(
1800: p_encoded => FND_API.G_FALSE,
1801: p_count => x_msg_count,
1802: p_data => x_msg_data);
1803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1806: FND_MSG_PUB.count_and_get(

1802: p_data => x_msg_data);
1803: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1804: ROLLBACK TO migrate_uc_tree;
1805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1806: FND_MSG_PUB.count_and_get(
1807: p_encoded => FND_API.G_FALSE,
1808: p_count => x_msg_count,
1809: p_data => x_msg_data);
1810: WHEN OTHERS THEN

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

1809: p_data => x_msg_data);
1810: WHEN OTHERS THEN
1811: ROLLBACK TO migrate_uc_tree;
1812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1813: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1814: THEN
1815: FND_MSG_PUB.add_exc_msg(
1816: p_pkg_name => G_PKG_NAME,
1817: p_procedure_name => l_api_name,

Line 1815: FND_MSG_PUB.add_exc_msg(

1811: ROLLBACK TO migrate_uc_tree;
1812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1813: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1814: THEN
1815: FND_MSG_PUB.add_exc_msg(
1816: p_pkg_name => G_PKG_NAME,
1817: p_procedure_name => l_api_name,
1818: p_error_text => SUBSTRB(SQLERRM,1,240));
1819: END IF;

Line 1820: FND_MSG_PUB.count_and_get(

1816: p_pkg_name => G_PKG_NAME,
1817: p_procedure_name => l_api_name,
1818: p_error_text => SUBSTRB(SQLERRM,1,240));
1819: END IF;
1820: FND_MSG_PUB.count_and_get(
1821: p_encoded => FND_API.G_FALSE,
1822: p_count => x_msg_count,
1823: p_data => x_msg_data);
1824: END;

Line 2025: FND_MSG_PUB.initialize;

2021: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2022: END IF;
2023: --Initialize message list if p_init_msg_list is set to TRUE.
2024: IF FND_API.to_boolean( p_init_msg_list ) THEN
2025: FND_MSG_PUB.initialize;
2026: END IF;
2027: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2028: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2029: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||'.begin',

Line 2039: FND_MSG_PUB.add;

2035: IF check_uc_instance%NOTFOUND THEN
2036: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
2037: FND_MESSAGE.set_token('NAME', 'instance_id');
2038: FND_MESSAGE.set_token('VALUE', p_instance_id);
2039: FND_MSG_PUB.add;
2040: CLOSE check_uc_instance;
2041: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2042: ELSE
2043: CLOSE check_uc_instance;

Line 2053: FND_MSG_PUB.add;

2049: IF check_mc_relationship%NOTFOUND THEN
2050: FND_MESSAGE.set_name('AHL','AHL_UC_API_PARAMETER_INVALID');
2051: FND_MESSAGE.set_token('NAME', 'relationship_id');
2052: FND_MESSAGE.set_token('VALUE', p_relationship_id);
2053: FND_MSG_PUB.add;
2054: CLOSE check_mc_relationship;
2055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2056: ELSE
2057: CLOSE check_mc_relationship;

Line 2080: FND_MSG_PUB.add;

2076: */
2077: IF NOT l_item_match THEN
2078: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_NOT_MATCH' );
2079: FND_MESSAGE.set_token('INSTANCE', p_instance_id);
2080: FND_MSG_PUB.add;
2081: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2082: END IF;
2083:
2084: --Loop through all the non leaf nodes including the top node

Line 2171: FND_MSG_PUB.add;

2167: --are unique across siblings.
2168: IF NOT l_matched THEN
2169: FND_MESSAGE.set_name( 'AHL','AHL_UC_INSTANCE_HARD_FAIL' );
2170: FND_MESSAGE.set_token('INSTANCE', l_get_csi_child.instance_id);
2171: FND_MSG_PUB.add;
2172: RAISE FND_API.G_EXC_ERROR;
2173: END IF;
2174: END IF; --whether position_key or position_ref_code matches
2175: END IF; --whether the MC chilren node has already been matched

Line 2221: l_msg_count := FND_MSG_PUB.count_msg;

2217: 'ahl.plsql.'||G_PKG_NAME||'.'||l_api_name||'.end',
2218: 'At the end of the procedure');
2219: END IF;
2220: -- Get all the error messages from the previous steps (if any) and raise the appropriate Exception
2221: l_msg_count := FND_MSG_PUB.count_msg;
2222: IF l_msg_count > 0 THEN
2223: x_msg_count := l_msg_count;
2224: RAISE FND_API.G_EXC_ERROR;
2225: END IF;

Line 2231: FND_MSG_PUB.count_and_get(

2227: IF FND_API.to_boolean(p_commit) THEN
2228: COMMIT;
2229: END IF;
2230: -- Count and Get messages (optional)
2231: FND_MSG_PUB.count_and_get(
2232: p_encoded => FND_API.G_FALSE,
2233: p_count => x_msg_count,
2234: p_data => x_msg_data);
2235:

Line 2240: FND_MSG_PUB.count_and_get(

2236: EXCEPTION
2237: WHEN FND_API.G_EXC_ERROR THEN
2238: ROLLBACK TO remap_uc_subtree;
2239: x_return_status := FND_API.G_RET_STS_ERROR ;
2240: FND_MSG_PUB.count_and_get(
2241: p_encoded => FND_API.G_FALSE,
2242: p_count => x_msg_count,
2243: p_data => x_msg_data);
2244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2247: FND_MSG_PUB.count_and_get(

2243: p_data => x_msg_data);
2244: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2245: ROLLBACK TO remap_uc_subtree;
2246: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2247: FND_MSG_PUB.count_and_get(
2248: p_encoded => FND_API.G_FALSE,
2249: p_count => x_msg_count,
2250: p_data => x_msg_data);
2251: WHEN OTHERS THEN

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

2250: p_data => x_msg_data);
2251: WHEN OTHERS THEN
2252: ROLLBACK TO remap_uc_subtree;
2253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2254: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2255: THEN
2256: FND_MSG_PUB.add_exc_msg(
2257: p_pkg_name => G_PKG_NAME,
2258: p_procedure_name => l_api_name,

Line 2256: FND_MSG_PUB.add_exc_msg(

2252: ROLLBACK TO remap_uc_subtree;
2253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2254: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2255: THEN
2256: FND_MSG_PUB.add_exc_msg(
2257: p_pkg_name => G_PKG_NAME,
2258: p_procedure_name => l_api_name,
2259: p_error_text => SUBSTRB(SQLERRM,1,240));
2260: END IF;

Line 2261: FND_MSG_PUB.count_and_get(

2257: p_pkg_name => G_PKG_NAME,
2258: p_procedure_name => l_api_name,
2259: p_error_text => SUBSTRB(SQLERRM,1,240));
2260: END IF;
2261: FND_MSG_PUB.count_and_get(
2262: p_encoded => FND_API.G_FALSE,
2263: p_count => x_msg_count,
2264: p_data => x_msg_data);
2265: END;