DBA Data[Home] [Help]

APPS.AHL_ENIGMA_ROUTE_OP_PUB dependencies on FND_MSG_PUB

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

73: RETURN NULL;
74: END IF;
75:
76: IF (l_msg_count = 1) then
77: FND_MSG_PUB.count_and_get(p_count => l_msg_count,
78: p_data => l_temp_msg_data,
79: p_encoded => FND_API.G_FALSE);
80: l_msg_data := l_temp_msg_data;
81: ELSE

Line 84: FND_MSG_PUB.get(

80: l_msg_data := l_temp_msg_data;
81: ELSE
82: IF (l_msg_count > 0) THEN
83: FOR i IN 1..l_msg_count LOOP
84: FND_MSG_PUB.get(
85: p_encoded => FND_API.G_FALSE,
86: p_data => l_temp_msg_data,
87: p_msg_index_out => l_msg_index_out);
88: IF (l_log_procedure >= l_log_current_level) THEN

Line 205: FND_MSG_PUB.INITIALIZE;

201: END IF;
202:
203: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
204: IF FND_API.TO_BOOLEAN(p_init_msg_list) THEN
205: FND_MSG_PUB.INITIALIZE;
206: END IF;
207:
208: -- initialise it only if it is a OA Adapter !
209: -- Apps initialise does a commit which causes commit/rollback related issues discussed.

Line 430: -- FND_MSG_PUB.ADD;

426: -- Validate if the Enigma Route Id is null throw an error if the id is null.
427: -- IF (p_enigma_route_rec.enigma_route_id IS NULL OR p_enigma_route_rec.enigma_route_id = FND_API.G_MISS_CHAR)
428: -- THEN
429: -- FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_ID_NULL');
430: -- FND_MSG_PUB.ADD;
431: -- RAISE FND_API.G_EXC_ERROR;
432: -- END IF;
433:
434: no_records := 0;

Line 465: -- x_msg_count := FND_MSG_PUB.count_msg;

461: );
462: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS OR x_msg_count > 0) THEN
463: no_records := no_records +1;
464: END IF;
465: -- x_msg_count := FND_MSG_PUB.count_msg;
466: -- IF ( upper(x_return_status) <> FND_API.G_RET_STS_SUCCESS OR x_msg_count > 0) THEN
467: -- IF (l_log_statement >= l_log_current_level) THEN
468: -- fnd_log.string(fnd_log.level_statement,l_debug_module,'Error in Process_OP_Details');
469: -- END IF;

Line 500: -- x_msg_count := FND_MSG_PUB.count_msg;

496: );
497: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS OR x_msg_count > 0) THEN
498: no_records := no_records +1;
499: END IF;
500: -- x_msg_count := FND_MSG_PUB.count_msg;
501: -- IF ( upper(x_return_status) <> FND_API.G_RET_STS_SUCCESS ) THEN
502: -- IF (l_log_statement >= l_log_current_level OR x_msg_count > 0) THEN
503: -- fnd_log.string(fnd_log.level_statement,l_debug_module,'Error in PROCESS_ROUTE_DETAILS');
504: -- END IF;

Line 515: -- x_msg_count := FND_MSG_PUB.count_msg;

511: END IF;
512:
513:
514: -- Check Error Message stack.
515: -- x_msg_count := FND_MSG_PUB.count_msg;
516:
517: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
518: fnd_log.string(fnd_log.level_statement,l_debug_module,'After get_message_data... ' || x_msg_data);
519: END IF;

Line 536: -- FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

532: -- COMMIT WORK;
533: -- END IF;
534:
535: -- Standard call to get message count and if count is 1, get message info
536: -- FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
537: -- p_data => x_msg_data,
538: -- p_encoded => fnd_api.g_false );
539:
540: EXCEPTION

Line 544: x_msg_count := FND_MSG_PUB.count_msg;

540: EXCEPTION
541: WHEN FND_API.G_EXC_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_ERROR;
543: --Rollback to Process_Route_Operations_SP;
544: x_msg_count := FND_MSG_PUB.count_msg;
545: x_msg_data := Get_Msg_Data(x_msg_count);
546:
547: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 550: x_msg_count := FND_MSG_PUB.count_msg;

546:
547: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
549: --Rollback to Process_Route_Operations_SP;
550: x_msg_count := FND_MSG_PUB.count_msg;
551: x_msg_data := Get_Msg_Data(x_msg_count);
552:
553: WHEN OTHERS THEN
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 556: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

552:
553: WHEN OTHERS THEN
554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: --Rollback to Process_Route_Operations_SP;
556: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
557: THEN
558: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
559: p_procedure_name => 'Process_Route_Operations',
560: p_error_text => SUBSTR(SQLERRM,1,240));

Line 558: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
555: --Rollback to Process_Route_Operations_SP;
556: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
557: THEN
558: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
559: p_procedure_name => 'Process_Route_Operations',
560: p_error_text => SUBSTR(SQLERRM,1,240));
561: END IF;
562: x_msg_count := FND_MSG_PUB.count_msg;

Line 562: x_msg_count := FND_MSG_PUB.count_msg;

558: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
559: p_procedure_name => 'Process_Route_Operations',
560: p_error_text => SUBSTR(SQLERRM,1,240));
561: END IF;
562: x_msg_count := FND_MSG_PUB.count_msg;
563: x_msg_data := Get_Msg_Data(x_msg_count);
564:
565: END Process_Route_Operations;
566:

Line 803: FND_MSG_PUB.ADD;

799: fnd_log.string(fnd_log.level_statement,l_debug_module,'Associated Operation Not Found:: ' || p_enigma_op_asso_tbl(l_new_ctr));
800: END IF;
801: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OP_DONOT_EXIST');
802: FND_MESSAGE.SET_TOKEN('FIELD', p_enigma_op_asso_tbl(l_new_ctr));
803: FND_MSG_PUB.ADD;
804: RAISE FND_API.G_EXC_ERROR;
805: END IF;
806: END LOOP;
807:

Line 888: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

884:
885: EXCEPTION
886: WHEN FND_API.G_EXC_ERROR THEN
887: x_return_status := FND_API.G_RET_STS_ERROR;
888: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
889: p_data => x_msg_data,
890: p_encoded => fnd_api.g_false);
891:
892: WHEN OTHERS THEN

Line 894: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

890: p_encoded => fnd_api.g_false);
891:
892: WHEN OTHERS THEN
893: x_return_status := FND_API.G_RET_STS_ERROR;
894: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
895: p_data => x_msg_data,
896: p_encoded => fnd_api.g_false);
897:
898: END process_rt_op_assoc;

Line 969: FND_MSG_PUB.INITIALIZE;

965: END IF;
966:
967: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
968: IF FND_API.TO_BOOLEAN(p_init_msg_list)THEN
969: FND_MSG_PUB.INITIALIZE;
970: END IF;
971:
972: -- Log API entry point
973: IF (l_log_procedure >= l_log_current_level) THEN

Line 991: FND_MSG_PUB.ADD;

987: THEN
988: FND_MESSAGE.SET_NAME('AHL', 'AHL_COM_INVALID_DML');
989: FND_MESSAGE.SET_TOKEN('FIELD', p_enigma_route_rec.DML_OPERATION);
990: FND_MESSAGE.SET_TOKEN('RECORD', p_enigma_route_rec.enigma_route_id);
991: FND_MSG_PUB.ADD;
992: RAISE FND_API.G_EXC_ERROR;
993: END IF;
994:
995: -- IF (p_enigma_route_rec.enigma_route_id IS NULL OR p_enigma_route_rec.enigma_route_id = FND_API.G_MISS_CHAR)

Line 998: -- FND_MSG_PUB.ADD;

994:
995: -- IF (p_enigma_route_rec.enigma_route_id IS NULL OR p_enigma_route_rec.enigma_route_id = FND_API.G_MISS_CHAR)
996: -- THEN
997: -- FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_ID_NULL');
998: -- FND_MSG_PUB.ADD;
999: -- RAISE FND_API.G_EXC_ERROR;
1000: -- END IF;
1001: --if DML_OPERATION <> c then validate that route with this enigma_route_id exists.
1002: IF (p_enigma_route_rec.DML_OPERATION <> 'C') THEN

Line 1011: FND_MSG_PUB.ADD;

1007: l_get_latest_route_rev.revision_status;
1008: IF get_latest_route_rev%NOTFOUND THEN
1009: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_DONOT_EXIST');
1010: FND_MESSAGE.SET_TOKEN('FIELD', p_enigma_route_rec.enigma_route_id);
1011: FND_MSG_PUB.ADD;
1012: CLOSE get_latest_route_rev;
1013: RAISE FND_API.G_EXC_ERROR;
1014: END IF;
1015: CLOSE get_latest_route_rev;

Line 1035: FND_MSG_PUB.ADD;

1031: IF (p_enigma_route_rec.DML_OPERATION = 'NC') THEN
1032: -- IF the route is in Approval Pending status , then insert the Enigma Record into the staging table with status as pending.
1033: IF ( upper(l_get_latest_route_rev.revision_status) = 'APPROVAL_PENDING' ) THEN
1034: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_APR_PENDING');
1035: FND_MSG_PUB.ADD;
1036: RAISE FND_API.G_EXC_ERROR;
1037: /*Update_Route_Interface_table
1038: (
1039: p_enigma_route_rec,

Line 1121: FND_MSG_PUB.ADD;

1117: IF (p_enigma_route_rec.DML_OPERATION = 'D') THEN
1118: -- IF the route is in Approval Pending status , then insert the Enigma Record into the staging table with status as pending.
1119: IF ( upper(l_get_latest_route_rev.revision_status) = 'APPROVAL_PENDING' ) THEN
1120: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_APR_PENDING');
1121: FND_MSG_PUB.ADD;
1122: RAISE FND_API.G_EXC_ERROR;
1123: /*Update_Route_Interface_table
1124: (
1125: p_enigma_route_rec,

Line 1174: FND_MSG_PUB.ADD;

1170: IF (p_enigma_route_rec.DML_OPERATION = 'U') THEN
1171: -- IF the route is in Approval Pending status , then insert the Enigma Record into the staging table with status as pending.
1172: IF ( upper(l_get_latest_route_rev.revision_status) = 'APPROVAL_PENDING' ) THEN
1173: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ROUTE_APR_PENDING');
1174: FND_MSG_PUB.ADD;
1175: RAISE FND_API.G_EXC_ERROR;
1176: /*Update_Route_Interface_table
1177: (
1178: p_enigma_route_rec,

Line 1430: FND_MSG_PUB.ADD;

1426: IF (p_enigma_route_rec.DML_OPERATION = 'C') THEN
1427: --Validation::Publish Date can not be null
1428: IF (p_pub_date IS NULL OR p_pub_date = FND_API.G_MISS_DATE)THEN
1429: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_PUB_DATE_NULL');
1430: FND_MSG_PUB.ADD;
1431: END IF;
1432:
1433: --Validation::p_context can not be null
1434: IF (p_context IS NULL OR p_context = FND_API.G_MISS_CHAR)THEN

Line 1436: FND_MSG_PUB.ADD;

1432:
1433: --Validation::p_context can not be null
1434: IF (p_context IS NULL OR p_context = FND_API.G_MISS_CHAR)THEN
1435: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CONTEXT_NULL');
1436: FND_MSG_PUB.ADD;
1437: END IF;
1438:
1439: -- Validation::ENIGMA_DOC_ID can nnot be null
1440: IF (p_enigma_route_rec.ENIGMA_DOC_ID IS NULL OR p_enigma_route_rec.ENIGMA_DOC_ID = FND_API.G_MISS_CHAR)THEN

Line 1442: FND_MSG_PUB.ADD;

1438:
1439: -- Validation::ENIGMA_DOC_ID can nnot be null
1440: IF (p_enigma_route_rec.ENIGMA_DOC_ID IS NULL OR p_enigma_route_rec.ENIGMA_DOC_ID = FND_API.G_MISS_CHAR)THEN
1441: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_DOC_ID_NULL');
1442: FND_MSG_PUB.ADD;
1443: END IF;
1444:
1445: -- validation::Enigma_route_id is unique.
1446: OPEN validate_enig_route(p_enigma_route_rec.enigma_route_id);

Line 1450: FND_MSG_PUB.add;

1446: OPEN validate_enig_route(p_enigma_route_rec.enigma_route_id);
1447: FETCH validate_enig_route INTO l_eng_count;
1448: IF (l_eng_count > 0)THEN
1449: FND_MESSAGE.set_name('AHL','AHL_RM_ROUTE_NO_DUP');
1450: FND_MSG_PUB.add;
1451: END IF;
1452: CLOSE validate_enig_route;
1453:
1454: x_msg_count := FND_MSG_PUB.count_msg;

Line 1454: x_msg_count := FND_MSG_PUB.count_msg;

1450: FND_MSG_PUB.add;
1451: END IF;
1452: CLOSE validate_enig_route;
1453:
1454: x_msg_count := FND_MSG_PUB.count_msg;
1455: IF x_msg_count > 0 THEN
1456: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1457: p_data => x_msg_data,
1458: p_encoded => fnd_api.g_false);

Line 1456: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1452: CLOSE validate_enig_route;
1453:
1454: x_msg_count := FND_MSG_PUB.count_msg;
1455: IF x_msg_count > 0 THEN
1456: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1457: p_data => x_msg_data,
1458: p_encoded => fnd_api.g_false);
1459: /*Update_Route_Interface_table
1460: (

Line 1551: x_msg_count := FND_MSG_PUB.count_msg;

1547: END IF;
1548: END IF; -- status check 'C'
1549:
1550: -- Check Error Message stack.
1551: x_msg_count := FND_MSG_PUB.count_msg;
1552: IF x_msg_count > 0 THEN
1553: RAISE FND_API.G_EXC_ERROR;
1554: END IF;
1555:

Line 1562: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

1558: COMMIT WORK;
1559: END IF;
1560:
1561: -- Standard call to get message count and if count is 1, get message info
1562: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1563: p_data => x_msg_data,
1564: p_encoded => fnd_api.g_false );
1565:
1566: EXCEPTION

Line 1570: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1566: EXCEPTION
1567: WHEN FND_API.G_EXC_ERROR THEN
1568: x_return_status := FND_API.G_RET_STS_ERROR;
1569: Rollback to Process_Route_Details_SP;
1570: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1571: p_data => x_msg_data,
1572: p_encoded => fnd_api.g_false);
1573: IF (upper(l_get_latest_route_rev.revision_status) = 'APPROVAL_PENDING') THEN
1574: isrecoverable := 'Y';

Line 1590: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1586:
1587: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1588: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1589: Rollback to Process_Route_Details_SP;
1590: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1591: p_data => x_msg_data,
1592: p_encoded => fnd_api.g_false);
1593: isrecoverable := 'N';
1594: Update_Route_Interface_table

Line 1606: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1602:
1603: WHEN OTHERS THEN
1604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1605: Rollback to Process_Route_Details_SP;
1606: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1607: THEN
1608: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1609: p_procedure_name => 'Process_Route_Details',
1610: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1608: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

1604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1605: Rollback to Process_Route_Details_SP;
1606: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1607: THEN
1608: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1609: p_procedure_name => 'Process_Route_Details',
1610: p_error_text => SUBSTR(SQLERRM,1,240));
1611: END IF;
1612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1608: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1609: p_procedure_name => 'Process_Route_Details',
1610: p_error_text => SUBSTR(SQLERRM,1,240));
1611: END IF;
1612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1613: p_data => x_msg_data,
1614: p_encoded => fnd_api.g_false);
1615: isrecoverable := 'N';
1616: Update_Route_Interface_table

Line 1759: FND_MSG_PUB.INITIALIZE;

1755:
1756: -- Initialize message list if p_init_msg_list = FND_API.G_TRUE
1757: IF FND_API.TO_BOOLEAN(p_init_msg_list)
1758: THEN
1759: FND_MSG_PUB.INITIALIZE;
1760: END IF;
1761:
1762: -- initialise it only if it is a OA Adapter !
1763: --fnd_global.APPS_INITIALIZE (1003259,62211, 867);

Line 1784: FND_MSG_PUB.ADD;

1780: THEN
1781: FND_MESSAGE.SET_NAME('AHL', 'AHL_COM_INVALID_DML');
1782: FND_MESSAGE.SET_TOKEN('FIELD', p_enigma_op_rec.DML_OPERATION);
1783: FND_MESSAGE.SET_TOKEN('RECORD', p_enigma_op_rec.ENIGMA_OP_ID);
1784: FND_MSG_PUB.ADD;
1785: RAISE FND_API.G_EXC_ERROR;
1786: END IF;
1787:
1788: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)

Line 1807: FND_MSG_PUB.ADD;

1803: --validate Enigma Document Id
1804: IF ( p_enigma_op_rec.ENIGMA_DOC_ID IS NULL OR p_enigma_op_rec.ENIGMA_DOC_ID = FND_API.G_MISS_CHAR)
1805: THEN
1806: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ENIGMA_ID_NULL');
1807: FND_MSG_PUB.ADD;
1808: END IF;
1809: --validate Enigma Operation Id
1810: IF ( p_enigma_op_rec.ENIGMA_OP_ID IS NULL OR p_enigma_op_rec.ENIGMA_OP_ID = FND_API.G_MISS_CHAR)
1811: THEN

Line 1813: FND_MSG_PUB.ADD;

1809: --validate Enigma Operation Id
1810: IF ( p_enigma_op_rec.ENIGMA_OP_ID IS NULL OR p_enigma_op_rec.ENIGMA_OP_ID = FND_API.G_MISS_CHAR)
1811: THEN
1812: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OPER_ID_NULL');
1813: FND_MSG_PUB.ADD;
1814: END IF;
1815: --validate Opearator
1816: IF ( p_enigma_op_rec.OPERATOR IS NULL OR p_enigma_op_rec.OPERATOR = FND_API.G_MISS_CHAR)
1817: THEN

Line 1819: FND_MSG_PUB.ADD;

1815: --validate Opearator
1816: IF ( p_enigma_op_rec.OPERATOR IS NULL OR p_enigma_op_rec.OPERATOR = FND_API.G_MISS_CHAR)
1817: THEN
1818: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OPERATOR_ID_NULL');
1819: FND_MSG_PUB.ADD;
1820: END IF;
1821: -- validate Oem Doc Type
1822: IF ( p_enigma_op_rec.OEM_DOC_TYPE IS NULL OR p_enigma_op_rec.OEM_DOC_TYPE = FND_API.G_MISS_CHAR)
1823: THEN

Line 1825: FND_MSG_PUB.ADD;

1821: -- validate Oem Doc Type
1822: IF ( p_enigma_op_rec.OEM_DOC_TYPE IS NULL OR p_enigma_op_rec.OEM_DOC_TYPE = FND_API.G_MISS_CHAR)
1823: THEN
1824: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OEM_DOC_TYPE_NULL');
1825: FND_MSG_PUB.ADD;
1826: END IF;
1827: -- validate Chapter,Section,Subject
1828: IF ( p_enigma_op_rec.CHAPTER_SECTION_SUBJECT IS NULL OR p_enigma_op_rec.CHAPTER_SECTION_SUBJECT = FND_API.G_MISS_CHAR)
1829: THEN

Line 1831: FND_MSG_PUB.ADD;

1827: -- validate Chapter,Section,Subject
1828: IF ( p_enigma_op_rec.CHAPTER_SECTION_SUBJECT IS NULL OR p_enigma_op_rec.CHAPTER_SECTION_SUBJECT = FND_API.G_MISS_CHAR)
1829: THEN
1830: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CHA_SEC_SUB_NULL');
1831: FND_MSG_PUB.ADD;
1832: END IF;
1833: -- Validate AMTOSS Function
1834: IF ( p_enigma_op_rec.AMTOSS_Function IS NULL OR p_enigma_op_rec.AMTOSS_Function = FND_API.G_MISS_CHAR)
1835: THEN

Line 1837: FND_MSG_PUB.ADD;

1833: -- Validate AMTOSS Function
1834: IF ( p_enigma_op_rec.AMTOSS_Function IS NULL OR p_enigma_op_rec.AMTOSS_Function = FND_API.G_MISS_CHAR)
1835: THEN
1836: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_AMTOSS_FUN_NULL');
1837: FND_MSG_PUB.ADD;
1838: END IF;
1839:
1840: --Validate Model Code
1841: IF (p_context IS NULL AND p_context = FND_API.G_MISS_CHAR)

Line 1844: FND_MSG_PUB.ADD;

1840: --Validate Model Code
1841: IF (p_context IS NULL AND p_context = FND_API.G_MISS_CHAR)
1842: THEN
1843: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CONTEXT_NULL');
1844: FND_MSG_PUB.ADD;
1845: END IF;
1846:
1847: x_msg_count := FND_MSG_PUB.count_msg;
1848: IF x_msg_count > 0

Line 1847: x_msg_count := FND_MSG_PUB.count_msg;

1843: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CONTEXT_NULL');
1844: FND_MSG_PUB.ADD;
1845: END IF;
1846:
1847: x_msg_count := FND_MSG_PUB.count_msg;
1848: IF x_msg_count > 0
1849: THEN
1850: RAISE FND_API.G_EXC_ERROR;
1851: END IF;

Line 1992: FND_MSG_PUB.ADD;

1988: --validate Enigma Document Id, It should not be null
1989: IF ( p_enigma_op_rec.ENIGMA_DOC_ID IS NULL OR p_enigma_op_rec.ENIGMA_DOC_ID = FND_API.G_MISS_CHAR)
1990: THEN
1991: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_ENIGMA_ID_NULL');
1992: FND_MSG_PUB.ADD;
1993: END IF;
1994:
1995: --validate Enigma Operation Id
1996: IF ( p_enigma_op_rec.ENIGMA_OP_ID IS NULL OR p_enigma_op_rec.ENIGMA_OP_ID = FND_API.G_MISS_CHAR)

Line 1999: FND_MSG_PUB.ADD;

1995: --validate Enigma Operation Id
1996: IF ( p_enigma_op_rec.ENIGMA_OP_ID IS NULL OR p_enigma_op_rec.ENIGMA_OP_ID = FND_API.G_MISS_CHAR)
1997: THEN
1998: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OPER_ID_NULL');
1999: FND_MSG_PUB.ADD;
2000: END IF;
2001:
2002: --Validate Model Code
2003: IF (p_context IS NULL AND p_context = FND_API.G_MISS_DATE)

Line 2006: FND_MSG_PUB.ADD;

2002: --Validate Model Code
2003: IF (p_context IS NULL AND p_context = FND_API.G_MISS_DATE)
2004: THEN
2005: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CONTEXT_NULL');
2006: FND_MSG_PUB.ADD;
2007: END IF;
2008:
2009: x_msg_count := FND_MSG_PUB.count_msg;
2010: IF x_msg_count > 0

Line 2009: x_msg_count := FND_MSG_PUB.count_msg;

2005: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_CONTEXT_NULL');
2006: FND_MSG_PUB.ADD;
2007: END IF;
2008:
2009: x_msg_count := FND_MSG_PUB.count_msg;
2010: IF x_msg_count > 0
2011: THEN
2012: RAISE FND_API.G_EXC_ERROR;
2013: END IF;

Line 2041: FND_MSG_PUB.ADD;

2037: -- If the operation is in Approval Pending status , then insert the operation record into the
2038: -- staging table with status as pending.
2039: IF ( upper(l_get_latest_oper_rev.revision_status) = 'APPROVAL_PENDING' ) THEN
2040: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OP_APR_PENDING');
2041: FND_MSG_PUB.ADD;
2042: RAISE FND_API.G_EXC_ERROR;
2043: /*OP_interface_insert_row(
2044: X_CONTEXT => p_context,
2045: X_PUBLISH_DATE => p_pub_date,

Line 2251: FND_MSG_PUB.ADD;

2247: fnd_log.string(fnd_log.level_statement,l_debug_module,'After inserting into the staging table');
2248: END IF;
2249: ELSE
2250: FND_MESSAGE.SET_NAME('AHL', 'AHL_ENIGMA_OPER_DONOT_EXIST');
2251: FND_MSG_PUB.ADD;
2252: RAISE FND_API.G_EXC_ERROR;
2253: END IF; -- Enigma Operation ID is NOT NULL Cursor Found
2254: -- If the operation change flag is "D" then process the operation accordingly .
2255: ELSIF (p_enigma_op_rec.DML_OPERATION = 'D') THEN

Line 2290: FND_MSG_PUB.ADD;

2286:
2287: -- This table is going to be restructured and based on new table this part of code will be modified.
2288: IF ( upper(l_get_latest_oper_rev.revision_status) = 'APPROVAL_PENDING' ) THEN
2289: FND_MESSAGE.Set_Name('AHL','AHL_ENIGMA_OP_APR_PENDING');
2290: FND_MSG_PUB.ADD;
2291: RAISE FND_API.G_EXC_ERROR;
2292: /*OP_interface_insert_row(
2293: X_CONTEXT => p_context,
2294: X_PUBLISH_DATE => p_pub_date,

Line 2342: FND_MSG_PUB.ADD;

2338: END IF; --Status
2339: ELSE
2340: -- If the operation is not found, then raise an error
2341: FND_MESSAGE.SET_NAME('AHL', 'AHL_ENIGMA_OPER_DONOT_EXIST');
2342: FND_MSG_PUB.ADD;
2343: RAISE FND_API.G_EXC_ERROR;
2344: END IF; -- Enigma operation ID not null
2345: END IF; -- Change Flag "D"
2346:

Line 2349: x_msg_count := FND_MSG_PUB.count_msg;

2345: END IF; -- Change Flag "D"
2346:
2347:
2348: -- Check Error Message stack.
2349: x_msg_count := FND_MSG_PUB.count_msg;
2350: IF x_msg_count > 0
2351: THEN
2352: RAISE FND_API.G_EXC_ERROR;
2353: END IF;

Line 2362: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,

2358: COMMIT WORK;
2359: END IF;
2360:
2361: -- Standard call to get message count and if count is 1, get message info
2362: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2363: p_data => x_msg_data,
2364: p_encoded => fnd_api.g_false );
2365:
2366: EXCEPTION

Line 2370: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2366: EXCEPTION
2367: WHEN FND_API.G_EXC_ERROR THEN
2368: x_return_status := FND_API.G_RET_STS_ERROR;
2369: Rollback to Process_OP_Details_SP;
2370: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2371: p_data => x_msg_data,
2372: p_encoded => fnd_api.g_false);
2373: IF (upper(l_get_latest_oper_rev.revision_status) = 'APPROVAL_PENDING') THEN
2374: isrecoverable := 'Y';

Line 2390: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2386:
2387: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2389: Rollback to Process_OP_Details_SP;
2390: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2391: p_data => x_msg_data,
2392: p_encoded => fnd_api.g_false);
2393: isrecoverable := 'N';
2394: Update_OP_Interface_table

Line 2406: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

2402:
2403: WHEN OTHERS THEN
2404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2405: Rollback to Process_OP_Details_SP;
2406: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2407: THEN
2408: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2409: p_procedure_name => 'Process_OP_Details_SP',
2410: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2408: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

2404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2405: Rollback to Process_OP_Details_SP;
2406: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2407: THEN
2408: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2409: p_procedure_name => 'Process_OP_Details_SP',
2410: p_error_text => SUBSTR(SQLERRM,1,240));
2411: END IF;
2412: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 2412: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2408: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2409: p_procedure_name => 'Process_OP_Details_SP',
2410: p_error_text => SUBSTR(SQLERRM,1,240));
2411: END IF;
2412: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2413: p_data => x_msg_data,
2414: p_encoded => fnd_api.g_false);
2415: isrecoverable := 'N';
2416: Update_OP_Interface_table

Line 2459: FND_MSG_PUB.add;

2455:
2456:
2457: IF p_file_name IS NULL THEN
2458: FND_MESSAGE.set_name( 'AHL','AHL_COM_REQD_PARAM_MISSING' );
2459: FND_MSG_PUB.add;
2460: x_return_status := FND_API.G_RET_STS_ERROR;
2461:
2462: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2463: fnd_log.string

Line 2510: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

2506:
2507: EXCEPTION
2508: WHEN OTHERS THEN
2509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2510: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2511: THEN
2512: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2513: p_procedure_name => 'UPLOAD_REVISION_REPORT',
2514: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2512: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

2508: WHEN OTHERS THEN
2509: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2510: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2511: THEN
2512: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2513: p_procedure_name => 'UPLOAD_REVISION_REPORT',
2514: p_error_text => SUBSTR(SQLERRM,1,240));
2515:
2516: END IF;