127: EXCEPTION
128: WHEN FND_API.G_EXC_ERROR THEN
129: x_return_status := FND_API.G_RET_STS_ERROR;
130: -- Get message count and data
131: FND_MSG_PUB.Count_And_Get
132: ( p_count => x_msg_count
133: ,p_data => x_msg_data
134: );
135:
136: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
138: -- Get message count and data
139:
140: FND_MSG_PUB.Count_And_Get
141: ( p_count => x_msg_count
142: ,p_data => x_msg_data
143: );
144:
143: );
144:
145: WHEN OTHERS THEN
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
147: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
148: THEN
149: FND_MSG_PUB.Add_Exc_Msg
150: ( G_PKG_NAME
151: ,'Update_Card_Supply_Status'
145: WHEN OTHERS THEN
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
147: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
148: THEN
149: FND_MSG_PUB.Add_Exc_Msg
150: ( G_PKG_NAME
151: ,'Update_Card_Supply_Status'
152: );
153: END IF;
151: ,'Update_Card_Supply_Status'
152: );
153: END IF;
154: -- Get message count and data
155: FND_MSG_PUB.Count_And_Get
156: ( p_count => x_msg_count
157: ,p_data => x_msg_data
158: );
159:
249:
250: IF l_pullseq_found = FALSE THEN
251: mydebug('No pull sequence found');
252: FND_MESSAGE.SET_NAME('INV','INV_INVALID_PULL_SEQ');
253: FND_MSG_PUB.Add;
254: Raise FND_API.G_EXC_ERROR;
255: END IF;
256:
257: x_return_status := fnd_api.g_ret_sts_success;
263: x_return_status := FND_API.G_RET_STS_ERROR;
264:
265: -- Get message count and data
266:
267: FND_MSG_PUB.Count_And_Get
268: ( p_count => x_msg_count
269: , p_data => x_msg_data
270: );
271:
274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
275:
276: -- Get message count and data
277:
278: FND_MSG_PUB.Count_And_Get
279: ( p_count => x_msg_count
280: , p_data => x_msg_data
281: );
282:
283: WHEN OTHERS THEN
284:
285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
286:
287: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
288: THEN
289: FND_MSG_PUB.Add_Exc_Msg
290: ( G_PKG_NAME
291: ,'Create_Non_Replenishable_Card'
285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
286:
287: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
288: THEN
289: FND_MSG_PUB.Add_Exc_Msg
290: ( G_PKG_NAME
291: ,'Create_Non_Replenishable_Card'
292: );
293: END IF;
293: END IF;
294:
295: -- Get message count and data
296:
297: FND_MSG_PUB.Count_And_Get
298: ( p_count => x_msg_count
299: ,p_data => x_msg_data
300: );
301: