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 615: IF FND_API.to_boolean(p_init_msg_list) THEN

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

Line 621: x_return_status := FND_API.G_RET_STS_SUCCESS;

617: END IF;
618:
619: -- Initialize API return status to success
620:
621: x_return_status := FND_API.G_RET_STS_SUCCESS;
622:
623: -- Initialize message list if p_init_msg_list is set to TRUE.
624: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
625: p_api_version,

Line 624: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

620:
621: x_return_status := FND_API.G_RET_STS_SUCCESS;
622:
623: -- Initialize message list if p_init_msg_list is set to TRUE.
624: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
625: p_api_version,
626: l_api_name,G_PKG_NAME) THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628: END IF;

Line 627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

623: -- Initialize message list if p_init_msg_list is set to TRUE.
624: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
625: p_api_version,
626: l_api_name,G_PKG_NAME) THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
628: END IF;
629: --Start of API Body
630:
631: VALIDATE_MR_REV

Line 643: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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;
644: RAISE FND_API.G_EXC_ERROR;
645: END IF;
646:
647:

Line 644: RAISE FND_API.G_EXC_ERROR;

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;
644: RAISE FND_API.G_EXC_ERROR;
645: END IF;
646:
647:
648: --Start of API Body

Line 1241: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1237:
1238:
1239: IF l_msg_count > 0 THEN
1240: X_msg_count := l_msg_count;
1241: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: RAISE FND_API.G_EXC_ERROR;
1243: END IF;
1244:
1245: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 1242: RAISE FND_API.G_EXC_ERROR;

1238:
1239: IF l_msg_count > 0 THEN
1240: X_msg_count := l_msg_count;
1241: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: RAISE FND_API.G_EXC_ERROR;
1243: END IF;
1244:
1245: IF FND_API.TO_BOOLEAN(p_commit) THEN
1246: COMMIT;

Line 1245: IF FND_API.TO_BOOLEAN(p_commit) THEN

1241: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1242: RAISE FND_API.G_EXC_ERROR;
1243: END IF;
1244:
1245: IF FND_API.TO_BOOLEAN(p_commit) THEN
1246: COMMIT;
1247: END IF;
1248:
1249: -- Check if API is called in debug mode. If yes, disable debug.

Line 1257: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1253: AHL_DEBUG_PUB.disable_debug;
1254: END IF;
1255:
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,

Line 1259: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

1265: AHL_DEBUG_PUB.disable_debug;
1266: END IF;
1267:
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,

Line 1271: X_return_status := FND_API.G_RET_STS_ERROR;

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

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

1278: END IF;
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',

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

1299:
1300: PROCEDURE INITIATE_MR_APPROVAL
1301: (
1302: p_api_version IN NUMBER:=1.0,
1303: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1304: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1305: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1306: p_default IN VARCHAR2:=FND_API.G_FALSE,
1307: p_module_type IN VARCHAR2,

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

1300: PROCEDURE INITIATE_MR_APPROVAL
1301: (
1302: p_api_version IN NUMBER:=1.0,
1303: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1304: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1305: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1306: p_default IN VARCHAR2:=FND_API.G_FALSE,
1307: p_module_type IN VARCHAR2,
1308: x_return_status OUT NOCOPY VARCHAR2,

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

1301: (
1302: p_api_version IN NUMBER:=1.0,
1303: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1304: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1305: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1306: p_default IN VARCHAR2:=FND_API.G_FALSE,
1307: p_module_type IN VARCHAR2,
1308: x_return_status OUT NOCOPY VARCHAR2,
1309: x_msg_count OUT NOCOPY NUMBER,

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

1302: p_api_version IN NUMBER:=1.0,
1303: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1304: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1305: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1306: p_default IN VARCHAR2:=FND_API.G_FALSE,
1307: p_module_type IN VARCHAR2,
1308: x_return_status OUT NOCOPY VARCHAR2,
1309: x_msg_count OUT NOCOPY NUMBER,
1310: x_msg_data OUT NOCOPY VARCHAR2,

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

1324: l_msg_count NUMBER;
1325: l_msg_data VARCHAR2(2000);
1326: l_activity_id NUMBER:=p_source_mr_header_id;
1327: l_Status VARCHAR2(1);
1328: l_init_msg_list VARCHAR2(10):=FND_API.G_TRUE;
1329: l_object_Version_number NUMBER:=p_object_version_number;
1330:
1331: Cursor GetHeaderInfo(C_MR_HEADER_ID NUMBER)
1332: IS

Line 1376: IF FND_API.to_boolean(l_init_msg_list) THEN

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

Line 1381: x_return_status := FND_API.G_RET_STS_SUCCESS;

1377: FND_MSG_PUB.initialize;
1378: END IF;
1379:
1380:
1381: x_return_status := FND_API.G_RET_STS_SUCCESS;
1382:
1383:
1384: l_mr_appr_enabled:=FND_PROFILE.VALUE('AHL_FMP_MR_APPRV_ENABLED');
1385:

Line 1398: p_source_mr_header_id=FND_API.G_MISS_NUM

1394: AHL_DEBUG_PUB.debug( 'P_APPRV_TYPE : ' || P_APPRV_TYPE);
1395: END IF;
1396:
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';

Line 1452: p_init_msg_list =>FND_API.G_FALSE,

1448:
1449: OKS_PM_ENTITLEMENTS_PUB.Check_PM_Exists
1450: (
1451: p_api_version =>p_api_version,
1452: p_init_msg_list =>FND_API.G_FALSE,
1453: p_pm_program_id =>l_program_id,
1454: p_pm_activity_id =>l_pm_activity_id,
1455: x_return_status =>x_return_status,
1456: x_msg_count =>x_msg_count,

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

1464:
1465:
1466: --l_contract_ref_exists:='Y'; -- TEMP CHECK
1467: --l_contract_ref_exists:=NULL; -- TEMP CHECK
1468: --l_contract_ref_exists:=FND_API.G_MISS_CHAR; -- TEMP CHECK
1469:
1470: IF l_contract_ref_exists='Y'
1471: THEN
1472: FND_MESSAGE.SET_NAME('AHL','AHL_FMP_MR_CONTRACTS_EXIST');

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

1476: IF G_DEBUG='Y' THEN
1477: AHL_DEBUG_PUB.debug( 'l_contract_ref_exists---->'||l_contract_ref_exists);
1478: END IF;
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:

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

1496:
1497: l_upd_mr_status_code:='TERMINATE_PENDING';
1498: If l_mr_rec.MR_STATUS_CODE<>'COMPLETE' OR
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;

Line 1596: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1592:
1593: IF l_msg_count > 0
1594: THEN
1595: X_msg_count := l_msg_count;
1596: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: RAISE FND_API.G_EXC_ERROR;
1598: END IF;
1599:
1600: IF(P_APPRV_TYPE = 'COMPLETE_DCALC')THEN

Line 1597: RAISE FND_API.G_EXC_ERROR;

1593: IF l_msg_count > 0
1594: THEN
1595: X_msg_count := l_msg_count;
1596: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1597: RAISE FND_API.G_EXC_ERROR;
1598: END IF;
1599:
1600: IF(P_APPRV_TYPE = 'COMPLETE_DCALC')THEN
1601: l_approved_status_code := 'APPROVED_DCALC';

Line 1666: p_init_msg_list =>FND_API.G_FALSE,

1662:
1663: AHL_FMP_MR_REVISION_PVT.COMPLETE_MR_REVISION
1664: (
1665: p_api_version =>1.0,
1666: p_init_msg_list =>FND_API.G_FALSE,
1667: p_commit =>FND_API.G_FALSE,
1668: p_validation_level =>NULL,
1669: p_default =>NULL,
1670: p_module_type =>NULL,

Line 1667: p_commit =>FND_API.G_FALSE,

1663: AHL_FMP_MR_REVISION_PVT.COMPLETE_MR_REVISION
1664: (
1665: p_api_version =>1.0,
1666: p_init_msg_list =>FND_API.G_FALSE,
1667: p_commit =>FND_API.G_FALSE,
1668: p_validation_level =>NULL,
1669: p_default =>NULL,
1670: p_module_type =>NULL,
1671: x_return_status =>x_return_status,

Line 1687: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1683:
1684: IF l_msg_count > 0
1685: THEN
1686: X_msg_count := l_msg_count;
1687: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1688: RAISE FND_API.G_EXC_ERROR;
1689: END IF;
1690:
1691:

Line 1688: RAISE FND_API.G_EXC_ERROR;

1684: IF l_msg_count > 0
1685: THEN
1686: X_msg_count := l_msg_count;
1687: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1688: RAISE FND_API.G_EXC_ERROR;
1689: END IF;
1690:
1691:
1692: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 1692: IF FND_API.TO_BOOLEAN(p_commit) THEN

1688: RAISE FND_API.G_EXC_ERROR;
1689: END IF;
1690:
1691:
1692: IF FND_API.TO_BOOLEAN(p_commit) THEN
1693: COMMIT;
1694: END IF;
1695:
1696: EXCEPTION

Line 1697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1693: COMMIT;
1694: END IF;
1695:
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,

Line 1699: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

1704: AHL_DEBUG_PUB.disable_debug;
1705: END IF;
1706:
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,

Line 1710: X_return_status := FND_API.G_RET_STS_ERROR;

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

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

1716: END IF;
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',

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

1736:
1737: PROCEDURE COMPLETE_MR_REVISION
1738: (
1739: p_api_version IN NUMBER:=1.0,
1740: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1741: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1742: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1743: p_default IN VARCHAR2:=FND_API.G_FALSE,
1744: p_module_type IN VARCHAR2,

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

1737: PROCEDURE COMPLETE_MR_REVISION
1738: (
1739: p_api_version IN NUMBER:=1.0,
1740: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1741: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1742: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1743: p_default IN VARCHAR2:=FND_API.G_FALSE,
1744: p_module_type IN VARCHAR2,
1745: x_return_status OUT NOCOPY VARCHAR2,

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

1738: (
1739: p_api_version IN NUMBER:=1.0,
1740: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1741: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1742: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1743: p_default IN VARCHAR2:=FND_API.G_FALSE,
1744: p_module_type IN VARCHAR2,
1745: x_return_status OUT NOCOPY VARCHAR2,
1746: x_msg_count OUT NOCOPY NUMBER,

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

1739: p_api_version IN NUMBER:=1.0,
1740: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1741: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1742: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
1743: p_default IN VARCHAR2:=FND_API.G_FALSE,
1744: p_module_type IN VARCHAR2,
1745: x_return_status OUT NOCOPY VARCHAR2,
1746: x_msg_count OUT NOCOPY NUMBER,
1747: x_msg_data OUT NOCOPY VARCHAR2,

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

1786: l_msg_count NUMBER;
1787: l_msg_data VARCHAR2(2000);
1788: l_fr_date DATE:=SYSDATE;
1789: l_to_Date DATE:=SYSDATE;
1790: l_commit VARCHAR2(10):=FND_API.G_TRUE;
1791:
1792: /* Vo comments: No need to copy newer revisions of the MR to the ATA Sequences,
1793: * the User will need to add them on a case-to-case basis...
1794: -- Tamal [MEL/CDL RM-FMP Enhancements] Begins here...

Line 1806: x_return_status:=FND_API.G_RET_STS_SUCCESS;

1802: BEGIN
1803:
1804: SAVEPOINT COMPLETE_MR_REVISION_PVT;
1805:
1806: x_return_status:=FND_API.G_RET_STS_SUCCESS;
1807: IF G_DEBUG='Y' THEN
1808: AHL_DEBUG_PUB.enable_debug;
1809: AHL_DEBUG_PUB.debug( 'p_appr_Status'||p_appr_status);
1810: AHL_DEBUG_PUB.debug( 'Header Id '||p_mr_header_id);

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

1809: AHL_DEBUG_PUB.debug( 'p_appr_Status'||p_appr_status);
1810: AHL_DEBUG_PUB.debug( 'Header Id '||p_mr_header_id);
1811: END IF;
1812:
1813: IF p_mr_header_id is not null and p_mr_header_id<>fnd_api.g_miss_num
1814: THEN
1815: OPEN GetMR_headerDet(p_mr_header_id);
1816: FETCH GetMR_headerDet INTO l_mr_rec;
1817:

Line 1886: p_init_msg_list =>FND_API.G_FALSE,

1882: END IF;
1883:
1884: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
1885: p_api_version =>l_api_version,
1886: p_init_msg_list =>FND_API.G_FALSE,
1887: p_commit =>p_commit,
1888: p_validation_level =>p_validation_level,
1889: p_default =>p_default,
1890: p_module_type =>p_module_type,

Line 1975: p_init_msg_list => FND_API.G_FALSE,

1971: AHL_MEL_CDL_ATA_SEQS_PVT.Copy_MO_Proc_Revision
1972: (
1973: -- Standard IN params
1974: p_api_version => 1.0,
1975: p_init_msg_list => FND_API.G_FALSE,
1976: p_commit => FND_API.G_FALSE,
1977: p_validation_level => p_validation_level,
1978: p_default => p_default,
1979: p_module_type => p_module_type,

Line 1976: p_commit => FND_API.G_FALSE,

1972: (
1973: -- Standard IN params
1974: p_api_version => 1.0,
1975: p_init_msg_list => FND_API.G_FALSE,
1976: p_commit => FND_API.G_FALSE,
1977: p_validation_level => p_validation_level,
1978: p_default => p_default,
1979: p_module_type => p_module_type,
1980: -- Standard OUT params

Line 2013: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2009: IF G_DEBUG='Y' THEN
2010: AHL_DEBUG_PUB.debug( 'Error Before TerminateInstances');
2011: END IF;
2012: X_msg_count := l_msg_count;
2013: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2014: RAISE FND_API.G_EXC_ERROR;
2015: END IF;
2016:
2017: IF G_DEBUG='Y'

Line 2014: RAISE FND_API.G_EXC_ERROR;

2010: AHL_DEBUG_PUB.debug( 'Error Before TerminateInstances');
2011: END IF;
2012: X_msg_count := l_msg_count;
2013: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2014: RAISE FND_API.G_EXC_ERROR;
2015: END IF;
2016:
2017: IF G_DEBUG='Y'
2018: THEN

Line 2027: p_init_msg_list =>FND_API.G_FALSE,

2023: THEN
2024:
2025: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2026: p_api_version =>l_api_version,
2027: p_init_msg_list =>FND_API.G_FALSE,
2028: p_commit =>p_commit,
2029: p_validation_level =>p_validation_level,
2030: p_default =>p_default,
2031: p_module_type =>p_module_type,

Line 2045: p_init_msg_list =>FND_API.G_FALSE,

2041: ELSIF L_MR_REC.MR_STATUS_CODE='TERMINATE_PENDING'
2042: THEN
2043: AHL_UMP_UNITMAINT_PUB.Terminate_MR_Instances(
2044: p_api_version =>l_api_version,
2045: p_init_msg_list =>FND_API.G_FALSE,
2046: p_commit =>p_commit,
2047: p_validation_level =>p_validation_level,
2048: p_default =>p_default,
2049: p_module_type =>p_module_type,

Line 2083: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2079: IF G_DEBUG='Y' THEN
2080: AHL_DEBUG_PUB.debug( 'Failed To Complete:');
2081: END IF;
2082: X_msg_count := l_msg_count;
2083: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2084: RAISE FND_API.G_EXC_ERROR;
2085: END IF;
2086:
2087: IF p_appr_status = 'APPROVED_DCALC' THEN

Line 2084: RAISE FND_API.G_EXC_ERROR;

2080: AHL_DEBUG_PUB.debug( 'Failed To Complete:');
2081: END IF;
2082: X_msg_count := l_msg_count;
2083: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2084: RAISE FND_API.G_EXC_ERROR;
2085: END IF;
2086:
2087: IF p_appr_status = 'APPROVED_DCALC' THEN
2088: l_req_id := fnd_request.submit_request('AHL','AHLWUEFF',NULL,NULL,FALSE,

Line 2105: IF FND_API.TO_BOOLEAN(p_commit) THEN

2101: IF G_DEBUG='Y' THEN
2102: AHL_DEBUG_PUB.debug( 'Before commit Complete_mr_revision ');
2103: END IF;
2104:
2105: IF FND_API.TO_BOOLEAN(p_commit) THEN
2106: COMMIT;
2107: END IF;
2108: EXCEPTION
2109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2105: IF FND_API.TO_BOOLEAN(p_commit) THEN
2106: COMMIT;
2107: END IF;
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,

Line 2111: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

2114: p_data => x_msg_data);
2115: IF G_DEBUG='Y' THEN
2116: AHL_DEBUG_PUB.disable_debug;
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,

Line 2120: X_return_status := FND_API.G_RET_STS_ERROR;

2116: AHL_DEBUG_PUB.disable_debug;
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

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

2126: END IF;
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',

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

2146:
2147: PROCEDURE VALIDATE_MR_REVISION
2148: (
2149: p_api_version IN NUMBER:=1.0,
2150: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2151: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2152: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2153: p_default IN VARCHAR2:=FND_API.G_FALSE,
2154: p_module_type IN VARCHAR2,

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

2147: PROCEDURE VALIDATE_MR_REVISION
2148: (
2149: p_api_version IN NUMBER:=1.0,
2150: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2151: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2152: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2153: p_default IN VARCHAR2:=FND_API.G_FALSE,
2154: p_module_type IN VARCHAR2,
2155: x_return_status OUT NOCOPY VARCHAR2,

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

2148: (
2149: p_api_version IN NUMBER:=1.0,
2150: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2151: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2152: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2153: p_default IN VARCHAR2:=FND_API.G_FALSE,
2154: p_module_type IN VARCHAR2,
2155: x_return_status OUT NOCOPY VARCHAR2,
2156: x_msg_count OUT NOCOPY NUMBER,

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

2149: p_api_version IN NUMBER:=1.0,
2150: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
2151: p_commit IN VARCHAR2:=FND_API.G_FALSE,
2152: p_validation_level IN NUMBER:=FND_API.G_VALID_LEVEL_FULL,
2153: p_default IN VARCHAR2:=FND_API.G_FALSE,
2154: p_module_type IN VARCHAR2,
2155: x_return_status OUT NOCOPY VARCHAR2,
2156: x_msg_count OUT NOCOPY NUMBER,
2157: x_msg_data OUT NOCOPY VARCHAR2,

Line 2177: x_return_status:=FND_API.G_RET_STS_SUCCESS;

2173: RETURN;
2174: END IF;
2175:
2176:
2177: x_return_status:=FND_API.G_RET_STS_SUCCESS;
2178:
2179: SELECT count(*) into l_counter1
2180: FROM AHL_MR_HEADERS_APP_V
2181: Where mr_header_id=p_source_mr_header_id;

Line 2201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2197: FND_MSG_PUB.ADD;
2198: END IF;
2199:
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,

Line 2203: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

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

2207: IF G_DEBUG='Y' THEN
2208: AHL_DEBUG_PUB.disable_debug;
2209: END IF;
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,

Line 2213: X_return_status := FND_API.G_RET_STS_ERROR;

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

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

2219: END IF;
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',

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;