85: );
86: END IF;
87:
88: -- Standard call to check for call compatibility
89: IF NOT FND_API.Compatible_API_Call
90: ( l_api_version_number
91: , p_api_version_number
92: , l_procedure_name
93: , G_PKG_NAME
92: , l_procedure_name
93: , G_PKG_NAME
94: )
95: THEN
96: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
97: END IF;
98:
99: -- Initialize message stack if required
100: IF FND_API.to_Boolean(p_init_msg_list)
96: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
97: END IF;
98:
99: -- Initialize message stack if required
100: IF FND_API.to_Boolean(p_init_msg_list)
101: THEN
102: FND_MSG_PUB.initialize;
103: END IF;
104:
101: THEN
102: FND_MSG_PUB.initialize;
103: END IF;
104:
105: x_return_status := FND_API.G_RET_STS_SUCCESS;
106:
107: IF p_reset_option = 'NOIGNORE'
108: THEN
109: UPDATE
169: ,'exit procedure'
170: );
171: END IF;
172: EXCEPTION
173: WHEN FND_API.G_EXC_ERROR THEN
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: -- Get message count and data
176: FND_MSG_PUB.Count_And_Get
177: ( p_encoded => FND_API.G_FALSE
170: );
171: END IF;
172: EXCEPTION
173: WHEN FND_API.G_EXC_ERROR THEN
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: -- Get message count and data
176: FND_MSG_PUB.Count_And_Get
177: ( p_encoded => FND_API.G_FALSE
178: , p_count => x_msg_count
173: WHEN FND_API.G_EXC_ERROR THEN
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: -- Get message count and data
176: FND_MSG_PUB.Count_And_Get
177: ( p_encoded => FND_API.G_FALSE
178: , p_count => x_msg_count
179: , p_data => x_msg_data
180: );
181:
178: , p_count => x_msg_count
179: , p_data => x_msg_data
180: );
181:
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
184: -- Get message count and data
185: FND_MSG_PUB.Count_And_Get
186: ( p_encoded => FND_API.G_FALSE
179: , p_data => x_msg_data
180: );
181:
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
184: -- Get message count and data
185: FND_MSG_PUB.Count_And_Get
186: ( p_encoded => FND_API.G_FALSE
187: , p_count => x_msg_count
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
184: -- Get message count and data
185: FND_MSG_PUB.Count_And_Get
186: ( p_encoded => FND_API.G_FALSE
187: , p_count => x_msg_count
188: , p_data => x_msg_data
189: );
190:
188: , p_data => x_msg_data
189: );
190:
191: WHEN OTHERS THEN
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
193: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
194: THEN
195: FND_MSG_PUB.Add_Exc_Msg
196: ( G_PKG_NAME
198: );
199: END IF;
200: -- Get message count and data
201: FND_MSG_PUB.Count_And_Get
202: ( p_encoded => FND_API.G_FALSE
203: , p_count => x_msg_count
204: , p_data => x_msg_data
205: );
206: END Reset_Transaction_Status;