DBA Data[Home] [Help]

APPS.IBC_DIRECTORY_NODE_GRP dependencies on FND_MSG_PUB

Line 75: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

71: -- Validate Environment
72: -- ******************************************************************
73: IF FND_GLOBAL.User_Id IS NULL
74: THEN
75: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
76: THEN
77: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
78: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
79: FND_MSG_PUB.ADD;

Line 79: FND_MSG_PUB.ADD;

75: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
76: THEN
77: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
78: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
79: FND_MSG_PUB.ADD;
80: END IF;
81: RAISE FND_API.G_EXC_ERROR;
82: END IF;
83:

Line 132: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

128: -- Check for Uniqueness
129: OPEN C_Directory_Node;
130: FETCH C_Directory_Node INTO l_Directory_Node_Code;
131: IF C_Directory_Node%FOUND THEN
132: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
133: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
134: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
135: FND_MSG_PUB.ADD;
136: END IF;

Line 135: FND_MSG_PUB.ADD;

131: IF C_Directory_Node%FOUND THEN
132: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
133: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
134: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
135: FND_MSG_PUB.ADD;
136: END IF;
137: CLOSE C_Directory_Node;
138: RAISE FND_API.G_EXC_ERROR;
139: END IF;

Line 189: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

185: p_OBJECT_VERSION_NUMBER => l_Directory_Node_rec.OBJECT_VERSION_NUMBER);
186:
187:
188: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
189: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
190: FND_MESSAGE.Set_Name('IBC', 'IBC_INSERT_ERROR');
191: FND_MSG_PUB.ADD;
192: END IF;
193:

Line 191: FND_MSG_PUB.ADD;

187:
188: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
189: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
190: FND_MESSAGE.Set_Name('IBC', 'IBC_INSERT_ERROR');
191: FND_MSG_PUB.ADD;
192: END IF;
193:
194: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 215: FND_MSG_PUB.Count_And_Get

211: COMMIT WORK;
212: END IF;
213:
214: -- Standard call to get message count and if count is 1, get message info.
215: FND_MSG_PUB.Count_And_Get
216: ( p_count => x_msg_count,
217: p_data => x_msg_data
218: );
219:

Line 227: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

223: ROLLBACK;
224: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
225: P_API_NAME => L_API_NAME
226: ,P_PKG_NAME => G_PKG_NAME
227: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
228: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
229: ,P_SQLCODE => SQLCODE
230: ,P_SQLERRM => SQLERRM
231: ,X_MSG_COUNT => X_MSG_COUNT

Line 240: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

236: ROLLBACK;
237: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
238: P_API_NAME => L_API_NAME
239: ,P_PKG_NAME => G_PKG_NAME
240: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
241: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
242: ,P_SQLCODE => SQLCODE
243: ,P_SQLERRM => SQLERRM
244: ,X_MSG_COUNT => X_MSG_COUNT

Line 315: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

311: -- Validate Environment
312: -- ******************************************************************
313: IF FND_GLOBAL.User_Id IS NULL
314: THEN
315: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
316: THEN
317: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
318: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
319: FND_MSG_PUB.ADD;

Line 319: FND_MSG_PUB.ADD;

315: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
316: THEN
317: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
318: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
319: FND_MSG_PUB.ADD;
320: END IF;
321: RAISE FND_API.G_EXC_ERROR;
322: END IF;
323:

Line 366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

362: -- Check for Uniqueness
363: OPEN C_Directory_Node;
364: FETCH C_Directory_Node INTO l_Directory_Node_Code;
365: IF C_Directory_Node%FOUND THEN
366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
367: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
368: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
369: FND_MSG_PUB.ADD;
370: END IF;

Line 369: FND_MSG_PUB.ADD;

365: IF C_Directory_Node%FOUND THEN
366: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
367: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
368: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
369: FND_MSG_PUB.ADD;
370: END IF;
371: CLOSE C_Directory_Node;
372: RAISE FND_API.G_EXC_ERROR;
373: END IF;

Line 397: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

393: p_OBJECT_VERSION_NUMBER => l_Directory_Node_rec.OBJECT_VERSION_NUMBER);
394:
395:
396: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
397: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
398: FND_MESSAGE.Set_Name('IBC', 'IBC_UPDATE_ERROR');
399: FND_MSG_PUB.ADD;
400: END IF;
401:

Line 399: FND_MSG_PUB.ADD;

395:
396: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
397: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
398: FND_MESSAGE.Set_Name('IBC', 'IBC_UPDATE_ERROR');
399: FND_MSG_PUB.ADD;
400: END IF;
401:
402: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
403: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 421: FND_MSG_PUB.Count_And_Get

417: COMMIT WORK;
418: END IF;
419:
420: -- Standard call to get message count and if count is 1, get message info.
421: FND_MSG_PUB.Count_And_Get
422: ( p_count => x_msg_count,
423: p_data => x_msg_data
424: );
425:

Line 432: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

428: ROLLBACK;
429: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
430: P_API_NAME => L_API_NAME
431: ,P_PKG_NAME => G_PKG_NAME
432: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
433: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
434: ,P_SQLCODE => SQLCODE
435: ,P_SQLERRM => SQLERRM
436: ,X_MSG_COUNT => X_MSG_COUNT

Line 445: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

441: ROLLBACK;
442: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
443: P_API_NAME => L_API_NAME
444: ,P_PKG_NAME => G_PKG_NAME
445: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
446: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
447: ,P_SQLCODE => SQLCODE
448: ,P_SQLERRM => SQLERRM
449: ,X_MSG_COUNT => X_MSG_COUNT

Line 518: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

514: -- Validate Environment
515: -- ******************************************************************
516: IF FND_GLOBAL.User_Id IS NULL
517: THEN
518: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
519: THEN
520: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
521: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
522: FND_MSG_PUB.ADD;

Line 522: FND_MSG_PUB.ADD;

518: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
519: THEN
520: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
521: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
522: FND_MSG_PUB.ADD;
523: END IF;
524: RAISE FND_API.G_EXC_ERROR;
525: END IF;
526:

Line 555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

551: -- Check for Uniqueness
552: OPEN C_Directory_Node;
553: FETCH C_Directory_Node INTO l_Directory_Node_Code;
554: IF C_Directory_Node%FOUND THEN
555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
556: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
557: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
558: FND_MSG_PUB.ADD;
559: END IF;

Line 558: FND_MSG_PUB.ADD;

554: IF C_Directory_Node%FOUND THEN
555: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
556: FND_MESSAGE.Set_Name('IBC', 'Node_Code Already EXISTS');
557: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_Code', FALSE);
558: FND_MSG_PUB.ADD;
559: END IF;
560: CLOSE C_Directory_Node;
561: RAISE FND_API.G_EXC_ERROR;
562: END IF;

Line 594: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

590: -- p_OBJECT_VERSION_NUMBER => l_Directory_Node_rec.OBJECT_VERSION_NUMBER);
591:
592:
593: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
594: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
595: FND_MESSAGE.Set_Name('IBC', 'IBC_UPDATE_ERROR');
596: FND_MSG_PUB.ADD;
597: END IF;
598:

Line 596: FND_MSG_PUB.ADD;

592:
593: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
594: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
595: FND_MESSAGE.Set_Name('IBC', 'IBC_UPDATE_ERROR');
596: FND_MSG_PUB.ADD;
597: END IF;
598:
599: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 619: FND_MSG_PUB.Count_And_Get

615: COMMIT WORK;
616: END IF;
617:
618: -- Standard call to get message count and if count is 1, get message info.
619: FND_MSG_PUB.Count_And_Get
620: ( p_count => x_msg_count,
621: p_data => x_msg_data
622: );
623:

Line 630: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

626: ROLLBACK;
627: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
628: P_API_NAME => L_API_NAME
629: ,P_PKG_NAME => G_PKG_NAME
630: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
631: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
632: ,P_SQLCODE => SQLCODE
633: ,P_SQLERRM => SQLERRM
634: ,X_MSG_COUNT => X_MSG_COUNT

Line 643: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

639: ROLLBACK;
640: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
641: P_API_NAME => L_API_NAME
642: ,P_PKG_NAME => G_PKG_NAME
643: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
644: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
645: ,P_SQLCODE => SQLCODE
646: ,P_SQLERRM => SQLERRM
647: ,X_MSG_COUNT => X_MSG_COUNT

Line 716: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

712: -- Validate Environment
713: -- ******************************************************************
714: IF FND_GLOBAL.User_Id IS NULL
715: THEN
716: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
717: THEN
718: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
719: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
720: FND_MSG_PUB.ADD;

Line 720: FND_MSG_PUB.ADD;

716: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
717: THEN
718: FND_MESSAGE.Set_Name(' + appShortName +', 'UT_CANNOT_GET_PROFILE_VALUE');
719: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
720: FND_MSG_PUB.ADD;
721: END IF;
722: RAISE FND_API.G_EXC_ERROR;
723: END IF;
724:

Line 747: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

743: -- Check If the Record Exists
744: OPEN C_Directory_Node;
745: FETCH C_Directory_Node INTO l_Directory_Node_id;
746: IF C_Directory_Node%NOTFOUND THEN
747: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
748: FND_MESSAGE.Set_Name('IBC', 'Cannot Find Record to be Deleted');
749: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_ID', FALSE);
750: FND_MSG_PUB.ADD;
751: END IF;

Line 750: FND_MSG_PUB.ADD;

746: IF C_Directory_Node%NOTFOUND THEN
747: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
748: FND_MESSAGE.Set_Name('IBC', 'Cannot Find Record to be Deleted');
749: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_ID', FALSE);
750: FND_MSG_PUB.ADD;
751: END IF;
752: CLOSE C_Directory_Node;
753: RAISE FND_API.G_EXC_ERROR;
754: END IF;

Line 773: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

769: -- Check If Content Items exists in this Node
770: OPEN C_Content_Item(p_ci_dir_node_id =>i_rec.child_dir_Node_id);
771: FETCH C_Content_Item INTO l_Directory_Node_id;
772: IF C_Directory_Node%FOUND THEN
773: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
774: FND_MESSAGE.Set_Name('IBC', 'Content Items Exists in this Node');
775: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_ID', FALSE);
776: FND_MSG_PUB.ADD;
777: END IF;

Line 776: FND_MSG_PUB.ADD;

772: IF C_Directory_Node%FOUND THEN
773: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
774: FND_MESSAGE.Set_Name('IBC', 'Content Items Exists in this Node');
775: FND_MESSAGE.Set_Token('COLUMN', 'Directory_Node_ID', FALSE);
776: FND_MSG_PUB.ADD;
777: END IF;
778: CLOSE C_Content_Item;
779: RAISE FND_API.G_EXC_ERROR;
780: END IF;

Line 792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

788: END LOOP;
789:
790:
791: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
793: FND_MESSAGE.Set_Name('IBC', 'IBC_DELETE_ERROR');
794: FND_MSG_PUB.ADD;
795: END IF;
796:

Line 794: FND_MSG_PUB.ADD;

790:
791: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
793: FND_MESSAGE.Set_Name('IBC', 'IBC_DELETE_ERROR');
794: FND_MSG_PUB.ADD;
795: END IF;
796:
797: IF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 815: FND_MSG_PUB.Count_And_Get

811: COMMIT WORK;
812: END IF;
813:
814: -- Standard call to get message count and if count is 1, get message info.
815: FND_MSG_PUB.Count_And_Get
816: ( p_count => x_msg_count,
817: p_data => x_msg_data
818: );
819:

Line 827: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

823: ROLLBACK;
824: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
825: P_API_NAME => L_API_NAME
826: ,P_PKG_NAME => G_PKG_NAME
827: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
828: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
829: ,P_SQLCODE => SQLCODE
830: ,P_SQLERRM => SQLERRM
831: ,X_MSG_COUNT => X_MSG_COUNT

Line 840: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

836: ROLLBACK;
837: Ibc_Utilities_Pvt.HANDLE_EXCEPTIONS(
838: P_API_NAME => L_API_NAME
839: ,P_PKG_NAME => G_PKG_NAME
840: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
841: ,P_PACKAGE_TYPE => Ibc_Utilities_Pvt.G_PVT
842: ,P_SQLCODE => SQLCODE
843: ,P_SQLERRM => SQLERRM
844: ,X_MSG_COUNT => X_MSG_COUNT

Line 903: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

899: EXCEPTION
900: WHEN NO_DATA_FOUND THEN
901: RAISE NO_DATA_FOUND;
902: WHEN OTHERS THEN
903: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
904: FND_MESSAGE.Set_Name('IBC', 'Directory Node RECORD Error');
905: FND_MSG_PUB.ADD;
906: END IF;
907: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 905: FND_MSG_PUB.ADD;

901: RAISE NO_DATA_FOUND;
902: WHEN OTHERS THEN
903: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
904: FND_MESSAGE.Set_Name('IBC', 'Directory Node RECORD Error');
905: FND_MSG_PUB.ADD;
906: END IF;
907: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
908: END Query_Directory_Node_Row;
909: