133: --do not need p_item_no IS NULL but does'nt matter to keep it.
134: IF (Cr_get_opm_attr%NOTFOUND) OR p_item_no IS NULL THEN
135: --item not an opm item do nothing just return
136: CLOSE Cr_get_opm_attr;
137: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ITEM_NO');
138: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
139: FND_MSG_PUB.ADD;
140: RAISE FND_API.G_EXC_ERROR;
141: END IF;
134: IF (Cr_get_opm_attr%NOTFOUND) OR p_item_no IS NULL THEN
135: --item not an opm item do nothing just return
136: CLOSE Cr_get_opm_attr;
137: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ITEM_NO');
138: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
139: FND_MSG_PUB.ADD;
140: RAISE FND_API.G_EXC_ERROR;
141: END IF;
142: CLOSE Cr_get_opm_attr;
152: l_opm_um_code := po_gml_db_common.get_opm_uom_code(p_unit_of_measure);
153:
154: EXCEPTION WHEN OTHERS THEN
155: --If unit of measure is not passed the error out.
156: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
157: FND_MESSAGE.SET_TOKEN('UOM','NULL');
158: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
159: FND_MSG_PUB.ADD;
160: RAISE FND_API.G_EXC_ERROR;
153:
154: EXCEPTION WHEN OTHERS THEN
155: --If unit of measure is not passed the error out.
156: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
157: FND_MESSAGE.SET_TOKEN('UOM','NULL');
158: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
159: FND_MSG_PUB.ADD;
160: RAISE FND_API.G_EXC_ERROR;
161: END;
154: EXCEPTION WHEN OTHERS THEN
155: --If unit of measure is not passed the error out.
156: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
157: FND_MESSAGE.SET_TOKEN('UOM','NULL');
158: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
159: FND_MSG_PUB.ADD;
160: RAISE FND_API.G_EXC_ERROR;
161: END;
162: ELSE
160: RAISE FND_API.G_EXC_ERROR;
161: END;
162: ELSE
163: --If unit of measure is not passed the error out.
164: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
165: FND_MESSAGE.SET_TOKEN('UOM','NULL');
166: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
167: FND_MSG_PUB.ADD;
168: RAISE FND_API.G_EXC_ERROR;
161: END;
162: ELSE
163: --If unit of measure is not passed the error out.
164: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
165: FND_MESSAGE.SET_TOKEN('UOM','NULL');
166: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
167: FND_MSG_PUB.ADD;
168: RAISE FND_API.G_EXC_ERROR;
169: END IF;
162: ELSE
163: --If unit of measure is not passed the error out.
164: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
165: FND_MESSAGE.SET_TOKEN('UOM','NULL');
166: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
167: FND_MSG_PUB.ADD;
168: RAISE FND_API.G_EXC_ERROR;
169: END IF;
170: l_progress := '004';
176: -- measure then error message is not put on the stack since fnd_msg_pub.add was missing.
177: -- adding fnd_msg_pub.add
178: IF l_opm_secondary_um <> l_passed_opm_sec_um_code THEN
179: --return error cause the secondary unit of measure does not match the items definition
180: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
181: FND_MESSAGE.SET_TOKEN('UOM',p_secondary_unit_of_measure);
182: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
183: FND_MSG_PUB.ADD;
184: RAISE FND_API.G_EXC_ERROR;
177: -- adding fnd_msg_pub.add
178: IF l_opm_secondary_um <> l_passed_opm_sec_um_code THEN
179: --return error cause the secondary unit of measure does not match the items definition
180: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
181: FND_MESSAGE.SET_TOKEN('UOM',p_secondary_unit_of_measure);
182: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
183: FND_MSG_PUB.ADD;
184: RAISE FND_API.G_EXC_ERROR;
185: END IF;
178: IF l_opm_secondary_um <> l_passed_opm_sec_um_code THEN
179: --return error cause the secondary unit of measure does not match the items definition
180: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_UOM');
181: FND_MESSAGE.SET_TOKEN('UOM',p_secondary_unit_of_measure);
182: FND_MESSAGE.SET_TOKEN('ITEM',p_item_no);
183: FND_MSG_PUB.ADD;
184: RAISE FND_API.G_EXC_ERROR;
185: END IF;
186: ELSIF p_secondary_unit_of_measure is NULL and p_validate_ind = 'Y' THEN
216: l_opm_secondary_um,
217: 0 );
218:
219: IF v_ret_val in (-68) THEN
220: FND_MESSAGE.SET_NAME( 'GMI','IC_DEVIATION_HI_ERR');
221: FND_MSG_PUB.Add;
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF v_ret_val in (-69) THEN
224: FND_MESSAGE.SET_NAME( 'GMI','IC_DEVIATION_LOW_ERR');
220: FND_MESSAGE.SET_NAME( 'GMI','IC_DEVIATION_HI_ERR');
221: FND_MSG_PUB.Add;
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF v_ret_val in (-69) THEN
224: FND_MESSAGE.SET_NAME( 'GMI','IC_DEVIATION_LOW_ERR');
225: FND_MSG_PUB.Add;
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF ( v_ret_val < 0 ) THEN
228: FND_MESSAGE.SET_NAME( 'GMI','CONV_ERROR');
224: FND_MESSAGE.SET_NAME( 'GMI','IC_DEVIATION_LOW_ERR');
225: FND_MSG_PUB.Add;
226: RAISE FND_API.G_EXC_ERROR;
227: ELSIF ( v_ret_val < 0 ) THEN
228: FND_MESSAGE.SET_NAME( 'GMI','CONV_ERROR');
229: FND_MSG_PUB.Add;
230: RAISE FND_API.G_EXC_ERROR;
231: END IF;
232: END IF; /*l_opm_dualum_ind = 1 */