226: And uom_code = ORDER_QUANTITY_UOM;
227:
228: EXCEPTION
229: WHEN OTHERS THEN
230: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
231: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
232: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
233: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
234: FND_MSG_PUB.ADD;
227:
228: EXCEPTION
229: WHEN OTHERS THEN
230: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
231: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
232: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
233: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
234: FND_MSG_PUB.ADD;
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228: EXCEPTION
229: WHEN OTHERS THEN
230: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
231: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
232: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
233: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
234: FND_MSG_PUB.ADD;
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END;
229: WHEN OTHERS THEN
230: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
231: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
232: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
233: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
234: FND_MSG_PUB.ADD;
235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
236: END;
237:
249: Where uom_code = p_rma_lot_uom;
250:
251: EXCEPTION
252: WHEN OTHERS THEN
253: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
254: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
255: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
256: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
257: FND_MSG_PUB.ADD;
250:
251: EXCEPTION
252: WHEN OTHERS THEN
253: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
254: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
255: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
256: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
257: FND_MSG_PUB.ADD;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
251: EXCEPTION
252: WHEN OTHERS THEN
253: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
254: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
255: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
256: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
257: FND_MSG_PUB.ADD;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259: END;
252: WHEN OTHERS THEN
253: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
254: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
255: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
256: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
257: FND_MSG_PUB.ADD;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259: END;
260: END IF;
275: And nvl(sublot_number,' ') = nvl(p_sublot_no,' ');
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
280: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
281: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
282: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
283: FND_MSG_PUB.ADD;
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
280: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
281: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
282: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
283: FND_MSG_PUB.ADD;
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
277: EXCEPTION
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
280: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
281: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
282: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
283: FND_MSG_PUB.ADD;
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END;
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
280: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
281: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
282: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
283: FND_MSG_PUB.ADD;
284: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
285: END;
286: ELSE
322: Where item_id = p_opm_item_id;
323:
324: EXCEPTION
325: WHEN OTHERS THEN
326: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
327: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
328: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
329: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
330: FND_MSG_PUB.ADD;
323:
324: EXCEPTION
325: WHEN OTHERS THEN
326: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
327: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
328: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
329: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
330: FND_MSG_PUB.ADD;
331: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: EXCEPTION
325: WHEN OTHERS THEN
326: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
327: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
328: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
329: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
330: FND_MSG_PUB.ADD;
331: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
332: END;
325: WHEN OTHERS THEN
326: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
327: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
328: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
329: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
330: FND_MSG_PUB.ADD;
331: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
332: END;
333:
346: l_lot_recv_uom,
347: 0);
348: IF (l_trx_opm_qty < 0) THEN
349: IF (l_trx_opm_qty = -1) THEN
350: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
351: ELSIF (l_trx_opm_qty = -3) THEN
352: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
353: ELSIF (l_trx_opm_qty = -4) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
348: IF (l_trx_opm_qty < 0) THEN
349: IF (l_trx_opm_qty = -1) THEN
350: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
351: ELSIF (l_trx_opm_qty = -3) THEN
352: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
353: ELSIF (l_trx_opm_qty = -4) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
355: ELSIF (l_trx_opm_qty = -5) THEN
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
350: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
351: ELSIF (l_trx_opm_qty = -3) THEN
352: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
353: ELSIF (l_trx_opm_qty = -4) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
355: ELSIF (l_trx_opm_qty = -5) THEN
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
357: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
352: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
353: ELSIF (l_trx_opm_qty = -4) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
355: ELSIF (l_trx_opm_qty = -5) THEN
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
357: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
359: ELSIF (l_trx_opm_qty = -6) THEN
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
353: ELSIF (l_trx_opm_qty = -4) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
355: ELSIF (l_trx_opm_qty = -5) THEN
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
357: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
359: ELSIF (l_trx_opm_qty = -6) THEN
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
354: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
355: ELSIF (l_trx_opm_qty = -5) THEN
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
357: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
359: ELSIF (l_trx_opm_qty = -6) THEN
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
356: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
357: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
359: ELSIF (l_trx_opm_qty = -6) THEN
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
363: ELSIF (l_trx_opm_qty = -10) THEN
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
358: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
359: ELSIF (l_trx_opm_qty = -6) THEN
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
363: ELSIF (l_trx_opm_qty = -10) THEN
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
365: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
360: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
363: ELSIF (l_trx_opm_qty = -10) THEN
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
365: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
367: ELSIF (l_trx_opm_qty = -11) THEN
368: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
361: ELSIF (l_trx_opm_qty = -7) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
363: ELSIF (l_trx_opm_qty = -10) THEN
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
365: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
367: ELSIF (l_trx_opm_qty = -11) THEN
368: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
369: ELSIF (l_trx_opm_qty < -11) THEN
362: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
363: ELSIF (l_trx_opm_qty = -10) THEN
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
365: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
367: ELSIF (l_trx_opm_qty = -11) THEN
368: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
369: ELSIF (l_trx_opm_qty < -11) THEN
370: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
364: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
365: FND_MESSAGE.set_token('FROMUOM',l_trx_opm_uom);
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
367: ELSIF (l_trx_opm_qty = -11) THEN
368: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
369: ELSIF (l_trx_opm_qty < -11) THEN
370: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
371: END IF;
372: FND_MSG_PUB.ADD;
366: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
367: ELSIF (l_trx_opm_qty = -11) THEN
368: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
369: ELSIF (l_trx_opm_qty < -11) THEN
370: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
371: END IF;
372: FND_MSG_PUB.ADD;
373: RAISE FND_API.G_EXC_ERROR;
374: END IF;
391: l_lot_recv_uom,
392: 0);
393: IF (l_rma_lot_opm_qty < 0) THEN
394: IF (l_rma_lot_opm_qty = -1) THEN
395: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
396: ELSIF (l_rma_lot_opm_qty = -3) THEN
397: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
398: ELSIF (l_rma_lot_opm_qty = -4) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
393: IF (l_rma_lot_opm_qty < 0) THEN
394: IF (l_rma_lot_opm_qty = -1) THEN
395: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
396: ELSIF (l_rma_lot_opm_qty = -3) THEN
397: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
398: ELSIF (l_rma_lot_opm_qty = -4) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
400: ELSIF (l_rma_lot_opm_qty = -5) THEN
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
395: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
396: ELSIF (l_rma_lot_opm_qty = -3) THEN
397: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
398: ELSIF (l_rma_lot_opm_qty = -4) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
400: ELSIF (l_rma_lot_opm_qty = -5) THEN
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
402: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
397: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
398: ELSIF (l_rma_lot_opm_qty = -4) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
400: ELSIF (l_rma_lot_opm_qty = -5) THEN
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
402: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
404: ELSIF (l_rma_lot_opm_qty = -6) THEN
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
398: ELSIF (l_rma_lot_opm_qty = -4) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
400: ELSIF (l_rma_lot_opm_qty = -5) THEN
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
402: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
404: ELSIF (l_rma_lot_opm_qty = -6) THEN
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
399: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
400: ELSIF (l_rma_lot_opm_qty = -5) THEN
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
402: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
404: ELSIF (l_rma_lot_opm_qty = -6) THEN
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
401: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
402: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
404: ELSIF (l_rma_lot_opm_qty = -6) THEN
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
408: ELSIF (l_rma_lot_opm_qty = -10) THEN
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
403: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
404: ELSIF (l_rma_lot_opm_qty = -6) THEN
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
408: ELSIF (l_rma_lot_opm_qty = -10) THEN
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
410: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
405: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
408: ELSIF (l_rma_lot_opm_qty = -10) THEN
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
410: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
412: ELSIF (l_rma_lot_opm_qty = -11) THEN
413: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
406: ELSIF (l_rma_lot_opm_qty = -7) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
408: ELSIF (l_rma_lot_opm_qty = -10) THEN
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
410: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
412: ELSIF (l_rma_lot_opm_qty = -11) THEN
413: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
414: ELSIF (l_rma_lot_opm_qty < -11) THEN
407: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
408: ELSIF (l_rma_lot_opm_qty = -10) THEN
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
410: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
412: ELSIF (l_rma_lot_opm_qty = -11) THEN
413: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
414: ELSIF (l_rma_lot_opm_qty < -11) THEN
415: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
409: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
410: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
412: ELSIF (l_rma_lot_opm_qty = -11) THEN
413: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
414: ELSIF (l_rma_lot_opm_qty < -11) THEN
415: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
416: END IF;
417: FND_MSG_PUB.ADD;
411: FND_MESSAGE.set_token('TOUOM',l_lot_recv_uom);
412: ELSIF (l_rma_lot_opm_qty = -11) THEN
413: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
414: ELSIF (l_rma_lot_opm_qty < -11) THEN
415: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
416: END IF;
417: FND_MSG_PUB.ADD;
418: RAISE FND_API.G_EXC_ERROR;
419: END IF;
440: l_trx_opm_uom,
441: 0);
442: IF (X_allowed_quantity < 0) THEN
443: IF (X_allowed_quantity = -1) THEN
444: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
445: ELSIF (X_allowed_quantity = -3) THEN
446: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
447: ELSIF (X_allowed_quantity = -4) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
442: IF (X_allowed_quantity < 0) THEN
443: IF (X_allowed_quantity = -1) THEN
444: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
445: ELSIF (X_allowed_quantity = -3) THEN
446: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
447: ELSIF (X_allowed_quantity = -4) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
449: ELSIF (X_allowed_quantity = -5) THEN
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
444: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
445: ELSIF (X_allowed_quantity = -3) THEN
446: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
447: ELSIF (X_allowed_quantity = -4) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
449: ELSIF (X_allowed_quantity = -5) THEN
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
451: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
446: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
447: ELSIF (X_allowed_quantity = -4) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
449: ELSIF (X_allowed_quantity = -5) THEN
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
451: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
453: ELSIF (X_allowed_quantity = -6) THEN
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
447: ELSIF (X_allowed_quantity = -4) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
449: ELSIF (X_allowed_quantity = -5) THEN
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
451: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
453: ELSIF (X_allowed_quantity = -6) THEN
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
448: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
449: ELSIF (X_allowed_quantity = -5) THEN
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
451: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
453: ELSIF (X_allowed_quantity = -6) THEN
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
450: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
451: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
453: ELSIF (X_allowed_quantity = -6) THEN
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
457: ELSIF (X_allowed_quantity = -10) THEN
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
452: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
453: ELSIF (X_allowed_quantity = -6) THEN
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
457: ELSIF (X_allowed_quantity = -10) THEN
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
459: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
454: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
457: ELSIF (X_allowed_quantity = -10) THEN
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
459: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
461: ELSIF (X_allowed_quantity = -11) THEN
462: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
455: ELSIF (X_allowed_quantity = -7) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
457: ELSIF (X_allowed_quantity = -10) THEN
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
459: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
461: ELSIF (X_allowed_quantity = -11) THEN
462: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
463: ELSIF (X_allowed_quantity < -11) THEN
456: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
457: ELSIF (X_allowed_quantity = -10) THEN
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
459: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
461: ELSIF (X_allowed_quantity = -11) THEN
462: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
463: ELSIF (X_allowed_quantity < -11) THEN
464: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
458: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
459: FND_MESSAGE.set_token('FROMUOM',l_lot_recv_uom);
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
461: ELSIF (X_allowed_quantity = -11) THEN
462: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
463: ELSIF (X_allowed_quantity < -11) THEN
464: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
465: END IF;
466: FND_MSG_PUB.ADD;
460: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
461: ELSIF (X_allowed_quantity = -11) THEN
462: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
463: ELSIF (X_allowed_quantity < -11) THEN
464: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
465: END IF;
466: FND_MSG_PUB.ADD;
467: RAISE FND_API.G_EXC_ERROR;
468: END IF;
491: l_trx_opm_uom,
492: 0);
493: IF (l_rma_lot_opm_qty < 0) THEN
494: IF (l_rma_lot_opm_qty = -1) THEN
495: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
496: ELSIF (l_rma_lot_opm_qty = -3) THEN
497: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
498: ELSIF (l_rma_lot_opm_qty = -4) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
493: IF (l_rma_lot_opm_qty < 0) THEN
494: IF (l_rma_lot_opm_qty = -1) THEN
495: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
496: ELSIF (l_rma_lot_opm_qty = -3) THEN
497: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
498: ELSIF (l_rma_lot_opm_qty = -4) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
500: ELSIF (l_rma_lot_opm_qty = -5) THEN
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
495: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_PACKAGE_ERR');
496: ELSIF (l_rma_lot_opm_qty = -3) THEN
497: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
498: ELSIF (l_rma_lot_opm_qty = -4) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
500: ELSIF (l_rma_lot_opm_qty = -5) THEN
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
502: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
497: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURUMTYPE_ERR');
498: ELSIF (l_rma_lot_opm_qty = -4) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
500: ELSIF (l_rma_lot_opm_qty = -5) THEN
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
502: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
504: ELSIF (l_rma_lot_opm_qty = -6) THEN
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
498: ELSIF (l_rma_lot_opm_qty = -4) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
500: ELSIF (l_rma_lot_opm_qty = -5) THEN
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
502: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
504: ELSIF (l_rma_lot_opm_qty = -6) THEN
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
499: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NEWUMTYPE_ERR');
500: ELSIF (l_rma_lot_opm_qty = -5) THEN
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
502: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
504: ELSIF (l_rma_lot_opm_qty = -6) THEN
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
501: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
502: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
504: ELSIF (l_rma_lot_opm_qty = -6) THEN
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
508: ELSIF (l_rma_lot_opm_qty = -10) THEN
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
503: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
504: ELSIF (l_rma_lot_opm_qty = -6) THEN
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
508: ELSIF (l_rma_lot_opm_qty = -10) THEN
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
510: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
505: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUMTYPE_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
508: ELSIF (l_rma_lot_opm_qty = -10) THEN
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
510: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
512: ELSIF (l_rma_lot_opm_qty = -11) THEN
513: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
506: ELSIF (l_rma_lot_opm_qty = -7) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
508: ELSIF (l_rma_lot_opm_qty = -10) THEN
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
510: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
512: ELSIF (l_rma_lot_opm_qty = -11) THEN
513: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
514: ELSIF (l_rma_lot_opm_qty < -11) THEN
507: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_CURFACTOR_ERR');
508: ELSIF (l_rma_lot_opm_qty = -10) THEN
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
510: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
512: ELSIF (l_rma_lot_opm_qty = -11) THEN
513: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
514: ELSIF (l_rma_lot_opm_qty < -11) THEN
515: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
509: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_INVUOMTYPE_ERR2');
510: FND_MESSAGE.set_token('FROMUOM',l_rma_lot_opm_uom);
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
512: ELSIF (l_rma_lot_opm_qty = -11) THEN
513: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
514: ELSIF (l_rma_lot_opm_qty < -11) THEN
515: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
516: END IF;
517: FND_MSG_PUB.ADD;
511: FND_MESSAGE.set_token('TOUOM',l_trx_opm_uom);
512: ELSIF (l_rma_lot_opm_qty = -11) THEN
513: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_NOITEMID_ERR');
514: ELSIF (l_rma_lot_opm_qty < -11) THEN
515: FND_MESSAGE.set_name('GMI', 'IC_UOMCV_FATAL_ERR');
516: END IF;
517: FND_MSG_PUB.ADD;
518: RAISE FND_API.G_EXC_ERROR;
519: END IF;
548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
549:
550: WHEN OTHERS THEN
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
553: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
554: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
555: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
556: FND_MSG_PUB.ADD;
549:
550: WHEN OTHERS THEN
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
553: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
554: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
555: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
556: FND_MSG_PUB.ADD;
557: /* Bug 4502018 */
550: WHEN OTHERS THEN
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
553: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
554: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
555: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
556: FND_MSG_PUB.ADD;
557: /* Bug 4502018 */
558: -- IF (g_fnd_debug = 'Y') THEN
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
552: FND_MESSAGE.SET_NAME('GMI','GMI_SQL_ERROR');
553: FND_MESSAGE.SET_TOKEN('WHERE','GML_RCV_DB_COMMON.VALIDATE_RMA_LOT_QUANTITIES'||'-'||l_progress);
554: FND_MESSAGE.SET_TOKEN('SQL_CODE',SQLCODE);
555: FND_MESSAGE.SET_TOKEN('SQL_ERRM',SQLERRM(SQLCODE));
556: FND_MSG_PUB.ADD;
557: /* Bug 4502018 */
558: -- IF (g_fnd_debug = 'Y') THEN
559: if( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then