DBA Data[Home] [Help]

APPS.OKC_REP_QA_CHECK_PVT dependencies on FND_API

Line 14: -- Default = FND_API.G_FALSE

10: --Pre-reqs : None.
11: --Parameters :
12: --IN : p_api_version IN NUMBER Required
13: -- : p_init_msg_list IN VARCHAR2 Optional
14: -- Default = FND_API.G_FALSE
15: -- : p_contract_id IN NUMBER Required
16: -- ID of the contract to be checked
17: -- : p_severity IN VARCHAR2 Required
18: -- Severity level for this check. Possible values are ERROR, WARNING.

Line 61: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

57: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
58: 'Severity level is: ' || p_severity);
59: END IF;
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64: -- Initialize message list if p_init_msg_list is set to TRUE.
65: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

58: 'Severity level is: ' || p_severity);
59: END IF;
60: -- Standard call to check for call compatibility.
61: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64: -- Initialize message list if p_init_msg_list is set to TRUE.
65: IF FND_API.to_Boolean( p_init_msg_list ) THEN
66: FND_MSG_PUB.initialize;

Line 65: IF FND_API.to_Boolean( p_init_msg_list ) THEN

61: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63: END IF;
64: -- Initialize message list if p_init_msg_list is set to TRUE.
65: IF FND_API.to_Boolean( p_init_msg_list ) THEN
66: FND_MSG_PUB.initialize;
67: END IF;
68:
69: -- Initialize API return status to success

Line 70: x_return_status := FND_API.G_RET_STS_SUCCESS;

66: FND_MSG_PUB.initialize;
67: END IF;
68:
69: -- Initialize API return status to success
70: x_return_status := FND_API.G_RET_STS_SUCCESS;
71:
72: OPEN party_csr;
73: FETCH party_csr INTO party_rec;
74: IF party_csr%NOTFOUND THEN

Line 99: WHEN FND_API.G_EXC_ERROR THEN

95: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
96: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_external_party');
97: END IF;
98: EXCEPTION
99: WHEN FND_API.G_EXC_ERROR THEN
100: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
101: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
102: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_external_party with G_EXC_ERROR');
103: END IF;

Line 114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

110: p_count => x_msg_count,
111: p_data => x_msg_data
112: );
113:
114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
115: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
116: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
117: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_external_party with G_EXC_UNEXPECTED_ERROR');
118: END IF;

Line 164: -- Default = FND_API.G_FALSE

160: --Pre-reqs : None.
161: --Parameters :
162: --IN : p_api_version IN NUMBER Required
163: -- : p_init_msg_list IN VARCHAR2 Optional
164: -- Default = FND_API.G_FALSE
165: -- : p_effective_date IN NUMBER Required
166: -- Effective date of the contract to be checked
167: -- : p_severity IN VARCHAR2 Required
168: -- Severity level for this check. Possible values are ERROR, WARNING.

Line 204: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

200: 'Severity level is: ' || p_severity);
201: END IF;
202:
203: -- Standard call to check for call compatibility.
204: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207: -- Initialize message list if p_init_msg_list is set to TRUE.
208: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

201: END IF;
202:
203: -- Standard call to check for call compatibility.
204: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207: -- Initialize message list if p_init_msg_list is set to TRUE.
208: IF FND_API.to_Boolean( p_init_msg_list ) THEN
209: FND_MSG_PUB.initialize;

Line 208: IF FND_API.to_Boolean( p_init_msg_list ) THEN

204: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
205: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206: END IF;
207: -- Initialize message list if p_init_msg_list is set to TRUE.
208: IF FND_API.to_Boolean( p_init_msg_list ) THEN
209: FND_MSG_PUB.initialize;
210: END IF;
211:
212: -- Initialize API return status to success

Line 213: x_return_status := FND_API.G_RET_STS_SUCCESS;

209: FND_MSG_PUB.initialize;
210: END IF;
211:
212: -- Initialize API return status to success
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214:
215: --Check for effective date
216: IF (p_effective_date IS NULL) THEN
217: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 240: WHEN FND_API.G_EXC_ERROR THEN

236: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
237: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_eff_date');
238: END IF;
239: EXCEPTION
240: WHEN FND_API.G_EXC_ERROR THEN
241: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
242: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
243: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_eff_date with G_EXC_ERROR');
244: END IF;

Line 251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

247: p_count => x_msg_count,
248: p_data => x_msg_data
249: );
250:
251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
252: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
253: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
254: 'Leaving OKC_REP_QA_CHECK_PVT.check_no_eff_date with G_EXC_UNEXPECTED_ERROR');
255: END IF;

Line 291: -- Default = FND_API.G_FALSE

287: --Pre-reqs : None.
288: --Parameters :
289: --IN : p_api_version IN NUMBER Required
290: -- : p_init_msg_list IN VARCHAR2 Optional
291: -- Default = FND_API.G_FALSE
292: -- : p_contract_type IN NUMBER Required
293: -- Contract type to be validated
294: -- : p_severity IN VARCHAR2 Required
295: -- Severity level for this check. Possible values are ERROR, WARNING.

Line 337: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

333: 'Severity level is: ' || p_severity);
334: END IF;
335:
336: -- Standard call to check for call compatibility.
337: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
339: END IF;
340: -- Initialize message list if p_init_msg_list is set to TRUE.
341: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

334: END IF;
335:
336: -- Standard call to check for call compatibility.
337: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
339: END IF;
340: -- Initialize message list if p_init_msg_list is set to TRUE.
341: IF FND_API.to_Boolean( p_init_msg_list ) THEN
342: FND_MSG_PUB.initialize;

Line 341: IF FND_API.to_Boolean( p_init_msg_list ) THEN

337: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
339: END IF;
340: -- Initialize message list if p_init_msg_list is set to TRUE.
341: IF FND_API.to_Boolean( p_init_msg_list ) THEN
342: FND_MSG_PUB.initialize;
343: END IF;
344:
345: -- Initialize API return status to success

Line 346: x_return_status := FND_API.G_RET_STS_SUCCESS;

342: FND_MSG_PUB.initialize;
343: END IF;
344:
345: -- Initialize API return status to success
346: x_return_status := FND_API.G_RET_STS_SUCCESS;
347: l_valid_contract_type_flag := 'Y';
348:
349: OPEN contract_type_csr;
350: FETCH contract_type_csr INTO contract_type_rec;

Line 356: RAISE FND_API.G_EXC_ERROR;

352: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
353: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
354: G_MODULE||l_api_name, 'Contract Type: '|| p_contract_type || ' does not exist');
355: END IF;
356: RAISE FND_API.G_EXC_ERROR;
357: END IF; -- contract_type_csr%NOTFOUND
358: l_contract_type_name := contract_type_rec.name;
359: IF (sysdate BETWEEN nvl(contract_type_rec.start_date, sysdate) AND nvl(contract_type_rec.end_date, sysdate)) THEN
360: l_valid_contract_type_flag := 'Y';

Line 395: WHEN FND_API.G_EXC_ERROR THEN

391: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
392: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contract_type');
393: END IF;
394: EXCEPTION
395: WHEN FND_API.G_EXC_ERROR THEN
396: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
397: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
398: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contract_type with G_EXC_ERROR');
399: END IF;

Line 409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

405: p_count => x_msg_count,
406: p_data => x_msg_data
407: );
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
412: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contract_type with G_EXC_UNEXPECTED_ERROR');
413: END IF;

Line 456: -- Default = FND_API.G_FALSE

452: --Pre-reqs : None.
453: --Parameters :
454: --IN : p_api_version IN NUMBER Required
455: -- : p_init_msg_list IN VARCHAR2 Optional
456: -- Default = FND_API.G_FALSE
457: -- : p_party_role_code IN VARCHER Required
458: -- external party role code
459: -- : p_party_id IN NUMBER Required
460: -- party id of the external party.

Line 514: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

510: 'Party Id is: ' || p_party_id);
511: END IF;
512:
513: -- Standard call to check for call compatibility.
514: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
516: END IF;
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

511: END IF;
512:
513: -- Standard call to check for call compatibility.
514: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
516: END IF;
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518: IF FND_API.to_Boolean( p_init_msg_list ) THEN
519: FND_MSG_PUB.initialize;

Line 518: IF FND_API.to_Boolean( p_init_msg_list ) THEN

514: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
516: END IF;
517: -- Initialize message list if p_init_msg_list is set to TRUE.
518: IF FND_API.to_Boolean( p_init_msg_list ) THEN
519: FND_MSG_PUB.initialize;
520: END IF;
521:
522: -- Initialize API return status to success

Line 523: x_return_status := FND_API.G_RET_STS_SUCCESS;

519: FND_MSG_PUB.initialize;
520: END IF;
521:
522: -- Initialize API return status to success
523: x_return_status := FND_API.G_RET_STS_SUCCESS;
524: l_valid_external_party_flag := 'Y';
525:
526: IF (p_party_role_code = G_PARTY_ROLE_PARTNER OR
527: p_party_role_code = G_PARTY_ROLE_CUSTOMER) THEN

Line 535: RAISE FND_API.G_EXC_ERROR;

531: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
533: G_MODULE||l_api_name, 'Party with Party Id: '|| p_party_id || ' does not exist');
534: END IF;
535: RAISE FND_API.G_EXC_ERROR;
536: END IF; -- partner_csr%NOTFOUND
537: l_party_name := partner_rec.party_name;
538: if (partner_rec.status <> 'A') THEN
539: l_valid_external_party_flag := 'N';

Line 550: RAISE FND_API.G_EXC_ERROR;

546: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
547: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
548: G_MODULE||l_api_name, 'Vendor with vendor Id: '|| p_party_id || ' does not exist');
549: END IF;
550: RAISE FND_API.G_EXC_ERROR;
551: END IF; -- vendor_csr%NOTFOUND
552: l_party_name := vendor_rec.vendor_name;
553: if (vendor_rec.enabled_flag <> 'Y' AND
554: SYSDATE BETWEEN NVL(vendor_rec.start_date_active, SYSDATE - 1) AND NVL(vendor_rec.end_date_active, SYSDATE + 1)) THEN

Line 589: WHEN FND_API.G_EXC_ERROR THEN

585: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
586: 'Leaving OKC_REP_QA_CHECK_PVT.validate_external_party');
587: END IF;
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
591: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
592: 'Leaving OKC_REP_QA_CHECK_PVT.validate_external_party with G_EXC_ERROR');
593: END IF;

Line 606: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

602: p_count => x_msg_count,
603: p_data => x_msg_data
604: );
605:
606: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
607: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
609: 'Leaving OKC_REP_QA_CHECK_PVT.validate_external_party with G_EXC_UNEXPECTED_ERROR');
610: END IF;

Line 661: -- Default = FND_API.G_FALSE

657: --Pre-reqs : None.
658: --Parameters :
659: --IN : p_api_version IN NUMBER Required
660: -- : p_init_msg_list IN VARCHAR2 Optional
661: -- Default = FND_API.G_FALSE
662: -- : p_party_role_code IN VARCHER Required
663: -- external party role code
664: -- : p_party_id IN NUMBER Required
665: -- party id of the external party.

Line 753: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

749: 'Contact Id is: ' || p_contact_id);
750: END IF;
751:
752: -- Standard call to check for call compatibility.
753: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756: -- Initialize message list if p_init_msg_list is set to TRUE.
757: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

750: END IF;
751:
752: -- Standard call to check for call compatibility.
753: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756: -- Initialize message list if p_init_msg_list is set to TRUE.
757: IF FND_API.to_Boolean( p_init_msg_list ) THEN
758: FND_MSG_PUB.initialize;

Line 757: IF FND_API.to_Boolean( p_init_msg_list ) THEN

753: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
754: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
755: END IF;
756: -- Initialize message list if p_init_msg_list is set to TRUE.
757: IF FND_API.to_Boolean( p_init_msg_list ) THEN
758: FND_MSG_PUB.initialize;
759: END IF;
760:
761: -- Initialize API return status to success

Line 762: x_return_status := FND_API.G_RET_STS_SUCCESS;

758: FND_MSG_PUB.initialize;
759: END IF;
760:
761: -- Initialize API return status to success
762: x_return_status := FND_API.G_RET_STS_SUCCESS;
763: l_valid_contact_flag := 'Y';
764:
765: IF ((p_party_role_code = G_PARTY_ROLE_PARTNER) OR (p_party_role_code = G_PARTY_ROLE_CUSTOMER)) THEN
766:

Line 775: RAISE FND_API.G_EXC_ERROR;

771: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
772: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
773: G_MODULE||l_api_name, 'Contact with Contact Id: '|| p_contact_id || ' does not exist');
774: END IF;
775: RAISE FND_API.G_EXC_ERROR;
776: END IF; -- partner_csr%NOTFOUND
777:
778: l_contact_name := tca_contact_rec.contact_name;
779:

Line 799: RAISE FND_API.G_EXC_ERROR;

795: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
796: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
797: G_MODULE||l_api_name, 'Vendor contact Id: '|| p_contact_id || ' does not exist');
798: END IF;
799: RAISE FND_API.G_EXC_ERROR;
800: END IF; -- vendor_contact_csr%NOTFOUND
801:
802: l_contact_name := vendor_contact_rec.contact_name;
803:

Line 866: WHEN FND_API.G_EXC_ERROR THEN

862: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
863: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact');
864: END IF;
865: EXCEPTION
866: WHEN FND_API.G_EXC_ERROR THEN
867: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
868: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
869: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact with G_EXC_ERROR');
870: END IF;

Line 889: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

885: p_count => x_msg_count,
886: p_data => x_msg_data
887: );
888:
889: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
890: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
891: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
892: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact with G_EXC_UNEXPECTED_ERROR');
893: END IF;

Line 957: -- Default = FND_API.G_FALSE

953: --Pre-reqs : None.
954: --Parameters :
955: --IN : p_api_version IN NUMBER Required
956: -- : p_init_msg_list IN VARCHAR2 Optional
957: -- Default = FND_API.G_FALSE
958: -- : p_contact_role_id IN NUMBER Required
959: -- Contract Role Id to be validated
960: -- : p_severity IN VARCHAR2 Required
961: -- Severity level for this check. Possible values are ERROR, WARNING.

Line 1003: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

999: 'Severity level is: ' || p_severity);
1000: END IF;
1001:
1002: -- Standard call to check for call compatibility.
1003: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: -- Initialize message list if p_init_msg_list is set to TRUE.
1007: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1000: END IF;
1001:
1002: -- Standard call to check for call compatibility.
1003: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: -- Initialize message list if p_init_msg_list is set to TRUE.
1007: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1008: FND_MSG_PUB.initialize;

Line 1007: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1003: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1005: END IF;
1006: -- Initialize message list if p_init_msg_list is set to TRUE.
1007: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1008: FND_MSG_PUB.initialize;
1009: END IF;
1010:
1011: -- Initialize API return status to success

Line 1012: x_return_status := FND_API.G_RET_STS_SUCCESS;

1008: FND_MSG_PUB.initialize;
1009: END IF;
1010:
1011: -- Initialize API return status to success
1012: x_return_status := FND_API.G_RET_STS_SUCCESS;
1013: l_valid_contact_role_flag := 'Y';
1014:
1015: OPEN contact_role_csr;
1016: FETCH contact_role_csr INTO contact_role_rec;

Line 1022: RAISE FND_API.G_EXC_ERROR;

1018: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1019: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1020: G_MODULE||l_api_name, 'Contact role with id : '|| p_contact_role_id || ' does not exist');
1021: END IF;
1022: RAISE FND_API.G_EXC_ERROR;
1023: END IF; -- contact_role_csr%NOTFOUND
1024: l_contact_role_name := contact_role_rec.name;
1025: IF (sysdate BETWEEN nvl(contact_role_rec.start_date, sysdate) AND nvl(contact_role_rec.end_date, sysdate)) THEN
1026: l_valid_contact_role_flag := 'Y';

Line 1060: WHEN FND_API.G_EXC_ERROR THEN

1056: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1057: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact_role');
1058: END IF;
1059: EXCEPTION
1060: WHEN FND_API.G_EXC_ERROR THEN
1061: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1062: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
1063: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact_role with G_EXC_ERROR');
1064: END IF;

Line 1074: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1070: p_count => x_msg_count,
1071: p_data => x_msg_data
1072: );
1073:
1074: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1075: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1076: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
1077: 'Leaving OKC_REP_QA_CHECK_PVT.validate_contact_role with G_EXC_UNEXPECTED_ERROR');
1078: END IF;

Line 1123: -- Default = FND_API.G_FALSE

1119: --Pre-reqs : None.
1120: --Parameters :
1121: --IN : p_api_version IN NUMBER Required
1122: -- : p_init_msg_list IN VARCHAR2 Optional
1123: -- Default = FND_API.G_FALSE
1124: -- : p_contact_role IN NUMBER Required
1125: -- Contract type to be validated
1126: -- : p_severity IN VARCHAR2 Required
1127: -- Severity level for this check. Possible values are ERROR, WARNING.

Line 1169: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN

1165: 'Severity level is: ' || p_severity);
1166: END IF;
1167:
1168: -- Standard call to check for call compatibility.
1169: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1170: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1171: END IF;
1172: -- Initialize message list if p_init_msg_list is set to TRUE.
1173: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1170: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1166: END IF;
1167:
1168: -- Standard call to check for call compatibility.
1169: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1170: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1171: END IF;
1172: -- Initialize message list if p_init_msg_list is set to TRUE.
1173: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1174: FND_MSG_PUB.initialize;

Line 1173: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1169: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1170: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1171: END IF;
1172: -- Initialize message list if p_init_msg_list is set to TRUE.
1173: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1174: FND_MSG_PUB.initialize;
1175: END IF;
1176:
1177: -- Initialize API return status to success

Line 1178: x_return_status := FND_API.G_RET_STS_SUCCESS;

1174: FND_MSG_PUB.initialize;
1175: END IF;
1176:
1177: -- Initialize API return status to success
1178: x_return_status := FND_API.G_RET_STS_SUCCESS;
1179: l_valid_risk_event_flag := 'Y';
1180:
1181: OPEN risk_event_csr;
1182: FETCH risk_event_csr INTO risk_event_rec;

Line 1188: RAISE FND_API.G_EXC_ERROR;

1184: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1185: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION ,
1186: G_MODULE||l_api_name, 'Risk Event with id : '|| p_risk_event_id || ' does not exist');
1187: END IF;
1188: RAISE FND_API.G_EXC_ERROR;
1189: END IF; -- risk_event_csr%NOTFOUND
1190: l_risk_event_name := risk_event_rec.name;
1191: IF (sysdate BETWEEN nvl(risk_event_rec.start_date, sysdate) AND nvl(risk_event_rec.end_date, sysdate)) THEN
1192: l_valid_risk_event_flag := 'Y';

Line 1226: WHEN FND_API.G_EXC_ERROR THEN

1222: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
1223: 'Leaving OKC_REP_QA_CHECK_PVT.validate_risk_event');
1224: END IF;
1225: EXCEPTION
1226: WHEN FND_API.G_EXC_ERROR THEN
1227: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1228: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
1229: 'Leaving OKC_REP_QA_CHECK_PVT.validate_risk_event with G_EXC_ERROR');
1230: END IF;

Line 1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1236: p_count => x_msg_count,
1237: p_data => x_msg_data
1238: );
1239:
1240: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1241: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1242: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
1243: 'Leaving OKC_REP_QA_CHECK_PVT.validate_risk_event with G_EXC_UNEXPECTED_ERROR');
1244: END IF;

Line 1302: -- : Default = FND_API.G_FALSE

1298: --Pre-reqs : None.
1299: --Parameters :
1300: --IN : p_api_version IN NUMBER Required
1301: -- : p_init_msg_list IN VARCHAR2 Optional
1302: -- : Default = FND_API.G_FALSE
1303: -- : p_contract_id IN NUMBER Required
1304: -- : Contract ID of the contract to be QA checked
1305: -- : p_contract_type IN NUMBER Required
1306: -- : Type of the contract to be QA checked

Line 1378: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1374: RAISE OKC_API.G_EXCEPTION_ERROR;
1375: END IF;
1376:
1377: -- Initialize message list if p_init_msg_list is set to TRUE.
1378: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1379: FND_MSG_PUB.initialize;
1380: END IF;
1381:
1382: --Check for external party

Line 1389: p_init_msg_list => FND_API.G_FALSE,

1385: 'Calling OKC_REP_QA_CHECK_PVT.check_no_exteral_party() API');
1386: END IF;
1387: check_no_external_party (
1388: p_api_version => 1,
1389: p_init_msg_list => FND_API.G_FALSE,
1390: p_contract_id => p_contract_id,
1391: p_severity => G_QA_STS_WARNING,
1392: px_qa_result_tbl => p_qa_result_tbl,
1393: x_msg_data => x_msg_data,

Line 1426: p_init_msg_list => FND_API.G_FALSE,

1422: 'Calling OKC_REP_QA_CHECK_PVT.check_no_eff_date() API');
1423: END IF;
1424: check_no_eff_date (
1425: p_api_version => 1,
1426: p_init_msg_list => FND_API.G_FALSE,
1427: p_effective_date => contract_rec.contract_effective_date,
1428: p_severity => G_QA_STS_ERROR,
1429: px_qa_result_tbl => p_qa_result_tbl,
1430: x_msg_data => x_msg_data,

Line 1451: p_init_msg_list => FND_API.G_FALSE,

1447: 'Calling OKC_REP_QA_CHECK_PVT.validate_contract_type() API');
1448: END IF;
1449: validate_contract_type (
1450: p_api_version => 1,
1451: p_init_msg_list => FND_API.G_FALSE,
1452: p_contract_type => p_contract_type,
1453: p_severity => G_QA_STS_WARNING,
1454: px_qa_result_tbl => p_qa_result_tbl,
1455: x_msg_data => x_msg_data,

Line 1482: p_init_msg_list => FND_API.G_FALSE,

1478: 'Party role code is: '|| party_rec.party_role_code);
1479: END IF;
1480: validate_external_party (
1481: p_api_version => 1,
1482: p_init_msg_list => FND_API.G_FALSE,
1483: p_party_role_code => party_rec.party_role_code,
1484: p_party_id => party_rec.party_id,
1485: p_severity => G_QA_STS_WARNING,
1486: px_qa_result_tbl => p_qa_result_tbl,

Line 1518: p_init_msg_list => FND_API.G_FALSE,

1514: END IF;
1515: -- Validate contact
1516: validate_contact (
1517: p_api_version => 1,
1518: p_init_msg_list => FND_API.G_FALSE,
1519: p_party_role_code => party_contact_rec.party_role_code,
1520: p_party_id => party_contact_rec.party_id,
1521: p_contact_id => party_contact_rec.contact_id,
1522: p_severity => G_QA_STS_WARNING,

Line 1541: p_init_msg_list => FND_API.G_FALSE,

1537:
1538: -- Validate contact role
1539: validate_contact_role (
1540: p_api_version => 1,
1541: p_init_msg_list => FND_API.G_FALSE,
1542: p_contact_role_id => party_contact_rec.contact_role_id,
1543: p_severity => G_QA_STS_WARNING,
1544: px_qa_result_tbl => p_qa_result_tbl,
1545: x_msg_data => x_msg_data,

Line 1572: p_init_msg_list => FND_API.G_FALSE,

1568: 'Risk Event Id is: '|| risk_rec.risk_event_id);
1569: END IF;
1570: validate_risk_event (
1571: p_api_version => 1,
1572: p_init_msg_list => FND_API.G_FALSE,
1573: p_risk_event_id => risk_rec.risk_event_id,
1574: p_severity => G_QA_STS_WARNING,
1575: px_qa_result_tbl => p_qa_result_tbl,
1576: x_msg_data => x_msg_data,

Line 1601: WHEN FND_API.G_EXC_ERROR THEN

1597: G_MODULE||l_api_name,'leaving OKC_REP_QA_CHECK_PVT.validate_repository_for_qa');
1598: END IF;
1599:
1600: EXCEPTION
1601: WHEN FND_API.G_EXC_ERROR THEN
1602: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1603: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION , G_MODULE||l_api_name,
1604: 'Leaving OKC_REP_QA_CHECK_PVT.validate_repository_for_qa with G_EXC_ERROR');
1605: END IF;

Line 1616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1612: p_count => x_msg_count,
1613: p_data => x_msg_data
1614: );
1615:
1616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1617: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1618: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,G_MODULE||l_api_name,
1619: 'Leaving OKC_REP_QA_CHECK_PVT.validate_repository_for_qa with G_EXC_UNEXPECTED_ERROR');
1620: END IF;

Line 1669: -- Default = FND_API.G_FALSE

1665: --Pre-reqs : None.
1666: --Parameters :
1667: --IN : p_api_version IN NUMBER Required
1668: -- : p_init_msg_list IN VARCHAR2 Optional
1669: -- Default = FND_API.G_FALSE
1670: -- : p_contract_id IN NUMBER Required
1671: -- Contract ID of the contract to be QA checked
1672: --OUT : x_return_status OUT VARCHAR2(1)
1673: -- : x_msg_count OUT NUMBER

Line 1731: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1727: RAISE OKC_API.G_EXCEPTION_ERROR;
1728: END IF;
1729:
1730: -- Initialize message list if p_init_msg_list is set to TRUE.
1731: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1732: FND_MSG_PUB.initialize;
1733: END IF;
1734:
1735: -- Get effective dates and contract_type of the contract.

Line 1748: RAISE FND_API.G_EXC_ERROR;

1744: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1745: p_msg_name => G_INVALID_CONTRACT_ID_MSG,
1746: p_token1 => G_CONTRACT_ID_TOKEN,
1747: p_token1_value => to_char(p_contract_id));
1748: RAISE FND_API.G_EXC_ERROR;
1749: -- RAISE NO_DATA_FOUND;
1750: END IF;
1751:
1752:

Line 1797: p_init_msg_list => FND_API.G_FALSE,

1793: 'Calling OKC_REP_QA_CHECK_PVT.validate_repository_for_qa() API');
1794: END IF;
1795: validate_repository_for_qa (
1796: p_api_version => 1,
1797: p_init_msg_list => FND_API.G_FALSE,
1798: p_contract_type => contract_rec.contract_type,
1799: p_contract_id => p_contract_id,
1800: p_qa_result_tbl => l_qa_result_tbl,
1801: x_msg_data => x_msg_data,

Line 1828: p_init_msg_list => FND_API.G_FALSE,

1824: l_bus_doc_date_events_tbl(2).event_date := contract_rec.contract_expiration_date;
1825:
1826: OKC_DELIVERABLE_PROCESS_PVT.validate_deliverable_for_qa (
1827: p_api_version => 1,
1828: p_init_msg_list => FND_API.G_FALSE,
1829: p_doc_type => contract_rec.contract_type,
1830: p_doc_id => p_contract_id,
1831: p_mode => G_NORMAL_QA,
1832: p_bus_doc_date_events_tbl => l_bus_doc_date_events_tbl,

Line 1906: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;

1902: 'Completed OKC_TERMS_QA_PVT.Log_QA_Messages');
1903: END IF;
1904: --------------------------------------------
1905: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1906: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1907: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1908: RAISE FND_API.G_EXC_ERROR ;
1909: END IF;
1910: --------------------------------------------

Line 1908: RAISE FND_API.G_EXC_ERROR ;

1904: --------------------------------------------
1905: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1906: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1907: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1908: RAISE FND_API.G_EXC_ERROR ;
1909: END IF;
1910: --------------------------------------------
1911:
1912: -- We should commit work now

Line 1926: WHEN FND_API.G_EXC_ERROR THEN

1922: G_MODULE||l_api_name,'Leaving OKC_REP_QA_CHECK_PVT.perform_contract_qa_check');
1923: END IF;
1924:
1925: EXCEPTION
1926: WHEN FND_API.G_EXC_ERROR THEN
1927:
1928: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1929: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1930: G_MODULE||l_api_name,'Leaving OKC_REP_QA_CHECK_PVT.perform_contract_qa_check with G_EXC_ERROR');

Line 1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1938: p_count => x_msg_count,
1939: p_data => x_msg_data
1940: );
1941:
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943:
1944: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1945: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION ,
1946: G_MODULE||l_api_name,'Leaving OKC_REP_QA_CHECK_PVT.perform_contract_qa_check with G_EXC_UNEXPECTED_ERROR');

Line 2104: WHEN FND_API.G_EXC_ERROR THEN

2100: 'Leaving OKC_REP_QA_CHECK_PVT.insert_deliverables_qa_checks');
2101: END IF;
2102:
2103: EXCEPTION
2104: WHEN FND_API.G_EXC_ERROR THEN
2105:
2106: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2107: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,
2108: 'Leaving OKC_REP_QA_CHECK_PVT.insert_deliverables_qa_checks with G_EXC_ERROR');

Line 2118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2114: p_count => x_msg_count,
2115: p_data => x_msg_data
2116: );
2117:
2118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2119:
2120: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2121: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,
2122: 'Leaving OKC_REP_QA_CHECK_PVT.insert_deliverables_qa_checks with G_EXC_UNEXPECTED_ERROR');