32: l_grp_cnt number;
33: l_message_id number;
34:
35: BEGIN
36: -- Standard call to check for call compatibility.
37: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
38: p_api_version_number,
39: l_api_name,
40: G_PKG_NAME)
80: p_MESSAGE_TEXT ,
81: p_MESSAGE_CONTENT
82: );
83:
84: -- Standard Check Of p_commit.
85: IF p_commit='T' THEN
86: COMMIT WORK;
87: END IF;
88: -- Standard callto get message count and if count is 1, get message info.
84: -- Standard Check Of p_commit.
85: IF p_commit='T' THEN
86: COMMIT WORK;
87: END IF;
88: -- Standard callto get message count and if count is 1, get message info.
89: FND_MSG_PUB.Count_And_Get
90: ( p_count => x_msg_count,
91: p_data => x_msg_data
92: );
133:
134: BEGIN
135: null;
136: /*
137: -- Standard call to check for call compatibility.
138: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
139: p_api_version_number,
140: l_api_name,
141: G_PKG_NAME)
145: x_return_status := FND_API.G_RET_STS_SUCCESS;
146: delete from iem_temp_stores
147: where message_id=p_message_id;
148:
149: -- Standard Check Of p_commit.
150: IF p_commit='T' THEN
151: COMMIT WORK;
152: END IF;
153: -- Standard callto get message count and if count is 1, get message info.
149: -- Standard Check Of p_commit.
150: IF p_commit='T' THEN
151: COMMIT WORK;
152: END IF;
153: -- Standard callto get message count and if count is 1, get message info.
154: FND_MSG_PUB.Count_And_Get
155: ( p_count => x_msg_count,
156: p_data => x_msg_data
157: );