86: l_api_version_number :=1.0;
87:
88:
89: -- Standard call to check for call compatibility.
90: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
91: 1.0,
92: l_api_name,
93: G_PKG_NAME)
94: THEN
91: 1.0,
92: l_api_name,
93: G_PKG_NAME)
94: THEN
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
97:
98: -- Initialize message list if p_init_msg_list is set to TRUE.
99: IF FND_API.to_Boolean( p_init_msg_list )
95: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
96: END IF;
97:
98: -- Initialize message list if p_init_msg_list is set to TRUE.
99: IF FND_API.to_Boolean( p_init_msg_list )
100: THEN
101: FND_MSG_PUB.initialize;
102: END IF;
103:
101: FND_MSG_PUB.initialize;
102: END IF;
103:
104: -- Initialize API return status to SUCCESS
105: x_return_status := FND_API.G_RET_STS_SUCCESS;
106:
107: -----------------------Code------------------------
108: if (p_rerun = 'N') then
109: OPEN acq_cur;
343: end if; -- check rerun
344:
345: -------------------End Code------------------------
346: -- Standard Check Of p_commit.
347: IF FND_API.To_Boolean(p_commit) THEN
348: COMMIT WORK;
349: END IF;
350: -- Standard callto get message count and if count is 1, get message info.
351: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_TRUE,
347: IF FND_API.To_Boolean(p_commit) THEN
348: COMMIT WORK;
349: END IF;
350: -- Standard callto get message count and if count is 1, get message info.
351: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_TRUE,
352: p_count => x_msg_count,
353: p_data => x_msg_data
354: );
355: EXCEPTION
352: p_count => x_msg_count,
353: p_data => x_msg_data
354: );
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
357: ROLLBACK TO runInbox_pvt;
358: x_return_status := FND_API.G_RET_STS_ERROR ;
359: FND_MSG_PUB.Count_And_Get(
360: p_encoded => FND_API.G_TRUE,
354: );
355: EXCEPTION
356: WHEN FND_API.G_EXC_ERROR THEN
357: ROLLBACK TO runInbox_pvt;
358: x_return_status := FND_API.G_RET_STS_ERROR ;
359: FND_MSG_PUB.Count_And_Get(
360: p_encoded => FND_API.G_TRUE,
361: p_count => x_msg_count,
362: p_data => x_msg_data);
356: WHEN FND_API.G_EXC_ERROR THEN
357: ROLLBACK TO runInbox_pvt;
358: x_return_status := FND_API.G_RET_STS_ERROR ;
359: FND_MSG_PUB.Count_And_Get(
360: p_encoded => FND_API.G_TRUE,
361: p_count => x_msg_count,
362: p_data => x_msg_data);
363: WHEN OTHERS THEN
364: ROLLBACK TO runInbox_pvt;
361: p_count => x_msg_count,
362: p_data => x_msg_data);
363: WHEN OTHERS THEN
364: ROLLBACK TO runInbox_pvt;
365: x_return_status := FND_API.G_RET_STS_ERROR;
366: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
367: THEN
368: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
369: END IF;
366: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
367: THEN
368: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , l_api_name);
369: END IF;
370: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_TRUE,
371: p_count => x_msg_count,
372: p_data => x_msg_data);
373:
374: End runInbox;