37:
38: -- check if GMO is enabled
39: IF (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.NO) THEN
40: x_return_status := FND_API.G_RET_STS_SUCCESS;
41: FND_MESSAGE.SET_NAME('GMO','GMO_DISABLED_ERR');
42: FND_MSG_PUB.ADD;
43: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
44: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
45: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_dispense_grp.maintain_reservation', FALSE);
148: END IF;
149: -- check if GMO is enabled
150: IF (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.NO) THEN
151: x_return_status := FND_API.G_RET_STS_SUCCESS;
152: FND_MESSAGE.SET_NAME('GMO','GMO_DISABLED_ERR');
153: FND_MSG_PUB.ADD;
154: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
155: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
156: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_dispense_grp.change_dispense_status', FALSE);
271: END IF;
272: -- check if GMO is enabled
273: IF (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.NO) THEN
274: x_return_status := FND_API.G_RET_STS_SUCCESS;
275: FND_MESSAGE.SET_NAME('GMO','GMO_DISABLED_ERR');
276: FND_MSG_PUB.ADD;
277: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
278: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
279: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_dispense_grp.IS_DISPENSE_ITEM', FALSE);
323:
324: WHEN GMO_ITEM_NOT_RESERVABLE_ERR THEN
325: x_return_status := 'W';
326: x_dispense_required := 'N';
327: FND_MESSAGE.SET_NAME('GMO','GMO_ITEM_NOT_RESERVABLE_ERR');
328: FND_MSG_PUB.ADD;
329: FND_MSG_PUB.COUNT_AND_GET ( P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
330:
331: WHEN OTHERS THEN
359: END IF;
360: -- check if GMO is enabled
361: IF (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.NO) THEN
362: x_return_status := FND_API.G_RET_STS_SUCCESS;
363: FND_MESSAGE.SET_NAME('GMO','GMO_DISABLED_ERR');
364: FND_MSG_PUB.ADD;
365: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
366: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
367: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_dispense_grp.GET_MATERIAL_DISPENSE_DATA', FALSE);
435:
436:
437: IF (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.NO) THEN
438: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
439: FND_MESSAGE.SET_NAME('GMO','GMO_DISABLED_ERR');
440: FND_MSG_PUB.ADD;
441: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
442: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
443: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_dispense_grp.maintain_reservation', FALSE);
471: WHEN OTHERS THEN
472:
473: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
474:
475: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
476: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
477: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_GRP');
478: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','INSTANTIATE_DISPENSE_SETUP');
479: IF FND_MSG_PUB.CHECK_MSG_LEVEL( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
472:
473: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
474:
475: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
476: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
477: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_GRP');
478: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','INSTANTIATE_DISPENSE_SETUP');
479: IF FND_MSG_PUB.CHECK_MSG_LEVEL( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
480:
473: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;
474:
475: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
476: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
477: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_GRP');
478: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','INSTANTIATE_DISPENSE_SETUP');
479: IF FND_MSG_PUB.CHECK_MSG_LEVEL( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
480:
481: FND_MSG_PUB.ADD_EXC_MSG (G_PKG_NAME,
474:
475: FND_MESSAGE.SET_NAME('FND','FND_AS_UNEXPECTED_ERROR');
476: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',SQLERRM);
477: FND_MESSAGE.SET_TOKEN('PKG_NAME','GMO_DISPENSE_GRP');
478: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','INSTANTIATE_DISPENSE_SETUP');
479: IF FND_MSG_PUB.CHECK_MSG_LEVEL( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
480:
481: FND_MSG_PUB.ADD_EXC_MSG (G_PKG_NAME,
482: L_API_NAME );