eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_ENIGMA_IPC_PROCS_PVT dependencies on FND_API

Line 43: p_encoded => FND_API.G_FALSE);

39:
40: IF (l_msg_count = 1) then
41: FND_MSG_PUB.count_and_get(p_count => l_msg_count,
42: p_data => l_temp_msg_data,
43: p_encoded => FND_API.G_FALSE);
44: l_msg_data := l_temp_msg_data;
45: ELSE
46: IF (l_msg_count > 0) THEN
47: FOR i IN 1..l_msg_count LOOP

Line 49: p_encoded => FND_API.G_FALSE,

45: ELSE
46: IF (l_msg_count > 0) THEN
47: FOR i IN 1..l_msg_count LOOP
48: FND_MSG_PUB.get(
49: p_encoded => FND_API.G_FALSE,
50: p_data => l_temp_msg_data,
51: p_msg_index_out => l_msg_index_out);
52:
53: IF (i = 1) THEN

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

134: -- End of Comments
135:
136: PROCEDURE Process_Item_Group (
137: p_api_version IN NUMBER,
138: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
139: p_commit IN VARCHAR2 := FND_API.G_FALSE,
140: x_return_status OUT NOCOPY VARCHAR2,
141: x_msg_count OUT NOCOPY NUMBER,
142: x_msg_data OUT NOCOPY VARCHAR2,

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

135:
136: PROCEDURE Process_Item_Group (
137: p_api_version IN NUMBER,
138: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
139: p_commit IN VARCHAR2 := FND_API.G_FALSE,
140: x_return_status OUT NOCOPY VARCHAR2,
141: x_msg_count OUT NOCOPY NUMBER,
142: x_msg_data OUT NOCOPY VARCHAR2,
143: p_report_file_name IN VARCHAR2 := NULL,

Line 204: x_return_status := FND_API.G_RET_STS_SUCCESS;

200: -- Standard start of API savepoint
201: SAVEPOINT Process_Item_Group_Pub;
202:
203: -- Initialize Procedure return status to success
204: x_return_status := FND_API.G_RET_STS_SUCCESS;
205:
206: -- Standard call to check for call compatibility
207: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
208: l_api_name, G_PKG_NAME) THEN

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

203: -- Initialize Procedure return status to success
204: x_return_status := FND_API.G_RET_STS_SUCCESS;
205:
206: -- Standard call to check for call compatibility
207: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
208: l_api_name, G_PKG_NAME) THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:

Line 209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

205:
206: -- Standard call to check for call compatibility
207: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
208: l_api_name, G_PKG_NAME) THEN
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:
212: -- Initialize message list if p_init_msg_list is set to TRUE
213: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 213: IF FND_API.To_Boolean(p_init_msg_list) THEN

209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:
212: -- Initialize message list if p_init_msg_list is set to TRUE
213: IF FND_API.To_Boolean(p_init_msg_list) THEN
214: FND_MSG_PUB.Initialize;
215: END IF;
216:
217: -- get the Enigma user and responsibility, and call apps_initialize

Line 243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

239: -- check for the profile value
240: IF (l_org_id IS NULL) THEN
241: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_ORG_PRFL_NULL'); -- Profile 'AHL: Enigma Sourced Item Org' can't be NULL. (new message)
242: FND_MSG_PUB.ADD;
243: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
244: END IF;
245:
246: IF (l_log_statement >= l_log_current_level) THEN
247: FND_LOG.string(l_log_statement, l_full_name,

Line 260: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

256: -- invalid operation flag
257: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
258: FND_MESSAGE.Set_Token('OPR_FLAG', l_item_group_rec.operation_flag);
259: FND_MSG_PUB.ADD;
260: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
261: END IF;
262:
263: IF (l_log_statement >= l_log_current_level) THEN
264: FND_LOG.string(l_log_statement, l_full_name, 'l_items_tbl.COUNT = '|| l_items_tbl.COUNT);

Line 276: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

272: -- items table can't be empty for creation - it needs at least one item
273: IF (l_item_group_rec.operation_flag = 'C') THEN
274: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_AIG_NO_ITEMS'); -- At least one association item is required to create the Item Group. (new message)
275: FND_MSG_PUB.ADD;
276: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
277: END IF;
278: END IF;
279:
280: -- check for the header's operation flag

Line 293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

289: -- item group name is invalid
290: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ITEMGRP_INVALID'); -- Item Group ITEM_GRP is invalid.
291: FND_MESSAGE.Set_Token('ITEM_GRP', l_item_group_rec.name);
292: FND_MSG_PUB.ADD;
293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
294: END IF;
295: CLOSE get_ig_id_csr;
296:
297: IF (l_log_statement >= l_log_current_level) THEN

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

314: 'AHL_MC_ITEMGROUP_PVT.Remove_Item_group returned x_return_status as ' || x_return_status);
315: END IF;
316:
317: -- check for the return status
318: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
319: IF (l_log_statement >= l_log_current_level) THEN
320: FND_LOG.string(l_log_statement, l_full_name,
321: 'Raising exception with x_return_status = ' || x_return_status);
322: END IF;

Line 323: RAISE FND_API.G_EXC_ERROR;

319: IF (l_log_statement >= l_log_current_level) THEN
320: FND_LOG.string(l_log_statement, l_full_name,
321: 'Raising exception with x_return_status = ' || x_return_status);
322: END IF;
323: RAISE FND_API.G_EXC_ERROR;
324: END IF;
325:
326: ELSIF (l_item_group_rec.operation_flag = 'C') THEN
327: -------------------------- Create Item Group --------------------------

Line 337: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

333: CLOSE chk_ig_type_code_csr;
334: -- item group type is invalid
335: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_IG_TYPE_INVALID'); -- Item Group Type is invalid.
336: FND_MSG_PUB.ADD;
337: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
338: END IF;
339: CLOSE chk_ig_type_code_csr;
340:
341: IF (l_items_tbl.COUNT >= 1) THEN

Line 383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

379: END IF;
380: CLOSE chk_interchg_type_code_csr;
381: END LOOP;
382: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
384: END IF;
385: END IF;
386:
387: IF (l_log_statement >= l_log_current_level) THEN

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

405: 'AHL_MC_ITEMGROUP_PVT.Create_Item_group returned x_return_status as ' || x_return_status);
406: END IF;
407:
408: -- check for the return status
409: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
410: IF (l_log_statement >= l_log_current_level) THEN
411: FND_LOG.string(l_log_statement, l_full_name,
412: 'Raising exception with x_return_status = ' || x_return_status);
413: END IF;

Line 414: RAISE FND_API.G_EXC_ERROR;

410: IF (l_log_statement >= l_log_current_level) THEN
411: FND_LOG.string(l_log_statement, l_full_name,
412: 'Raising exception with x_return_status = ' || x_return_status);
413: END IF;
414: RAISE FND_API.G_EXC_ERROR;
415: END IF;
416:
417: -- move the item group to Complete status
418: IF (l_log_statement >= l_log_current_level) THEN

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

438: 'AHL_MC_ITEMGROUP_PVT.Approve_ItemGroups returned x_return_status as ' || x_return_status);
439: END IF;
440:
441: -- check for the return status
442: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
443: IF (l_log_statement >= l_log_current_level) THEN
444: FND_LOG.string(l_log_statement, l_full_name,
445: 'Raising exception with x_return_status = ' || x_return_status);
446: END IF;

Line 447: RAISE FND_API.G_EXC_ERROR;

443: IF (l_log_statement >= l_log_current_level) THEN
444: FND_LOG.string(l_log_statement, l_full_name,
445: 'Raising exception with x_return_status = ' || x_return_status);
446: END IF;
447: RAISE FND_API.G_EXC_ERROR;
448: END IF;
449:
450: -- update the new field SOURCED_FROM_ENIGMA_FLAG in the table AHL_ITEM_GROUPS_B
451: UPDATE ahl_item_groups_b

Line 467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

463: -- item group name is invalid
464: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ITEMGRP_INVALID'); -- Item Group ITEM_GRP is invalid.
465: FND_MESSAGE.Set_Token('ITEM_GRP', l_item_group_rec.name);
466: FND_MSG_PUB.ADD;
467: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
468: END IF;
469: CLOSE get_ig_id_csr;
470:
471: -- validate the header type code

Line 479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

475: CLOSE chk_ig_type_code_csr;
476: -- item group type is invalid
477: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_IG_TYPE_INVALID'); -- Item Group Type is invalid.
478: FND_MSG_PUB.ADD;
479: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
480: END IF;
481: CLOSE chk_ig_type_code_csr;
482:
483: IF (l_items_tbl.COUNT >= 1) THEN

Line 542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

538: END IF;
539: CLOSE chk_interchg_type_code_csr;
540: END LOOP;
541: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543: END IF;
544: END IF;
545:
546: IF (l_log_statement >= l_log_current_level) THEN

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

564: 'AHL_MC_ITEMGROUP_PVT.Modify_Item_group returned x_return_status as ' || x_return_status);
565: END IF;
566:
567: -- check for the return status
568: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
569: IF (l_log_statement >= l_log_current_level) THEN
570: FND_LOG.string(l_log_statement, l_full_name,
571: 'Raising exception with x_return_status = ' || x_return_status);
572: END IF;

Line 573: RAISE FND_API.G_EXC_ERROR;

569: IF (l_log_statement >= l_log_current_level) THEN
570: FND_LOG.string(l_log_statement, l_full_name,
571: 'Raising exception with x_return_status = ' || x_return_status);
572: END IF;
573: RAISE FND_API.G_EXC_ERROR;
574: END IF;
575:
576: END IF; -- header's operation flag check
577:

Line 579: IF FND_API.TO_BOOLEAN(p_commit) THEN

575:
576: END IF; -- header's operation flag check
577:
578: -- Standard check of p_commit
579: IF FND_API.TO_BOOLEAN(p_commit) THEN
580: COMMIT WORK;
581: END IF;
582:
583: -- enter the success log

Line 589: p_process_status => FND_API.G_RET_STS_SUCCESS,

585: p_report_type => l_ig_report_type,
586: p_report_file_name => p_report_file_name,
587: p_object_name => l_item_group_rec.name,
588: p_operation_flag => l_item_group_rec.operation_flag,
589: p_process_status => FND_API.G_RET_STS_SUCCESS,
590: p_msg_count => 0
591: );
592:
593: IF (l_log_procedure >= l_log_current_level) THEN

Line 598: WHEN FND_API.G_EXC_ERROR THEN

594: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'End of the API');
595: END IF;
596:
597: EXCEPTION
598: WHEN FND_API.G_EXC_ERROR THEN
599: Rollback to Process_Item_Group_Pub;
600: x_return_status := FND_API.G_RET_STS_ERROR;
601: x_msg_count := FND_MSG_PUB.count_msg;
602: -- enter the error log

Line 600: x_return_status := FND_API.G_RET_STS_ERROR;

596:
597: EXCEPTION
598: WHEN FND_API.G_EXC_ERROR THEN
599: Rollback to Process_Item_Group_Pub;
600: x_return_status := FND_API.G_RET_STS_ERROR;
601: x_msg_count := FND_MSG_PUB.count_msg;
602: -- enter the error log
603: Enter_Process_Log (
604: p_report_type => l_ig_report_type,

Line 612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

608: p_process_status => x_return_status,
609: p_msg_count => x_msg_count
610: );
611:
612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
613: Rollback to Process_Item_Group_Pub;
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: x_msg_count := FND_MSG_PUB.count_msg;
616: -- enter the error log

Line 614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

610: );
611:
612: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
613: Rollback to Process_Item_Group_Pub;
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
615: x_msg_count := FND_MSG_PUB.count_msg;
616: -- enter the error log
617: Enter_Process_Log (
618: p_report_type => l_ig_report_type,

Line 628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

624: );
625:
626: WHEN OTHERS THEN
627: Rollback to Process_Item_Group_Pub;
628: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
629: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,
630: p_procedure_name => l_api_name,
631: p_error_text => SQLERRM);
632: x_msg_count := FND_MSG_PUB.count_msg;

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

658: -- End of Comments
659:
660: PROCEDURE Process_Master_Config (
661: p_api_version IN NUMBER,
662: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
663: p_commit IN VARCHAR2 := FND_API.G_FALSE,
664: x_return_status OUT NOCOPY VARCHAR2,
665: x_msg_count OUT NOCOPY NUMBER,
666: x_msg_data OUT NOCOPY VARCHAR2,

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

659:
660: PROCEDURE Process_Master_Config (
661: p_api_version IN NUMBER,
662: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
663: p_commit IN VARCHAR2 := FND_API.G_FALSE,
664: x_return_status OUT NOCOPY VARCHAR2,
665: x_msg_count OUT NOCOPY NUMBER,
666: x_msg_data OUT NOCOPY VARCHAR2,
667: p_report_file_name IN VARCHAR2 := NULL,

Line 733: x_return_status := FND_API.G_RET_STS_SUCCESS;

729: -- Standard start of API savepoint
730: SAVEPOINT Process_Master_Config_Pub;
731:
732: -- Initialize Procedure return status to success
733: x_return_status := FND_API.G_RET_STS_SUCCESS;
734:
735: -- Standard call to check for call compatibility
736: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
737: l_api_name, G_PKG_NAME) THEN

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

732: -- Initialize Procedure return status to success
733: x_return_status := FND_API.G_RET_STS_SUCCESS;
734:
735: -- Standard call to check for call compatibility
736: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
737: l_api_name, G_PKG_NAME) THEN
738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
739: END IF;
740:

Line 738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

734:
735: -- Standard call to check for call compatibility
736: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
737: l_api_name, G_PKG_NAME) THEN
738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
739: END IF;
740:
741: -- Initialize message list if p_init_msg_list is set to TRUE
742: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 742: IF FND_API.To_Boolean(p_init_msg_list) THEN

738: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
739: END IF;
740:
741: -- Initialize message list if p_init_msg_list is set to TRUE
742: IF FND_API.To_Boolean(p_init_msg_list) THEN
743: FND_MSG_PUB.Initialize;
744: END IF;
745:
746: -- get the Enigma user and responsibility, and call apps_initialize

Line 774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

770: END IF;
771: -- nodes table can't be empty - it needs at least the root node
772: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_NO_NODES'); -- At least one position is required to create the Master Configuration. (new message)
773: FND_MSG_PUB.ADD;
774: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776:
777: -- validate the header's model code
778: IF (l_mc_header_rec.model_code IS NOT NULL) THEN

Line 787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

783: -- model code is invalid
784: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_MODEL_INVALID'); -- Model "MODEL_MEANING" is invalid.
785: FND_MESSAGE.Set_Token('MODEL_MEANING', l_mc_header_rec.model_code);
786: FND_MSG_PUB.ADD;
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END IF;
789: CLOSE chk_model_code_csr;
790: END IF;
791:

Line 829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

825: CLOSE chk_ata_code_csr;
826: END IF;
827: END LOOP;
828: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
830: END IF;
831:
832: -- create the MC header
833: l_mc_header_rec.operation_flag := 'C';

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

860: ', root node relationship id = '||l_nodes_tbl(1).relationship_id);
861: END IF;
862:
863: -- check for the return status
864: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
865: IF (l_log_statement >= l_log_current_level) THEN
866: FND_LOG.string(l_log_statement, l_full_name,
867: 'Raising exception with x_return_status = ' || x_return_status);
868: END IF;

Line 869: RAISE FND_API.G_EXC_ERROR;

865: IF (l_log_statement >= l_log_current_level) THEN
866: FND_LOG.string(l_log_statement, l_full_name,
867: 'Raising exception with x_return_status = ' || x_return_status);
868: END IF;
869: RAISE FND_API.G_EXC_ERROR;
870: END IF;
871:
872: -- push the root node position data in the position stack
873: l_mc_pos_ref.put(l_nodes_tbl(1).position_ref_code, l_nodes_tbl(1).relationship_id);

Line 904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

900: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_PARENT_INVALID'); -- Parent position PAR_POS_REF for the position POS_REF is invalid. (new message)
901: FND_MESSAGE.Set_Token('PAR_POS_REF', l_nodes_tbl(i).parent_position_ref_code);
902: FND_MESSAGE.Set_Token('POS_REF', l_nodes_tbl(i).position_ref_code);
903: FND_MSG_PUB.ADD;
904: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
905: END IF;
906:
907: IF (l_log_statement >= l_log_current_level) THEN
908: FND_LOG.string(l_log_statement, l_full_name,

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

927: ', node relationship id = '||l_nodes_tbl(i).relationship_id);
928: END IF;
929:
930: -- check for the return status
931: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
932: IF (l_log_statement >= l_log_current_level) THEN
933: FND_LOG.string(l_log_statement, l_full_name,
934: 'Raising exception with x_return_status = ' || x_return_status);
935: END IF;

Line 936: RAISE FND_API.G_EXC_ERROR;

932: IF (l_log_statement >= l_log_current_level) THEN
933: FND_LOG.string(l_log_statement, l_full_name,
934: 'Raising exception with x_return_status = ' || x_return_status);
935: END IF;
936: RAISE FND_API.G_EXC_ERROR;
937: END IF;
938:
939: -- push the node position data in the position stack
940: l_mc_pos_ref.put(l_nodes_tbl(i).position_ref_code, l_nodes_tbl(i).relationship_id);

Line 947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

943: ELSE
944: -- Position stack AHL_MC_POS_STACK object has exceeded its max_size. Please increase it to an appropriate value. (new message)
945: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_STACK_OVRFLW');
946: FND_MSG_PUB.ADD;
947: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
948: END IF;
949: END LOOP;
950: END IF;
951:

Line 958: IF FND_API.TO_BOOLEAN(p_commit) THEN

954: SET sourced_from_enigma_flag = 'Y'
955: WHERE mc_header_id = l_mc_header_rec.mc_header_id;
956:
957: -- Standard check of p_commit
958: IF FND_API.TO_BOOLEAN(p_commit) THEN
959: COMMIT WORK;
960: END IF;
961:
962: -- enter the success log

Line 968: p_process_status => FND_API.G_RET_STS_SUCCESS,

964: p_report_type => l_mc_report_type,
965: p_report_file_name => p_report_file_name,
966: p_object_name => p_mc_header_rec.name,
967: p_operation_flag => 'C',
968: p_process_status => FND_API.G_RET_STS_SUCCESS,
969: p_msg_count => 0
970: );
971:
972: IF (l_log_procedure >= l_log_current_level) THEN

Line 977: WHEN FND_API.G_EXC_ERROR THEN

973: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'End of the API');
974: END IF;
975:
976: EXCEPTION
977: WHEN FND_API.G_EXC_ERROR THEN
978: Rollback to Process_Master_Config_Pub;
979: x_return_status := FND_API.G_RET_STS_ERROR;
980: x_msg_count := FND_MSG_PUB.count_msg;
981: -- enter the error log

Line 979: x_return_status := FND_API.G_RET_STS_ERROR;

975:
976: EXCEPTION
977: WHEN FND_API.G_EXC_ERROR THEN
978: Rollback to Process_Master_Config_Pub;
979: x_return_status := FND_API.G_RET_STS_ERROR;
980: x_msg_count := FND_MSG_PUB.count_msg;
981: -- enter the error log
982: Enter_Process_Log (
983: p_report_type => l_mc_report_type,

Line 991: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

987: p_process_status => x_return_status,
988: p_msg_count => x_msg_count
989: );
990:
991: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
992: Rollback to Process_Master_Config_Pub;
993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
994: x_msg_count := FND_MSG_PUB.count_msg;
995: -- enter the error log

Line 993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

989: );
990:
991: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
992: Rollback to Process_Master_Config_Pub;
993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
994: x_msg_count := FND_MSG_PUB.count_msg;
995: -- enter the error log
996: Enter_Process_Log (
997: p_report_type => l_mc_report_type,

Line 1007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1003: );
1004:
1005: WHEN OTHERS THEN
1006: Rollback to Process_Master_Config_Pub;
1007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1008: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,
1009: p_procedure_name => l_api_name,
1010: p_error_text => SQLERRM);
1011: x_msg_count := FND_MSG_PUB.count_msg;

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

1037: -- End of Comments
1038:
1039: PROCEDURE Process_Item_Composition (
1040: p_api_version IN NUMBER,
1041: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1042: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1043: x_return_status OUT NOCOPY VARCHAR2,
1044: x_msg_count OUT NOCOPY NUMBER,
1045: x_msg_data OUT NOCOPY VARCHAR2,

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

1038:
1039: PROCEDURE Process_Item_Composition (
1040: p_api_version IN NUMBER,
1041: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1042: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1043: x_return_status OUT NOCOPY VARCHAR2,
1044: x_msg_count OUT NOCOPY NUMBER,
1045: x_msg_data OUT NOCOPY VARCHAR2,
1046: p_report_file_name IN VARCHAR2 := NULL,

Line 1095: x_return_status := FND_API.G_RET_STS_SUCCESS;

1091: -- Standard start of API savepoint
1092: SAVEPOINT Process_Item_Composition_Pub;
1093:
1094: -- Initialize Procedure return status to success
1095: x_return_status := FND_API.G_RET_STS_SUCCESS;
1096:
1097: -- Standard call to check for call compatibility
1098: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1099: l_api_name, G_PKG_NAME) THEN

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

1094: -- Initialize Procedure return status to success
1095: x_return_status := FND_API.G_RET_STS_SUCCESS;
1096:
1097: -- Standard call to check for call compatibility
1098: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1099: l_api_name, G_PKG_NAME) THEN
1100: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1101: END IF;
1102:

Line 1100: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1096:
1097: -- Standard call to check for call compatibility
1098: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version,
1099: l_api_name, G_PKG_NAME) THEN
1100: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1101: END IF;
1102:
1103: -- Initialize message list if p_init_msg_list is set to TRUE
1104: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1104: IF FND_API.To_Boolean(p_init_msg_list) THEN

1100: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1101: END IF;
1102:
1103: -- Initialize message list if p_init_msg_list is set to TRUE
1104: IF FND_API.To_Boolean(p_init_msg_list) THEN
1105: FND_MSG_PUB.Initialize;
1106: END IF;
1107:
1108: -- get the Enigma user and responsibility, and call apps_initialize

Line 1134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1130: -- check for the profile value
1131: IF (l_org_id IS NULL) THEN
1132: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_ORG_PRFL_NULL'); -- Profile 'AHL: Enigma Sourced Item Org' can't be NULL. (new message)
1133: FND_MSG_PUB.ADD;
1134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1135: END IF;
1136:
1137: -- set the inventory org id and the master org id in the header record
1138: l_ic_header_rec.inventory_org_id := l_org_id;

Line 1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1151: -- invalid operation flag
1152: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
1153: FND_MESSAGE.Set_Token('OPR_FLAG', l_ic_header_rec.operation_flag);
1154: FND_MSG_PUB.ADD;
1155: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1156: END IF;
1157:
1158: IF (l_log_statement >= l_log_current_level) THEN
1159: FND_LOG.string(l_log_statement, l_full_name, 'l_det_tbl.COUNT = '|| l_det_tbl.COUNT);

Line 1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1167: -- items table can't be empty for creation and update - it needs at least one item
1168: IF (l_ic_header_rec.operation_flag <> 'D') THEN
1169: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_CL_NO_ITEMS'); -- At least one composition item is required to create or update the Composition List. (new message)
1170: FND_MSG_PUB.ADD;
1171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1172: END IF;
1173: END IF;
1174:
1175: -- check for the header's operation flag

Line 1187: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1183: CLOSE get_ic_id_csr;
1184: -- item composition header is invalid
1185: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_COMP_HEADER_MISMATCH'); -- Item Composition header is invalid.
1186: FND_MSG_PUB.ADD;
1187: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1188: END IF;
1189: CLOSE get_ic_id_csr;
1190:
1191: IF (l_log_statement >= l_log_current_level) THEN

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

1209: 'AHL_MC_ITEM_COMP_PVT.Delete_Item_Composition returned x_return_status as ' || x_return_status);
1210: END IF;
1211:
1212: -- check for the return status
1213: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1214: IF (l_log_statement >= l_log_current_level) THEN
1215: FND_LOG.string(l_log_statement, l_full_name,
1216: 'Raising exception with x_return_status = ' || x_return_status);
1217: END IF;

Line 1218: RAISE FND_API.G_EXC_ERROR;

1214: IF (l_log_statement >= l_log_current_level) THEN
1215: FND_LOG.string(l_log_statement, l_full_name,
1216: 'Raising exception with x_return_status = ' || x_return_status);
1217: END IF;
1218: RAISE FND_API.G_EXC_ERROR;
1219: END IF;
1220:
1221: ELSIF (l_ic_header_rec.operation_flag = 'C') THEN
1222: -------------------------- Create Item Composition --------------------------

Line 1233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1229: -- header item is invalid
1230: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INV_INVALID'); -- Inventory Item (INV_ITEM) is invalid.
1231: FND_MESSAGE.Set_Token('INV_ITEM', l_ic_header_rec.inventory_item_name);
1232: FND_MSG_PUB.ADD;
1233: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1234: END IF;
1235: CLOSE get_item_id_csr;
1236:
1237: IF (l_det_tbl.COUNT >= 1) THEN

Line 1268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1264: END IF;
1265: CLOSE get_item_id_csr;
1266: END LOOP;
1267: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
1268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1269: END IF;
1270: END IF;
1271:
1272: IF (l_log_statement >= l_log_current_level) THEN

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

1290: 'AHL_MC_ITEM_COMP_PVT.Create_Item_Composition returned x_return_status as ' || x_return_status);
1291: END IF;
1292:
1293: -- check for the return status
1294: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1295: IF (l_log_statement >= l_log_current_level) THEN
1296: FND_LOG.string(l_log_statement, l_full_name,
1297: 'Raising exception with x_return_status = ' || x_return_status);
1298: END IF;

Line 1299: RAISE FND_API.G_EXC_ERROR;

1295: IF (l_log_statement >= l_log_current_level) THEN
1296: FND_LOG.string(l_log_statement, l_full_name,
1297: 'Raising exception with x_return_status = ' || x_return_status);
1298: END IF;
1299: RAISE FND_API.G_EXC_ERROR;
1300: END IF;
1301:
1302: -- move the item composition to Complete status
1303: IF (l_log_statement >= l_log_current_level) THEN

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

1323: 'AHL_MC_ITEM_COMP_PVT.Approve_Item_Composiiton returned x_return_status as ' || x_return_status);
1324: END IF;
1325:
1326: -- check for the return status
1327: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1328: IF (l_log_statement >= l_log_current_level) THEN
1329: FND_LOG.string(l_log_statement, l_full_name,
1330: 'Raising exception with x_return_status = ' || x_return_status);
1331: END IF;

Line 1332: RAISE FND_API.G_EXC_ERROR;

1328: IF (l_log_statement >= l_log_current_level) THEN
1329: FND_LOG.string(l_log_statement, l_full_name,
1330: 'Raising exception with x_return_status = ' || x_return_status);
1331: END IF;
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1334:
1335: -- update the new field SOURCED_FROM_ENIGMA_FLAG in the table AHL_ITEM_COMPOSITIONS
1336: UPDATE ahl_item_compositions

Line 1351: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1347: CLOSE get_ic_id_csr;
1348: -- item composition header is invalid
1349: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_COMP_HEADER_MISMATCH'); -- Item Composition header is invalid.
1350: FND_MSG_PUB.ADD;
1351: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1352: END IF;
1353: CLOSE get_ic_id_csr;
1354:
1355: IF (l_det_tbl.COUNT >= 1) THEN

Line 1402: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1398: l_det_tbl(i).item_composition_id := l_ic_header_rec.item_composition_id;
1399: END IF;
1400: END LOOP;
1401: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN
1402: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1403: END IF;
1404: END IF;
1405:
1406: IF (l_log_statement >= l_log_current_level) THEN

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

1424: 'AHL_MC_ITEM_COMP_PVT.Modify_Item_Composition returned x_return_status as ' || x_return_status);
1425: END IF;
1426:
1427: -- check for the return status
1428: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1429: IF (l_log_statement >= l_log_current_level) THEN
1430: FND_LOG.string(l_log_statement, l_full_name,
1431: 'Raising exception with x_return_status = ' || x_return_status);
1432: END IF;

Line 1433: RAISE FND_API.G_EXC_ERROR;

1429: IF (l_log_statement >= l_log_current_level) THEN
1430: FND_LOG.string(l_log_statement, l_full_name,
1431: 'Raising exception with x_return_status = ' || x_return_status);
1432: END IF;
1433: RAISE FND_API.G_EXC_ERROR;
1434: END IF;
1435:
1436: END IF; -- header's operation flag check
1437:

Line 1439: IF FND_API.TO_BOOLEAN(p_commit) THEN

1435:
1436: END IF; -- header's operation flag check
1437:
1438: -- Standard check of p_commit
1439: IF FND_API.TO_BOOLEAN(p_commit) THEN
1440: COMMIT WORK;
1441: END IF;
1442:
1443: -- enter the success log

Line 1449: p_process_status => FND_API.G_RET_STS_SUCCESS,

1445: p_report_type => l_ic_report_type,
1446: p_report_file_name => p_report_file_name,
1447: p_object_name => l_ic_header_rec.inventory_item_name,
1448: p_operation_flag => l_ic_header_rec.operation_flag,
1449: p_process_status => FND_API.G_RET_STS_SUCCESS,
1450: p_msg_count => 0
1451: );
1452:
1453: IF (l_log_procedure >= l_log_current_level) THEN

Line 1458: WHEN FND_API.G_EXC_ERROR THEN

1454: FND_LOG.string(l_log_procedure, l_full_name || '.end', 'End of the API');
1455: END IF;
1456:
1457: EXCEPTION
1458: WHEN FND_API.G_EXC_ERROR THEN
1459: Rollback to Process_Item_Composition_Pub;
1460: x_return_status := FND_API.G_RET_STS_ERROR;
1461: x_msg_count := FND_MSG_PUB.count_msg;
1462: -- enter the error log

Line 1460: x_return_status := FND_API.G_RET_STS_ERROR;

1456:
1457: EXCEPTION
1458: WHEN FND_API.G_EXC_ERROR THEN
1459: Rollback to Process_Item_Composition_Pub;
1460: x_return_status := FND_API.G_RET_STS_ERROR;
1461: x_msg_count := FND_MSG_PUB.count_msg;
1462: -- enter the error log
1463: Enter_Process_Log (
1464: p_report_type => l_ic_report_type,

Line 1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1468: p_process_status => x_return_status,
1469: p_msg_count => x_msg_count
1470: );
1471:
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1473: Rollback to Process_Item_Composition_Pub;
1474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1475: x_msg_count := FND_MSG_PUB.count_msg;
1476: -- enter the error log

Line 1474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1470: );
1471:
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1473: Rollback to Process_Item_Composition_Pub;
1474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1475: x_msg_count := FND_MSG_PUB.count_msg;
1476: -- enter the error log
1477: Enter_Process_Log (
1478: p_report_type => l_ic_report_type,

Line 1488: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1484: );
1485:
1486: WHEN OTHERS THEN
1487: Rollback to Process_Item_Composition_Pub;
1488: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1489: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,
1490: p_procedure_name => l_api_name,
1491: p_error_text => SQLERRM);
1492: x_msg_count := FND_MSG_PUB.count_msg;

Line 1558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1554: IF (l_process_URL IS NULL) THEN
1555: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Error occurred. Details: '||
1556: 'profile AHL: BPEL IPC Process (AhlProcessIPCReports) URL is not set.');
1557: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1559: END IF;
1560:
1561: -- create the empty XML input for the process
1562: l_xml_input := '

Line 1625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1621: FND_FILE.PUT_LINE(FND_FILE.LOG, l_temp_string);
1622: FND_FILE.NEW_LINE(FND_FILE.LOG, 2);
1623: END IF;
1624:
1625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1626: END IF;
1627:
1628: -- fetch the process output from the tag
1629: l_start_index := INSTR(l_xml_output, '') + 8; -- 8 is to accommodate length of ''

Line 1645: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1641: FND_FILE.NEW_LINE(FND_FILE.LOG, 1);
1642: FND_FILE.PUT_LINE(FND_FILE.LOG, 'End time: '||TO_CHAR(SYSDATE, 'Month DD, YYYY HH24:MI:SS'));
1643:
1644: EXCEPTION
1645: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1646: retcode := 2;
1647: errbuf := l_full_name||', error occurred.';
1648: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Process failed. View program logs for details.');
1649: