DBA Data[Home] [Help]

APPS.PV_PEC_RULES_PVT dependencies on FND_API

Line 50: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

46: -- Parameters
47: --
48: -- IN
49: -- p_api_version_number IN NUMBER Required
50: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
51: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
52: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
53: -- p_pec_rules_rec IN pec_rules_rec_type Required
54: --

Line 51: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

47: --
48: -- IN
49: -- p_api_version_number IN NUMBER Required
50: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
51: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
52: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
53: -- p_pec_rules_rec IN pec_rules_rec_type Required
54: --
55: -- OUT

Line 52: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

48: -- IN
49: -- p_api_version_number IN NUMBER Required
50: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
51: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
52: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
53: -- p_pec_rules_rec IN pec_rules_rec_type Required
54: --
55: -- OUT
56: -- x_return_status OUT VARCHAR2

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

72: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
73:
74: PROCEDURE Create_Pec_Rules(
75: p_api_version_number IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79:
80: x_return_status OUT NOCOPY VARCHAR2,

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

73:
74: PROCEDURE Create_Pec_Rules(
75: p_api_version_number IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79:
80: x_return_status OUT NOCOPY VARCHAR2,
81: x_msg_count OUT NOCOPY NUMBER,

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

74: PROCEDURE Create_Pec_Rules(
75: p_api_version_number IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
77: p_commit IN VARCHAR2 := FND_API.G_FALSE,
78: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
79:
80: x_return_status OUT NOCOPY VARCHAR2,
81: x_msg_count OUT NOCOPY NUMBER,
82: x_msg_data OUT NOCOPY VARCHAR2,

Line 93: l_org_id NUMBER := FND_API.G_MISS_NUM;

89: L_API_NAME CONSTANT VARCHAR2(30) := 'Create_Pec_Rules';
90: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
91: l_return_status_full VARCHAR2(1);
92: l_object_version_number NUMBER := 1;
93: l_org_id NUMBER := FND_API.G_MISS_NUM;
94: l_enrl_change_rule_id NUMBER;
95: l_dummy NUMBER;
96: l_pec_rules_rec pec_rules_rec_type := p_pec_rules_rec;
97: l_change_direction_code VARCHAR2(30);

Line 152: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

148:
149:
150:
151: -- Standard call to check for call compatibility.
152: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
153: p_api_version_number,
154: l_api_name,
155: G_PKG_NAME)
156: THEN

Line 157: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

153: p_api_version_number,
154: l_api_name,
155: G_PKG_NAME)
156: THEN
157: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
158: END IF;
159:
160: IF (PV_DEBUG_HIGH_ON) THEN
161:

Line 169: IF FND_API.to_Boolean( p_init_msg_list )

165:
166: END IF;
167:
168: -- Initialize message list if p_init_msg_list is set to TRUE.
169: IF FND_API.to_Boolean( p_init_msg_list )
170: THEN
171: FND_MSG_PUB.initialize;
172: END IF;
173:

Line 183: x_return_status := FND_API.G_RET_STS_SUCCESS;

179: END IF;
180:
181:
182: -- Initialize API return status to SUCCESS
183: x_return_status := FND_API.G_RET_STS_SUCCESS;
184:
185: l_value := NULL;
186:
187: /*

Line 195: --x_return_status := FND_API.G_RET_STS_ERROR;

191: CLOSE c_program_id_exists;
192: IF l_pec_rules_rec.change_direction_code='UPGRADE' THEN
193: FND_MESSAGE.set_name('PV', 'PV_DENY_CREATE_UPGRADE_RULE');
194: FND_MSG_PUB.add;
195: --x_return_status := FND_API.G_RET_STS_ERROR;
196: ELSIF l_pec_rules_rec.change_direction_code='PREREQUISITE' THEN
197: FND_MESSAGE.set_name('PV', 'PV_DENY_CREATE_PREREQ_RULE');
198: FND_MSG_PUB.add;
199: END IF;

Line 200: RAISE FND_API.G_EXC_ERROR;

196: ELSIF l_pec_rules_rec.change_direction_code='PREREQUISITE' THEN
197: FND_MESSAGE.set_name('PV', 'PV_DENY_CREATE_PREREQ_RULE');
198: FND_MSG_PUB.add;
199: END IF;
200: RAISE FND_API.G_EXC_ERROR;
201: ELSE
202: CLOSE c_program_id_exists;
203: */
204:

Line 217: RAISE FND_API.G_EXC_ERROR;

213: ELSIF l_pec_rules_rec.change_direction_code='PREREQUISITE' THEN
214: FND_MESSAGE.set_name('PV', 'PV_UPGRADE_EXISTS');
215: FND_MSG_PUB.add;
216: END IF;
217: RAISE FND_API.G_EXC_ERROR;
218: ELSE
219: CLOSE c_program_id_exists;
220: END If;
221:

Line 233: RAISE FND_API.G_EXC_ERROR;

229: ELSIF l_pec_rules_rec.change_direction_code='PREREQUISITE' THEN
230: FND_MESSAGE.set_name('PV', 'PV_DENY_CREATE_PREREQ_RULE');
231: FND_MSG_PUB.add;
232: END IF;
233: RAISE FND_API.G_EXC_ERROR;
234: ELSE
235: CLOSE c_program_id_exists;
236: END If;
237:

Line 242: IF p_pec_rules_rec.enrl_change_rule_id IS NULL OR p_pec_rules_rec.enrl_change_rule_id = FND_API.g_miss_num THEN

238:
239:
240: -- Local variable initialization
241:
242: IF p_pec_rules_rec.enrl_change_rule_id IS NULL OR p_pec_rules_rec.enrl_change_rule_id = FND_API.g_miss_num THEN
243: LOOP
244: l_dummy := NULL;
245: OPEN c_id;
246: FETCH c_id INTO l_pec_rules_rec.enrl_change_rule_id;

Line 266: RAISE FND_API.G_EXC_ERROR;

262:
263: IF FND_GLOBAL.USER_ID IS NULL
264: THEN
265: PVX_Utility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
266: RAISE FND_API.G_EXC_ERROR;
267: END IF;
268:
269: IF (PV_DEBUG_HIGH_ON) THEN
270:

Line 277: IF ( p_validation_level >= FND_API.G_VALID_LEVEL_FULL)

273: PVX_UTILITY_PVT.debug_message('Before Validating ');
274:
275: END IF;
276:
277: IF ( p_validation_level >= FND_API.G_VALID_LEVEL_FULL)
278: THEN
279: -- Debug message
280: IF (PV_DEBUG_HIGH_ON) THEN
281:

Line 298: p_init_msg_list => FND_API.G_FALSE,

294:
295: -- Invoke validation procedures
296: Validate_pec_rules(
297: p_api_version_number => 1.0,
298: p_init_msg_list => FND_API.G_FALSE,
299: p_validation_level => p_validation_level,
300: p_validation_mode => JTF_PLSQL_API.g_create,
301: p_pec_rules_rec => l_pec_rules_rec,
302: x_return_status => x_return_status,

Line 316: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

312:
313: END IF;
314:
315:
316: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
317: RAISE FND_API.G_EXC_ERROR;
318: END IF;
319:
320:

Line 317: RAISE FND_API.G_EXC_ERROR;

313: END IF;
314:
315:
316: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
317: RAISE FND_API.G_EXC_ERROR;
318: END IF;
319:
320:
321: -- Debug Message

Line 377: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

373:
374: x_enrl_change_rule_id := l_enrl_change_rule_id;
375: END IF;
376:
377: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
378: RAISE FND_API.G_EXC_ERROR;
379: END IF;
380: --
381: -- End of API body

Line 378: RAISE FND_API.G_EXC_ERROR;

374: x_enrl_change_rule_id := l_enrl_change_rule_id;
375: END IF;
376:
377: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
378: RAISE FND_API.G_EXC_ERROR;
379: END IF;
380: --
381: -- End of API body
382: --

Line 385: IF FND_API.to_Boolean( p_commit )

381: -- End of API body
382: --
383:
384: -- Standard check for p_commit
385: IF FND_API.to_Boolean( p_commit )
386: THEN
387: COMMIT WORK;
388: END IF;
389:

Line 409: x_return_status := FND_API.g_ret_sts_error;

405:
406: EXCEPTION
407:
408: WHEN PVX_Utility_PVT.resource_locked THEN
409: x_return_status := FND_API.g_ret_sts_error;
410: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
411:
412: WHEN FND_API.G_EXC_ERROR THEN
413: ROLLBACK TO CREATE_Pec_Rules_PVT;

Line 412: WHEN FND_API.G_EXC_ERROR THEN

408: WHEN PVX_Utility_PVT.resource_locked THEN
409: x_return_status := FND_API.g_ret_sts_error;
410: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
411:
412: WHEN FND_API.G_EXC_ERROR THEN
413: ROLLBACK TO CREATE_Pec_Rules_PVT;
414: x_return_status := FND_API.G_RET_STS_ERROR;
415: -- Standard call to get message count and if count=1, get the message
416: FND_MSG_PUB.Count_And_Get (

Line 414: x_return_status := FND_API.G_RET_STS_ERROR;

410: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
411:
412: WHEN FND_API.G_EXC_ERROR THEN
413: ROLLBACK TO CREATE_Pec_Rules_PVT;
414: x_return_status := FND_API.G_RET_STS_ERROR;
415: -- Standard call to get message count and if count=1, get the message
416: FND_MSG_PUB.Count_And_Get (
417: p_encoded => FND_API.G_FALSE,
418: p_count => x_msg_count,

Line 417: p_encoded => FND_API.G_FALSE,

413: ROLLBACK TO CREATE_Pec_Rules_PVT;
414: x_return_status := FND_API.G_RET_STS_ERROR;
415: -- Standard call to get message count and if count=1, get the message
416: FND_MSG_PUB.Count_And_Get (
417: p_encoded => FND_API.G_FALSE,
418: p_count => x_msg_count,
419: p_data => x_msg_data
420: );
421:

Line 422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

418: p_count => x_msg_count,
419: p_data => x_msg_data
420: );
421:
422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
423: ROLLBACK TO CREATE_Pec_Rules_PVT;
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: -- Standard call to get message count and if count=1, get the message
426: FND_MSG_PUB.Count_And_Get (

Line 424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

420: );
421:
422: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
423: ROLLBACK TO CREATE_Pec_Rules_PVT;
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: -- Standard call to get message count and if count=1, get the message
426: FND_MSG_PUB.Count_And_Get (
427: p_encoded => FND_API.G_FALSE,
428: p_count => x_msg_count,

Line 427: p_encoded => FND_API.G_FALSE,

423: ROLLBACK TO CREATE_Pec_Rules_PVT;
424: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
425: -- Standard call to get message count and if count=1, get the message
426: FND_MSG_PUB.Count_And_Get (
427: p_encoded => FND_API.G_FALSE,
428: p_count => x_msg_count,
429: p_data => x_msg_data
430: );
431:

Line 434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

430: );
431:
432: WHEN OTHERS THEN
433: ROLLBACK TO CREATE_Pec_Rules_PVT;
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
435: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
436: THEN
437: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
438: END IF;

Line 441: p_encoded => FND_API.G_FALSE,

437: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
438: END IF;
439: -- Standard call to get message count and if count=1, get the message
440: FND_MSG_PUB.Count_And_Get (
441: p_encoded => FND_API.G_FALSE,
442: p_count => x_msg_count,
443: p_data => x_msg_data
444: );
445: End Create_Pec_Rules;

Line 461: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

457: -- Parameters
458: --
459: -- IN
460: -- p_api_version_number IN NUMBER Required
461: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
462: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
463: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
464: -- p_pec_rules_rec IN pec_rules_rec_type Required
465: --

Line 462: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

458: --
459: -- IN
460: -- p_api_version_number IN NUMBER Required
461: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
462: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
463: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
464: -- p_pec_rules_rec IN pec_rules_rec_type Required
465: --
466: -- OUT

Line 463: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

459: -- IN
460: -- p_api_version_number IN NUMBER Required
461: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
462: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
463: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
464: -- p_pec_rules_rec IN pec_rules_rec_type Required
465: --
466: -- OUT
467: -- x_return_status OUT VARCHAR2

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

479: -- ==============================================================================
480:
481: PROCEDURE Update_Pec_Rules(
482: p_api_version_number IN NUMBER,
483: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486:
487: x_return_status OUT NOCOPY VARCHAR2,

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

480:
481: PROCEDURE Update_Pec_Rules(
482: p_api_version_number IN NUMBER,
483: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486:
487: x_return_status OUT NOCOPY VARCHAR2,
488: x_msg_count OUT NOCOPY NUMBER,

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

481: PROCEDURE Update_Pec_Rules(
482: p_api_version_number IN NUMBER,
483: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
484: p_commit IN VARCHAR2 := FND_API.G_FALSE,
485: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
486:
487: x_return_status OUT NOCOPY VARCHAR2,
488: x_msg_count OUT NOCOPY NUMBER,
489: x_msg_data OUT NOCOPY VARCHAR2,

Line 532: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

528: -- Standard Start of API savepoint
529: SAVEPOINT update_pec_rules_pvt;
530:
531: -- Standard call to check for call compatibility.
532: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
533: p_api_version_number,
534: l_api_name,
535: G_PKG_NAME)
536: THEN

Line 537: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

533: p_api_version_number,
534: l_api_name,
535: G_PKG_NAME)
536: THEN
537: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
538: END IF;
539:
540:
541: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 542: IF FND_API.to_Boolean( p_init_msg_list )

538: END IF;
539:
540:
541: -- Initialize message list if p_init_msg_list is set to TRUE.
542: IF FND_API.to_Boolean( p_init_msg_list )
543: THEN
544: FND_MSG_PUB.initialize;
545: END IF;
546:

Line 558: x_return_status := FND_API.G_RET_STS_SUCCESS;

554:
555:
556:
557: -- Initialize API return status to SUCCESS
558: x_return_status := FND_API.G_RET_STS_SUCCESS;
559:
560: -- Debug Message
561: IF (PV_DEBUG_HIGH_ON) THEN
562:

Line 574: RAISE FND_API.G_EXC_ERROR;

570: If ( c_get_Pec_Rules%NOTFOUND) THEN
571: PVX_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
572: p_token_name => 'INFO',
573: p_token_value => 'Pec_Rules') ;
574: RAISE FND_API.G_EXC_ERROR;
575: END IF;
576: -- Debug Message
577: IF (PV_DEBUG_HIGH_ON) THEN
578:

Line 587: l_tar_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM ) Then

583: -- l_tar_pec_rules_rec.object_version_number := l_object_version_number;
584:
585:
586: If (l_tar_pec_rules_rec.object_version_number is NULL or
587: l_tar_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM ) Then
588: PVX_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
589: p_token_name => 'COLUMN',
590: p_token_value => 'Last_Update_Date') ;
591: raise FND_API.G_EXC_ERROR;

Line 591: raise FND_API.G_EXC_ERROR;

587: l_tar_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM ) Then
588: PVX_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
589: p_token_name => 'COLUMN',
590: p_token_value => 'Last_Update_Date') ;
591: raise FND_API.G_EXC_ERROR;
592: End if;
593: -- Check Whether record has been changed by someone else
594: If (l_tar_pec_rules_rec.object_version_number <> l_ref_pec_rules_rec.object_version_number) Then
595: PVX_Utility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',

Line 598: raise FND_API.G_EXC_ERROR;

594: If (l_tar_pec_rules_rec.object_version_number <> l_ref_pec_rules_rec.object_version_number) Then
595: PVX_Utility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
596: p_token_name => 'INFO',
597: p_token_value => 'Pec_Rules') ;
598: raise FND_API.G_EXC_ERROR;
599: End if;
600:
601:
602: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

Line 602: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)

598: raise FND_API.G_EXC_ERROR;
599: End if;
600:
601:
602: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
603: THEN
604: -- Debug message
605: IF (PV_DEBUG_HIGH_ON) THEN
606:

Line 613: p_init_msg_list => FND_API.G_FALSE,

609:
610: -- Invoke validation procedures
611: Validate_pec_rules(
612: p_api_version_number => 1.0,
613: p_init_msg_list => FND_API.G_FALSE,
614: p_validation_level => p_validation_level,
615: p_validation_mode => JTF_PLSQL_API.g_update,
616: p_pec_rules_rec => p_pec_rules_rec,
617: x_return_status => x_return_status,

Line 622: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

618: x_msg_count => x_msg_count,
619: x_msg_data => x_msg_data);
620: END IF;
621:
622: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
623: RAISE FND_API.G_EXC_ERROR;
624: END IF;
625:
626:

Line 623: RAISE FND_API.G_EXC_ERROR;

619: x_msg_data => x_msg_data);
620: END IF;
621:
622: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
623: RAISE FND_API.G_EXC_ERROR;
624: END IF;
625:
626:
627: -- Debug Message

Line 674: IF FND_API.to_Boolean( p_commit )

670: -- End of API body.
671: --
672:
673: -- Standard check for p_commit
674: IF FND_API.to_Boolean( p_commit )
675: THEN
676: COMMIT WORK;
677: END IF;
678:

Line 695: x_return_status := FND_API.g_ret_sts_error;

691: );
692: EXCEPTION
693:
694: WHEN PVX_Utility_PVT.resource_locked THEN
695: x_return_status := FND_API.g_ret_sts_error;
696: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
697:
698: WHEN FND_API.G_EXC_ERROR THEN
699: ROLLBACK TO UPDATE_Pec_Rules_PVT;

Line 698: WHEN FND_API.G_EXC_ERROR THEN

694: WHEN PVX_Utility_PVT.resource_locked THEN
695: x_return_status := FND_API.g_ret_sts_error;
696: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
697:
698: WHEN FND_API.G_EXC_ERROR THEN
699: ROLLBACK TO UPDATE_Pec_Rules_PVT;
700: x_return_status := FND_API.G_RET_STS_ERROR;
701: -- Standard call to get message count and if count=1, get the message
702: FND_MSG_PUB.Count_And_Get (

Line 700: x_return_status := FND_API.G_RET_STS_ERROR;

696: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
697:
698: WHEN FND_API.G_EXC_ERROR THEN
699: ROLLBACK TO UPDATE_Pec_Rules_PVT;
700: x_return_status := FND_API.G_RET_STS_ERROR;
701: -- Standard call to get message count and if count=1, get the message
702: FND_MSG_PUB.Count_And_Get (
703: p_encoded => FND_API.G_FALSE,
704: p_count => x_msg_count,

Line 703: p_encoded => FND_API.G_FALSE,

699: ROLLBACK TO UPDATE_Pec_Rules_PVT;
700: x_return_status := FND_API.G_RET_STS_ERROR;
701: -- Standard call to get message count and if count=1, get the message
702: FND_MSG_PUB.Count_And_Get (
703: p_encoded => FND_API.G_FALSE,
704: p_count => x_msg_count,
705: p_data => x_msg_data
706: );
707:

Line 708: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

704: p_count => x_msg_count,
705: p_data => x_msg_data
706: );
707:
708: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
709: ROLLBACK TO UPDATE_Pec_Rules_PVT;
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: -- Standard call to get message count and if count=1, get the message
712: FND_MSG_PUB.Count_And_Get (

Line 710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

706: );
707:
708: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
709: ROLLBACK TO UPDATE_Pec_Rules_PVT;
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: -- Standard call to get message count and if count=1, get the message
712: FND_MSG_PUB.Count_And_Get (
713: p_encoded => FND_API.G_FALSE,
714: p_count => x_msg_count,

Line 713: p_encoded => FND_API.G_FALSE,

709: ROLLBACK TO UPDATE_Pec_Rules_PVT;
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: -- Standard call to get message count and if count=1, get the message
712: FND_MSG_PUB.Count_And_Get (
713: p_encoded => FND_API.G_FALSE,
714: p_count => x_msg_count,
715: p_data => x_msg_data
716: );
717:

Line 720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

716: );
717:
718: WHEN OTHERS THEN
719: ROLLBACK TO UPDATE_Pec_Rules_PVT;
720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
721: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
722: THEN
723: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
724: END IF;

Line 727: p_encoded => FND_API.G_FALSE,

723: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
724: END IF;
725: -- Standard call to get message count and if count=1, get the message
726: FND_MSG_PUB.Count_And_Get (
727: p_encoded => FND_API.G_FALSE,
728: p_count => x_msg_count,
729: p_data => x_msg_data
730: );
731: End Update_Pec_Rules;

Line 747: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

743: -- Parameters
744: --
745: -- IN
746: -- p_api_version_number IN NUMBER Required
747: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
748: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
749: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
750: -- p_enrl_change_rule_id IN NUMBER
751: -- p_object_version_number IN NUMBER Optional Default = NULL

Line 748: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

744: --
745: -- IN
746: -- p_api_version_number IN NUMBER Required
747: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
748: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
749: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
750: -- p_enrl_change_rule_id IN NUMBER
751: -- p_object_version_number IN NUMBER Optional Default = NULL
752: --

Line 749: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

745: -- IN
746: -- p_api_version_number IN NUMBER Required
747: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
748: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
749: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
750: -- p_enrl_change_rule_id IN NUMBER
751: -- p_object_version_number IN NUMBER Optional Default = NULL
752: --
753: -- OUT

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

766: -- ==============================================================================
767:
768: PROCEDURE Delete_Pec_Rules(
769: p_api_version_number IN NUMBER,
770: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
771: p_commit IN VARCHAR2 := FND_API.G_FALSE,
772: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
773: x_return_status OUT NOCOPY VARCHAR2,
774: x_msg_count OUT NOCOPY NUMBER,

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

767:
768: PROCEDURE Delete_Pec_Rules(
769: p_api_version_number IN NUMBER,
770: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
771: p_commit IN VARCHAR2 := FND_API.G_FALSE,
772: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
773: x_return_status OUT NOCOPY VARCHAR2,
774: x_msg_count OUT NOCOPY NUMBER,
775: x_msg_data OUT NOCOPY VARCHAR2,

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

768: PROCEDURE Delete_Pec_Rules(
769: p_api_version_number IN NUMBER,
770: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
771: p_commit IN VARCHAR2 := FND_API.G_FALSE,
772: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
773: x_return_status OUT NOCOPY VARCHAR2,
774: x_msg_count OUT NOCOPY NUMBER,
775: x_msg_data OUT NOCOPY VARCHAR2,
776: p_enrl_change_rule_id IN NUMBER,

Line 809: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

805: -- Standard Start of API savepoint
806: SAVEPOINT delete_pec_rules_pvt;
807:
808: -- Standard call to check for call compatibility.
809: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
810: p_api_version_number,
811: l_api_name,
812: G_PKG_NAME)
813: THEN

Line 814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

810: p_api_version_number,
811: l_api_name,
812: G_PKG_NAME)
813: THEN
814: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
815: END IF;
816:
817:
818: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 819: IF FND_API.to_Boolean( p_init_msg_list )

815: END IF;
816:
817:
818: -- Initialize message list if p_init_msg_list is set to TRUE.
819: IF FND_API.to_Boolean( p_init_msg_list )
820: THEN
821: FND_MSG_PUB.initialize;
822: END IF;
823:

Line 835: x_return_status := FND_API.G_RET_STS_SUCCESS;

831:
832:
833:
834: -- Initialize API return status to SUCCESS
835: x_return_status := FND_API.G_RET_STS_SUCCESS;
836:
837: --
838: -- Api body
839: --

Line 871: RAISE FND_API.G_EXC_ERROR;

867: If ( c_get_pec_rec%NOTFOUND) THEN
868: PVX_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
869: p_token_name => 'INFO',
870: p_token_value => 'Pec_Rules') ;
871: RAISE FND_API.G_EXC_ERROR;
872: END IF;
873: -- Debug Message
874: IF (PV_DEBUG_HIGH_ON) THEN
875:

Line 925: RAISE FND_API.G_EXC_ERROR;

921: FND_MESSAGE.set_name('PV', 'PV_MISC_ERROR_GROUP_CREATE');
922: FND_MESSAGE.set_token('ID',to_char(from_id_rev));
923: FND_MESSAGE.set_token('ID',to_char(to_id_rev));
924: FND_MSG_PUB.add;
925: RAISE FND_API.G_EXC_ERROR;
926: END IF;
927: -- Debug Message
928: IF (PV_DEBUG_HIGH_ON) THEN
929:

Line 952: IF FND_API.to_Boolean( p_commit )

948: END LOOP;
949: END IF;
950:
951: -- Standard check for p_commit
952: IF FND_API.to_Boolean( p_commit )
953: THEN
954: COMMIT WORK;
955: END IF;
956:

Line 973: x_return_status := FND_API.g_ret_sts_error;

969: );
970: EXCEPTION
971:
972: WHEN PVX_Utility_PVT.resource_locked THEN
973: x_return_status := FND_API.g_ret_sts_error;
974: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
975:
976: WHEN FND_API.G_EXC_ERROR THEN
977: ROLLBACK TO DELETE_Pec_Rules_PVT;

Line 976: WHEN FND_API.G_EXC_ERROR THEN

972: WHEN PVX_Utility_PVT.resource_locked THEN
973: x_return_status := FND_API.g_ret_sts_error;
974: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
975:
976: WHEN FND_API.G_EXC_ERROR THEN
977: ROLLBACK TO DELETE_Pec_Rules_PVT;
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: -- Standard call to get message count and if count=1, get the message
980: FND_MSG_PUB.Count_And_Get (

Line 978: x_return_status := FND_API.G_RET_STS_ERROR;

974: PVX_Utility_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
975:
976: WHEN FND_API.G_EXC_ERROR THEN
977: ROLLBACK TO DELETE_Pec_Rules_PVT;
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: -- Standard call to get message count and if count=1, get the message
980: FND_MSG_PUB.Count_And_Get (
981: p_encoded => FND_API.G_FALSE,
982: p_count => x_msg_count,

Line 981: p_encoded => FND_API.G_FALSE,

977: ROLLBACK TO DELETE_Pec_Rules_PVT;
978: x_return_status := FND_API.G_RET_STS_ERROR;
979: -- Standard call to get message count and if count=1, get the message
980: FND_MSG_PUB.Count_And_Get (
981: p_encoded => FND_API.G_FALSE,
982: p_count => x_msg_count,
983: p_data => x_msg_data
984: );
985:

Line 986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

982: p_count => x_msg_count,
983: p_data => x_msg_data
984: );
985:
986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
987: ROLLBACK TO DELETE_Pec_Rules_PVT;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: -- Standard call to get message count and if count=1, get the message
990: FND_MSG_PUB.Count_And_Get (

Line 988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

984: );
985:
986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
987: ROLLBACK TO DELETE_Pec_Rules_PVT;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: -- Standard call to get message count and if count=1, get the message
990: FND_MSG_PUB.Count_And_Get (
991: p_encoded => FND_API.G_FALSE,
992: p_count => x_msg_count,

Line 991: p_encoded => FND_API.G_FALSE,

987: ROLLBACK TO DELETE_Pec_Rules_PVT;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: -- Standard call to get message count and if count=1, get the message
990: FND_MSG_PUB.Count_And_Get (
991: p_encoded => FND_API.G_FALSE,
992: p_count => x_msg_count,
993: p_data => x_msg_data
994: );
995:

Line 998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

994: );
995:
996: WHEN OTHERS THEN
997: ROLLBACK TO DELETE_Pec_Rules_PVT;
998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
999: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1000: THEN
1001: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1002: END IF;

Line 1005: p_encoded => FND_API.G_FALSE,

1001: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1002: END IF;
1003: -- Standard call to get message count and if count=1, get the message
1004: FND_MSG_PUB.Count_And_Get (
1005: p_encoded => FND_API.G_FALSE,
1006: p_count => x_msg_count,
1007: p_data => x_msg_data
1008: );
1009: End Delete_Pec_Rules;

Line 1027: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

1023: -- Parameters
1024: --
1025: -- IN
1026: -- p_api_version_number IN NUMBER Required
1027: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1028: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1029: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1030: -- p_pec_rules_rec IN pec_rules_rec_type Required
1031: --

Line 1028: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

1024: --
1025: -- IN
1026: -- p_api_version_number IN NUMBER Required
1027: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1028: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1029: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1030: -- p_pec_rules_rec IN pec_rules_rec_type Required
1031: --
1032: -- OUT

Line 1029: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

1025: -- IN
1026: -- p_api_version_number IN NUMBER Required
1027: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1028: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1029: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1030: -- p_pec_rules_rec IN pec_rules_rec_type Required
1031: --
1032: -- OUT
1033: -- x_return_status OUT VARCHAR2

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

1045: -- ==============================================================================
1046:
1047: PROCEDURE Lock_Pec_Rules(
1048: p_api_version_number IN NUMBER,
1049: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1050:
1051: x_return_status OUT NOCOPY VARCHAR2,
1052: x_msg_count OUT NOCOPY NUMBER,
1053: x_msg_data OUT NOCOPY VARCHAR2,

Line 1075: IF FND_API.to_Boolean( p_init_msg_list )

1071: END IF;
1072:
1073:
1074: -- Initialize message list if p_init_msg_list is set to TRUE.
1075: IF FND_API.to_Boolean( p_init_msg_list )
1076: THEN
1077: FND_MSG_PUB.initialize;
1078: END IF;
1079:

Line 1083: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1079:
1080:
1081:
1082: -- Standard call to check for call compatibility.
1083: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1084: p_api_version_number,
1085: l_api_name,
1086: G_PKG_NAME)
1087: THEN

Line 1088: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1084: p_api_version_number,
1085: l_api_name,
1086: G_PKG_NAME)
1087: THEN
1088: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1089: END IF;
1090:
1091:
1092:

Line 1094: x_return_status := FND_API.G_RET_STS_SUCCESS;

1090:
1091:
1092:
1093: -- Initialize API return status to SUCCESS
1094: x_return_status := FND_API.G_RET_STS_SUCCESS;
1095:
1096:
1097: ------------------------ lock -------------------------
1098: Pv_Pec_Rules_Pkg.Lock_Row(l_enrl_change_rule_id,p_object_version);

Line 1103: p_encoded => FND_API.g_false,

1099:
1100:
1101: -------------------- finish --------------------------
1102: FND_MSG_PUB.count_and_get(
1103: p_encoded => FND_API.g_false,
1104: p_count => x_msg_count,
1105: p_data => x_msg_data);
1106: IF (PV_DEBUG_HIGH_ON) THEN
1107:

Line 1113: x_return_status := FND_API.g_ret_sts_error;

1109: END IF;
1110: EXCEPTION
1111:
1112: WHEN PVX_UTIlity_PVT.resource_locked THEN
1113: x_return_status := FND_API.g_ret_sts_error;
1114: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1115:
1116: WHEN FND_API.G_EXC_ERROR THEN
1117: ROLLBACK TO LOCK_Pec_Rules_PVT;

Line 1116: WHEN FND_API.G_EXC_ERROR THEN

1112: WHEN PVX_UTIlity_PVT.resource_locked THEN
1113: x_return_status := FND_API.g_ret_sts_error;
1114: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1115:
1116: WHEN FND_API.G_EXC_ERROR THEN
1117: ROLLBACK TO LOCK_Pec_Rules_PVT;
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: -- Standard call to get message count and if count=1, get the message
1120: FND_MSG_PUB.Count_And_Get (

Line 1118: x_return_status := FND_API.G_RET_STS_ERROR;

1114: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1115:
1116: WHEN FND_API.G_EXC_ERROR THEN
1117: ROLLBACK TO LOCK_Pec_Rules_PVT;
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: -- Standard call to get message count and if count=1, get the message
1120: FND_MSG_PUB.Count_And_Get (
1121: p_encoded => FND_API.G_FALSE,
1122: p_count => x_msg_count,

Line 1121: p_encoded => FND_API.G_FALSE,

1117: ROLLBACK TO LOCK_Pec_Rules_PVT;
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: -- Standard call to get message count and if count=1, get the message
1120: FND_MSG_PUB.Count_And_Get (
1121: p_encoded => FND_API.G_FALSE,
1122: p_count => x_msg_count,
1123: p_data => x_msg_data
1124: );
1125:

Line 1126: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1122: p_count => x_msg_count,
1123: p_data => x_msg_data
1124: );
1125:
1126: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1127: ROLLBACK TO LOCK_Pec_Rules_PVT;
1128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1129: -- Standard call to get message count and if count=1, get the message
1130: FND_MSG_PUB.Count_And_Get (

Line 1128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1124: );
1125:
1126: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1127: ROLLBACK TO LOCK_Pec_Rules_PVT;
1128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1129: -- Standard call to get message count and if count=1, get the message
1130: FND_MSG_PUB.Count_And_Get (
1131: p_encoded => FND_API.G_FALSE,
1132: p_count => x_msg_count,

Line 1131: p_encoded => FND_API.G_FALSE,

1127: ROLLBACK TO LOCK_Pec_Rules_PVT;
1128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1129: -- Standard call to get message count and if count=1, get the message
1130: FND_MSG_PUB.Count_And_Get (
1131: p_encoded => FND_API.G_FALSE,
1132: p_count => x_msg_count,
1133: p_data => x_msg_data
1134: );
1135:

Line 1138: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1134: );
1135:
1136: WHEN OTHERS THEN
1137: ROLLBACK TO LOCK_Pec_Rules_PVT;
1138: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1139: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1140: THEN
1141: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1142: END IF;

Line 1145: p_encoded => FND_API.G_FALSE,

1141: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1142: END IF;
1143: -- Standard call to get message count and if count=1, get the message
1144: FND_MSG_PUB.Count_And_Get (
1145: p_encoded => FND_API.G_FALSE,
1146: p_count => x_msg_count,
1147: p_data => x_msg_data
1148: );
1149: End Lock_Pec_Rules;

Line 1167: x_return_status := FND_API.g_ret_sts_success;

1163:
1164: PVX_UTILITY_PVT.debug_message('Inside check uk 1');
1165: END IF;
1166:
1167: x_return_status := FND_API.g_ret_sts_success;
1168:
1169:
1170: IF p_validation_mode = JTF_PLSQL_API.g_create
1171: AND p_pec_rules_rec.enrl_change_rule_id IS NOT NULL

Line 1187: IF l_valid_flag = FND_API.g_false THEN

1183: PVX_UTILITY_PVT.debug_message('Inside check uk 2' || l_valid_flag);
1184:
1185: END IF;
1186:
1187: IF l_valid_flag = FND_API.g_false THEN
1188: --PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_enrl_change_rule_id_DUPLICATE');
1189: x_return_status := FND_API.g_ret_sts_error;
1190: -- x_return_status := FND_API.g_ret_sts_success;
1191: END IF;

Line 1189: x_return_status := FND_API.g_ret_sts_error;

1185: END IF;
1186:
1187: IF l_valid_flag = FND_API.g_false THEN
1188: --PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_enrl_change_rule_id_DUPLICATE');
1189: x_return_status := FND_API.g_ret_sts_error;
1190: -- x_return_status := FND_API.g_ret_sts_success;
1191: END IF;
1192:
1193: IF (PV_DEBUG_HIGH_ON) THEN

Line 1190: -- x_return_status := FND_API.g_ret_sts_success;

1186:
1187: IF l_valid_flag = FND_API.g_false THEN
1188: --PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_enrl_change_rule_id_DUPLICATE');
1189: x_return_status := FND_API.g_ret_sts_error;
1190: -- x_return_status := FND_API.g_ret_sts_success;
1191: END IF;
1192:
1193: IF (PV_DEBUG_HIGH_ON) THEN
1194:

Line 1213: x_return_status := FND_API.g_ret_sts_success;

1209: x_return_status OUT NOCOPY VARCHAR2
1210: )
1211: IS
1212: BEGIN
1213: x_return_status := FND_API.g_ret_sts_success;
1214:
1215: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1216:
1217:

Line 1218: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.enrl_change_rule_id IS NULL THEN

1214:
1215: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1216:
1217:
1218: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.enrl_change_rule_id IS NULL THEN
1219: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ENRL_CHANGE_RULE_ID' );
1220: x_return_status := FND_API.g_ret_sts_error;
1221: END IF;
1222:

Line 1220: x_return_status := FND_API.g_ret_sts_error;

1216:
1217:
1218: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.enrl_change_rule_id IS NULL THEN
1219: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ENRL_CHANGE_RULE_ID' );
1220: x_return_status := FND_API.g_ret_sts_error;
1221: END IF;
1222:
1223:
1224: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM OR p_pec_rules_rec.object_version_number IS NULL THEN

Line 1224: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM OR p_pec_rules_rec.object_version_number IS NULL THEN

1220: x_return_status := FND_API.g_ret_sts_error;
1221: END IF;
1222:
1223:
1224: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM OR p_pec_rules_rec.object_version_number IS NULL THEN
1225: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
1226: x_return_status := FND_API.g_ret_sts_error;
1227: END IF;
1228:

Line 1226: x_return_status := FND_API.g_ret_sts_error;

1222:
1223:
1224: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM OR p_pec_rules_rec.object_version_number IS NULL THEN
1225: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
1226: x_return_status := FND_API.g_ret_sts_error;
1227: END IF;
1228:
1229:
1230: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_from_program_id IS NULL THEN

Line 1230: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_from_program_id IS NULL THEN

1226: x_return_status := FND_API.g_ret_sts_error;
1227: END IF;
1228:
1229:
1230: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_from_program_id IS NULL THEN
1231: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_FROM_PROGRAM_ID' );
1232: x_return_status := FND_API.g_ret_sts_error;
1233: END IF;
1234:

Line 1232: x_return_status := FND_API.g_ret_sts_error;

1228:
1229:
1230: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_from_program_id IS NULL THEN
1231: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_FROM_PROGRAM_ID' );
1232: x_return_status := FND_API.g_ret_sts_error;
1233: END IF;
1234:
1235:
1236: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_to_program_id IS NULL THEN

Line 1236: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_to_program_id IS NULL THEN

1232: x_return_status := FND_API.g_ret_sts_error;
1233: END IF;
1234:
1235:
1236: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_to_program_id IS NULL THEN
1237: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_TO_PROGRAM_ID' );
1238: x_return_status := FND_API.g_ret_sts_error;
1239: END IF;
1240:

Line 1238: x_return_status := FND_API.g_ret_sts_error;

1234:
1235:
1236: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM OR p_pec_rules_rec.change_to_program_id IS NULL THEN
1237: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_TO_PROGRAM_ID' );
1238: x_return_status := FND_API.g_ret_sts_error;
1239: END IF;
1240:
1241:
1242: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char OR p_pec_rules_rec.change_direction_code IS NULL THEN

Line 1242: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char OR p_pec_rules_rec.change_direction_code IS NULL THEN

1238: x_return_status := FND_API.g_ret_sts_error;
1239: END IF;
1240:
1241:
1242: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char OR p_pec_rules_rec.change_direction_code IS NULL THEN
1243: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_DIRECTION_CODE' );
1244: x_return_status := FND_API.g_ret_sts_error;
1245: END IF;
1246:

Line 1244: x_return_status := FND_API.g_ret_sts_error;

1240:
1241:
1242: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char OR p_pec_rules_rec.change_direction_code IS NULL THEN
1243: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_DIRECTION_CODE' );
1244: x_return_status := FND_API.g_ret_sts_error;
1245: END IF;
1246:
1247:
1248: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE OR p_pec_rules_rec.effective_from_date IS NULL THEN

Line 1248: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE OR p_pec_rules_rec.effective_from_date IS NULL THEN

1244: x_return_status := FND_API.g_ret_sts_error;
1245: END IF;
1246:
1247:
1248: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE OR p_pec_rules_rec.effective_from_date IS NULL THEN
1249: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'EFFECTIVE_FROM_DATE' );
1250: x_return_status := FND_API.g_ret_sts_error;
1251: END IF;
1252:

Line 1250: x_return_status := FND_API.g_ret_sts_error;

1246:
1247:
1248: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE OR p_pec_rules_rec.effective_from_date IS NULL THEN
1249: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'EFFECTIVE_FROM_DATE' );
1250: x_return_status := FND_API.g_ret_sts_error;
1251: END IF;
1252:
1253:
1254: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char OR p_pec_rules_rec.active_flag IS NULL THEN

Line 1254: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char OR p_pec_rules_rec.active_flag IS NULL THEN

1250: x_return_status := FND_API.g_ret_sts_error;
1251: END IF;
1252:
1253:
1254: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char OR p_pec_rules_rec.active_flag IS NULL THEN
1255: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ACTIVE_FLAG' );
1256: x_return_status := FND_API.g_ret_sts_error;
1257: END IF;
1258:

Line 1256: x_return_status := FND_API.g_ret_sts_error;

1252:
1253:
1254: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char OR p_pec_rules_rec.active_flag IS NULL THEN
1255: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ACTIVE_FLAG' );
1256: x_return_status := FND_API.g_ret_sts_error;
1257: END IF;
1258:
1259:
1260: ELSE

Line 1263: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM THEN

1259:
1260: ELSE
1261:
1262:
1263: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM THEN
1264: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ENRL_CHANGE_RULE_ID' );
1265: x_return_status := FND_API.g_ret_sts_error;
1266: END IF;
1267:

Line 1265: x_return_status := FND_API.g_ret_sts_error;

1261:
1262:
1263: IF p_pec_rules_rec.enrl_change_rule_id = FND_API.G_MISS_NUM THEN
1264: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ENRL_CHANGE_RULE_ID' );
1265: x_return_status := FND_API.g_ret_sts_error;
1266: END IF;
1267:
1268:
1269: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM THEN

Line 1269: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM THEN

1265: x_return_status := FND_API.g_ret_sts_error;
1266: END IF;
1267:
1268:
1269: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM THEN
1270: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
1271: x_return_status := FND_API.g_ret_sts_error;
1272: END IF;
1273:

Line 1271: x_return_status := FND_API.g_ret_sts_error;

1267:
1268:
1269: IF p_pec_rules_rec.object_version_number = FND_API.G_MISS_NUM THEN
1270: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'OBJECT_VERSION_NUMBER' );
1271: x_return_status := FND_API.g_ret_sts_error;
1272: END IF;
1273:
1274:
1275: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM THEN

Line 1275: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM THEN

1271: x_return_status := FND_API.g_ret_sts_error;
1272: END IF;
1273:
1274:
1275: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM THEN
1276: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_FROM_PROGRAM_ID' );
1277: x_return_status := FND_API.g_ret_sts_error;
1278: END IF;
1279:

Line 1277: x_return_status := FND_API.g_ret_sts_error;

1273:
1274:
1275: IF p_pec_rules_rec.change_from_program_id = FND_API.G_MISS_NUM THEN
1276: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_FROM_PROGRAM_ID' );
1277: x_return_status := FND_API.g_ret_sts_error;
1278: END IF;
1279:
1280:
1281: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM THEN

Line 1281: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM THEN

1277: x_return_status := FND_API.g_ret_sts_error;
1278: END IF;
1279:
1280:
1281: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM THEN
1282: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_TO_PROGRAM_ID' );
1283: x_return_status := FND_API.g_ret_sts_error;
1284: END IF;
1285:

Line 1283: x_return_status := FND_API.g_ret_sts_error;

1279:
1280:
1281: IF p_pec_rules_rec.change_to_program_id = FND_API.G_MISS_NUM THEN
1282: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_TO_PROGRAM_ID' );
1283: x_return_status := FND_API.g_ret_sts_error;
1284: END IF;
1285:
1286:
1287: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char THEN

Line 1287: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char THEN

1283: x_return_status := FND_API.g_ret_sts_error;
1284: END IF;
1285:
1286:
1287: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char THEN
1288: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_DIRECTION_CODE' );
1289: x_return_status := FND_API.g_ret_sts_error;
1290: END IF;
1291:

Line 1289: x_return_status := FND_API.g_ret_sts_error;

1285:
1286:
1287: IF p_pec_rules_rec.change_direction_code = FND_API.g_miss_char THEN
1288: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'CHANGE_DIRECTION_CODE' );
1289: x_return_status := FND_API.g_ret_sts_error;
1290: END IF;
1291:
1292:
1293: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE THEN

Line 1293: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE THEN

1289: x_return_status := FND_API.g_ret_sts_error;
1290: END IF;
1291:
1292:
1293: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE THEN
1294: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'EFFECTIVE_FROM_DATE' );
1295: x_return_status := FND_API.g_ret_sts_error;
1296: END IF;
1297:

Line 1295: x_return_status := FND_API.g_ret_sts_error;

1291:
1292:
1293: IF p_pec_rules_rec.effective_from_date = FND_API.G_MISS_DATE THEN
1294: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'EFFECTIVE_FROM_DATE' );
1295: x_return_status := FND_API.g_ret_sts_error;
1296: END IF;
1297:
1298:
1299: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char THEN

Line 1299: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char THEN

1295: x_return_status := FND_API.g_ret_sts_error;
1296: END IF;
1297:
1298:
1299: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char THEN
1300: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ACTIVE_FLAG' );
1301: x_return_status := FND_API.g_ret_sts_error;
1302: END IF;
1303: END IF;

Line 1301: x_return_status := FND_API.g_ret_sts_error;

1297:
1298:
1299: IF p_pec_rules_rec.active_flag = FND_API.g_miss_char THEN
1300: PVX_UTIlity_PVT.Error_Message('AMS_API_MISSING_FIELD', 'MISS_FIELD', 'ACTIVE_FLAG' );
1301: x_return_status := FND_API.g_ret_sts_error;
1302: END IF;
1303: END IF;
1304:
1305: END check_Pec_Rules_Req_Items;

Line 1315: x_return_status := FND_API.g_ret_sts_success;

1311: x_return_status OUT NOCOPY VARCHAR2
1312: )
1313: IS
1314: BEGIN
1315: x_return_status := FND_API.g_ret_sts_success;
1316:
1317: -- Enter custom code here
1318:
1319: END check_Pec_Rules_Fk_Items;

Line 1329: x_return_status := FND_API.g_ret_sts_success;

1325: x_return_status OUT NOCOPY VARCHAR2
1326: )
1327: IS
1328: BEGIN
1329: x_return_status := FND_API.g_ret_sts_success;
1330:
1331: -- Enter custom code here
1332:
1333: END check_Pec_Rules_Lookup_Items;

Line 1354: l_return_status := FND_API.g_ret_sts_success;

1350: PVX_UTILITY_PVT.debug_message('Start ' );
1351:
1352: END IF;
1353:
1354: l_return_status := FND_API.g_ret_sts_success;
1355: -- Check Items Uniqueness API calls
1356:
1357: check_Pec_rules_Uk_Items(
1358: p_pec_rules_rec => p_pec_rules_rec,

Line 1361: IF x_return_status <> FND_API.g_ret_sts_success THEN

1357: check_Pec_rules_Uk_Items(
1358: p_pec_rules_rec => p_pec_rules_rec,
1359: p_validation_mode => p_validation_mode,
1360: x_return_status => x_return_status);
1361: IF x_return_status <> FND_API.g_ret_sts_success THEN
1362: l_return_status := FND_API.g_ret_sts_error;
1363: END IF;
1364:
1365: -- Check Items Required/NOT NULL API calls

Line 1362: l_return_status := FND_API.g_ret_sts_error;

1358: p_pec_rules_rec => p_pec_rules_rec,
1359: p_validation_mode => p_validation_mode,
1360: x_return_status => x_return_status);
1361: IF x_return_status <> FND_API.g_ret_sts_success THEN
1362: l_return_status := FND_API.g_ret_sts_error;
1363: END IF;
1364:
1365: -- Check Items Required/NOT NULL API calls
1366: IF (PV_DEBUG_HIGH_ON) THEN

Line 1375: IF x_return_status <> FND_API.g_ret_sts_success THEN

1371: check_pec_rules_req_items(
1372: p_pec_rules_rec => p_pec_rules_rec,
1373: p_validation_mode => p_validation_mode,
1374: x_return_status => x_return_status);
1375: IF x_return_status <> FND_API.g_ret_sts_success THEN
1376: l_return_status := FND_API.g_ret_sts_error;
1377: END IF;
1378: -- Check Items Foreign Keys API calls
1379:

Line 1376: l_return_status := FND_API.g_ret_sts_error;

1372: p_pec_rules_rec => p_pec_rules_rec,
1373: p_validation_mode => p_validation_mode,
1374: x_return_status => x_return_status);
1375: IF x_return_status <> FND_API.g_ret_sts_success THEN
1376: l_return_status := FND_API.g_ret_sts_error;
1377: END IF;
1378: -- Check Items Foreign Keys API calls
1379:
1380: IF (PV_DEBUG_HIGH_ON) THEN

Line 1391: IF x_return_status <> FND_API.g_ret_sts_success THEN

1387:
1388: check_pec_rules_FK_items(
1389: p_pec_rules_rec => p_pec_rules_rec,
1390: x_return_status => x_return_status);
1391: IF x_return_status <> FND_API.g_ret_sts_success THEN
1392: l_return_status := FND_API.g_ret_sts_error;
1393: END IF;
1394: -- Check Items Lookups
1395:

Line 1392: l_return_status := FND_API.g_ret_sts_error;

1388: check_pec_rules_FK_items(
1389: p_pec_rules_rec => p_pec_rules_rec,
1390: x_return_status => x_return_status);
1391: IF x_return_status <> FND_API.g_ret_sts_success THEN
1392: l_return_status := FND_API.g_ret_sts_error;
1393: END IF;
1394: -- Check Items Lookups
1395:
1396: IF (PV_DEBUG_HIGH_ON) THEN

Line 1407: IF x_return_status <> FND_API.g_ret_sts_success THEN

1403:
1404: check_pec_rules_Lookup_items(
1405: p_pec_rules_rec => p_pec_rules_rec,
1406: x_return_status => x_return_status);
1407: IF x_return_status <> FND_API.g_ret_sts_success THEN
1408: l_return_status := FND_API.g_ret_sts_error;
1409: END IF;
1410:
1411: x_return_status := l_return_status;

Line 1408: l_return_status := FND_API.g_ret_sts_error;

1404: check_pec_rules_Lookup_items(
1405: p_pec_rules_rec => p_pec_rules_rec,
1406: x_return_status => x_return_status);
1407: IF x_return_status <> FND_API.g_ret_sts_success THEN
1408: l_return_status := FND_API.g_ret_sts_error;
1409: END IF;
1410:
1411: x_return_status := l_return_status;
1412:

Line 1524: -- OR p_campaign_rec.status_code = FND_API.G_MISS_CHAR THEN

1520: l_pec_rules_rec pec_rules_rec_type := p_pec_rules_rec;
1521: BEGIN
1522: -- Developers should put their code to default the record type
1523: -- e.g. IF p_campaign_rec.status_code IS NULL
1524: -- OR p_campaign_rec.status_code = FND_API.G_MISS_CHAR THEN
1525: -- l_campaign_rec.status_code := 'NEW' ;
1526: -- END IF ;
1527: --
1528: -- NULL ;

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

1533:
1534:
1535: PROCEDURE Validate_Pec_Rules(
1536: p_api_version_number IN NUMBER,
1537: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1538: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1539: p_pec_rules_rec IN pec_rules_rec_type,
1540: p_validation_mode IN VARCHAR2,
1541: x_return_status OUT NOCOPY VARCHAR2,

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

1534:
1535: PROCEDURE Validate_Pec_Rules(
1536: p_api_version_number IN NUMBER,
1537: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1538: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1539: p_pec_rules_rec IN pec_rules_rec_type,
1540: p_validation_mode IN VARCHAR2,
1541: x_return_status OUT NOCOPY VARCHAR2,
1542: x_msg_count OUT NOCOPY NUMBER,

Line 1566: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

1562: -- Standard Start of API savepoint
1563: SAVEPOINT validate_pec_rules_;
1564:
1565: -- Standard call to check for call compatibility.
1566: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1567: p_api_version_number,
1568: l_api_name,
1569: G_PKG_NAME)
1570: THEN

Line 1571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1567: p_api_version_number,
1568: l_api_name,
1569: G_PKG_NAME)
1570: THEN
1571: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1572: END IF;
1573:
1574:
1575: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 1576: IF FND_API.to_Boolean( p_init_msg_list )

1572: END IF;
1573:
1574:
1575: -- Initialize message list if p_init_msg_list is set to TRUE.
1576: IF FND_API.to_Boolean( p_init_msg_list )
1577: THEN
1578: FND_MSG_PUB.initialize;
1579: END IF;
1580:

Line 1596: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1592: p_validation_mode => p_validation_mode,
1593: x_return_status => x_return_status
1594: );
1595:
1596: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1597: RAISE FND_API.G_EXC_ERROR;
1598: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1600: END IF;

Line 1597: RAISE FND_API.G_EXC_ERROR;

1593: x_return_status => x_return_status
1594: );
1595:
1596: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1597: RAISE FND_API.G_EXC_ERROR;
1598: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1600: END IF;
1601: END IF;

Line 1598: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1594: );
1595:
1596: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1597: RAISE FND_API.G_EXC_ERROR;
1598: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1600: END IF;
1601: END IF;
1602:

Line 1599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1595:
1596: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1597: RAISE FND_API.G_EXC_ERROR;
1598: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1599: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1600: END IF;
1601: END IF;
1602:
1603: IF (PV_DEBUG_HIGH_ON) THEN

Line 1644: p_init_msg_list => FND_API.G_FALSE,

1640:
1641: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1642: Validate_pec_rules_Rec(
1643: p_api_version_number => 1.0,
1644: p_init_msg_list => FND_API.G_FALSE,
1645: x_return_status => x_return_status,
1646: x_msg_count => x_msg_count,
1647: x_msg_data => x_msg_data,
1648: p_pec_rules_rec => l_pec_rules_rec);

Line 1650: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1646: x_msg_count => x_msg_count,
1647: x_msg_data => x_msg_data,
1648: p_pec_rules_rec => l_pec_rules_rec);
1649:
1650: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1651: RAISE FND_API.G_EXC_ERROR;
1652: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1654: END IF;

Line 1651: RAISE FND_API.G_EXC_ERROR;

1647: x_msg_data => x_msg_data,
1648: p_pec_rules_rec => l_pec_rules_rec);
1649:
1650: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1651: RAISE FND_API.G_EXC_ERROR;
1652: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1654: END IF;
1655: END IF;

Line 1652: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1648: p_pec_rules_rec => l_pec_rules_rec);
1649:
1650: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1651: RAISE FND_API.G_EXC_ERROR;
1652: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1654: END IF;
1655: END IF;
1656:

Line 1653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1649:
1650: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1651: RAISE FND_API.G_EXC_ERROR;
1652: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1653: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1654: END IF;
1655: END IF;
1656:
1657: IF (PV_DEBUG_HIGH_ON) THEN

Line 1681: x_return_status := FND_API.G_RET_STS_SUCCESS;

1677:
1678:
1679:
1680: -- Initialize API return status to SUCCESS
1681: x_return_status := FND_API.G_RET_STS_SUCCESS;
1682:
1683:
1684: -- Debug Message
1685: IF (PV_DEBUG_HIGH_ON) THEN

Line 1699: x_return_status := FND_API.g_ret_sts_error;

1695: );
1696: EXCEPTION
1697:
1698: WHEN PVX_UTIlity_PVT.resource_locked THEN
1699: x_return_status := FND_API.g_ret_sts_error;
1700: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1701:
1702: WHEN FND_API.G_EXC_ERROR THEN
1703: ROLLBACK TO VALIDATE_Pec_Rules_;

Line 1702: WHEN FND_API.G_EXC_ERROR THEN

1698: WHEN PVX_UTIlity_PVT.resource_locked THEN
1699: x_return_status := FND_API.g_ret_sts_error;
1700: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1701:
1702: WHEN FND_API.G_EXC_ERROR THEN
1703: ROLLBACK TO VALIDATE_Pec_Rules_;
1704: x_return_status := FND_API.G_RET_STS_ERROR;
1705: -- Standard call to get message count and if count=1, get the message
1706: FND_MSG_PUB.Count_And_Get (

Line 1704: x_return_status := FND_API.G_RET_STS_ERROR;

1700: PVX_UTIlity_PVT.Error_Message(p_message_name => 'PV_API_RESOURCE_LOCKED');
1701:
1702: WHEN FND_API.G_EXC_ERROR THEN
1703: ROLLBACK TO VALIDATE_Pec_Rules_;
1704: x_return_status := FND_API.G_RET_STS_ERROR;
1705: -- Standard call to get message count and if count=1, get the message
1706: FND_MSG_PUB.Count_And_Get (
1707: p_encoded => FND_API.G_FALSE,
1708: p_count => x_msg_count,

Line 1707: p_encoded => FND_API.G_FALSE,

1703: ROLLBACK TO VALIDATE_Pec_Rules_;
1704: x_return_status := FND_API.G_RET_STS_ERROR;
1705: -- Standard call to get message count and if count=1, get the message
1706: FND_MSG_PUB.Count_And_Get (
1707: p_encoded => FND_API.G_FALSE,
1708: p_count => x_msg_count,
1709: p_data => x_msg_data
1710: );
1711:

Line 1712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1708: p_count => x_msg_count,
1709: p_data => x_msg_data
1710: );
1711:
1712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1713: ROLLBACK TO VALIDATE_Pec_Rules_;
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1715: -- Standard call to get message count and if count=1, get the message
1716: FND_MSG_PUB.Count_And_Get (

Line 1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1710: );
1711:
1712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1713: ROLLBACK TO VALIDATE_Pec_Rules_;
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1715: -- Standard call to get message count and if count=1, get the message
1716: FND_MSG_PUB.Count_And_Get (
1717: p_encoded => FND_API.G_FALSE,
1718: p_count => x_msg_count,

Line 1717: p_encoded => FND_API.G_FALSE,

1713: ROLLBACK TO VALIDATE_Pec_Rules_;
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1715: -- Standard call to get message count and if count=1, get the message
1716: FND_MSG_PUB.Count_And_Get (
1717: p_encoded => FND_API.G_FALSE,
1718: p_count => x_msg_count,
1719: p_data => x_msg_data
1720: );
1721:

Line 1724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1720: );
1721:
1722: WHEN OTHERS THEN
1723: ROLLBACK TO VALIDATE_Pec_Rules_;
1724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1725: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1726: THEN
1727: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1728: END IF;

Line 1731: p_encoded => FND_API.G_FALSE,

1727: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1728: END IF;
1729: -- Standard call to get message count and if count=1, get the message
1730: FND_MSG_PUB.Count_And_Get (
1731: p_encoded => FND_API.G_FALSE,
1732: p_count => x_msg_count,
1733: p_data => x_msg_data
1734: );
1735: End Validate_Pec_Rules;

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

1736:
1737:
1738: PROCEDURE Validate_Pec_Rules_Rec (
1739: p_api_version_number IN NUMBER,
1740: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1741: x_return_status OUT NOCOPY VARCHAR2,
1742: x_msg_count OUT NOCOPY NUMBER,
1743: x_msg_data OUT NOCOPY VARCHAR2,
1744: p_pec_rules_rec IN pec_rules_rec_type

Line 1749: IF FND_API.to_Boolean( p_init_msg_list )

1745: )
1746: IS
1747: BEGIN
1748: -- Initialize message list if p_init_msg_list is set to TRUE.
1749: IF FND_API.to_Boolean( p_init_msg_list )
1750: THEN
1751: FND_MSG_PUB.initialize;
1752: END IF;
1753:

Line 1757: x_return_status := FND_API.G_RET_STS_SUCCESS;

1753:
1754:
1755:
1756: -- Initialize API return status to SUCCESS
1757: x_return_status := FND_API.G_RET_STS_SUCCESS;
1758:
1759: -- Hint: Validate data
1760: -- If data not valid
1761: -- THEN

Line 1762: -- x_return_status := FND_API.G_RET_STS_ERROR;

1758:
1759: -- Hint: Validate data
1760: -- If data not valid
1761: -- THEN
1762: -- x_return_status := FND_API.G_RET_STS_ERROR;
1763:
1764: -- Debug Message
1765: IF (PV_DEBUG_HIGH_ON) THEN
1766: