142: p_item_loct_ctl => l_ic_item_mst_rec.loct_ctl,
143: p_whse_loct_ctl => l_ic_whse_mst_rec.loct_ctl )
144: THEN
145: oe_debug_pub.add('OPM allocation exit because allocations exist',1);
146: FND_MESSAGE.SET_NAME('GML','GML_CANNOT_AUTO_ALLOC');
147: FND_MESSAGE.SET_TOKEN('ITEM_NO', l_ic_item_mst_rec.item_no);
148: FND_MSG_PUB.Add;
149: RAISE FND_API.G_EXC_ERROR;
150: END IF;*/
143: p_whse_loct_ctl => l_ic_whse_mst_rec.loct_ctl )
144: THEN
145: oe_debug_pub.add('OPM allocation exit because allocations exist',1);
146: FND_MESSAGE.SET_NAME('GML','GML_CANNOT_AUTO_ALLOC');
147: FND_MESSAGE.SET_TOKEN('ITEM_NO', l_ic_item_mst_rec.item_no);
148: FND_MSG_PUB.Add;
149: RAISE FND_API.G_EXC_ERROR;
150: END IF;*/
151:
168: ===============================================================*/
169: --B1655007 Update exception handling
170: If (l_return_status = FND_API.G_RET_STS_ERROR)
171: THEN
172: FND_MESSAGE.SET_NAME('GML','GML_NO_ALLOCATION_PARMS'); /* NEW */
173: FND_MESSAGE.SET_TOKEN('ALLOC_CLASS', l_ic_item_mst_rec.alloc_class);
174: FND_MSG_PUB.Add;
175: RAISE FND_API.G_EXC_ERROR;
176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
169: --B1655007 Update exception handling
170: If (l_return_status = FND_API.G_RET_STS_ERROR)
171: THEN
172: FND_MESSAGE.SET_NAME('GML','GML_NO_ALLOCATION_PARMS'); /* NEW */
173: FND_MESSAGE.SET_TOKEN('ALLOC_CLASS', l_ic_item_mst_rec.alloc_class);
174: FND_MSG_PUB.Add;
175: RAISE FND_API.G_EXC_ERROR;
176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
189: =================================*/
190: IF (sy_orgn_mst_c1%NOTFOUND)
191: THEN
192: CLOSE sy_orgn_mst_c1;
193: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ORGN_CODE');
194: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_ic_whse_mst_rec.orgn_code);
195: FND_MSG_PUB.Add;
196: RAISE FND_API.G_EXC_ERROR;
197: ELSE
190: IF (sy_orgn_mst_c1%NOTFOUND)
191: THEN
192: CLOSE sy_orgn_mst_c1;
193: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ORGN_CODE');
194: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_ic_whse_mst_rec.orgn_code);
195: FND_MSG_PUB.Add;
196: RAISE FND_API.G_EXC_ERROR;
197: ELSE
198: CLOSE sy_orgn_mst_c1;