60:
61: -- Initialize message list if p_init_msg_list is set to TRUE.
62: IF FND_API.to_Boolean( p_init_msg_list )
63: THEN
64: FND_MSG_PUB.initialize;
65: END IF;
66:
67: -- Debug Message
68: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
64: FND_MSG_PUB.initialize;
65: END IF;
66:
67: -- Debug Message
68: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
69: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
70: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
71: fnd_msg_pub.Add;
72: END IF;
67: -- Debug Message
68: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
69: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
70: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
71: fnd_msg_pub.Add;
72: END IF;
73:
74: -- Initialize API return status to SUCCESS
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
152: IS
153: BEGIN
154: FND_MESSAGE.Set_Name('PV', p_msg_type);
155: FND_MESSAGE.Set_Token('TEXT', p_msg_string);
156: FND_MSG_PUB.Add;
157: END Debug;
158: -- =================================End of Debug================================
159:
160:
184: p_token3_value IN VARCHAR2 := NULL
185: )
186: IS
187: BEGIN
188: IF FND_MSG_PUB.Check_Msg_Level(p_msg_level) THEN
189: FND_MESSAGE.Set_Name('PV', p_msg_name);
190: FND_MESSAGE.Set_Token(p_token1, p_token1_value);
191:
192: IF (p_token1 IS NOT NULL) THEN
200: IF (p_token3 IS NOT NULL) THEN
201: FND_MESSAGE.Set_Token(p_token3, p_token3_value);
202: END IF;
203:
204: FND_MSG_PUB.Add;
205:
206:
207: END IF;
208: END Set_Message;