1: PACKAGE BODY QP_Qualifier_Rules_PUB AS
2: /* $Header: QPXPQRQB.pls 120.4 2006/10/25 07:06:45 nirmkuma ship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: QPXPQRQB.pls 120.4 2006/10/25 07:06:45 nirmkuma ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'QP_Qualifier_Rules_PUB';
7:
8: -- Forward declaration of Procedure Id_To_Value
9:
10: PROCEDURE Id_To_Value
438: IS
439: l_api_version_number CONSTANT NUMBER := 1.0;
440: l_api_name CONSTANT VARCHAR2(30):= 'Get_Qualifier_Rules';
441: l_qualifier_rule_id NUMBER := p_qualifier_rule_id;
442: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
443: l_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
444: BEGIN
445:
446: -- Standard call to check for call compatibility
439: l_api_version_number CONSTANT NUMBER := 1.0;
440: l_api_name CONSTANT VARCHAR2(30):= 'Get_Qualifier_Rules';
441: l_qualifier_rule_id NUMBER := p_qualifier_rule_id;
442: l_QUALIFIER_RULES_rec QP_Qualifier_Rules_PUB.Qualifier_Rules_Rec_Type;
443: l_QUALIFIERS_tbl QP_Qualifier_Rules_PUB.Qualifiers_Tbl_Type;
444: BEGIN
445:
446: -- Standard call to check for call compatibility
447:
907: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
908:
909: END Value_To_Id;
910:
911: END QP_Qualifier_Rules_PUB;