DBA Data[Home] [Help]

APPS.AHL_FMP_MR_REVISION_PVT dependencies on FND_MSG_PUB

Line 64: FND_MSG_PUB.ADD;

60:
61: IF g_appln_usage is null
62: THEN
63: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
64: FND_MSG_PUB.ADD;
65: RETURN;
66: ELSIF (g_appln_usage = 'PM')
67: THEN
68: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_MRR_PM_INSTALL');

Line 69: FND_MSG_PUB.ADD;

65: RETURN;
66: ELSIF (g_appln_usage = 'PM')
67: THEN
68: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_PM_MRR_PM_INSTALL');
69: FND_MSG_PUB.ADD;
70: RETURN;
71: END IF;
72:
73:

Line 86: FND_MSG_PUB.ADD;

82: IF l_status<>'COMPLETE'
83: THEN
84: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CANNOT_CREATE_REV');
85: FND_MESSAGE.SET_TOKEN('RECORD',l_title,false);
86: FND_MSG_PUB.ADD;
87: l_check_flag:='N';
88: ELSE
89: l_check_flag:='Y';
90: END IF;

Line 103: FND_MSG_PUB.ADD;

99: IF l_counter>0
100: THEN
101: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_REVISION_CREATED');
102: FND_MESSAGE.SET_TOKEN('RECORD',l_title,false);
103: FND_MSG_PUB.ADD;
104: l_check_flag:='N';
105: END IF;
106: END IF;
107: CLOSE CheckAnyExistingMr;

Line 120: FND_MSG_PUB.ADD;

116: THEN
117: IF l_counter>0
118: THEN
119: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_NOT_LATEST');
120: FND_MSG_PUB.ADD;
121: END IF;
122: END IF;
123: CLOSE CheckCurrentlyActive;
124: END IF;

Line 130: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

126:
127: EXCEPTION
128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
129: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
130: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
131: p_count => x_msg_count,
132: p_data => x_msg_data);
133: IF G_DEBUG='Y' THEN
134: AHL_DEBUG_PUB.disable_debug;

Line 138: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

134: AHL_DEBUG_PUB.disable_debug;
135: END IF;
136: WHEN FND_API.G_EXC_ERROR THEN
137: X_return_status := FND_API.G_RET_STS_ERROR;
138: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
139: p_count => x_msg_count,
140: p_data => X_msg_data);
141: IF G_DEBUG='Y' THEN
142: AHL_DEBUG_PUB.disable_debug;

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

143: END IF;
144:
145: WHEN OTHERS THEN
146: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
147: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
148: THEN
149: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
150: p_procedure_name => 'VALIDATE_MR_REV',
151: p_error_text => SUBSTR(SQLERRM,1,240));

Line 149: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',

145: WHEN OTHERS THEN
146: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
147: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
148: THEN
149: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
150: p_procedure_name => 'VALIDATE_MR_REV',
151: p_error_text => SUBSTR(SQLERRM,1,240));
152: END IF;
153: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

Line 153: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

149: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
150: p_procedure_name => 'VALIDATE_MR_REV',
151: p_error_text => SUBSTR(SQLERRM,1,240));
152: END IF;
153: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
154: p_count => x_msg_count,
155: p_data => X_msg_data);
156:
157: IF G_DEBUG='Y' THEN

Line 616: FND_MSG_PUB.initialize;

612:
613: -- Standard call to check for call compatibility.
614:
615: IF FND_API.to_boolean(p_init_msg_list) THEN
616: FND_MSG_PUB.initialize;
617: END IF;
618:
619: -- Initialize API return status to success
620:

Line 639: l_msg_count := FND_MSG_PUB.count_msg;

635: x_msg_data =>l_msg_data,
636: p_source_mr_header_id =>p_source_mr_header_id
637: );
638:
639: l_msg_count := FND_MSG_PUB.count_msg;
640:
641: IF l_msg_count > 0 THEN
642: X_msg_count := l_msg_count;
643: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1236: l_msg_count := FND_MSG_PUB.count_msg;

1232: l_mrvisttype_rec.MR_VISIT_TYPE_CODE
1233: );
1234: END LOOP;
1235:
1236: l_msg_count := FND_MSG_PUB.count_msg;
1237:
1238:
1239: IF l_msg_count > 0 THEN
1240: X_msg_count := l_msg_count;

Line 1260: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1256: EXCEPTION
1257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1258: ROLLBACK TO CREATE_MR_REVISION_PVT;
1259: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1260: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1261: p_count => x_msg_count,
1262: p_data => x_msg_data);
1263: IF G_DEBUG='Y' THEN
1264: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

Line 1272: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1268:
1269: WHEN FND_API.G_EXC_ERROR THEN
1270: ROLLBACK TO CREATE_MR_REVISION_PVT;
1271: X_return_status := FND_API.G_RET_STS_ERROR;
1272: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1273: p_count => x_msg_count,
1274: p_data => X_msg_data);
1275: IF G_DEBUG='Y' THEN
1276: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

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

1279:
1280: WHEN OTHERS THEN
1281: ROLLBACK TO CREATE_MR_REVISION_PVT;
1282: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1283: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1284: THEN
1285: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1286: p_procedure_name => 'CREATE_MR_REVISION',
1287: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1285: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',

1281: ROLLBACK TO CREATE_MR_REVISION_PVT;
1282: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1283: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1284: THEN
1285: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1286: p_procedure_name => 'CREATE_MR_REVISION',
1287: p_error_text => SUBSTR(SQLERRM,1,240));
1288: END IF;
1289: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

Line 1289: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1285: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1286: p_procedure_name => 'CREATE_MR_REVISION',
1287: p_error_text => SUBSTR(SQLERRM,1,240));
1288: END IF;
1289: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1290: p_count => x_msg_count,
1291: p_data => X_msg_data);
1292: IF G_DEBUG='Y' THEN
1293: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

Line 1377: FND_MSG_PUB.initialize;

1373: AHL_DEBUG_PUB.debug( 'Start Initiate_MR_Approval');
1374: END IF;
1375:
1376: IF FND_API.to_boolean(l_init_msg_list) THEN
1377: FND_MSG_PUB.initialize;
1378: END IF;
1379:
1380:
1381: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1401: FND_MSG_PUB.ADD;

1397: IF p_source_mr_header_id is null or
1398: p_source_mr_header_id=FND_API.G_MISS_NUM
1399: THEN
1400: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');
1401: FND_MSG_PUB.ADD;
1402: l_check_flag:='N';
1403: ELSE
1404: open GetHeaderInfo(p_source_mr_header_id);
1405:

Line 1418: FND_MSG_PUB.ADD;

1414:
1415: IF trunc(l_mr_Rec.effective_from) 1416: THEN
1417: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ST_DATE_LESSER_SYSDATE');
1418: FND_MSG_PUB.ADD;
1419: END IF;
1420:
1421: If l_mr_rec.MR_STATUS_CODE<>'DRAFT'
1422: AND l_mr_rec.MR_STATUS_CODE<>'APPROVAL_REJECTED'

Line 1425: FND_MSG_PUB.ADD;

1421: If l_mr_rec.MR_STATUS_CODE<>'DRAFT'
1422: AND l_mr_rec.MR_STATUS_CODE<>'APPROVAL_REJECTED'
1423: Then
1424: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CANNOT_APRV');
1425: FND_MSG_PUB.ADD;
1426: End if;
1427: ElsIf P_APPRV_TYPE='TERMINATE'
1428: Then
1429: IF G_APPLN_USAGE='PM'

Line 1474: FND_MSG_PUB.ADD;

1470: IF l_contract_ref_exists='Y'
1471: THEN
1472: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CONTRACTS_EXIST');
1473: FND_MESSAGE.SET_TOKEN('MRTITLE',l_mr_Rec.TITLE);
1474: FND_MSG_PUB.ADD;
1475:
1476: IF G_DEBUG='Y' THEN
1477: AHL_DEBUG_PUB.debug( 'l_contract_ref_exists---->'||l_contract_ref_exists);
1478: END IF;

Line 1483: FND_MSG_PUB.ADD;

1479:
1480: ELSIF l_contract_ref_exists IS NULL OR l_contract_ref_exists=FND_API.G_MISS_CHAR
1481: THEN
1482: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_RET_PARAM');
1483: FND_MSG_PUB.ADD;
1484:
1485: IF G_DEBUG='Y' THEN
1486: AHL_DEBUG_PUB.debug( 'l_contract_ref_exists----> is either null or g_misschar'||l_contract_ref_exists);
1487: END IF;

Line 1503: FND_MSG_PUB.ADD;

1499: (l_mr_rec.EFFECTIVE_TO IS NOT NULL
1500: AND l_mr_rec.EFFECTIVE_TO<>FND_API.G_MISS_DATE)
1501: Then
1502: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CANNOT_TERMIN');
1503: FND_MSG_PUB.ADD;
1504: End if;
1505: End If;
1506: -- If mr_header_id is invalid or not found
1507: ElsIf GetHeaderInfo%NOTFOUND

Line 1510: FND_MSG_PUB.ADD;

1506: -- If mr_header_id is invalid or not found
1507: ElsIf GetHeaderInfo%NOTFOUND
1508: Then
1509: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');
1510: FND_MSG_PUB.ADD;
1511: l_check_flag:='N';
1512: End If;
1513: Close GetHeaderInfo;
1514: End If;

Line 1533: FND_MSG_PUB.ADD;

1529: If trunc(l_mr_Rec.effective_from) < trunc(l_mr_Rec1.effective_from)
1530: TheN
1531: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_ST_DATE_LESSER');
1532: FND_MESSAGE.SET_TOKEN('FIELD',l_mr_Rec1.effective_from);
1533: FND_MSG_PUB.ADD;
1534: End If;
1535: End If;
1536: Close GetHeaderInfo1;
1537: End if;

Line 1552: FND_MSG_PUB.ADD;

1548: Then
1549: If l_counter=0
1550: TheN
1551: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INIT_APPRV_ABORT');
1552: FND_MSG_PUB.ADD;
1553: End If;
1554: ElsIf G_APPLN_USAGE<>'PM'
1555: Then
1556: IF l_counter=0

Line 1559: FND_MSG_PUB.ADD;

1555: Then
1556: IF l_counter=0
1557: Then
1558: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INIT_APPRV_ABORT');
1559: FND_MSG_PUB.ADD;
1560: End If;
1561: End If;
1562:
1563: End If;

Line 1577: FND_MSG_PUB.ADD;

1573: IF l_counter>0
1574: Then
1575: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TERMIN_OLD');
1576: FND_MESSAGE.SET_TOKEN('TITLE',l_mr_Rec.TITLE);
1577: FND_MSG_PUB.ADD;
1578: End If;
1579: IF l_mr_rec.effective_to IS NOT NULL
1580: Then
1581: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TERMINATED');

Line 1583: FND_MSG_PUB.ADD;

1579: IF l_mr_rec.effective_to IS NOT NULL
1580: Then
1581: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_TERMINATED');
1582: FND_MESSAGE.SET_TOKEN('TITLE',l_mr_Rec.title);
1583: FND_MSG_PUB.ADD;
1584: End If;
1585: End if;
1586: */
1587: l_msg_count := FND_MSG_PUB.count_msg;

Line 1587: l_msg_count := FND_MSG_PUB.count_msg;

1583: FND_MSG_PUB.ADD;
1584: End If;
1585: End if;
1586: */
1587: l_msg_count := FND_MSG_PUB.count_msg;
1588:
1589: If G_DEBUG='Y' THEN
1590: AHL_DEBUG_PUB.debug( 'Check Error l_msg_count:'||l_msg_count);
1591: End If;

Line 1631: FND_MSG_PUB.ADD;

1627:
1628: IF sql%rowcount=0
1629: THEN
1630: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1631: FND_MSG_PUB.ADD;
1632: ELSE
1633:
1634: Ahl_generic_aprv_pvt.Start_Wf_Process(
1635: P_OBJECT =>l_object,

Line 1660: FND_MSG_PUB.ADD;

1656:
1657: IF sql%rowcount=0
1658: THEN
1659: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
1660: FND_MSG_PUB.ADD;
1661: END IF;
1662:
1663: AHL_FMP_MR_REVISION_PVT.COMPLETE_MR_REVISION
1664: (

Line 1682: l_msg_count := FND_MSG_PUB.count_msg;

1678: );
1679:
1680: END IF;
1681:
1682: l_msg_count := FND_MSG_PUB.count_msg;
1683:
1684: IF l_msg_count > 0
1685: THEN
1686: X_msg_count := l_msg_count;

Line 1700: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1696: EXCEPTION
1697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1698: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
1699: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1700: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1701: p_count => x_msg_count,
1702: p_data => x_msg_data);
1703: IF G_DEBUG='Y' THEN
1704: AHL_DEBUG_PUB.disable_debug;

Line 1711: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1707:
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
1710: X_return_status := FND_API.G_RET_STS_ERROR;
1711: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1712: p_count => x_msg_count,
1713: p_data => X_msg_data);
1714: IF G_DEBUG='Y' THEN
1715: AHL_DEBUG_PUB.disable_debug;

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

1717:
1718: WHEN OTHERS THEN
1719: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
1720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1722: THEN
1723: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1724: p_procedure_name => 'INITIATE_MR_APPROVAL',
1725: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1723: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',

1719: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
1720: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1722: THEN
1723: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1724: p_procedure_name => 'INITIATE_MR_APPROVAL',
1725: p_error_text => SUBSTR(SQLERRM,1,240));
1726: END IF;
1727: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

Line 1727: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

1723: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1724: p_procedure_name => 'INITIATE_MR_APPROVAL',
1725: p_error_text => SUBSTR(SQLERRM,1,240));
1726: END IF;
1727: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1728: p_count => x_msg_count,
1729: p_data => X_msg_data);
1730: IF G_DEBUG='Y' THEN
1731: AHL_DEBUG_PUB.disable_debug;

Line 1901: IF FND_MSG_PUB.count_msg > 0

1897: x_return_status =>x_return_Status,
1898: x_msg_count =>l_msg_count,
1899: x_msg_data =>l_msg_data);
1900:
1901: IF FND_MSG_PUB.count_msg > 0
1902: THEN
1903: IF G_DEBUG='Y' THEN
1904: AHL_DEBUG_PUB.debug( 'Terminate inst fail');
1905: END IF;

Line 2007: IF FND_MSG_PUB.count_msg > 0

2003: THEN
2004: IF l_check_flag2='Y' AND l_check_flag='Y'
2005: THEN
2006:
2007: IF FND_MSG_PUB.count_msg > 0
2008: THEN
2009: IF G_DEBUG='Y' THEN
2010: AHL_DEBUG_PUB.debug( 'Error Before TerminateInstances');
2011: END IF;

Line 2063: IF FND_MSG_PUB.count_msg > 0

2059:
2060: END IF;
2061: END IF;
2062:
2063: IF FND_MSG_PUB.count_msg > 0
2064: THEN
2065:
2066: IF G_DEBUG='Y' THEN
2067: AHL_DEBUG_PUB.debug( 'Terminate inst fail');

Line 2076: l_msg_count := FND_MSG_PUB.count_msg;

2072: END IF;
2073: END IF;
2074: END IF;
2075:
2076: l_msg_count := FND_MSG_PUB.count_msg;
2077: IF l_msg_count > 0
2078: THEN
2079: IF G_DEBUG='Y' THEN
2080: AHL_DEBUG_PUB.debug( 'Failed To Complete:');

Line 2112: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2108: EXCEPTION
2109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2110: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2111: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2112: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2113: p_count => x_msg_count,
2114: p_data => x_msg_data);
2115: IF G_DEBUG='Y' THEN
2116: AHL_DEBUG_PUB.disable_debug;

Line 2121: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2117: END IF;
2118: WHEN FND_API.G_EXC_ERROR THEN
2119: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2120: X_return_status := FND_API.G_RET_STS_ERROR;
2121: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2122: p_count => x_msg_count,
2123: p_data => X_msg_data);
2124: IF G_DEBUG='Y' THEN
2125: AHL_DEBUG_PUB.disable_debug;

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

2127:
2128: WHEN OTHERS THEN
2129: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2130: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2131: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2132: THEN
2133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2134: p_procedure_name => 'COMPLETE_MR_REVISION',
2135: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',

2129: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2130: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2131: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2132: THEN
2133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2134: p_procedure_name => 'COMPLETE_MR_REVISION',
2135: p_error_text => SUBSTR(SQLERRM,1,240));
2136: END IF;
2137: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

Line 2137: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2133: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2134: p_procedure_name => 'COMPLETE_MR_REVISION',
2135: p_error_text => SUBSTR(SQLERRM,1,240));
2136: END IF;
2137: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2138: p_count => x_msg_count,
2139: p_data => X_msg_data);
2140:
2141: IF G_DEBUG='Y' THEN

Line 2172: FND_MSG_PUB.ADD;

2168:
2169: IF G_APPLN_USAGE IS NULL
2170: THEN
2171: FND_MESSAGE.SET_NAME('AHL','AHL_COM_APP_PRFL_UNDEF');
2172: FND_MSG_PUB.ADD;
2173: RETURN;
2174: END IF;
2175:
2176:

Line 2186: FND_MSG_PUB.ADD;

2182:
2183: IF l_counter1=0
2184: THEN
2185: FND_MESSAGE.SET_NAME('AHL','AHL_MR_HEADER_ID_INVALID');
2186: FND_MSG_PUB.ADD;
2187: END IF;
2188:
2189: SELECT count(*) into l_counter2
2190: FROM AHL_MR_HEADERS_APP_V

Line 2197: FND_MSG_PUB.ADD;

2193:
2194: IF l_counter2=0
2195: THEN
2196: FND_MESSAGE.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
2197: FND_MSG_PUB.ADD;
2198: END IF;
2199:
2200: EXCEPTION
2201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2204: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2200: EXCEPTION
2201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2202: ROLLBACK TO VALIDATE_MR_REVISION;
2203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2204: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2205: p_count => x_msg_count,
2206: p_data => x_msg_data);
2207: IF G_DEBUG='Y' THEN
2208: AHL_DEBUG_PUB.disable_debug;

Line 2214: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2210:
2211: WHEN FND_API.G_EXC_ERROR THEN
2212: ROLLBACK TO VALIDATE_MR_REVISION;
2213: X_return_status := FND_API.G_RET_STS_ERROR;
2214: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2215: p_count => x_msg_count,
2216: p_data => X_msg_data);
2217: IF G_DEBUG='Y' THEN
2218: AHL_DEBUG_PUB.disable_debug;

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

2220:
2221: WHEN OTHERS THEN
2222: ROLLBACK TO VALIDATE_MR_REVISION;
2223: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2224: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2225: THEN
2226: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,
2227: p_procedure_name => 'VALIDATE_MR_REVISION',
2228: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2226: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,

2222: ROLLBACK TO VALIDATE_MR_REVISION;
2223: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2224: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2225: THEN
2226: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,
2227: p_procedure_name => 'VALIDATE_MR_REVISION',
2228: p_error_text => SUBSTR(SQLERRM,1,240));
2229: END IF;
2230: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

Line 2230: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,

2226: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,
2227: p_procedure_name => 'VALIDATE_MR_REVISION',
2228: p_error_text => SUBSTR(SQLERRM,1,240));
2229: END IF;
2230: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2231: p_count => x_msg_count,
2232: p_data => X_msg_data);
2233: IF G_DEBUG='Y' THEN
2234: AHL_DEBUG_PUB.disable_debug;