67: END IF;
68:
69: --Initialize message listif p_init_msg_list is set to TRUE.
70: IF FND_API.to_Boolean ( p_init_msg_list ) THEN
71: FND_MSG_PUB.initialize;
72: END IF;
73:
74: -- Initialize API return status to success
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
152:
153:
154: -- Standard call to get messgage count and if count is 1, get message info.
155:
156: FND_MSG_PUB.Count_And_get (
157: p_count => x_msg_count,
158: p_data => x_msg_data
159: );
160:
166: CLOSE l_servereq_csr;
167: END IF;
168: -- ROLLBACK TO launch_workflow_pvt;
169: x_return_status := FND_API.G_RET_STS_ERROR;
170: FND_MSG_PUB.Count_And_Get
171: (
172: p_count => x_msg_count,
173: p_data => x_msg_data
174: );
178: CLOSE l_servereq_csr;
179: END IF;
180: -- ROLLBACK TO launch_workflow_pvt;
181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
182: FND_MSG_PUB.Count_And_Get
183: (
184: p_count => x_msg_count,
185: p_data => x_msg_data
186: );
190: CLOSE l_servereq_csr;
191: END IF;
192: -- ROLLBACK TO launch_workflow_pvt;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
194: IF FND_MSG_PUB.Check_Msg_Level
195: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
196: THEN
197: FND_MSG_PUB.Add_Exc_Msg
198: (
191: END IF;
192: -- ROLLBACK TO launch_workflow_pvt;
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
194: IF FND_MSG_PUB.Check_Msg_Level
195: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
196: THEN
197: FND_MSG_PUB.Add_Exc_Msg
198: (
199: G_PKG_NAME,
193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
194: IF FND_MSG_PUB.Check_Msg_Level
195: ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
196: THEN
197: FND_MSG_PUB.Add_Exc_Msg
198: (
199: G_PKG_NAME,
200: l_api_name
201: );
199: G_PKG_NAME,
200: l_api_name
201: );
202: END IF;
203: FND_MSG_PUB.Count_And_Get
204: (
205: p_count => x_msg_count,
206: p_data => x_msg_data
207: );