DBA Data[Home] [Help]

APPS.AHL_ENIGMA_IPC_PROCS_PVT dependencies on FND_MSG_PUB

Line 41: FND_MSG_PUB.count_and_get(p_count => l_msg_count,

37: RETURN NULL;
38: END IF;
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

Line 48: FND_MSG_PUB.get(

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

Line 214: FND_MSG_PUB.Initialize;

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
218: l_user_id := FND_PROFILE.VALUE('AHL_ENIGMA_USER');

Line 242: FND_MSG_PUB.ADD;

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

Line 259: FND_MSG_PUB.ADD;

255: l_item_group_rec.operation_flag IS NULL) THEN
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

Line 275: FND_MSG_PUB.ADD;

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

Line 292: FND_MSG_PUB.ADD;

288: CLOSE get_ig_id_csr;
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:

Line 336: FND_MSG_PUB.ADD;

332: IF (chk_ig_type_code_csr%NOTFOUND) THEN
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:

Line 342: l_msg_count := FND_MSG_PUB.count_msg;

338: END IF;
339: CLOSE chk_ig_type_code_csr;
340:
341: IF (l_items_tbl.COUNT >= 1) THEN
342: l_msg_count := FND_MSG_PUB.count_msg;
343: -- perform validations and conversions for the item associations
344: FOR i IN l_items_tbl.FIRST..l_items_tbl.LAST LOOP
345: -- convert the operation flag: 'N' to 'C'
346: IF (l_items_tbl(i).operation_flag = 'N') THEN

Line 353: FND_MSG_PUB.ADD;

349: l_items_tbl(i).operation_flag IS NULL) THEN
350: -- invalid operation flag
351: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
352: FND_MESSAGE.Set_Token('OPR_FLAG', l_items_tbl(i).operation_flag);
353: FND_MSG_PUB.ADD;
354: END IF;
355:
356: -- set the inventory org id
357: l_items_tbl(i).inventory_org_id := l_org_id;

Line 366: FND_MSG_PUB.ADD;

362: IF (get_item_id_csr%NOTFOUND) THEN
363: -- item is invalid
364: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INV_INVALID'); -- Inventory Item (INV_ITEM) is invalid.
365: FND_MESSAGE.Set_Token('INV_ITEM', l_items_tbl(i).inventory_item_name);
366: FND_MSG_PUB.ADD;
367: END IF;
368: CLOSE get_item_id_csr;
369:
370: -- validate interchange type code

Line 378: FND_MSG_PUB.ADD;

374: -- item group type is invalid
375: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INTER_INVALID'); -- Interchangeability Type (INTER_CODE) for Item (INV_ITEM) is invalid.
376: FND_MESSAGE.Set_Token('INTER_CODE', l_items_tbl(i).interchange_type_code);
377: FND_MESSAGE.Set_Token('INV_ITEM', l_items_tbl(i).inventory_item_name);
378: FND_MSG_PUB.ADD;
379: END IF;
380: CLOSE chk_interchg_type_code_csr;
381: END LOOP;
382: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

Line 382: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

378: FND_MSG_PUB.ADD;
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:

Line 466: FND_MSG_PUB.ADD;

462: CLOSE get_ig_id_csr;
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:

Line 478: FND_MSG_PUB.ADD;

474: IF (chk_ig_type_code_csr%NOTFOUND) THEN
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:

Line 484: l_msg_count := FND_MSG_PUB.count_msg;

480: END IF;
481: CLOSE chk_ig_type_code_csr;
482:
483: IF (l_items_tbl.COUNT >= 1) THEN
484: l_msg_count := FND_MSG_PUB.count_msg;
485: -- perform validations and conversions for the item associations
486: FOR i IN l_items_tbl.FIRST..l_items_tbl.LAST LOOP
487: -- convert the operation flag: 'N' to 'C'
488: IF (l_items_tbl(i).operation_flag = 'N') THEN

Line 495: FND_MSG_PUB.ADD;

491: l_items_tbl(i).operation_flag IS NULL) THEN
492: -- invalid operation flag
493: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
494: FND_MESSAGE.Set_Token('OPR_FLAG', l_items_tbl(i).operation_flag);
495: FND_MSG_PUB.ADD;
496: END IF;
497:
498: -- set the inventory org id
499: l_items_tbl(i).inventory_org_id := l_org_id;

Line 508: FND_MSG_PUB.ADD;

504: IF (get_item_id_csr%NOTFOUND) THEN
505: -- item is invalid
506: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INV_INVALID'); -- Inventory Item (INV_ITEM) is invalid.
507: FND_MESSAGE.Set_Token('INV_ITEM', l_items_tbl(i).inventory_item_name);
508: FND_MSG_PUB.ADD;
509: END IF;
510: CLOSE get_item_id_csr;
511:
512: -- for update and delete operations, fetch the association id

Line 521: FND_MSG_PUB.ADD;

517: IF (get_ia_id_csr%NOTFOUND) THEN
518: -- item association is invalid
519: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_IA_INVALID'); -- Invalid association of item ITEM. (new message)
520: FND_MESSAGE.Set_Token('ITEM', l_items_tbl(i).inventory_item_name);
521: FND_MSG_PUB.ADD;
522: END IF;
523: CLOSE get_ia_id_csr;
524: END IF;
525:

Line 537: FND_MSG_PUB.ADD;

533: -- item group type is invalid
534: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INTER_INVALID'); -- Interchangeability Type (INTER_CODE) for Item (INV_ITEM) is invalid.
535: FND_MESSAGE.Set_Token('INTER_CODE', l_items_tbl(i).interchange_type_code);
536: FND_MESSAGE.Set_Token('INV_ITEM', l_items_tbl(i).inventory_item_name);
537: FND_MSG_PUB.ADD;
538: END IF;
539: CLOSE chk_interchg_type_code_csr;
540: END LOOP;
541: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

Line 541: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

537: FND_MSG_PUB.ADD;
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:

Line 601: x_msg_count := FND_MSG_PUB.count_msg;

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,
605: p_report_file_name => p_report_file_name,

Line 615: x_msg_count := FND_MSG_PUB.count_msg;

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,
619: p_report_file_name => p_report_file_name,

Line 629: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,

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;
633: -- enter the error log

Line 632: x_msg_count := FND_MSG_PUB.count_msg;

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;
633: -- enter the error log
634: Enter_Process_Log (
635: p_report_type => l_ig_report_type,
636: p_report_file_name => p_report_file_name,

Line 743: FND_MSG_PUB.Initialize;

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
747: l_user_id := FND_PROFILE.VALUE('AHL_ENIGMA_USER');

Line 773: FND_MSG_PUB.ADD;

769: FND_LOG.string(l_log_statement, l_full_name, 'no nodes for the MC');
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

Line 786: FND_MSG_PUB.ADD;

782: CLOSE chk_model_code_csr;
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;

Line 792: l_msg_count := FND_MSG_PUB.count_msg;

788: END IF;
789: CLOSE chk_model_code_csr;
790: END IF;
791:
792: l_msg_count := FND_MSG_PUB.count_msg;
793: -- perform validations and conversions for the nodes
794: FOR i IN l_nodes_tbl.FIRST..l_nodes_tbl.LAST LOOP
795: -- validate position reference code
796: OPEN get_pos_ref_csr (l_nodes_tbl(i).position_ref_code);

Line 802: FND_MSG_PUB.ADD;

798: IF (get_pos_ref_csr%NOTFOUND) THEN
799: -- position reference code is invalid
800: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_POSREF_INVALID'); -- Position reference (POSREF) is invalid.
801: FND_MESSAGE.Set_Token('POSREF', l_nodes_tbl(i).position_ref_code);
802: FND_MSG_PUB.ADD;
803: END IF;
804: CLOSE get_pos_ref_csr;
805:
806: -- convert the item group name to id

Line 823: FND_MSG_PUB.ADD;

819: IF (chk_ata_code_csr%NOTFOUND) THEN
820: -- model code is invalid
821: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ATASEQ_INVALID'); -- ATA Code "ATAMEANING" is invalid
822: FND_MESSAGE.Set_Token('ATAMEANING', l_nodes_tbl(i).ata_code);
823: FND_MSG_PUB.ADD;
824: END IF;
825: CLOSE chk_ata_code_csr;
826: END IF;
827: END LOOP;

Line 828: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

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

Line 903: FND_MSG_PUB.ADD;

899: IF (l_mc_pos_stack.under_flow) THEN
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

Line 946: FND_MSG_PUB.ADD;

942: l_mc_pos_stack.push(l_mc_pos_ref);
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;

Line 980: x_msg_count := FND_MSG_PUB.count_msg;

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,
984: p_report_file_name => p_report_file_name,

Line 994: x_msg_count := FND_MSG_PUB.count_msg;

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,
998: p_report_file_name => p_report_file_name,

Line 1008: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,

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;
1012: -- enter the error log

Line 1011: x_msg_count := FND_MSG_PUB.count_msg;

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;
1012: -- enter the error log
1013: Enter_Process_Log (
1014: p_report_type => l_mc_report_type,
1015: p_report_file_name => p_report_file_name,

Line 1105: FND_MSG_PUB.Initialize;

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
1109: l_user_id := FND_PROFILE.VALUE('AHL_ENIGMA_USER');

Line 1133: FND_MSG_PUB.ADD;

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

Line 1154: FND_MSG_PUB.ADD;

1150: l_ic_header_rec.operation_flag IS NULL) THEN
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

Line 1170: FND_MSG_PUB.ADD;

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

Line 1186: FND_MSG_PUB.ADD;

1182: IF (get_ic_id_csr%NOTFOUND) THEN
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:

Line 1232: FND_MSG_PUB.ADD;

1228: CLOSE get_item_id_csr;
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:

Line 1238: l_msg_count := FND_MSG_PUB.count_msg;

1234: END IF;
1235: CLOSE get_item_id_csr;
1236:
1237: IF (l_det_tbl.COUNT >= 1) THEN
1238: l_msg_count := FND_MSG_PUB.count_msg;
1239: -- perform validations and conversions for the item details
1240: FOR i IN l_det_tbl.FIRST..l_det_tbl.LAST LOOP
1241: -- convert the operation flag: 'N' to 'C'
1242: IF (l_det_tbl(i).operation_flag = 'N') THEN

Line 1249: FND_MSG_PUB.ADD;

1245: l_det_tbl(i).operation_flag IS NULL) THEN
1246: -- invalid operation flag
1247: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
1248: FND_MESSAGE.Set_Token('OPR_FLAG', l_det_tbl(i).operation_flag);
1249: FND_MSG_PUB.ADD;
1250: END IF;
1251:
1252: -- set the inventory org id, and the master org id
1253: l_det_tbl(i).inventory_org_id := l_org_id;

Line 1263: FND_MSG_PUB.ADD;

1259: IF (get_item_id_csr%NOTFOUND) THEN
1260: -- item is invalid
1261: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INV_INVALID'); -- Inventory Item (INV_ITEM) is invalid.
1262: FND_MESSAGE.Set_Token('INV_ITEM', l_det_tbl(i).inventory_item_name);
1263: FND_MSG_PUB.ADD;
1264: END IF;
1265: CLOSE get_item_id_csr;
1266: END LOOP;
1267: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

Line 1267: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

1263: FND_MSG_PUB.ADD;
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:

Line 1350: FND_MSG_PUB.ADD;

1346: IF (get_ic_id_csr%NOTFOUND) THEN
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:

Line 1356: l_msg_count := FND_MSG_PUB.count_msg;

1352: END IF;
1353: CLOSE get_ic_id_csr;
1354:
1355: IF (l_det_tbl.COUNT >= 1) THEN
1356: l_msg_count := FND_MSG_PUB.count_msg;
1357: -- perform validations and conversions for the item associations
1358: FOR i IN l_det_tbl.FIRST..l_det_tbl.LAST LOOP
1359: -- convert the operation flag: 'N' to 'C'
1360: IF (l_det_tbl(i).operation_flag = 'N') THEN

Line 1367: FND_MSG_PUB.ADD;

1363: l_det_tbl(i).operation_flag IS NULL) THEN
1364: -- invalid operation flag
1365: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_ENIGMA_OPR_FLAG_INVALID'); -- Operation flag OPR_FLAG is invalid. (new message)
1366: FND_MESSAGE.Set_Token('OPR_FLAG', l_det_tbl(i).operation_flag);
1367: FND_MSG_PUB.ADD;
1368: END IF;
1369:
1370: -- set the inventory org id, and the master org id
1371: l_det_tbl(i).inventory_org_id := l_org_id;

Line 1381: FND_MSG_PUB.ADD;

1377: IF (get_item_id_csr%NOTFOUND) THEN
1378: -- item is invalid
1379: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_INV_INVALID'); -- Inventory Item (INV_ITEM) is invalid.
1380: FND_MESSAGE.Set_Token('INV_ITEM', l_det_tbl(i).inventory_item_name);
1381: FND_MSG_PUB.ADD;
1382: END IF;
1383: CLOSE get_item_id_csr;
1384:
1385: -- for update and delete operations, fetch the item detail id

Line 1393: FND_MSG_PUB.ADD;

1389: IF (get_ic_det_id_csr%NOTFOUND) THEN
1390: -- composition item is invalid
1391: FND_MESSAGE.Set_Name('AHL', 'AHL_MC_IC_INVALID'); -- Invalid composition item ITEM. (new message)
1392: FND_MESSAGE.Set_Token('ITEM', l_det_tbl(i).inventory_item_name);
1393: FND_MSG_PUB.ADD;
1394: END IF;
1395: CLOSE get_ic_det_id_csr;
1396:
1397: -- set the item composition id as well

Line 1401: IF (l_msg_count < FND_MSG_PUB.count_msg) THEN

1397: -- set the item composition id as well
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:

Line 1461: x_msg_count := FND_MSG_PUB.count_msg;

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,
1465: p_report_file_name => p_report_file_name,

Line 1475: x_msg_count := FND_MSG_PUB.count_msg;

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,
1479: p_report_file_name => p_report_file_name,

Line 1489: FND_MSG_PUB.Add_Exc_Msg( p_pkg_name => G_PKG_NAME,

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;
1493: -- enter the error log

Line 1492: x_msg_count := FND_MSG_PUB.count_msg;

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;
1493: -- enter the error log
1494: Enter_Process_Log (
1495: p_report_type => l_ic_report_type,
1496: p_report_file_name => p_report_file_name,