DBA Data[Home] [Help]

APPS.AHL_FMP_MR_REVISION_PVT dependencies on FND_API

Line 54: x_return_status:=fnd_api.g_ret_sts_success;

50: l_version_number NUMBER:=0;
51: l_counter NUMBER:=0;
52: l_check_flag VARCHAR2(1):='N';
53: BEGIN
54: x_return_status:=fnd_api.g_ret_sts_success;
55:
56:
57: IF G_DEBUG='Y' THEN
58: AHL_DEBUG_PUB.enable_debug;

Line 128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

124: END IF;
125:
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);

Line 129: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

125:
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

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 136: WHEN FND_API.G_EXC_ERROR THEN

132: p_data => x_msg_data);
133: IF G_DEBUG='Y' THEN
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);

Line 137: X_return_status := FND_API.G_RET_STS_ERROR;

133: IF G_DEBUG='Y' THEN
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

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 146: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

142: AHL_DEBUG_PUB.disable_debug;
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',

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 166: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,

162:
163: PROCEDURE CREATE_MR_REVISION
164: (
165: p_api_version IN NUMBER:=1.0,
166: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
167: p_commit IN VARCHAR2:=FND_API.G_FALSE,
168: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
169: p_default IN VARCHAR2:=FND_API.G_FALSE,
170: p_module_type IN VARCHAR2,

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

163: PROCEDURE CREATE_MR_REVISION
164: (
165: p_api_version IN NUMBER:=1.0,
166: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
167: p_commit IN VARCHAR2:=FND_API.G_FALSE,
168: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
169: p_default IN VARCHAR2:=FND_API.G_FALSE,
170: p_module_type IN VARCHAR2,
171: x_return_status OUT NOCOPY VARCHAR2,

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

164: (
165: p_api_version IN NUMBER:=1.0,
166: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
167: p_commit IN VARCHAR2:=FND_API.G_FALSE,
168: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
169: p_default IN VARCHAR2:=FND_API.G_FALSE,
170: p_module_type IN VARCHAR2,
171: x_return_status OUT NOCOPY VARCHAR2,
172: x_msg_count OUT NOCOPY NUMBER,

Line 169: p_default IN VARCHAR2:=FND_API.G_FALSE,

165: p_api_version IN NUMBER:=1.0,
166: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
167: p_commit IN VARCHAR2:=FND_API.G_FALSE,
168: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
169: p_default IN VARCHAR2:=FND_API.G_FALSE,
170: p_module_type IN VARCHAR2,
171: x_return_status OUT NOCOPY VARCHAR2,
172: x_msg_count OUT NOCOPY NUMBER,
173: x_msg_data OUT NOCOPY VARCHAR2,

Line 762: IF FND_API.to_boolean(p_init_msg_list) THEN

758: END IF;
759:
760: -- Standard call to check for call compatibility.
761:
762: IF FND_API.to_boolean(p_init_msg_list) THEN
763: FND_MSG_PUB.initialize;
764: END IF;
765:
766: -- Initialize API return status to success

Line 768: x_return_status := FND_API.G_RET_STS_SUCCESS;

764: END IF;
765:
766: -- Initialize API return status to success
767:
768: x_return_status := FND_API.G_RET_STS_SUCCESS;
769:
770: -- Initialize message list if p_init_msg_list is set to TRUE.
771: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
772: p_api_version,

Line 771: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

767:
768: x_return_status := FND_API.G_RET_STS_SUCCESS;
769:
770: -- Initialize message list if p_init_msg_list is set to TRUE.
771: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
772: p_api_version,
773: l_api_name,G_PKG_NAME) THEN
774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;

Line 774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

770: -- Initialize message list if p_init_msg_list is set to TRUE.
771: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
772: p_api_version,
773: l_api_name,G_PKG_NAME) THEN
774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776: --Start of API Body
777:
778: VALIDATE_MR_REV

Line 790: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

786: l_msg_count := FND_MSG_PUB.count_msg;
787:
788: IF l_msg_count > 0 THEN
789: X_msg_count := l_msg_count;
790: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
791: RAISE FND_API.G_EXC_ERROR;
792: END IF;
793:
794:

Line 791: RAISE FND_API.G_EXC_ERROR;

787:
788: IF l_msg_count > 0 THEN
789: X_msg_count := l_msg_count;
790: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
791: RAISE FND_API.G_EXC_ERROR;
792: END IF;
793:
794:
795: --Start of API Body

Line 1486: p_commit => FND_API.G_FALSE,

1482:
1483: AHL_SB_RULES_PVT.Copy_Rules_For_MR
1484: (
1485: p_api_version => 1.0,
1486: p_commit => FND_API.G_FALSE,
1487: p_src_mr_header_id => p_source_mr_header_id,
1488: p_dst_mr_header_id => x_new_mr_header_id,
1489: x_return_status => x_return_status,
1490: x_msg_count => x_msg_count,

Line 1633: IF l_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1629: END LOOP;
1630: ---Changes for SBE loop/Chain Ends.
1631: l_msg_count := FND_MSG_PUB.count_msg;
1632:
1633: IF l_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1634: X_msg_count := l_msg_count;
1635: X_return_status := FND_API.G_RET_STS_ERROR;
1636: RAISE FND_API.G_EXC_ERROR;
1637: END IF;

Line 1635: X_return_status := FND_API.G_RET_STS_ERROR;

1631: l_msg_count := FND_MSG_PUB.count_msg;
1632:
1633: IF l_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1634: X_msg_count := l_msg_count;
1635: X_return_status := FND_API.G_RET_STS_ERROR;
1636: RAISE FND_API.G_EXC_ERROR;
1637: END IF;
1638:
1639: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 1636: RAISE FND_API.G_EXC_ERROR;

1632:
1633: IF l_msg_count > 0 OR x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1634: X_msg_count := l_msg_count;
1635: X_return_status := FND_API.G_RET_STS_ERROR;
1636: RAISE FND_API.G_EXC_ERROR;
1637: END IF;
1638:
1639: IF FND_API.TO_BOOLEAN(p_commit) THEN
1640: COMMIT;

Line 1639: IF FND_API.TO_BOOLEAN(p_commit) THEN

1635: X_return_status := FND_API.G_RET_STS_ERROR;
1636: RAISE FND_API.G_EXC_ERROR;
1637: END IF;
1638:
1639: IF FND_API.TO_BOOLEAN(p_commit) THEN
1640: COMMIT;
1641: END IF;
1642:
1643: -- Check if API is called in debug mode. If yes, disable debug.

Line 1651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1647: AHL_DEBUG_PUB.disable_debug;
1648: END IF;
1649:
1650: EXCEPTION
1651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1652: ROLLBACK TO CREATE_MR_REVISION_PVT;
1653: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1654: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1655: p_count => x_msg_count,

Line 1653: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1649:
1650: EXCEPTION
1651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1652: ROLLBACK TO CREATE_MR_REVISION_PVT;
1653: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1654: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1655: p_count => x_msg_count,
1656: p_data => x_msg_data);
1657: IF G_DEBUG='Y' THEN

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

1650: EXCEPTION
1651: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1652: ROLLBACK TO CREATE_MR_REVISION_PVT;
1653: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1654: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1655: p_count => x_msg_count,
1656: p_data => x_msg_data);
1657: IF G_DEBUG='Y' THEN
1658: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

Line 1663: WHEN FND_API.G_EXC_ERROR THEN

1659: AHL_DEBUG_PUB.disable_debug;
1660: END IF;
1661:
1662:
1663: WHEN FND_API.G_EXC_ERROR THEN
1664: ROLLBACK TO CREATE_MR_REVISION_PVT;
1665: X_return_status := FND_API.G_RET_STS_ERROR;
1666: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1667: p_count => x_msg_count,

Line 1665: X_return_status := FND_API.G_RET_STS_ERROR;

1661:
1662:
1663: WHEN FND_API.G_EXC_ERROR THEN
1664: ROLLBACK TO CREATE_MR_REVISION_PVT;
1665: X_return_status := FND_API.G_RET_STS_ERROR;
1666: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1667: p_count => x_msg_count,
1668: p_data => X_msg_data);
1669: IF G_DEBUG='Y' THEN

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

1662:
1663: WHEN FND_API.G_EXC_ERROR THEN
1664: ROLLBACK TO CREATE_MR_REVISION_PVT;
1665: X_return_status := FND_API.G_RET_STS_ERROR;
1666: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1667: p_count => x_msg_count,
1668: p_data => X_msg_data);
1669: IF G_DEBUG='Y' THEN
1670: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

Line 1676: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1672: END IF;
1673:
1674: WHEN OTHERS THEN
1675: ROLLBACK TO CREATE_MR_REVISION_PVT;
1676: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1677: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1678: THEN
1679: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1680: p_procedure_name => 'CREATE_MR_REVISION',

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

1679: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
1680: p_procedure_name => 'CREATE_MR_REVISION',
1681: p_error_text => SUBSTR(SQLERRM,1,240));
1682: END IF;
1683: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
1684: p_count => x_msg_count,
1685: p_data => X_msg_data);
1686: IF G_DEBUG='Y' THEN
1687: AHL_DEBUG_PUB.DEBUG('CREATION OF MR_REVISION IS NOT COMPLETE');

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

1693:
1694: PROCEDURE INITIATE_MR_APPROVAL
1695: (
1696: p_api_version IN NUMBER:=1.0,
1697: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1698: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1699: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1700: p_default IN VARCHAR2:=FND_API.G_FALSE,
1701: p_module_type IN VARCHAR2,

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

1694: PROCEDURE INITIATE_MR_APPROVAL
1695: (
1696: p_api_version IN NUMBER:=1.0,
1697: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1698: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1699: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1700: p_default IN VARCHAR2:=FND_API.G_FALSE,
1701: p_module_type IN VARCHAR2,
1702: x_return_status OUT NOCOPY VARCHAR2,

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

1695: (
1696: p_api_version IN NUMBER:=1.0,
1697: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1698: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1699: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1700: p_default IN VARCHAR2:=FND_API.G_FALSE,
1701: p_module_type IN VARCHAR2,
1702: x_return_status OUT NOCOPY VARCHAR2,
1703: x_msg_count OUT NOCOPY NUMBER,

Line 1700: p_default IN VARCHAR2:=FND_API.G_FALSE,

1696: p_api_version IN NUMBER:=1.0,
1697: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1698: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1699: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1700: p_default IN VARCHAR2:=FND_API.G_FALSE,
1701: p_module_type IN VARCHAR2,
1702: x_return_status OUT NOCOPY VARCHAR2,
1703: x_msg_count OUT NOCOPY NUMBER,
1704: x_msg_data OUT NOCOPY VARCHAR2,

Line 1722: l_init_msg_list VARCHAR2(10):=FND_API.G_TRUE;

1718: l_msg_count NUMBER;
1719: l_msg_data VARCHAR2(2000);
1720: l_activity_id NUMBER:=p_source_mr_header_id;
1721: l_Status VARCHAR2(1);
1722: l_init_msg_list VARCHAR2(10):=FND_API.G_TRUE;
1723: l_object_Version_number NUMBER:=p_object_version_number;
1724:
1725: Cursor GetHeaderInfo(C_MR_HEADER_ID NUMBER)
1726: IS

Line 1770: IF FND_API.to_boolean(l_init_msg_list) THEN

1766: IF G_DEBUG='Y' THEN
1767: AHL_DEBUG_PUB.debug( 'Start Initiate_MR_Approval');
1768: END IF;
1769:
1770: IF FND_API.to_boolean(l_init_msg_list) THEN
1771: FND_MSG_PUB.initialize;
1772: END IF;
1773:
1774:

Line 1775: x_return_status := FND_API.G_RET_STS_SUCCESS;

1771: FND_MSG_PUB.initialize;
1772: END IF;
1773:
1774:
1775: x_return_status := FND_API.G_RET_STS_SUCCESS;
1776:
1777:
1778: l_mr_appr_enabled:=FND_PROFILE.VALUE('AHL_FMP_MR_APPRV_ENABLED');
1779:

Line 1792: p_source_mr_header_id=FND_API.G_MISS_NUM

1788: AHL_DEBUG_PUB.debug( 'P_APPRV_TYPE : ' || P_APPRV_TYPE);
1789: END IF;
1790:
1791: IF p_source_mr_header_id is null or
1792: p_source_mr_header_id=FND_API.G_MISS_NUM
1793: THEN
1794: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_HEADER_ID_INVALID');
1795: FND_MSG_PUB.ADD;
1796: l_check_flag:='N';

Line 1846: p_init_msg_list =>FND_API.G_FALSE,

1842:
1843: OKS_PM_ENTITLEMENTS_PUB.Check_PM_Exists
1844: (
1845: p_api_version =>p_api_version,
1846: p_init_msg_list =>FND_API.G_FALSE,
1847: p_pm_program_id =>l_program_id,
1848: p_pm_activity_id =>l_pm_activity_id,
1849: x_return_status =>x_return_status,
1850: x_msg_count =>x_msg_count,

Line 1862: --l_contract_ref_exists:=FND_API.G_MISS_CHAR; -- TEMP CHECK

1858:
1859:
1860: --l_contract_ref_exists:='Y'; -- TEMP CHECK
1861: --l_contract_ref_exists:=NULL; -- TEMP CHECK
1862: --l_contract_ref_exists:=FND_API.G_MISS_CHAR; -- TEMP CHECK
1863:
1864: IF l_contract_ref_exists='Y'
1865: THEN
1866: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CONTRACTS_EXIST');

Line 1874: ELSIF l_contract_ref_exists IS NULL OR l_contract_ref_exists=FND_API.G_MISS_CHAR

1870: IF G_DEBUG='Y' THEN
1871: AHL_DEBUG_PUB.debug( 'l_contract_ref_exists---->'||l_contract_ref_exists);
1872: END IF;
1873:
1874: ELSIF l_contract_ref_exists IS NULL OR l_contract_ref_exists=FND_API.G_MISS_CHAR
1875: THEN
1876: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_INVALID_RET_PARAM');
1877: FND_MSG_PUB.ADD;
1878:

Line 1894: AND l_mr_rec.EFFECTIVE_TO<>FND_API.G_MISS_DATE)

1890:
1891: l_upd_mr_status_code:='TERMINATE_PENDING';
1892: If l_mr_rec.MR_STATUS_CODE<>'COMPLETE' OR
1893: (l_mr_rec.EFFECTIVE_TO IS NOT NULL
1894: AND l_mr_rec.EFFECTIVE_TO<>FND_API.G_MISS_DATE)
1895: Then
1896: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CANNOT_TERMIN');
1897: FND_MSG_PUB.ADD;
1898: End if;

Line 1990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1986:
1987: IF l_msg_count > 0
1988: THEN
1989: X_msg_count := l_msg_count;
1990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1991: RAISE FND_API.G_EXC_ERROR;
1992: END IF;
1993:
1994: IF(P_APPRV_TYPE = 'COMPLETE_DCALC')THEN

Line 1991: RAISE FND_API.G_EXC_ERROR;

1987: IF l_msg_count > 0
1988: THEN
1989: X_msg_count := l_msg_count;
1990: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1991: RAISE FND_API.G_EXC_ERROR;
1992: END IF;
1993:
1994: IF(P_APPRV_TYPE = 'COMPLETE_DCALC')THEN
1995: l_approved_status_code := 'APPROVED_DCALC';

Line 2060: p_init_msg_list =>FND_API.G_FALSE,

2056:
2057: AHL_FMP_MR_REVISION_PVT.COMPLETE_MR_REVISION
2058: (
2059: p_api_version =>1.0,
2060: p_init_msg_list =>FND_API.G_FALSE,
2061: p_commit =>FND_API.G_FALSE,
2062: p_validation_level =>NULL,
2063: p_default =>NULL,
2064: p_module_type =>NULL,

Line 2061: p_commit =>FND_API.G_FALSE,

2057: AHL_FMP_MR_REVISION_PVT.COMPLETE_MR_REVISION
2058: (
2059: p_api_version =>1.0,
2060: p_init_msg_list =>FND_API.G_FALSE,
2061: p_commit =>FND_API.G_FALSE,
2062: p_validation_level =>NULL,
2063: p_default =>NULL,
2064: p_module_type =>NULL,
2065: x_return_status =>x_return_status,

Line 2081: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2077:
2078: IF l_msg_count > 0
2079: THEN
2080: X_msg_count := l_msg_count;
2081: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2082: RAISE FND_API.G_EXC_ERROR;
2083: END IF;
2084:
2085:

Line 2082: RAISE FND_API.G_EXC_ERROR;

2078: IF l_msg_count > 0
2079: THEN
2080: X_msg_count := l_msg_count;
2081: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2082: RAISE FND_API.G_EXC_ERROR;
2083: END IF;
2084:
2085:
2086: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 2086: IF FND_API.TO_BOOLEAN(p_commit) THEN

2082: RAISE FND_API.G_EXC_ERROR;
2083: END IF;
2084:
2085:
2086: IF FND_API.TO_BOOLEAN(p_commit) THEN
2087: COMMIT;
2088: END IF;
2089:
2090: EXCEPTION

Line 2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2087: COMMIT;
2088: END IF;
2089:
2090: EXCEPTION
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2093: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2094: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2095: p_count => x_msg_count,

Line 2093: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2089:
2090: EXCEPTION
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2093: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2094: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2095: p_count => x_msg_count,
2096: p_data => x_msg_data);
2097: IF G_DEBUG='Y' THEN

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

2090: EXCEPTION
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2093: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2094: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2095: p_count => x_msg_count,
2096: p_data => x_msg_data);
2097: IF G_DEBUG='Y' THEN
2098: AHL_DEBUG_PUB.disable_debug;

Line 2102: WHEN FND_API.G_EXC_ERROR THEN

2098: AHL_DEBUG_PUB.disable_debug;
2099: END IF;
2100:
2101:
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2104: X_return_status := FND_API.G_RET_STS_ERROR;
2105: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2106: p_count => x_msg_count,

Line 2104: X_return_status := FND_API.G_RET_STS_ERROR;

2100:
2101:
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2104: X_return_status := FND_API.G_RET_STS_ERROR;
2105: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2106: p_count => x_msg_count,
2107: p_data => X_msg_data);
2108: IF G_DEBUG='Y' THEN

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

2101:
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2104: X_return_status := FND_API.G_RET_STS_ERROR;
2105: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2106: p_count => x_msg_count,
2107: p_data => X_msg_data);
2108: IF G_DEBUG='Y' THEN
2109: AHL_DEBUG_PUB.disable_debug;

Line 2114: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2110: END IF;
2111:
2112: WHEN OTHERS THEN
2113: ROLLBACK TO INITIATE_MR_APPROVAL_PVT;
2114: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2115: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2116: THEN
2117: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2118: p_procedure_name => 'INITIATE_MR_APPROVAL',

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

2117: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2118: p_procedure_name => 'INITIATE_MR_APPROVAL',
2119: p_error_text => SUBSTR(SQLERRM,1,240));
2120: END IF;
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 2134: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,

2130:
2131: PROCEDURE COMPLETE_MR_REVISION
2132: (
2133: p_api_version IN NUMBER:=1.0,
2134: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2135: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2136: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2137: p_default IN VARCHAR2:=FND_API.G_FALSE,
2138: p_module_type IN VARCHAR2,

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

2131: PROCEDURE COMPLETE_MR_REVISION
2132: (
2133: p_api_version IN NUMBER:=1.0,
2134: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2135: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2136: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2137: p_default IN VARCHAR2:=FND_API.G_FALSE,
2138: p_module_type IN VARCHAR2,
2139: x_return_status OUT NOCOPY VARCHAR2,

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

2132: (
2133: p_api_version IN NUMBER:=1.0,
2134: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2135: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2136: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2137: p_default IN VARCHAR2:=FND_API.G_FALSE,
2138: p_module_type IN VARCHAR2,
2139: x_return_status OUT NOCOPY VARCHAR2,
2140: x_msg_count OUT NOCOPY NUMBER,

Line 2137: p_default IN VARCHAR2:=FND_API.G_FALSE,

2133: p_api_version IN NUMBER:=1.0,
2134: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2135: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2136: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2137: p_default IN VARCHAR2:=FND_API.G_FALSE,
2138: p_module_type IN VARCHAR2,
2139: x_return_status OUT NOCOPY VARCHAR2,
2140: x_msg_count OUT NOCOPY NUMBER,
2141: x_msg_data OUT NOCOPY VARCHAR2,

Line 2210: l_commit VARCHAR2(10):=FND_API.G_TRUE;

2206: l_msg_count NUMBER;
2207: l_msg_data VARCHAR2(2000);
2208: l_fr_date DATE:=SYSDATE;
2209: l_to_Date DATE:=SYSDATE;
2210: l_commit VARCHAR2(10):=FND_API.G_TRUE;
2211:
2212: /* Vo comments: No need to copy newer revisions of the MR to the ATA Sequences,
2213: * the User will need to add them on a case-to-case basis...
2214: -- Tamal [MEL/CDL RM-FMP Enhancements] Begins here...*/

Line 2229: x_return_status:=FND_API.G_RET_STS_SUCCESS;

2225: BEGIN
2226:
2227: SAVEPOINT COMPLETE_MR_REVISION_PVT;
2228:
2229: x_return_status:=FND_API.G_RET_STS_SUCCESS;
2230: IF G_DEBUG='Y' THEN
2231: AHL_DEBUG_PUB.enable_debug;
2232: AHL_DEBUG_PUB.debug( 'p_appr_Status'||p_appr_status);
2233: AHL_DEBUG_PUB.debug( 'Header Id '||p_mr_header_id);

Line 2236: IF p_mr_header_id is not null and p_mr_header_id<>fnd_api.g_miss_num

2232: AHL_DEBUG_PUB.debug( 'p_appr_Status'||p_appr_status);
2233: AHL_DEBUG_PUB.debug( 'Header Id '||p_mr_header_id);
2234: END IF;
2235:
2236: IF p_mr_header_id is not null and p_mr_header_id<>fnd_api.g_miss_num
2237: THEN
2238: OPEN GetMR_headerDet(p_mr_header_id);
2239: FETCH GetMR_headerDet INTO l_mr_rec;
2240:

Line 2306: p_commit => FND_API.G_FALSE,

2302: IF (check_sb_rules_exists%FOUND) THEN
2303: AHL_SB_RULES_PVT.Update_Rules_For_MR
2304: (
2305: p_api_version => 1.0,
2306: p_commit => FND_API.G_FALSE,
2307: p_mr_header_id => p_mr_header_id,
2308: x_return_status => x_return_status,
2309: x_msg_count => x_msg_count,
2310: x_msg_data => x_msg_data

Line 2337: p_init_msg_list =>FND_API.G_FALSE,

2333: END IF;
2334:
2335: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2336: p_api_version =>l_api_version,
2337: p_init_msg_list =>FND_API.G_FALSE,
2338: p_commit =>p_commit,
2339: p_validation_level =>p_validation_level,
2340: p_default =>p_default,
2341: p_module_type =>p_module_type,

Line 2465: p_init_msg_list => FND_API.G_FALSE,

2461: AHL_MEL_CDL_ATA_SEQS_PVT.Copy_MO_Proc_Revision
2462: (
2463: -- Standard IN params
2464: p_api_version => 1.0,
2465: p_init_msg_list => FND_API.G_FALSE,
2466: p_commit => FND_API.G_FALSE,
2467: p_validation_level => p_validation_level,
2468: p_default => p_default,
2469: p_module_type => p_module_type,

Line 2466: p_commit => FND_API.G_FALSE,

2462: (
2463: -- Standard IN params
2464: p_api_version => 1.0,
2465: p_init_msg_list => FND_API.G_FALSE,
2466: p_commit => FND_API.G_FALSE,
2467: p_validation_level => p_validation_level,
2468: p_default => p_default,
2469: p_module_type => p_module_type,
2470: -- Standard OUT params

Line 2492: p_commit => FND_API.G_FALSE,

2488: THEN
2489: AHL_SB_RULES_PVT.Update_Rules_For_MR
2490: (
2491: p_api_version => 1.0,
2492: p_commit => FND_API.G_FALSE,
2493: p_mr_header_id => p_mr_header_id,
2494: x_return_status => x_return_status,
2495: x_msg_count => x_msg_count,
2496: x_msg_data => x_msg_data

Line 2524: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2520: IF G_DEBUG='Y' THEN
2521: AHL_DEBUG_PUB.debug( 'Error Before TerminateInstances');
2522: END IF;
2523: X_msg_count := l_msg_count;
2524: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2525: RAISE FND_API.G_EXC_ERROR;
2526: END IF;
2527:
2528: IF G_DEBUG='Y'

Line 2525: RAISE FND_API.G_EXC_ERROR;

2521: AHL_DEBUG_PUB.debug( 'Error Before TerminateInstances');
2522: END IF;
2523: X_msg_count := l_msg_count;
2524: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2525: RAISE FND_API.G_EXC_ERROR;
2526: END IF;
2527:
2528: IF G_DEBUG='Y'
2529: THEN

Line 2543: p_init_msg_list =>FND_API.G_FALSE,

2539: WHERE MR_HEADER_ID=l_prev_mr_rec.MR_HEADER_ID;
2540:
2541: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2542: p_api_version =>l_api_version,
2543: p_init_msg_list =>FND_API.G_FALSE,
2544: p_commit =>p_commit,
2545: p_validation_level =>p_validation_level,
2546: p_default =>p_default,
2547: p_module_type =>p_module_type,

Line 2561: p_init_msg_list =>FND_API.G_FALSE,

2557: ELSE
2558:
2559: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2560: p_api_version =>l_api_version,
2561: p_init_msg_list =>FND_API.G_FALSE,
2562: p_commit =>p_commit,
2563: p_validation_level =>p_validation_level,
2564: p_default =>p_default,
2565: p_module_type =>p_module_type,

Line 2580: p_init_msg_list =>FND_API.G_FALSE,

2576: ELSIF L_MR_REC.MR_STATUS_CODE='TERMINATE_PENDING'
2577: THEN
2578: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2579: p_api_version =>l_api_version,
2580: p_init_msg_list =>FND_API.G_FALSE,
2581: p_commit =>p_commit,
2582: p_validation_level =>p_validation_level,
2583: p_default =>p_default,
2584: p_module_type =>p_module_type,

Line 2618: X_return_status := FND_API.G_RET_STS_ERROR;

2614: IF G_DEBUG='Y' THEN
2615: AHL_DEBUG_PUB.debug( 'Failed To Complete:');
2616: END IF;
2617: X_msg_count := l_msg_count;
2618: X_return_status := FND_API.G_RET_STS_ERROR;
2619: RAISE FND_API.G_EXC_ERROR;
2620: END IF;
2621:
2622: IF p_appr_status = 'APPROVED_DCALC' THEN

Line 2619: RAISE FND_API.G_EXC_ERROR;

2615: AHL_DEBUG_PUB.debug( 'Failed To Complete:');
2616: END IF;
2617: X_msg_count := l_msg_count;
2618: X_return_status := FND_API.G_RET_STS_ERROR;
2619: RAISE FND_API.G_EXC_ERROR;
2620: END IF;
2621:
2622: IF p_appr_status = 'APPROVED_DCALC' THEN
2623: l_req_id := fnd_request.submit_request('AHL','AHLWUEFF',NULL,NULL,FALSE,

Line 2640: IF FND_API.TO_BOOLEAN(p_commit) THEN

2636: IF G_DEBUG='Y' THEN
2637: AHL_DEBUG_PUB.debug( 'Before commit Complete_mr_revision ');
2638: END IF;
2639:
2640: IF FND_API.TO_BOOLEAN(p_commit) THEN
2641: COMMIT;
2642: END IF;
2643: EXCEPTION
2644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2640: IF FND_API.TO_BOOLEAN(p_commit) THEN
2641: COMMIT;
2642: END IF;
2643: EXCEPTION
2644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2645: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2646: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2647: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2648: p_count => x_msg_count,

Line 2646: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2642: END IF;
2643: EXCEPTION
2644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2645: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2646: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2647: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2648: p_count => x_msg_count,
2649: p_data => x_msg_data);
2650: IF G_DEBUG='Y' THEN

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

2643: EXCEPTION
2644: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2645: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2646: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2647: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2648: p_count => x_msg_count,
2649: p_data => x_msg_data);
2650: IF G_DEBUG='Y' THEN
2651: AHL_DEBUG_PUB.disable_debug;

Line 2653: WHEN FND_API.G_EXC_ERROR THEN

2649: p_data => x_msg_data);
2650: IF G_DEBUG='Y' THEN
2651: AHL_DEBUG_PUB.disable_debug;
2652: END IF;
2653: WHEN FND_API.G_EXC_ERROR THEN
2654: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2655: X_return_status := FND_API.G_RET_STS_ERROR;
2656: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2657: p_count => x_msg_count,

Line 2655: X_return_status := FND_API.G_RET_STS_ERROR;

2651: AHL_DEBUG_PUB.disable_debug;
2652: END IF;
2653: WHEN FND_API.G_EXC_ERROR THEN
2654: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2655: X_return_status := FND_API.G_RET_STS_ERROR;
2656: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2657: p_count => x_msg_count,
2658: p_data => X_msg_data);
2659: IF G_DEBUG='Y' THEN

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

2652: END IF;
2653: WHEN FND_API.G_EXC_ERROR THEN
2654: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2655: X_return_status := FND_API.G_RET_STS_ERROR;
2656: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2657: p_count => x_msg_count,
2658: p_data => X_msg_data);
2659: IF G_DEBUG='Y' THEN
2660: AHL_DEBUG_PUB.disable_debug;

Line 2665: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2661: END IF;
2662:
2663: WHEN OTHERS THEN
2664: ROLLBACK TO COMPLETE_MR_REVISION_PVT;
2665: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2666: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2667: THEN
2668: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2669: p_procedure_name => 'COMPLETE_MR_REVISION',

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

2668: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_FMP_MR_REVISION_PVT',
2669: p_procedure_name => 'COMPLETE_MR_REVISION',
2670: p_error_text => SUBSTR(SQLERRM,1,240));
2671: END IF;
2672: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2673: p_count => x_msg_count,
2674: p_data => X_msg_data);
2675:
2676: IF G_DEBUG='Y' THEN

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

2681:
2682: PROCEDURE VALIDATE_MR_REVISION
2683: (
2684: p_api_version IN NUMBER:=1.0,
2685: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2686: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2687: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2688: p_default IN VARCHAR2:=FND_API.G_FALSE,
2689: p_module_type IN VARCHAR2,

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

2682: PROCEDURE VALIDATE_MR_REVISION
2683: (
2684: p_api_version IN NUMBER:=1.0,
2685: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2686: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2687: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2688: p_default IN VARCHAR2:=FND_API.G_FALSE,
2689: p_module_type IN VARCHAR2,
2690: x_return_status OUT NOCOPY VARCHAR2,

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

2683: (
2684: p_api_version IN NUMBER:=1.0,
2685: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2686: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2687: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2688: p_default IN VARCHAR2:=FND_API.G_FALSE,
2689: p_module_type IN VARCHAR2,
2690: x_return_status OUT NOCOPY VARCHAR2,
2691: x_msg_count OUT NOCOPY NUMBER,

Line 2688: p_default IN VARCHAR2:=FND_API.G_FALSE,

2684: p_api_version IN NUMBER:=1.0,
2685: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2686: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2687: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2688: p_default IN VARCHAR2:=FND_API.G_FALSE,
2689: p_module_type IN VARCHAR2,
2690: x_return_status OUT NOCOPY VARCHAR2,
2691: x_msg_count OUT NOCOPY NUMBER,
2692: x_msg_data OUT NOCOPY VARCHAR2,

Line 2712: x_return_status:=FND_API.G_RET_STS_SUCCESS;

2708: RETURN;
2709: END IF;
2710:
2711:
2712: x_return_status:=FND_API.G_RET_STS_SUCCESS;
2713:
2714: SELECT count(*) into l_counter1
2715: FROM AHL_MR_HEADERS_APP_V
2716: Where mr_header_id=p_source_mr_header_id;

Line 2736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2732: FND_MSG_PUB.ADD;
2733: END IF;
2734:
2735: EXCEPTION
2736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2737: ROLLBACK TO VALIDATE_MR_REVISION;
2738: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2739: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2740: p_count => x_msg_count,

Line 2738: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2734:
2735: EXCEPTION
2736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2737: ROLLBACK TO VALIDATE_MR_REVISION;
2738: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2739: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2740: p_count => x_msg_count,
2741: p_data => x_msg_data);
2742: IF G_DEBUG='Y' THEN

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

2735: EXCEPTION
2736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2737: ROLLBACK TO VALIDATE_MR_REVISION;
2738: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2739: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2740: p_count => x_msg_count,
2741: p_data => x_msg_data);
2742: IF G_DEBUG='Y' THEN
2743: AHL_DEBUG_PUB.disable_debug;

Line 2746: WHEN FND_API.G_EXC_ERROR THEN

2742: IF G_DEBUG='Y' THEN
2743: AHL_DEBUG_PUB.disable_debug;
2744: END IF;
2745:
2746: WHEN FND_API.G_EXC_ERROR THEN
2747: ROLLBACK TO VALIDATE_MR_REVISION;
2748: X_return_status := FND_API.G_RET_STS_ERROR;
2749: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2750: p_count => x_msg_count,

Line 2748: X_return_status := FND_API.G_RET_STS_ERROR;

2744: END IF;
2745:
2746: WHEN FND_API.G_EXC_ERROR THEN
2747: ROLLBACK TO VALIDATE_MR_REVISION;
2748: X_return_status := FND_API.G_RET_STS_ERROR;
2749: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2750: p_count => x_msg_count,
2751: p_data => X_msg_data);
2752: IF G_DEBUG='Y' THEN

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

2745:
2746: WHEN FND_API.G_EXC_ERROR THEN
2747: ROLLBACK TO VALIDATE_MR_REVISION;
2748: X_return_status := FND_API.G_RET_STS_ERROR;
2749: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2750: p_count => x_msg_count,
2751: p_data => X_msg_data);
2752: IF G_DEBUG='Y' THEN
2753: AHL_DEBUG_PUB.disable_debug;

Line 2758: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2754: END IF;
2755:
2756: WHEN OTHERS THEN
2757: ROLLBACK TO VALIDATE_MR_REVISION;
2758: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2760: THEN
2761: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,
2762: p_procedure_name => 'VALIDATE_MR_REVISION',

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

2761: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME ,
2762: p_procedure_name => 'VALIDATE_MR_REVISION',
2763: p_error_text => SUBSTR(SQLERRM,1,240));
2764: END IF;
2765: FND_MSG_PUB.count_and_get( p_encoded =>FND_API.G_FALSE,
2766: p_count => x_msg_count,
2767: p_data => X_msg_data);
2768: IF G_DEBUG='Y' THEN
2769: AHL_DEBUG_PUB.disable_debug;