DBA Data[Home] [Help]

APPS.AHL_SB_RULES_PVT dependencies on FND_API

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

37: -- End of Comments
38:
39: PROCEDURE Check_Unit_Completeness (
40: p_api_version IN NUMBER := 1.0,
41: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
42: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43: p_module_type IN VARCHAR2 := NULL,
44: p_uc_header_id IN NUMBER,
45: p_visit_id IN NUMBER,

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

38:
39: PROCEDURE Check_Unit_Completeness (
40: p_api_version IN NUMBER := 1.0,
41: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
42: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
43: p_module_type IN VARCHAR2 := NULL,
44: p_uc_header_id IN NUMBER,
45: p_visit_id IN NUMBER,
46: p_x_erring_rules_tbl IN OUT NOCOPY AHL_UC_VALIDATION_PUB.Error_Tbl_Type,

Line 186: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

182: -- Standard start of API savepoint
183: SAVEPOINT Check_Unit_Completeness_Pvt;
184:
185: -- Standard call to check for call compatibility
186: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
187: l_api_name, G_PKG_NAME) THEN
188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
189: END IF;
190:

Line 188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

184:
185: -- Standard call to check for call compatibility
186: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
187: l_api_name, G_PKG_NAME) THEN
188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
189: END IF;
190:
191: -- Initialize message list if p_init_msg_list is set to TRUE
192: IF FND_API.To_Boolean( p_init_msg_list) THEN

Line 192: IF FND_API.To_Boolean( p_init_msg_list) THEN

188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
189: END IF;
190:
191: -- Initialize message list if p_init_msg_list is set to TRUE
192: IF FND_API.To_Boolean( p_init_msg_list) THEN
193: FND_MSG_PUB.Initialize;
194: END IF;
195:
196: -- Initialize Procedure return status to success

Line 197: x_return_status := FND_API.G_RET_STS_SUCCESS;

193: FND_MSG_PUB.Initialize;
194: END IF;
195:
196: -- Initialize Procedure return status to success
197: x_return_status := FND_API.G_RET_STS_SUCCESS;
198:
199: IF (l_log_statement >= l_log_current_level) THEN
200: FND_LOG.string(l_log_statement, l_full_name,
201: ' p_uc_header_id = '||p_uc_header_id||

Line 219: RAISE FND_API.G_EXC_ERROR;

215: -- The Unit Configuration header identifier UC_HEADER_ID is invalid.
216: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_UC_HEADER_ID_INVALID');
217: FND_MESSAGE.Set_Token('UC_HEADER_ID', p_uc_header_id);
218: FND_MSG_PUB.ADD;
219: RAISE FND_API.G_EXC_ERROR;
220: END IF;
221: CLOSE chk_unit_header_id_csr;
222:
223: -- Check for the visit id

Line 239: RAISE FND_API.G_EXC_ERROR;

235: -- Visit id VISIT_ID is invalid.
236: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_VWP_INVALID_VST');
237: FND_MESSAGE.Set_Token('VISIT_ID', p_visit_id);
238: FND_MSG_PUB.ADD;
239: RAISE FND_API.G_EXC_ERROR;
240: END IF;
241: CLOSE chk_visit_id_csr;
242: END IF; -- visit id NULL check
243:

Line 300: WHEN FND_API.G_EXC_ERROR THEN

296: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
297: END IF;
298:
299: EXCEPTION
300: WHEN FND_API.G_EXC_ERROR THEN
301: ROLLBACK TO Check_Unit_Completeness_Pvt;
302: x_return_status := FND_API.G_RET_STS_ERROR;
303: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
304: p_data => x_msg_data,

Line 302: x_return_status := FND_API.G_RET_STS_ERROR;

298:
299: EXCEPTION
300: WHEN FND_API.G_EXC_ERROR THEN
301: ROLLBACK TO Check_Unit_Completeness_Pvt;
302: x_return_status := FND_API.G_RET_STS_ERROR;
303: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
304: p_data => x_msg_data,
305: p_encoded => FND_API.G_FALSE);
306: IF (l_log_exception >= l_log_current_level) THEN

Line 305: p_encoded => FND_API.G_FALSE);

301: ROLLBACK TO Check_Unit_Completeness_Pvt;
302: x_return_status := FND_API.G_RET_STS_ERROR;
303: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
304: p_data => x_msg_data,
305: p_encoded => FND_API.G_FALSE);
306: IF (l_log_exception >= l_log_current_level) THEN
307: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
308: END IF;
309:

Line 310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

306: IF (l_log_exception >= l_log_current_level) THEN
307: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
308: END IF;
309:
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: ROLLBACK TO Check_Unit_Completeness_Pvt;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
314: p_data => x_msg_data,

Line 312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

308: END IF;
309:
310: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
311: ROLLBACK TO Check_Unit_Completeness_Pvt;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
314: p_data => x_msg_data,
315: p_encoded => FND_API.G_FALSE);
316: IF (l_log_unexpected >= l_log_current_level) THEN

Line 315: p_encoded => FND_API.G_FALSE);

311: ROLLBACK TO Check_Unit_Completeness_Pvt;
312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
314: p_data => x_msg_data,
315: p_encoded => FND_API.G_FALSE);
316: IF (l_log_unexpected >= l_log_current_level) THEN
317: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
318: END IF;
319:

Line 322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

318: END IF;
319:
320: WHEN OTHERS THEN
321: ROLLBACK TO Check_Unit_Completeness_Pvt;
322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
323: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
324: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
325: p_procedure_name => l_api_name,
326: p_error_text => SUBSTR(SQLERRM,1,500));

Line 330: p_encoded => fnd_api.G_FALSE);

326: p_error_text => SUBSTR(SQLERRM,1,500));
327: END IF;
328: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
329: p_data => x_msg_data,
330: p_encoded => fnd_api.G_FALSE);
331: IF (l_log_unexpected >= l_log_current_level) THEN
332: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
333: END IF;
334:

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

350: -- End of Comments
351:
352: PROCEDURE Check_Inst_Completeness (
353: p_api_version IN NUMBER := 1.0,
354: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
355: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
356: p_module_type IN VARCHAR2 := NULL,
357: p_csi_instance_id IN NUMBER,
358: p_x_erring_rules_tbl IN OUT NOCOPY AHL_UC_VALIDATION_PUB.Error_Tbl_Type,

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

351:
352: PROCEDURE Check_Inst_Completeness (
353: p_api_version IN NUMBER := 1.0,
354: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
355: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
356: p_module_type IN VARCHAR2 := NULL,
357: p_csi_instance_id IN NUMBER,
358: p_x_erring_rules_tbl IN OUT NOCOPY AHL_UC_VALIDATION_PUB.Error_Tbl_Type,
359: x_return_status OUT NOCOPY VARCHAR2,

Line 454: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

450: -- Standard start of API savepoint
451: SAVEPOINT Check_Inst_Completeness_Pvt;
452:
453: -- Standard call to check for call compatibility
454: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
455: l_api_name, G_PKG_NAME) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:

Line 456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

452:
453: -- Standard call to check for call compatibility
454: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
455: l_api_name, G_PKG_NAME) THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
459: -- Initialize message list if p_init_msg_list is set to TRUE
460: IF FND_API.To_Boolean( p_init_msg_list) THEN

Line 460: IF FND_API.To_Boolean( p_init_msg_list) THEN

456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
459: -- Initialize message list if p_init_msg_list is set to TRUE
460: IF FND_API.To_Boolean( p_init_msg_list) THEN
461: FND_MSG_PUB.Initialize;
462: END IF;
463:
464: -- Initialize Procedure return status to success

Line 465: x_return_status := FND_API.G_RET_STS_SUCCESS;

461: FND_MSG_PUB.Initialize;
462: END IF;
463:
464: -- Initialize Procedure return status to success
465: x_return_status := FND_API.G_RET_STS_SUCCESS;
466:
467: IF (l_log_statement >= l_log_current_level) THEN
468: FND_LOG.string(l_log_statement, l_full_name,
469: ' p_csi_instance_id = '||p_csi_instance_id);

Line 511: RAISE FND_API.G_EXC_ERROR;

507: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
508: IF (l_log_statement >= l_log_current_level) THEN
509: FND_LOG.string(l_log_statement, l_full_name, 'given instance and / or its unit are invalid');
510: END IF;
511: RAISE FND_API.G_EXC_ERROR;
512: END IF;
513:
514: IF (l_log_statement >= l_log_current_level) THEN
515: FND_LOG.string(l_log_statement, l_full_name,

Line 567: WHEN FND_API.G_EXC_ERROR THEN

563: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
564: END IF;
565:
566: EXCEPTION
567: WHEN FND_API.G_EXC_ERROR THEN
568: ROLLBACK TO Check_Inst_Completeness_Pvt;
569: x_return_status := FND_API.G_RET_STS_ERROR;
570: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
571: p_data => x_msg_data,

Line 569: x_return_status := FND_API.G_RET_STS_ERROR;

565:
566: EXCEPTION
567: WHEN FND_API.G_EXC_ERROR THEN
568: ROLLBACK TO Check_Inst_Completeness_Pvt;
569: x_return_status := FND_API.G_RET_STS_ERROR;
570: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
571: p_data => x_msg_data,
572: p_encoded => FND_API.G_FALSE);
573: IF (l_log_exception >= l_log_current_level) THEN

Line 572: p_encoded => FND_API.G_FALSE);

568: ROLLBACK TO Check_Inst_Completeness_Pvt;
569: x_return_status := FND_API.G_RET_STS_ERROR;
570: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
571: p_data => x_msg_data,
572: p_encoded => FND_API.G_FALSE);
573: IF (l_log_exception >= l_log_current_level) THEN
574: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
575: END IF;
576:

Line 577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

573: IF (l_log_exception >= l_log_current_level) THEN
574: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
575: END IF;
576:
577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
578: ROLLBACK TO Check_Inst_Completeness_Pvt;
579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
580: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
581: p_data => x_msg_data,

Line 579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

575: END IF;
576:
577: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
578: ROLLBACK TO Check_Inst_Completeness_Pvt;
579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
580: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
581: p_data => x_msg_data,
582: p_encoded => FND_API.G_FALSE);
583: IF (l_log_unexpected >= l_log_current_level) THEN

Line 582: p_encoded => FND_API.G_FALSE);

578: ROLLBACK TO Check_Inst_Completeness_Pvt;
579: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
580: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
581: p_data => x_msg_data,
582: p_encoded => FND_API.G_FALSE);
583: IF (l_log_unexpected >= l_log_current_level) THEN
584: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
585: END IF;
586:

Line 589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

585: END IF;
586:
587: WHEN OTHERS THEN
588: ROLLBACK TO Check_Inst_Completeness_Pvt;
589: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
590: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
591: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
592: p_procedure_name => l_api_name,
593: p_error_text => SUBSTR(SQLERRM,1,500));

Line 597: p_encoded => fnd_api.G_FALSE);

593: p_error_text => SUBSTR(SQLERRM,1,500));
594: END IF;
595: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
596: p_data => x_msg_data,
597: p_encoded => fnd_api.G_FALSE);
598: IF (l_log_unexpected >= l_log_current_level) THEN
599: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
600: END IF;
601:

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

620: --
621: -- End of Comments
622:
623: PROCEDURE Evaluate_Rules_For_Pos (
624: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
625: p_mc_header_id IN NUMBER,
626: p_mc_pos_key IN NUMBER,
627: p_inv_item_id IN NUMBER,
628: p_inv_org_id IN NUMBER,

Line 719: IF FND_API.To_Boolean(p_init_msg_list) THEN

715: FND_LOG.string(l_log_procedure, l_full_name || '.begin', 'At the start of the API');
716: END IF;
717:
718: -- Initialize message list if p_init_msg_list is set to TRUE
719: IF FND_API.To_Boolean(p_init_msg_list) THEN
720: FND_MSG_PUB.Initialize;
721: END IF;
722:
723: IF (l_log_statement >= l_log_current_level) THEN

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

805: -- End of Comments
806:
807: PROCEDURE Copy_Rules_For_MR (
808: p_api_version IN NUMBER := 1.0,
809: p_commit IN VARCHAR2 := FND_API.G_FALSE,
810: p_src_mr_header_id IN NUMBER,
811: p_dst_mr_header_id IN NUMBER,
812: x_return_status OUT NOCOPY VARCHAR2,
813: x_msg_count OUT NOCOPY NUMBER,

Line 858: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

854: -- Standard start of API savepoint
855: SAVEPOINT Copy_Rules_For_MR_Pvt;
856:
857: -- Standard call to check for call compatibility
858: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
859: l_api_name, G_PKG_NAME) THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862:

Line 860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

856:
857: -- Standard call to check for call compatibility
858: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
859: l_api_name, G_PKG_NAME) THEN
860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862:
863: -- Initialize Procedure return status to success
864: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 864: x_return_status := FND_API.G_RET_STS_SUCCESS;

860: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
861: END IF;
862:
863: -- Initialize Procedure return status to success
864: x_return_status := FND_API.G_RET_STS_SUCCESS;
865:
866: IF (l_log_statement >= l_log_current_level) THEN
867: FND_LOG.string(l_log_statement, l_full_name,
868: ' p_src_mr_header_id = '||p_src_mr_header_id||

Line 903: RAISE FND_API.G_EXC_ERROR;

899: CLOSE chk_mr_header_id_csr;
900:
901: -- If any errors occured, then raise them
902: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
903: RAISE FND_API.G_EXC_ERROR;
904: END IF;
905:
906: -- Copy the SB rules from source MR to destination MR
907: -- 1) get the translated message AHL_COM_COPY

Line 957: IF FND_API.TO_BOOLEAN(p_commit) THEN

953: END IF;
954: END LOOP;
955:
956: -- Standard check of p_commit
957: IF FND_API.TO_BOOLEAN(p_commit) THEN
958: COMMIT WORK;
959: END IF;
960:
961: IF (l_log_procedure >= l_log_current_level) THEN

Line 966: WHEN FND_API.G_EXC_ERROR THEN

962: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
963: END IF;
964:
965: EXCEPTION
966: WHEN FND_API.G_EXC_ERROR THEN
967: ROLLBACK TO Copy_Rules_For_MR_Pvt;
968: x_return_status := FND_API.G_RET_STS_ERROR;
969: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
970: p_data => x_msg_data,

Line 968: x_return_status := FND_API.G_RET_STS_ERROR;

964:
965: EXCEPTION
966: WHEN FND_API.G_EXC_ERROR THEN
967: ROLLBACK TO Copy_Rules_For_MR_Pvt;
968: x_return_status := FND_API.G_RET_STS_ERROR;
969: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
970: p_data => x_msg_data,
971: p_encoded => FND_API.G_FALSE);
972: IF (l_log_exception >= l_log_current_level) THEN

Line 971: p_encoded => FND_API.G_FALSE);

967: ROLLBACK TO Copy_Rules_For_MR_Pvt;
968: x_return_status := FND_API.G_RET_STS_ERROR;
969: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
970: p_data => x_msg_data,
971: p_encoded => FND_API.G_FALSE);
972: IF (l_log_exception >= l_log_current_level) THEN
973: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
974: END IF;
975:

Line 976: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

972: IF (l_log_exception >= l_log_current_level) THEN
973: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
974: END IF;
975:
976: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
977: ROLLBACK TO Copy_Rules_For_MR_Pvt;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
979: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
980: p_data => x_msg_data,

Line 978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

974: END IF;
975:
976: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
977: ROLLBACK TO Copy_Rules_For_MR_Pvt;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
979: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
980: p_data => x_msg_data,
981: p_encoded => FND_API.G_FALSE);
982: IF (l_log_unexpected >= l_log_current_level) THEN

Line 981: p_encoded => FND_API.G_FALSE);

977: ROLLBACK TO Copy_Rules_For_MR_Pvt;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
979: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
980: p_data => x_msg_data,
981: p_encoded => FND_API.G_FALSE);
982: IF (l_log_unexpected >= l_log_current_level) THEN
983: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
984: END IF;
985:

Line 988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

984: END IF;
985:
986: WHEN OTHERS THEN
987: ROLLBACK TO Copy_Rules_For_MR_Pvt;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
990: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
991: p_procedure_name => l_api_name,
992: p_error_text => SUBSTR(SQLERRM,1,500));

Line 996: p_encoded => fnd_api.G_FALSE);

992: p_error_text => SUBSTR(SQLERRM,1,500));
993: END IF;
994: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
995: p_data => x_msg_data,
996: p_encoded => fnd_api.G_FALSE);
997: IF (l_log_unexpected >= l_log_current_level) THEN
998: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
999: END IF;
1000:

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

1016: -- End of Comments
1017:
1018: PROCEDURE Update_Rules_For_MR (
1019: p_api_version IN NUMBER := 1.0,
1020: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1021: p_mr_header_id IN NUMBER,
1022: x_return_status OUT NOCOPY VARCHAR2,
1023: x_msg_count OUT NOCOPY NUMBER,
1024: x_msg_data OUT NOCOPY VARCHAR2

Line 1079: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1075: -- Standard start of API savepoint
1076: SAVEPOINT Update_Rules_For_MR_Pvt;
1077:
1078: -- Standard call to check for call compatibility
1079: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1080: l_api_name, G_PKG_NAME) THEN
1081: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1082: END IF;
1083:

Line 1081: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1077:
1078: -- Standard call to check for call compatibility
1079: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1080: l_api_name, G_PKG_NAME) THEN
1081: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1082: END IF;
1083:
1084: -- Initialize Procedure return status to success
1085: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1085: x_return_status := FND_API.G_RET_STS_SUCCESS;

1081: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1082: END IF;
1083:
1084: -- Initialize Procedure return status to success
1085: x_return_status := FND_API.G_RET_STS_SUCCESS;
1086:
1087: IF (l_log_statement >= l_log_current_level) THEN
1088: FND_LOG.string(l_log_statement, l_full_name,
1089: ' p_mr_header_id = '||p_mr_header_id);

Line 1104: RAISE FND_API.G_EXC_ERROR;

1100: END IF;
1101: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_UMP_PUE_MR_NOTFOUND'); -- Maintenance requirement ID (MR_ID) not found.
1102: FND_MESSAGE.Set_Token('MR_ID', p_mr_header_id);
1103: FND_MSG_PUB.ADD;
1104: RAISE FND_API.G_EXC_ERROR;
1105: END IF;
1106: CLOSE chk_mr_header_id_csr;
1107:
1108: -- Get the MC header ids for the SB rules defined for the given MR

Line 1133: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1129: x_msg_count => x_msg_count,
1130: x_msg_data => x_msg_data
1131: );
1132:
1133: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1134: IF (l_log_statement >= l_log_current_level) THEN
1135: FND_LOG.string(l_log_statement, l_full_name, 'AHL_FMP_PVT.Get_MR_Affected_Items call errored out');
1136: END IF;
1137: RAISE FND_API.G_EXC_ERROR;

Line 1137: RAISE FND_API.G_EXC_ERROR;

1133: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1134: IF (l_log_statement >= l_log_current_level) THEN
1135: FND_LOG.string(l_log_statement, l_full_name, 'AHL_FMP_PVT.Get_MR_Affected_Items call errored out');
1136: END IF;
1137: RAISE FND_API.G_EXC_ERROR;
1138: END IF;
1139:
1140: IF (l_log_statement >= l_log_current_level) THEN
1141: FND_LOG.string(l_log_statement, l_full_name, 'l_mr_item_inst_tbl.COUNT = '||l_mr_item_inst_tbl.COUNT);

Line 1184: IF FND_API.TO_BOOLEAN(p_commit) THEN

1180: END IF; -- l_mr_item_inst_tbl COUNT check
1181: END IF; -- l_sb_mc_hdr_id_tbl COUNT check
1182:
1183: -- Standard check of p_commit
1184: IF FND_API.TO_BOOLEAN(p_commit) THEN
1185: COMMIT WORK;
1186: END IF;
1187:
1188: IF (l_log_procedure >= l_log_current_level) THEN

Line 1193: WHEN FND_API.G_EXC_ERROR THEN

1189: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
1190: END IF;
1191:
1192: EXCEPTION
1193: WHEN FND_API.G_EXC_ERROR THEN
1194: ROLLBACK TO Update_Rules_For_MR_Pvt;
1195: x_return_status := FND_API.G_RET_STS_ERROR;
1196: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1197: p_data => x_msg_data,

Line 1195: x_return_status := FND_API.G_RET_STS_ERROR;

1191:
1192: EXCEPTION
1193: WHEN FND_API.G_EXC_ERROR THEN
1194: ROLLBACK TO Update_Rules_For_MR_Pvt;
1195: x_return_status := FND_API.G_RET_STS_ERROR;
1196: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1197: p_data => x_msg_data,
1198: p_encoded => FND_API.G_FALSE);
1199: IF (l_log_exception >= l_log_current_level) THEN

Line 1198: p_encoded => FND_API.G_FALSE);

1194: ROLLBACK TO Update_Rules_For_MR_Pvt;
1195: x_return_status := FND_API.G_RET_STS_ERROR;
1196: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1197: p_data => x_msg_data,
1198: p_encoded => FND_API.G_FALSE);
1199: IF (l_log_exception >= l_log_current_level) THEN
1200: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1201: END IF;
1202:

Line 1203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1199: IF (l_log_exception >= l_log_current_level) THEN
1200: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1201: END IF;
1202:
1203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1204: ROLLBACK TO Update_Rules_For_MR_Pvt;
1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1206: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1207: p_data => x_msg_data,

Line 1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1201: END IF;
1202:
1203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1204: ROLLBACK TO Update_Rules_For_MR_Pvt;
1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1206: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1207: p_data => x_msg_data,
1208: p_encoded => FND_API.G_FALSE);
1209: IF (l_log_unexpected >= l_log_current_level) THEN

Line 1208: p_encoded => FND_API.G_FALSE);

1204: ROLLBACK TO Update_Rules_For_MR_Pvt;
1205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1206: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1207: p_data => x_msg_data,
1208: p_encoded => FND_API.G_FALSE);
1209: IF (l_log_unexpected >= l_log_current_level) THEN
1210: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
1211: END IF;
1212:

Line 1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1211: END IF;
1212:
1213: WHEN OTHERS THEN
1214: ROLLBACK TO Update_Rules_For_MR_Pvt;
1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1216: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1217: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
1218: p_procedure_name => l_api_name,
1219: p_error_text => SUBSTR(SQLERRM,1,500));

Line 1223: p_encoded => fnd_api.G_FALSE);

1219: p_error_text => SUBSTR(SQLERRM,1,500));
1220: END IF;
1221: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
1222: p_data => x_msg_data,
1223: p_encoded => fnd_api.G_FALSE);
1224: IF (l_log_unexpected >= l_log_current_level) THEN
1225: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
1226: END IF;
1227:

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

1243: -- End of Comments
1244:
1245: PROCEDURE Delete_Rules_For_MR (
1246: p_api_version IN NUMBER := 1.0,
1247: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1248: p_mr_header_id IN NUMBER,
1249: x_return_status OUT NOCOPY VARCHAR2,
1250: x_msg_count OUT NOCOPY NUMBER,
1251: x_msg_data OUT NOCOPY VARCHAR2

Line 1288: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1284: -- Standard start of API savepoint
1285: SAVEPOINT Delete_Rules_For_MR_Pvt;
1286:
1287: -- Standard call to check for call compatibility
1288: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1289: l_api_name, G_PKG_NAME) THEN
1290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1291: END IF;
1292:

Line 1290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1286:
1287: -- Standard call to check for call compatibility
1288: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1289: l_api_name, G_PKG_NAME) THEN
1290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1291: END IF;
1292:
1293: -- Initialize Procedure return status to success
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1294: x_return_status := FND_API.G_RET_STS_SUCCESS;

1290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1291: END IF;
1292:
1293: -- Initialize Procedure return status to success
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295:
1296: IF (l_log_statement >= l_log_current_level) THEN
1297: FND_LOG.string(l_log_statement, l_full_name,
1298: ' p_mr_header_id = '||p_mr_header_id);

Line 1313: RAISE FND_API.G_EXC_ERROR;

1309: END IF;
1310: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_UMP_PUE_MR_NOTFOUND'); -- Maintenance requirement ID (MR_ID) not found.
1311: FND_MESSAGE.Set_Token('MR_ID', p_mr_header_id);
1312: FND_MSG_PUB.ADD;
1313: RAISE FND_API.G_EXC_ERROR;
1314: END IF;
1315: CLOSE chk_mr_header_id_csr;
1316:
1317: -- Get the SB rules defined for the given MR

Line 1336: IF FND_API.TO_BOOLEAN(p_commit) THEN

1332: END LOOP; -- LOOP for l_rule_id_tbl
1333: END IF; -- l_rule_id_tbl COUNT check
1334:
1335: -- Standard check of p_commit
1336: IF FND_API.TO_BOOLEAN(p_commit) THEN
1337: COMMIT WORK;
1338: END IF;
1339:
1340: IF (l_log_procedure >= l_log_current_level) THEN

Line 1345: WHEN FND_API.G_EXC_ERROR THEN

1341: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
1342: END IF;
1343:
1344: EXCEPTION
1345: WHEN FND_API.G_EXC_ERROR THEN
1346: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1347: x_return_status := FND_API.G_RET_STS_ERROR;
1348: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1349: p_data => x_msg_data,

Line 1347: x_return_status := FND_API.G_RET_STS_ERROR;

1343:
1344: EXCEPTION
1345: WHEN FND_API.G_EXC_ERROR THEN
1346: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1347: x_return_status := FND_API.G_RET_STS_ERROR;
1348: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1349: p_data => x_msg_data,
1350: p_encoded => FND_API.G_FALSE);
1351: IF (l_log_exception >= l_log_current_level) THEN

Line 1350: p_encoded => FND_API.G_FALSE);

1346: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1347: x_return_status := FND_API.G_RET_STS_ERROR;
1348: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1349: p_data => x_msg_data,
1350: p_encoded => FND_API.G_FALSE);
1351: IF (l_log_exception >= l_log_current_level) THEN
1352: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1353: END IF;
1354:

Line 1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1351: IF (l_log_exception >= l_log_current_level) THEN
1352: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1353: END IF;
1354:
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1358: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1359: p_data => x_msg_data,

Line 1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1353: END IF;
1354:
1355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1356: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1358: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1359: p_data => x_msg_data,
1360: p_encoded => FND_API.G_FALSE);
1361: IF (l_log_unexpected >= l_log_current_level) THEN

Line 1360: p_encoded => FND_API.G_FALSE);

1356: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1358: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1359: p_data => x_msg_data,
1360: p_encoded => FND_API.G_FALSE);
1361: IF (l_log_unexpected >= l_log_current_level) THEN
1362: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
1363: END IF;
1364:

Line 1367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1363: END IF;
1364:
1365: WHEN OTHERS THEN
1366: ROLLBACK TO Delete_Rules_For_MR_Pvt;
1367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1368: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1369: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
1370: p_procedure_name => l_api_name,
1371: p_error_text => SUBSTR(SQLERRM,1,500));

Line 1375: p_encoded => fnd_api.G_FALSE);

1371: p_error_text => SUBSTR(SQLERRM,1,500));
1372: END IF;
1373: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
1374: p_data => x_msg_data,
1375: p_encoded => fnd_api.G_FALSE);
1376: IF (l_log_unexpected >= l_log_current_level) THEN
1377: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
1378: END IF;
1379:

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

1657: -- End of Comments
1658:
1659: PROCEDURE Get_Violated_Instances (
1660: p_api_version IN NUMBER := 1.0,
1661: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1662: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1663: p_module_type IN VARCHAR2 := NULL,
1664: p_uc_header_id IN NUMBER,
1665: x_violated_inst_tbl OUT NOCOPY Violated_Inst_Tbl_Type,

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

1658:
1659: PROCEDURE Get_Violated_Instances (
1660: p_api_version IN NUMBER := 1.0,
1661: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1662: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1663: p_module_type IN VARCHAR2 := NULL,
1664: p_uc_header_id IN NUMBER,
1665: x_violated_inst_tbl OUT NOCOPY Violated_Inst_Tbl_Type,
1666: x_return_status OUT NOCOPY VARCHAR2,

Line 1757: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1753: -- Standard start of API savepoint
1754: SAVEPOINT Get_Violated_Instances_Pvt;
1755:
1756: -- Standard call to check for call compatibility
1757: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1758: l_api_name, G_PKG_NAME) THEN
1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1760: END IF;
1761:

Line 1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1755:
1756: -- Standard call to check for call compatibility
1757: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1758: l_api_name, G_PKG_NAME) THEN
1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1760: END IF;
1761:
1762: -- Initialize message list if p_init_msg_list is set to TRUE
1763: IF FND_API.To_Boolean( p_init_msg_list) THEN

Line 1763: IF FND_API.To_Boolean( p_init_msg_list) THEN

1759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1760: END IF;
1761:
1762: -- Initialize message list if p_init_msg_list is set to TRUE
1763: IF FND_API.To_Boolean( p_init_msg_list) THEN
1764: FND_MSG_PUB.Initialize;
1765: END IF;
1766:
1767: -- Initialize Procedure return status to success

Line 1768: x_return_status := FND_API.G_RET_STS_SUCCESS;

1764: FND_MSG_PUB.Initialize;
1765: END IF;
1766:
1767: -- Initialize Procedure return status to success
1768: x_return_status := FND_API.G_RET_STS_SUCCESS;
1769:
1770: IF (l_log_statement >= l_log_current_level) THEN
1771: FND_LOG.string(l_log_statement, l_full_name,
1772: ' p_uc_header_id = '||p_uc_header_id);

Line 1788: RAISE FND_API.G_EXC_ERROR;

1784: -- The Unit Configuration header identifier UC_HEADER_ID is invalid.
1785: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_UC_HEADER_ID_INVALID');
1786: FND_MESSAGE.Set_Token('UC_HEADER_ID', p_uc_header_id);
1787: FND_MSG_PUB.ADD;
1788: RAISE FND_API.G_EXC_ERROR;
1789: END IF;
1790: CLOSE chk_unit_header_id_csr;
1791:
1792: -- Get the applicable SB rules

Line 1832: WHEN FND_API.G_EXC_ERROR THEN

1828: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
1829: END IF;
1830:
1831: EXCEPTION
1832: WHEN FND_API.G_EXC_ERROR THEN
1833: ROLLBACK TO Get_Violated_Instances_Pvt;
1834: x_return_status := FND_API.G_RET_STS_ERROR;
1835: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1836: p_data => x_msg_data,

Line 1834: x_return_status := FND_API.G_RET_STS_ERROR;

1830:
1831: EXCEPTION
1832: WHEN FND_API.G_EXC_ERROR THEN
1833: ROLLBACK TO Get_Violated_Instances_Pvt;
1834: x_return_status := FND_API.G_RET_STS_ERROR;
1835: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1836: p_data => x_msg_data,
1837: p_encoded => FND_API.G_FALSE);
1838: IF (l_log_exception >= l_log_current_level) THEN

Line 1837: p_encoded => FND_API.G_FALSE);

1833: ROLLBACK TO Get_Violated_Instances_Pvt;
1834: x_return_status := FND_API.G_RET_STS_ERROR;
1835: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1836: p_data => x_msg_data,
1837: p_encoded => FND_API.G_FALSE);
1838: IF (l_log_exception >= l_log_current_level) THEN
1839: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1840: END IF;
1841:

Line 1842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1838: IF (l_log_exception >= l_log_current_level) THEN
1839: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
1840: END IF;
1841:
1842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1843: ROLLBACK TO Get_Violated_Instances_Pvt;
1844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1845: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1846: p_data => x_msg_data,

Line 1844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1840: END IF;
1841:
1842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1843: ROLLBACK TO Get_Violated_Instances_Pvt;
1844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1845: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1846: p_data => x_msg_data,
1847: p_encoded => FND_API.G_FALSE);
1848: IF (l_log_unexpected >= l_log_current_level) THEN

Line 1847: p_encoded => FND_API.G_FALSE);

1843: ROLLBACK TO Get_Violated_Instances_Pvt;
1844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1845: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1846: p_data => x_msg_data,
1847: p_encoded => FND_API.G_FALSE);
1848: IF (l_log_unexpected >= l_log_current_level) THEN
1849: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
1850: END IF;
1851:

Line 1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1850: END IF;
1851:
1852: WHEN OTHERS THEN
1853: ROLLBACK TO Get_Violated_Instances_Pvt;
1854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1855: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1856: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
1857: p_procedure_name => l_api_name,
1858: p_error_text => SUBSTR(SQLERRM,1,500));

Line 1862: p_encoded => fnd_api.G_FALSE);

1858: p_error_text => SUBSTR(SQLERRM,1,500));
1859: END IF;
1860: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
1861: p_data => x_msg_data,
1862: p_encoded => fnd_api.G_FALSE);
1863: IF (l_log_unexpected >= l_log_current_level) THEN
1864: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
1865: END IF;
1866:

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

1881: -- End of Comments
1882:
1883: PROCEDURE Get_Affected_MC (
1884: p_api_version IN NUMBER := 1.0,
1885: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1886: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1887: p_module_type IN VARCHAR2 := NULL,
1888: p_mr_header_id IN NUMBER,
1889: x_affected_mc_tbl OUT NOCOPY Affected_MC_Tbl_Type,

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

1882:
1883: PROCEDURE Get_Affected_MC (
1884: p_api_version IN NUMBER := 1.0,
1885: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1886: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1887: p_module_type IN VARCHAR2 := NULL,
1888: p_mr_header_id IN NUMBER,
1889: x_affected_mc_tbl OUT NOCOPY Affected_MC_Tbl_Type,
1890: x_return_status OUT NOCOPY VARCHAR2,

Line 1927: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,

1923: -- Standard start of API savepoint
1924: SAVEPOINT Get_Affected_MC_Pvt;
1925:
1926: -- Standard call to check for call compatibility
1927: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1928: l_api_name, G_PKG_NAME) THEN
1929: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1930: END IF;
1931:

Line 1929: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1925:
1926: -- Standard call to check for call compatibility
1927: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1928: l_api_name, G_PKG_NAME) THEN
1929: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1930: END IF;
1931:
1932: -- Initialize message list if p_init_msg_list is set to TRUE
1933: IF FND_API.To_Boolean( p_init_msg_list) THEN

Line 1933: IF FND_API.To_Boolean( p_init_msg_list) THEN

1929: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1930: END IF;
1931:
1932: -- Initialize message list if p_init_msg_list is set to TRUE
1933: IF FND_API.To_Boolean( p_init_msg_list) THEN
1934: FND_MSG_PUB.Initialize;
1935: END IF;
1936:
1937: -- Initialize Procedure return status to success

Line 1938: x_return_status := FND_API.G_RET_STS_SUCCESS;

1934: FND_MSG_PUB.Initialize;
1935: END IF;
1936:
1937: -- Initialize Procedure return status to success
1938: x_return_status := FND_API.G_RET_STS_SUCCESS;
1939:
1940: IF (l_log_statement >= l_log_current_level) THEN
1941: FND_LOG.string(l_log_statement, l_full_name,
1942: ' p_mr_header_id = '||p_mr_header_id);

Line 1957: RAISE FND_API.G_EXC_ERROR;

1953: END IF;
1954: FND_MESSAGE.Set_Name(G_APP_NAME, 'AHL_UMP_PUE_MR_NOTFOUND'); -- Maintenance requirement ID (MR_ID) not found.
1955: FND_MESSAGE.Set_Token('MR_ID', p_mr_header_id);
1956: FND_MSG_PUB.ADD;
1957: RAISE FND_API.G_EXC_ERROR;
1958: END IF;
1959: CLOSE chk_mr_header_id_csr;
1960:
1961: -- 1) Get the MR affected items

Line 1978: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1974: x_msg_count => x_msg_count,
1975: x_msg_data => x_msg_data
1976: );
1977:
1978: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1979: IF (l_log_statement >= l_log_current_level) THEN
1980: FND_LOG.string(l_log_statement, l_full_name, 'AHL_FMP_PVT.Get_MR_Affected_Items call errored out');
1981: END IF;
1982: RAISE FND_API.G_EXC_ERROR;

Line 1982: RAISE FND_API.G_EXC_ERROR;

1978: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1979: IF (l_log_statement >= l_log_current_level) THEN
1980: FND_LOG.string(l_log_statement, l_full_name, 'AHL_FMP_PVT.Get_MR_Affected_Items call errored out');
1981: END IF;
1982: RAISE FND_API.G_EXC_ERROR;
1983: END IF;
1984:
1985: IF (l_log_statement >= l_log_current_level) THEN
1986: FND_LOG.string(l_log_statement, l_full_name, 'l_mr_item_inst_tbl.COUNT = '||l_mr_item_inst_tbl.COUNT);

Line 2019: WHEN FND_API.G_EXC_ERROR THEN

2015: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'At the end of the API');
2016: END IF;
2017:
2018: EXCEPTION
2019: WHEN FND_API.G_EXC_ERROR THEN
2020: ROLLBACK TO Get_Affected_MC_Pvt;
2021: x_return_status := FND_API.G_RET_STS_ERROR;
2022: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2023: p_data => x_msg_data,

Line 2021: x_return_status := FND_API.G_RET_STS_ERROR;

2017:
2018: EXCEPTION
2019: WHEN FND_API.G_EXC_ERROR THEN
2020: ROLLBACK TO Get_Affected_MC_Pvt;
2021: x_return_status := FND_API.G_RET_STS_ERROR;
2022: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2023: p_data => x_msg_data,
2024: p_encoded => FND_API.G_FALSE);
2025: IF (l_log_exception >= l_log_current_level) THEN

Line 2024: p_encoded => FND_API.G_FALSE);

2020: ROLLBACK TO Get_Affected_MC_Pvt;
2021: x_return_status := FND_API.G_RET_STS_ERROR;
2022: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2023: p_data => x_msg_data,
2024: p_encoded => FND_API.G_FALSE);
2025: IF (l_log_exception >= l_log_current_level) THEN
2026: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
2027: END IF;
2028:

Line 2029: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2025: IF (l_log_exception >= l_log_current_level) THEN
2026: FND_LOG.string(l_log_exception, l_full_name, 'Execution Error: ' || x_msg_data);
2027: END IF;
2028:
2029: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2030: ROLLBACK TO Get_Affected_MC_Pvt;
2031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2032: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2033: p_data => x_msg_data,

Line 2031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2027: END IF;
2028:
2029: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2030: ROLLBACK TO Get_Affected_MC_Pvt;
2031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2032: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2033: p_data => x_msg_data,
2034: p_encoded => FND_API.G_FALSE);
2035: IF (l_log_unexpected >= l_log_current_level) THEN

Line 2034: p_encoded => FND_API.G_FALSE);

2030: ROLLBACK TO Get_Affected_MC_Pvt;
2031: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2032: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2033: p_data => x_msg_data,
2034: p_encoded => FND_API.G_FALSE);
2035: IF (l_log_unexpected >= l_log_current_level) THEN
2036: FND_LOG.string(l_log_unexpected, l_full_name, 'Unexpected Exception: ' || x_msg_data);
2037: END IF;
2038:

Line 2041: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2037: END IF;
2038:
2039: WHEN OTHERS THEN
2040: ROLLBACK TO Get_Affected_MC_Pvt;
2041: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2042: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2043: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
2044: p_procedure_name => l_api_name,
2045: p_error_text => SUBSTR(SQLERRM,1,500));

Line 2049: p_encoded => fnd_api.G_FALSE);

2045: p_error_text => SUBSTR(SQLERRM,1,500));
2046: END IF;
2047: FND_MSG_PUB.count_and_get(p_count => x_msg_count,
2048: p_data => x_msg_data,
2049: p_encoded => fnd_api.G_FALSE);
2050: IF (l_log_unexpected >= l_log_current_level) THEN
2051: FND_LOG.string(l_log_unexpected, l_full_name, 'Other Exception: ' || x_msg_data);
2052: END IF;
2053: