DBA Data[Home] [Help]

APPS.AHL_PRD_DISP_MTL_TXN_PVT dependencies on FND_API

Line 24: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

20: -- End of Comments.
21:
22: PROCEDURE Process_Disp_Mtl_Txn (
23: p_api_version IN NUMBER,
24: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
25: p_commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: x_return_status OUT NOCOPY VARCHAR2,
28: x_msg_count OUT NOCOPY NUMBER,

Line 25: p_commit IN VARCHAR2 := FND_API.G_FALSE,

21:
22: PROCEDURE Process_Disp_Mtl_Txn (
23: p_api_version IN NUMBER,
24: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
25: p_commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: x_return_status OUT NOCOPY VARCHAR2,
28: x_msg_count OUT NOCOPY NUMBER,
29: x_msg_data OUT NOCOPY VARCHAR2,

Line 26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

22: PROCEDURE Process_Disp_Mtl_Txn (
23: p_api_version IN NUMBER,
24: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
25: p_commit IN VARCHAR2 := FND_API.G_FALSE,
26: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
27: x_return_status OUT NOCOPY VARCHAR2,
28: x_msg_count OUT NOCOPY NUMBER,
29: x_msg_data OUT NOCOPY VARCHAR2,
30: p_module IN VARCHAR2,

Line 106: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

102:
103: l_temp_qty NUMBER;
104: l_temp_uom VARCHAR2(3);
105:
106: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
107: l_exist VARCHAR2(1);
108: l_job_status VARCHAR2(80);
109: -- Dummy variable added by jaramana on Oct 11, 2007 for ER 5883257
110: l_mr_asso_tbl AHL_PRD_NONROUTINE_PVT.MR_Association_tbl_type;

Line 118: x_return_status := FND_API.G_RET_STS_SUCCESS;

114: -- Standard start of API savepoint
115: SAVEPOINT Process_Disp_Mtl_Txn_pvt;
116:
117: -- Initialize Procedure return status to success
118: x_return_status := FND_API.G_RET_STS_SUCCESS;
119:
120: -- Initialize message list if p_init_msg_list is set to TRUE
121:
122: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 122: IF FND_API.To_Boolean(p_init_msg_list) THEN

118: x_return_status := FND_API.G_RET_STS_SUCCESS;
119:
120: -- Initialize message list if p_init_msg_list is set to TRUE
121:
122: IF FND_API.To_Boolean(p_init_msg_list) THEN
123: FND_MSG_PUB.Initialize;
124: END IF;
125:
126: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 153: l_return_status := FND_API.G_RET_STS_ERROR;

149: IF (get_disp_rec_csr%NOTFOUND) THEN
150: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_ID_INV');
151: FND_MESSAGE.Set_Token('DISPOSITION_ID', l_disp_mx_rec.disposition_id);
152: FND_MSG_PUB.ADD;
153: l_return_status := FND_API.G_RET_STS_ERROR;
154: CLOSE get_disp_rec_csr;
155: RAISE FND_API.G_EXC_ERROR;
156: END IF;
157: CLOSE get_disp_rec_csr;

Line 155: RAISE FND_API.G_EXC_ERROR;

151: FND_MESSAGE.Set_Token('DISPOSITION_ID', l_disp_mx_rec.disposition_id);
152: FND_MSG_PUB.ADD;
153: l_return_status := FND_API.G_RET_STS_ERROR;
154: CLOSE get_disp_rec_csr;
155: RAISE FND_API.G_EXC_ERROR;
156: END IF;
157: CLOSE get_disp_rec_csr;
158:
159: -- Begin fix bug 4097556

Line 167: l_return_status := FND_API.G_RET_STS_ERROR;

163: IF (workorder_editable_csr%FOUND) THEN
164: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DIS_ASSOC_WO_STATUS'); --Cannot update disposition because of current workorder's status
165: FND_MESSAGE.Set_Token('STATUS', l_job_status);
166: FND_MSG_PUB.ADD;
167: l_return_status := FND_API.G_RET_STS_ERROR;
168: CLOSE workorder_editable_csr;
169: RAISE FND_API.G_EXC_ERROR;
170: END IF;
171: CLOSE workorder_editable_csr;

Line 169: RAISE FND_API.G_EXC_ERROR;

165: FND_MESSAGE.Set_Token('STATUS', l_job_status);
166: FND_MSG_PUB.ADD;
167: l_return_status := FND_API.G_RET_STS_ERROR;
168: CLOSE workorder_editable_csr;
169: RAISE FND_API.G_EXC_ERROR;
170: END IF;
171: CLOSE workorder_editable_csr;
172: -- End fix bug 4097556
173:

Line 183: l_return_status := FND_API.G_RET_STS_ERROR;

179: IF (get_mtl_txn_rec_csr%NOTFOUND) THEN
180: FND_MESSAGE.Set_Name('AHL','AHL_PRD_MTL_TXN_ID_INV');
181: FND_MESSAGE.Set_Token('MTL_TXN_ID', l_disp_mx_rec.wo_mtl_txn_id);
182: FND_MSG_PUB.ADD;
183: l_return_status := FND_API.G_RET_STS_ERROR;
184: CLOSE get_mtl_txn_rec_csr;
185: RAISE FND_API.G_EXC_ERROR;
186: END IF;
187: CLOSE get_mtl_txn_rec_csr;

Line 185: RAISE FND_API.G_EXC_ERROR;

181: FND_MESSAGE.Set_Token('MTL_TXN_ID', l_disp_mx_rec.wo_mtl_txn_id);
182: FND_MSG_PUB.ADD;
183: l_return_status := FND_API.G_RET_STS_ERROR;
184: CLOSE get_mtl_txn_rec_csr;
185: RAISE FND_API.G_EXC_ERROR;
186: END IF;
187: CLOSE get_mtl_txn_rec_csr;
188:
189: --Validate that disposition item and mtl txn item are equal for matching types.

Line 201: l_return_status := FND_API.G_RET_STS_ERROR;

197: -- transaction organization.
198: -- OR l_disp_rec.organization_id <> l_mtl_txn_rec.organization_id)) THEN
199: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_MTL_TXN_ITEM_ILL');
200: FND_MSG_PUB.ADD;
201: l_return_status := FND_API.G_RET_STS_ERROR;
202: RAISE FND_API.G_EXC_ERROR;
203: END IF;
204:
205: IF (l_disp_rec.workorder_id <> l_mtl_txn_rec.workorder_id) THEN

Line 202: RAISE FND_API.G_EXC_ERROR;

198: -- OR l_disp_rec.organization_id <> l_mtl_txn_rec.organization_id)) THEN
199: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_MTL_TXN_ITEM_ILL');
200: FND_MSG_PUB.ADD;
201: l_return_status := FND_API.G_RET_STS_ERROR;
202: RAISE FND_API.G_EXC_ERROR;
203: END IF;
204:
205: IF (l_disp_rec.workorder_id <> l_mtl_txn_rec.workorder_id) THEN
206: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_MTL_TXN_WO_ILL');

Line 208: l_return_status := FND_API.G_RET_STS_ERROR;

204:
205: IF (l_disp_rec.workorder_id <> l_mtl_txn_rec.workorder_id) THEN
206: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_MTL_TXN_WO_ILL');
207: FND_MSG_PUB.ADD;
208: l_return_status := FND_API.G_RET_STS_ERROR;
209: RAISE FND_API.G_EXC_ERROR;
210: END IF;
211:
212: --If transaction item equals the disposition item,

Line 209: RAISE FND_API.G_EXC_ERROR;

205: IF (l_disp_rec.workorder_id <> l_mtl_txn_rec.workorder_id) THEN
206: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_MTL_TXN_WO_ILL');
207: FND_MSG_PUB.ADD;
208: l_return_status := FND_API.G_RET_STS_ERROR;
209: RAISE FND_API.G_EXC_ERROR;
210: END IF;
211:
212: --If transaction item equals the disposition item,
213: -- then do UOM conversion to Disposition UOM.

Line 217: l_disp_mx_rec.QUANTITY <> FND_API.G_MISS_NUM ) THEN

213: -- then do UOM conversion to Disposition UOM.
214: IF (l_disp_rec.inventory_item_id = l_mtl_txn_rec.inventory_item_id AND
215: l_disp_rec.UOM <> l_disp_mx_rec.UOM AND
216: l_disp_mx_rec.QUANTITY IS NOT NULL AND
217: l_disp_mx_rec.QUANTITY <> FND_API.G_MISS_NUM ) THEN
218: l_disp_mx_rec.quantity:= inv_convert.inv_um_convert(item_id => l_disp_rec.inventory_item_id,
219: precision => 6,
220: from_quantity => l_disp_mx_rec.quantity,
221: from_unit => l_disp_mx_rec.uom,

Line 231: l_return_status := FND_API.G_RET_STS_ERROR;

227: FND_MESSAGE.Set_Name('AHL','AHL_COM_UOM_CONV_FAILED');
228: FND_MESSAGE.Set_Token('FROM_UOM', l_disp_mx_rec.UOM);
229: FND_MESSAGE.Set_Token('TO_UOM', l_disp_rec.uom);
230: FND_MSG_PUB.ADD;
231: l_return_status := FND_API.G_RET_STS_ERROR;
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
234: END IF;
235:

Line 232: RAISE FND_API.G_EXC_ERROR;

228: FND_MESSAGE.Set_Token('FROM_UOM', l_disp_mx_rec.UOM);
229: FND_MESSAGE.Set_Token('TO_UOM', l_disp_rec.uom);
230: FND_MSG_PUB.ADD;
231: l_return_status := FND_API.G_RET_STS_ERROR;
232: RAISE FND_API.G_EXC_ERROR;
233: END IF;
234: END IF;
235:
236:

Line 245: IF (l_disp_mx_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR) THEN

241:
242: IF (get_disp_mtl_txn_rec_csr%NOTFOUND) THEN
243: --CREATE new record.
244: IF (p_module = 'JSP') THEN
245: IF (l_disp_mx_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR) THEN
246: l_disp_mx_rec.ATTRIBUTE_CATEGORY := null;
247: END IF;
248: IF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN
249: l_disp_mx_rec.ATTRIBUTE1 := null;

Line 248: IF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN

244: IF (p_module = 'JSP') THEN
245: IF (l_disp_mx_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR) THEN
246: l_disp_mx_rec.ATTRIBUTE_CATEGORY := null;
247: END IF;
248: IF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN
249: l_disp_mx_rec.ATTRIBUTE1 := null;
250: END IF;
251: IF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN
252: l_disp_mx_rec.ATTRIBUTE2 := null;

Line 251: IF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN

247: END IF;
248: IF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN
249: l_disp_mx_rec.ATTRIBUTE1 := null;
250: END IF;
251: IF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN
252: l_disp_mx_rec.ATTRIBUTE2 := null;
253: END IF;
254: IF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN
255: l_disp_mx_rec.ATTRIBUTE3 := null;

Line 254: IF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN

250: END IF;
251: IF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN
252: l_disp_mx_rec.ATTRIBUTE2 := null;
253: END IF;
254: IF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN
255: l_disp_mx_rec.ATTRIBUTE3 := null;
256: END IF;
257: IF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN
258: l_disp_mx_rec.ATTRIBUTE4 := null;

Line 257: IF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN

253: END IF;
254: IF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN
255: l_disp_mx_rec.ATTRIBUTE3 := null;
256: END IF;
257: IF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN
258: l_disp_mx_rec.ATTRIBUTE4 := null;
259: END IF;
260: IF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN
261: l_disp_mx_rec.ATTRIBUTE5 := null;

Line 260: IF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN

256: END IF;
257: IF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN
258: l_disp_mx_rec.ATTRIBUTE4 := null;
259: END IF;
260: IF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN
261: l_disp_mx_rec.ATTRIBUTE5 := null;
262: END IF;
263: IF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN
264: l_disp_mx_rec.ATTRIBUTE6 := null;

Line 263: IF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN

259: END IF;
260: IF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN
261: l_disp_mx_rec.ATTRIBUTE5 := null;
262: END IF;
263: IF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN
264: l_disp_mx_rec.ATTRIBUTE6 := null;
265: END IF;
266: IF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN
267: l_disp_mx_rec.ATTRIBUTE7 := null;

Line 266: IF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN

262: END IF;
263: IF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN
264: l_disp_mx_rec.ATTRIBUTE6 := null;
265: END IF;
266: IF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN
267: l_disp_mx_rec.ATTRIBUTE7 := null;
268: END IF;
269: IF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN
270: l_disp_mx_rec.ATTRIBUTE8 := null;

Line 269: IF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN

265: END IF;
266: IF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN
267: l_disp_mx_rec.ATTRIBUTE7 := null;
268: END IF;
269: IF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN
270: l_disp_mx_rec.ATTRIBUTE8 := null;
271: END IF;
272: IF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN
273: l_disp_mx_rec.ATTRIBUTE9 := null;

Line 272: IF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN

268: END IF;
269: IF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN
270: l_disp_mx_rec.ATTRIBUTE8 := null;
271: END IF;
272: IF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN
273: l_disp_mx_rec.ATTRIBUTE9 := null;
274: END IF;
275: IF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN
276: l_disp_mx_rec.ATTRIBUTE10 := null;

Line 275: IF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN

271: END IF;
272: IF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN
273: l_disp_mx_rec.ATTRIBUTE9 := null;
274: END IF;
275: IF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN
276: l_disp_mx_rec.ATTRIBUTE10 := null;
277: END IF;
278: IF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN
279: l_disp_mx_rec.ATTRIBUTE11 := null;

Line 278: IF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN

274: END IF;
275: IF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN
276: l_disp_mx_rec.ATTRIBUTE10 := null;
277: END IF;
278: IF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN
279: l_disp_mx_rec.ATTRIBUTE11 := null;
280: END IF;
281: IF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN
282: l_disp_mx_rec.ATTRIBUTE12 := null;

Line 281: IF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN

277: END IF;
278: IF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN
279: l_disp_mx_rec.ATTRIBUTE11 := null;
280: END IF;
281: IF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN
282: l_disp_mx_rec.ATTRIBUTE12 := null;
283: END IF;
284: IF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN
285: l_disp_mx_rec.ATTRIBUTE13 := null;

Line 284: IF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN

280: END IF;
281: IF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN
282: l_disp_mx_rec.ATTRIBUTE12 := null;
283: END IF;
284: IF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN
285: l_disp_mx_rec.ATTRIBUTE13 := null;
286: END IF;
287: IF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN
288: l_disp_mx_rec.ATTRIBUTE14 := null;

Line 287: IF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN

283: END IF;
284: IF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN
285: l_disp_mx_rec.ATTRIBUTE13 := null;
286: END IF;
287: IF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN
288: l_disp_mx_rec.ATTRIBUTE14 := null;
289: END IF;
290: IF (l_disp_mx_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR) THEN
291: l_disp_mx_rec.ATTRIBUTE15 := null;

Line 290: IF (l_disp_mx_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR) THEN

286: END IF;
287: IF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN
288: l_disp_mx_rec.ATTRIBUTE14 := null;
289: END IF;
290: IF (l_disp_mx_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR) THEN
291: l_disp_mx_rec.ATTRIBUTE15 := null;
292: END IF;
293: END IF; --p_module = JSP
294:

Line 374: l_return_status := FND_API.G_RET_STS_ERROR;

370: -- Check Object version number.
371: IF (l_old_disp_mx_rec.object_version_number <> l_disp_mx_rec.object_version_number) THEN
372: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
373: FND_MSG_PUB.ADD;
374: l_return_status := FND_API.G_RET_STS_ERROR;
375: CLOSE get_disp_mtl_txn_rec_csr;
376: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
377: END IF;
378:

Line 376: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

372: FND_MESSAGE.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
373: FND_MSG_PUB.ADD;
374: l_return_status := FND_API.G_RET_STS_ERROR;
375: CLOSE get_disp_mtl_txn_rec_csr;
376: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
377: END IF;
378:
379: --Do NULL/G_MISS conversion
380: IF (p_module = 'JSP') THEN

Line 383: ELSIF (l_disp_mx_rec.QUANTITY= FND_API.G_MISS_NUM) THEN

379: --Do NULL/G_MISS conversion
380: IF (p_module = 'JSP') THEN
381: IF (l_disp_mx_rec.QUANTITY IS NULL) THEN
382: l_disp_mx_rec.QUANTITY := l_old_disp_mx_rec.QUANTITY;
383: ELSIF (l_disp_mx_rec.QUANTITY= FND_API.G_MISS_NUM) THEN
384: l_disp_mx_rec.QUANTITY:= NULL;
385: END IF;
386:
387: IF (l_disp_mx_rec.UOM IS NULL) THEN

Line 389: ELSIF (l_disp_mx_rec.UOM= FND_API.G_MISS_CHAR) THEN

385: END IF;
386:
387: IF (l_disp_mx_rec.UOM IS NULL) THEN
388: l_disp_mx_rec.UOM:= l_old_disp_mx_rec.UOM;
389: ELSIF (l_disp_mx_rec.UOM= FND_API.G_MISS_CHAR) THEN
390: l_disp_mx_rec.UOM:= NULL;
391: l_disp_mx_rec.UOM := l_old_disp_mx_rec.UOM;
392: END IF;
393:

Line 396: ELSIF (l_disp_mx_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR) THEN

392: END IF;
393:
394: IF (l_disp_mx_rec.ATTRIBUTE_CATEGORY IS NULL) THEN
395: l_disp_mx_rec.ATTRIBUTE_CATEGORY := l_old_disp_mx_rec.ATTRIBUTE_CATEGORY;
396: ELSIF (l_disp_mx_rec.ATTRIBUTE_CATEGORY = FND_API.G_MISS_CHAR) THEN
397: l_disp_mx_rec.ATTRIBUTE_CATEGORY := NULL;
398: END IF;
399: IF (l_disp_mx_rec.ATTRIBUTE1 IS NULL) THEN
400: l_disp_mx_rec.ATTRIBUTE1 := l_old_disp_mx_rec.ATTRIBUTE1;

Line 401: ELSIF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN

397: l_disp_mx_rec.ATTRIBUTE_CATEGORY := NULL;
398: END IF;
399: IF (l_disp_mx_rec.ATTRIBUTE1 IS NULL) THEN
400: l_disp_mx_rec.ATTRIBUTE1 := l_old_disp_mx_rec.ATTRIBUTE1;
401: ELSIF (l_disp_mx_rec.ATTRIBUTE1 = FND_API.G_MISS_CHAR) THEN
402: l_disp_mx_rec.ATTRIBUTE1 := NULL;
403: END IF;
404: IF (l_disp_mx_rec.ATTRIBUTE2 IS NULL) THEN
405: l_disp_mx_rec.ATTRIBUTE2 := l_old_disp_mx_rec.ATTRIBUTE2;

Line 406: ELSIF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN

402: l_disp_mx_rec.ATTRIBUTE1 := NULL;
403: END IF;
404: IF (l_disp_mx_rec.ATTRIBUTE2 IS NULL) THEN
405: l_disp_mx_rec.ATTRIBUTE2 := l_old_disp_mx_rec.ATTRIBUTE2;
406: ELSIF (l_disp_mx_rec.ATTRIBUTE2 = FND_API.G_MISS_CHAR) THEN
407: l_disp_mx_rec.ATTRIBUTE2 := NULL;
408: END IF;
409: IF (l_disp_mx_rec.ATTRIBUTE3 IS NULL) THEN
410: l_disp_mx_rec.ATTRIBUTE3 := l_old_disp_mx_rec.ATTRIBUTE3;

Line 411: ELSIF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN

407: l_disp_mx_rec.ATTRIBUTE2 := NULL;
408: END IF;
409: IF (l_disp_mx_rec.ATTRIBUTE3 IS NULL) THEN
410: l_disp_mx_rec.ATTRIBUTE3 := l_old_disp_mx_rec.ATTRIBUTE3;
411: ELSIF (l_disp_mx_rec.ATTRIBUTE3 = FND_API.G_MISS_CHAR) THEN
412: l_disp_mx_rec.ATTRIBUTE3 := NULL;
413: END IF;
414: IF (l_disp_mx_rec.ATTRIBUTE4 IS NULL) THEN
415: l_disp_mx_rec.ATTRIBUTE4 := l_old_disp_mx_rec.ATTRIBUTE4;

Line 416: ELSIF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN

412: l_disp_mx_rec.ATTRIBUTE3 := NULL;
413: END IF;
414: IF (l_disp_mx_rec.ATTRIBUTE4 IS NULL) THEN
415: l_disp_mx_rec.ATTRIBUTE4 := l_old_disp_mx_rec.ATTRIBUTE4;
416: ELSIF (l_disp_mx_rec.ATTRIBUTE4 = FND_API.G_MISS_CHAR) THEN
417: l_disp_mx_rec.ATTRIBUTE4 := NULL;
418: END IF;
419: IF (l_disp_mx_rec.ATTRIBUTE5 IS NULL) THEN
420: l_disp_mx_rec.ATTRIBUTE5 := l_old_disp_mx_rec.ATTRIBUTE5;

Line 421: ELSIF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN

417: l_disp_mx_rec.ATTRIBUTE4 := NULL;
418: END IF;
419: IF (l_disp_mx_rec.ATTRIBUTE5 IS NULL) THEN
420: l_disp_mx_rec.ATTRIBUTE5 := l_old_disp_mx_rec.ATTRIBUTE5;
421: ELSIF (l_disp_mx_rec.ATTRIBUTE5 = FND_API.G_MISS_CHAR) THEN
422: l_disp_mx_rec.ATTRIBUTE5 := NULL;
423: END IF;
424: IF (l_disp_mx_rec.ATTRIBUTE6 IS NULL) THEN
425: l_disp_mx_rec.ATTRIBUTE6 := l_old_disp_mx_rec.ATTRIBUTE6;

Line 426: ELSIF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN

422: l_disp_mx_rec.ATTRIBUTE5 := NULL;
423: END IF;
424: IF (l_disp_mx_rec.ATTRIBUTE6 IS NULL) THEN
425: l_disp_mx_rec.ATTRIBUTE6 := l_old_disp_mx_rec.ATTRIBUTE6;
426: ELSIF (l_disp_mx_rec.ATTRIBUTE6 = FND_API.G_MISS_CHAR) THEN
427: l_disp_mx_rec.ATTRIBUTE6 := NULL;
428: END IF;
429: IF (l_disp_mx_rec.ATTRIBUTE7 IS NULL) THEN
430: l_disp_mx_rec.ATTRIBUTE7 := l_old_disp_mx_rec.ATTRIBUTE7;

Line 431: ELSIF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN

427: l_disp_mx_rec.ATTRIBUTE6 := NULL;
428: END IF;
429: IF (l_disp_mx_rec.ATTRIBUTE7 IS NULL) THEN
430: l_disp_mx_rec.ATTRIBUTE7 := l_old_disp_mx_rec.ATTRIBUTE7;
431: ELSIF (l_disp_mx_rec.ATTRIBUTE7 = FND_API.G_MISS_CHAR) THEN
432: l_disp_mx_rec.ATTRIBUTE7 := NULL;
433: END IF;
434: IF (l_disp_mx_rec.ATTRIBUTE8 IS NULL) THEN
435: l_disp_mx_rec.ATTRIBUTE8 := l_old_disp_mx_rec.ATTRIBUTE8;

Line 436: ELSIF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN

432: l_disp_mx_rec.ATTRIBUTE7 := NULL;
433: END IF;
434: IF (l_disp_mx_rec.ATTRIBUTE8 IS NULL) THEN
435: l_disp_mx_rec.ATTRIBUTE8 := l_old_disp_mx_rec.ATTRIBUTE8;
436: ELSIF (l_disp_mx_rec.ATTRIBUTE8 = FND_API.G_MISS_CHAR) THEN
437: l_disp_mx_rec.ATTRIBUTE8 := NULL;
438: END IF;
439: IF (l_disp_mx_rec.ATTRIBUTE9 IS NULL) THEN
440: l_disp_mx_rec.ATTRIBUTE9 := l_old_disp_mx_rec.ATTRIBUTE9;

Line 441: ELSIF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN

437: l_disp_mx_rec.ATTRIBUTE8 := NULL;
438: END IF;
439: IF (l_disp_mx_rec.ATTRIBUTE9 IS NULL) THEN
440: l_disp_mx_rec.ATTRIBUTE9 := l_old_disp_mx_rec.ATTRIBUTE9;
441: ELSIF (l_disp_mx_rec.ATTRIBUTE9 = FND_API.G_MISS_CHAR) THEN
442: l_disp_mx_rec.ATTRIBUTE9 := NULL;
443: END IF;
444: IF (l_disp_mx_rec.ATTRIBUTE10 IS NULL) THEN
445: l_disp_mx_rec.ATTRIBUTE10 := l_old_disp_mx_rec.ATTRIBUTE10;

Line 446: ELSIF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN

442: l_disp_mx_rec.ATTRIBUTE9 := NULL;
443: END IF;
444: IF (l_disp_mx_rec.ATTRIBUTE10 IS NULL) THEN
445: l_disp_mx_rec.ATTRIBUTE10 := l_old_disp_mx_rec.ATTRIBUTE10;
446: ELSIF (l_disp_mx_rec.ATTRIBUTE10 = FND_API.G_MISS_CHAR) THEN
447: l_disp_mx_rec.ATTRIBUTE10 := NULL;
448: END IF;
449: IF (l_disp_mx_rec.ATTRIBUTE11 IS NULL) THEN
450: l_disp_mx_rec.ATTRIBUTE11 := l_old_disp_mx_rec.ATTRIBUTE11;

Line 451: ELSIF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN

447: l_disp_mx_rec.ATTRIBUTE10 := NULL;
448: END IF;
449: IF (l_disp_mx_rec.ATTRIBUTE11 IS NULL) THEN
450: l_disp_mx_rec.ATTRIBUTE11 := l_old_disp_mx_rec.ATTRIBUTE11;
451: ELSIF (l_disp_mx_rec.ATTRIBUTE11 = FND_API.G_MISS_CHAR) THEN
452: l_disp_mx_rec.ATTRIBUTE11 := NULL;
453: END IF;
454: IF (l_disp_mx_rec.ATTRIBUTE12 IS NULL) THEN
455: l_disp_mx_rec.ATTRIBUTE12 := l_old_disp_mx_rec.ATTRIBUTE12;

Line 456: ELSIF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN

452: l_disp_mx_rec.ATTRIBUTE11 := NULL;
453: END IF;
454: IF (l_disp_mx_rec.ATTRIBUTE12 IS NULL) THEN
455: l_disp_mx_rec.ATTRIBUTE12 := l_old_disp_mx_rec.ATTRIBUTE12;
456: ELSIF (l_disp_mx_rec.ATTRIBUTE12 = FND_API.G_MISS_CHAR) THEN
457: l_disp_mx_rec.ATTRIBUTE12 := NULL;
458: END IF;
459: IF (l_disp_mx_rec.ATTRIBUTE13 IS NULL) THEN
460: l_disp_mx_rec.ATTRIBUTE13 := l_old_disp_mx_rec.ATTRIBUTE13;

Line 461: ELSIF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN

457: l_disp_mx_rec.ATTRIBUTE12 := NULL;
458: END IF;
459: IF (l_disp_mx_rec.ATTRIBUTE13 IS NULL) THEN
460: l_disp_mx_rec.ATTRIBUTE13 := l_old_disp_mx_rec.ATTRIBUTE13;
461: ELSIF (l_disp_mx_rec.ATTRIBUTE13 = FND_API.G_MISS_CHAR) THEN
462: l_disp_mx_rec.ATTRIBUTE13 := NULL;
463: END IF;
464: IF (l_disp_mx_rec.ATTRIBUTE14 IS NULL) THEN
465: l_disp_mx_rec.ATTRIBUTE14 := l_old_disp_mx_rec.ATTRIBUTE14;

Line 466: ELSIF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN

462: l_disp_mx_rec.ATTRIBUTE13 := NULL;
463: END IF;
464: IF (l_disp_mx_rec.ATTRIBUTE14 IS NULL) THEN
465: l_disp_mx_rec.ATTRIBUTE14 := l_old_disp_mx_rec.ATTRIBUTE14;
466: ELSIF (l_disp_mx_rec.ATTRIBUTE14 = FND_API.G_MISS_CHAR) THEN
467: l_disp_mx_rec.ATTRIBUTE14 := NULL;
468: END IF;
469: IF (l_disp_mx_rec.ATTRIBUTE15 IS NULL) THEN
470: l_disp_mx_rec.ATTRIBUTE15 := l_old_disp_mx_rec.ATTRIBUTE15;

Line 471: ELSIF (l_disp_mx_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR) THEN

467: l_disp_mx_rec.ATTRIBUTE14 := NULL;
468: END IF;
469: IF (l_disp_mx_rec.ATTRIBUTE15 IS NULL) THEN
470: l_disp_mx_rec.ATTRIBUTE15 := l_old_disp_mx_rec.ATTRIBUTE15;
471: ELSIF (l_disp_mx_rec.ATTRIBUTE15 = FND_API.G_MISS_CHAR) THEN
472: l_disp_mx_rec.ATTRIBUTE15 := NULL;
473: END IF;
474: END IF; -- p_module flag: JSP
475:

Line 520: l_return_status := FND_API.G_RET_STS_ERROR;

516: IF (Calculate_Txned_Qty(p_x_disp_mtl_txn_tbl(i).disposition_id) > l_disp_rec.quantity) THEN
517: FND_MESSAGE.Set_Name('AHL','AHL_PRD_DISP_QTY_EXCEEDED');
518: FND_MESSAGE.Set_Token('DISPOSITION_ID', p_x_disp_mtl_txn_tbl(i).disposition_id);
519: FND_MSG_PUB.ADD;
520: l_return_status := FND_API.G_RET_STS_ERROR;
521: END IF;
522:
523: --Verify the mtl transaction quantity is not exceeded by the various dispositions.
524: OPEN get_mtl_txn_qty_csr(p_x_disp_mtl_txn_tbl(i).wo_mtl_txn_id);

Line 556: l_return_status := FND_API.G_RET_STS_ERROR;

552: IF (l_mtl_txn_rec.quantity<0) THEN
553: FND_MESSAGE.Set_Name('AHL','AHL_PRD_MTL_TXN_QTY_EXCEEDED');
554: FND_MESSAGE.Set_Token('MTL_TXN_ID', p_x_disp_mtl_txn_tbl(i).wo_mtl_txn_id);
555: FND_MSG_PUB.ADD;
556: l_return_status := FND_API.G_RET_STS_ERROR;
557: EXIT;
558: END IF;
559: END LOOP;
560: CLOSE get_disp_mtx_qty_csr;

Line 566: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

562:
563: --Added by Peter
564: --Call process_disposition so that disposition status will be recalculated
565: --to be in synch with material transaction
566: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
567: -- SATHAPLI::Bug 7758131, 05-Mar-2009, corrected the traversing of the associative array l_update_disp_tbl
568: -- FOR l_disp_id_index IN l_update_disp_tbl.FIRST..l_update_disp_tbl.LAST LOOP
569: l_disp_id_index := l_update_disp_tbl.FIRST;
570: WHILE l_disp_id_index IS NOT NULL LOOP

Line 586: p_commit => Fnd_Api.g_false,

582:
583: AHL_PRD_DISPOSITION_PVT.process_disposition(
584: p_api_version => p_api_version,
585: p_init_msg_list => p_init_msg_list,
586: p_commit => Fnd_Api.g_false,
587: p_validation_level => p_validation_level,
588: p_module_type => p_module,
589: p_x_disposition_rec => l_update_disp_rec,
590: -- Dummy parameter added by jaramana on Oct 11, 2007 for ER 5883257

Line 621: RAISE FND_API.G_EXC_ERROR;

617: into the message stack
618:
619: x_msg_count := FND_MSG_PUB.count_msg;
620: IF x_msg_count > 0 THEN
621: RAISE FND_API.G_EXC_ERROR;
622: END IF;
623: */
624: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
625: RAISE FND_API.G_EXC_ERROR;

Line 624: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

620: IF x_msg_count > 0 THEN
621: RAISE FND_API.G_EXC_ERROR;
622: END IF;
623: */
624: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627:
628: -- Standard check of p_commit

Line 625: RAISE FND_API.G_EXC_ERROR;

621: RAISE FND_API.G_EXC_ERROR;
622: END IF;
623: */
624: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627:
628: -- Standard check of p_commit
629: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 629: IF FND_API.TO_BOOLEAN(p_commit) THEN

625: RAISE FND_API.G_EXC_ERROR;
626: END IF;
627:
628: -- Standard check of p_commit
629: IF FND_API.TO_BOOLEAN(p_commit) THEN
630: COMMIT WORK;
631: END IF;
632:
633: -- Standard call to get message count and if count is 1, get message info

Line 637: p_encoded => fnd_api.g_false

633: -- Standard call to get message count and if count is 1, get message info
634: FND_MSG_PUB.Count_And_Get
635: ( p_count => x_msg_count,
636: p_data => x_msg_data,
637: p_encoded => fnd_api.g_false
638: );
639:
640: EXCEPTION
641: WHEN FND_API.G_EXC_ERROR THEN

Line 641: WHEN FND_API.G_EXC_ERROR THEN

637: p_encoded => fnd_api.g_false
638: );
639:
640: EXCEPTION
641: WHEN FND_API.G_EXC_ERROR THEN
642: Rollback to Process_Disp_Mtl_Txn_pvt;
643: x_return_status := FND_API.G_RET_STS_ERROR;
644: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
645: p_data => x_msg_data,

Line 643: x_return_status := FND_API.G_RET_STS_ERROR;

639:
640: EXCEPTION
641: WHEN FND_API.G_EXC_ERROR THEN
642: Rollback to Process_Disp_Mtl_Txn_pvt;
643: x_return_status := FND_API.G_RET_STS_ERROR;
644: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
645: p_data => x_msg_data,
646: p_encoded => fnd_api.g_false);
647: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 646: p_encoded => fnd_api.g_false);

642: Rollback to Process_Disp_Mtl_Txn_pvt;
643: x_return_status := FND_API.G_RET_STS_ERROR;
644: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
645: p_data => x_msg_data,
646: p_encoded => fnd_api.g_false);
647: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
648: Rollback to Process_Disp_Mtl_Txn_pvt;
649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 647: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

643: x_return_status := FND_API.G_RET_STS_ERROR;
644: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
645: p_data => x_msg_data,
646: p_encoded => fnd_api.g_false);
647: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
648: Rollback to Process_Disp_Mtl_Txn_pvt;
649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
651: p_data => x_msg_data,

Line 649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

645: p_data => x_msg_data,
646: p_encoded => fnd_api.g_false);
647: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
648: Rollback to Process_Disp_Mtl_Txn_pvt;
649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
651: p_data => x_msg_data,
652: p_encoded => fnd_api.g_false);
653: WHEN OTHERS THEN

Line 652: p_encoded => fnd_api.g_false);

648: Rollback to Process_Disp_Mtl_Txn_pvt;
649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
651: p_data => x_msg_data,
652: p_encoded => fnd_api.g_false);
653: WHEN OTHERS THEN
654: Rollback to Process_Disp_Mtl_Txn_pvt;
655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
656: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

Line 655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

651: p_data => x_msg_data,
652: p_encoded => fnd_api.g_false);
653: WHEN OTHERS THEN
654: Rollback to Process_Disp_Mtl_Txn_pvt;
655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
656: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
657: p_procedure_name => l_api_name,
658: p_error_text => SQLERRM);
659: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 661: p_encoded => fnd_api.g_false);

657: p_procedure_name => l_api_name,
658: p_error_text => SQLERRM);
659: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
660: p_data => x_msg_data,
661: p_encoded => fnd_api.g_false);
662: END Process_Disp_Mtl_Txn;
663:
664: ------------------------
665: -- Start of Comments --

Line 678: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

674: -- End of Comments.
675:
676: PROCEDURE Get_Disp_For_Mtl_Txn (
677: p_api_version IN NUMBER,
678: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
679: p_commit IN VARCHAR2 := FND_API.G_FALSE,
680: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
681: x_return_status OUT NOCOPY VARCHAR2,
682: x_msg_count OUT NOCOPY NUMBER,

Line 679: p_commit IN VARCHAR2 := FND_API.G_FALSE,

675:
676: PROCEDURE Get_Disp_For_Mtl_Txn (
677: p_api_version IN NUMBER,
678: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
679: p_commit IN VARCHAR2 := FND_API.G_FALSE,
680: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
681: x_return_status OUT NOCOPY VARCHAR2,
682: x_msg_count OUT NOCOPY NUMBER,
683: x_msg_data OUT NOCOPY VARCHAR2,

Line 680: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

676: PROCEDURE Get_Disp_For_Mtl_Txn (
677: p_api_version IN NUMBER,
678: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
679: p_commit IN VARCHAR2 := FND_API.G_FALSE,
680: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
681: x_return_status OUT NOCOPY VARCHAR2,
682: x_msg_count OUT NOCOPY NUMBER,
683: x_msg_data OUT NOCOPY VARCHAR2,
684: p_wo_mtl_txn_id IN NUMBER,

Line 936: x_return_status := FND_API.G_RET_STS_SUCCESS;

932: -- Standard start of API savepoint
933: SAVEPOINT Get_Mtl_Txn_Type_pvt;
934:
935: -- Initialize Procedure return status to success
936: x_return_status := FND_API.G_RET_STS_SUCCESS;
937:
938: -- Initialize message list if p_init_msg_list is set to TRUE
939: IF FND_API.To_Boolean(p_init_msg_list) THEN
940: FND_MSG_PUB.Initialize;

Line 939: IF FND_API.To_Boolean(p_init_msg_list) THEN

935: -- Initialize Procedure return status to success
936: x_return_status := FND_API.G_RET_STS_SUCCESS;
937:
938: -- Initialize message list if p_init_msg_list is set to TRUE
939: IF FND_API.To_Boolean(p_init_msg_list) THEN
940: FND_MSG_PUB.Initialize;
941: END IF;
942:
943: OPEN get_mtl_txn_csr(p_wo_mtl_txn_id);

Line 950: RAISE FND_API.G_EXC_ERROR;

946: CLOSE get_mtl_txn_csr;
947: FND_MESSAGE.Set_Name('AHL','AHL_PRD_MTL_TXN_ID_INV');
948: FND_MESSAGE.Set_Token('MTL_TXN_ID', p_wo_mtl_txn_id);
949: FND_MSG_PUB.ADD;
950: RAISE FND_API.G_EXC_ERROR;
951: END IF;
952: CLOSE get_mtl_txn_csr;
953:
954: --If return material transaction, fetch all matching disp for wo, mtl_txn

Line 1033: p_encoded => fnd_api.g_false

1029: -- Standard call to get message count and if count is 1, get message info
1030: FND_MSG_PUB.Count_And_Get
1031: ( p_count => x_msg_count,
1032: p_data => x_msg_data,
1033: p_encoded => fnd_api.g_false
1034: );
1035:
1036: EXCEPTION
1037: WHEN FND_API.G_EXC_ERROR THEN

Line 1037: WHEN FND_API.G_EXC_ERROR THEN

1033: p_encoded => fnd_api.g_false
1034: );
1035:
1036: EXCEPTION
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: Rollback to Get_Mtl_Txn_Type_pvt;
1039: x_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1041: p_data => x_msg_data,

Line 1039: x_return_status := FND_API.G_RET_STS_ERROR;

1035:
1036: EXCEPTION
1037: WHEN FND_API.G_EXC_ERROR THEN
1038: Rollback to Get_Mtl_Txn_Type_pvt;
1039: x_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1041: p_data => x_msg_data,
1042: p_encoded => fnd_api.g_false);
1043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1042: p_encoded => fnd_api.g_false);

1038: Rollback to Get_Mtl_Txn_Type_pvt;
1039: x_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1041: p_data => x_msg_data,
1042: p_encoded => fnd_api.g_false);
1043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1044: Rollback to Get_Mtl_Txn_Type_pvt;
1045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1039: x_return_status := FND_API.G_RET_STS_ERROR;
1040: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1041: p_data => x_msg_data,
1042: p_encoded => fnd_api.g_false);
1043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1044: Rollback to Get_Mtl_Txn_Type_pvt;
1045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1047: p_data => x_msg_data,

Line 1045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1041: p_data => x_msg_data,
1042: p_encoded => fnd_api.g_false);
1043: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1044: Rollback to Get_Mtl_Txn_Type_pvt;
1045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1047: p_data => x_msg_data,
1048: p_encoded => fnd_api.g_false);
1049: WHEN OTHERS THEN

Line 1048: p_encoded => fnd_api.g_false);

1044: Rollback to Get_Mtl_Txn_Type_pvt;
1045: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1046: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1047: p_data => x_msg_data,
1048: p_encoded => fnd_api.g_false);
1049: WHEN OTHERS THEN
1050: Rollback to Get_Mtl_Txn_Type_pvt;
1051: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1052: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

Line 1051: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1047: p_data => x_msg_data,
1048: p_encoded => fnd_api.g_false);
1049: WHEN OTHERS THEN
1050: Rollback to Get_Mtl_Txn_Type_pvt;
1051: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1052: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
1053: p_procedure_name => l_api_name,
1054: p_error_text => SQLERRM);
1055: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1057: p_encoded => fnd_api.g_false);

1053: p_procedure_name => l_api_name,
1054: p_error_text => SQLERRM);
1055: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1056: p_data => x_msg_data,
1057: p_encoded => fnd_api.g_false);
1058: END Get_Disp_For_Mtl_Txn;
1059:
1060: ----------------------
1061: -- Function name : Calculate_Txned_Qty