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 103: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

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

Line 115: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 119: IF FND_API.To_Boolean(p_init_msg_list) THEN

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

Line 150: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 152: RAISE FND_API.G_EXC_ERROR;

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

Line 164: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 166: RAISE FND_API.G_EXC_ERROR;

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

Line 180: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 182: RAISE FND_API.G_EXC_ERROR;

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

Line 198: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 199: RAISE FND_API.G_EXC_ERROR;

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

Line 205: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 206: RAISE FND_API.G_EXC_ERROR;

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

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

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

Line 228: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 229: RAISE FND_API.G_EXC_ERROR;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 371: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 373: Raise FND_API.G_EXC_UNEXPECTED_ERROR;

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

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

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

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

382: END IF;
383:
384: IF (l_disp_mx_rec.UOM IS NULL) THEN
385: l_disp_mx_rec.UOM:= l_old_disp_mx_rec.UOM;
386: ELSIF (l_disp_mx_rec.UOM= FND_API.G_MISS_CHAR) THEN
387: l_disp_mx_rec.UOM:= NULL;
388: l_disp_mx_rec.UOM := l_old_disp_mx_rec.UOM;
389: END IF;
390:

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 517: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 553: l_return_status := FND_API.G_RET_STS_ERROR;

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

Line 563: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

559:
560: --Added by Peter
561: --Call process_disposition so that disposition status will be recalculated
562: --to be in synch with material transaction
563: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
564: FOR l_disp_id_index IN l_update_disp_tbl.FIRST..l_update_disp_tbl.LAST LOOP
565: l_update_disp_rec.disposition_id := l_disp_id_index;
566: l_update_disp_rec.object_version_number := l_update_disp_tbl(l_disp_id_index);
567: l_update_disp_rec.operation_flag := AHL_PRD_DISPOSITION_PVT.G_OP_UPDATE;

Line 580: p_commit => Fnd_Api.g_false,

576:
577: AHL_PRD_DISPOSITION_PVT.process_disposition(
578: p_api_version => p_api_version,
579: p_init_msg_list => p_init_msg_list,
580: p_commit => Fnd_Api.g_false,
581: p_validation_level => p_validation_level,
582: p_module_type => p_module,
583: p_x_disposition_rec => l_update_disp_rec,
584: -- Dummy parameter added by jaramana on Oct 11, 2007 for ER 5883257

Line 609: RAISE FND_API.G_EXC_ERROR;

605: into the message stack
606:
607: x_msg_count := FND_MSG_PUB.count_msg;
608: IF x_msg_count > 0 THEN
609: RAISE FND_API.G_EXC_ERROR;
610: END IF;
611: */
612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
613: RAISE FND_API.G_EXC_ERROR;

Line 612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

608: IF x_msg_count > 0 THEN
609: RAISE FND_API.G_EXC_ERROR;
610: END IF;
611: */
612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
613: RAISE FND_API.G_EXC_ERROR;
614: END IF;
615:
616: -- Standard check of p_commit

Line 613: RAISE FND_API.G_EXC_ERROR;

609: RAISE FND_API.G_EXC_ERROR;
610: END IF;
611: */
612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
613: RAISE FND_API.G_EXC_ERROR;
614: END IF;
615:
616: -- Standard check of p_commit
617: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 617: IF FND_API.TO_BOOLEAN(p_commit) THEN

613: RAISE FND_API.G_EXC_ERROR;
614: END IF;
615:
616: -- Standard check of p_commit
617: IF FND_API.TO_BOOLEAN(p_commit) THEN
618: COMMIT WORK;
619: END IF;
620:
621: -- Standard call to get message count and if count is 1, get message info

Line 625: p_encoded => fnd_api.g_false

621: -- Standard call to get message count and if count is 1, get message info
622: FND_MSG_PUB.Count_And_Get
623: ( p_count => x_msg_count,
624: p_data => x_msg_data,
625: p_encoded => fnd_api.g_false
626: );
627:
628: EXCEPTION
629: WHEN FND_API.G_EXC_ERROR THEN

Line 629: WHEN FND_API.G_EXC_ERROR THEN

625: p_encoded => fnd_api.g_false
626: );
627:
628: EXCEPTION
629: WHEN FND_API.G_EXC_ERROR THEN
630: Rollback to Process_Disp_Mtl_Txn_pvt;
631: x_return_status := FND_API.G_RET_STS_ERROR;
632: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
633: p_data => x_msg_data,

Line 631: x_return_status := FND_API.G_RET_STS_ERROR;

627:
628: EXCEPTION
629: WHEN FND_API.G_EXC_ERROR THEN
630: Rollback to Process_Disp_Mtl_Txn_pvt;
631: x_return_status := FND_API.G_RET_STS_ERROR;
632: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
633: p_data => x_msg_data,
634: p_encoded => fnd_api.g_false);
635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 634: p_encoded => fnd_api.g_false);

630: Rollback to Process_Disp_Mtl_Txn_pvt;
631: x_return_status := FND_API.G_RET_STS_ERROR;
632: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
633: p_data => x_msg_data,
634: p_encoded => fnd_api.g_false);
635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
636: Rollback to Process_Disp_Mtl_Txn_pvt;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

631: x_return_status := FND_API.G_RET_STS_ERROR;
632: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
633: p_data => x_msg_data,
634: p_encoded => fnd_api.g_false);
635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
636: Rollback to Process_Disp_Mtl_Txn_pvt;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
639: p_data => x_msg_data,

Line 637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

633: p_data => x_msg_data,
634: p_encoded => fnd_api.g_false);
635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
636: Rollback to Process_Disp_Mtl_Txn_pvt;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
639: p_data => x_msg_data,
640: p_encoded => fnd_api.g_false);
641: WHEN OTHERS THEN

Line 640: p_encoded => fnd_api.g_false);

636: Rollback to Process_Disp_Mtl_Txn_pvt;
637: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
638: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
639: p_data => x_msg_data,
640: p_encoded => fnd_api.g_false);
641: WHEN OTHERS THEN
642: Rollback to Process_Disp_Mtl_Txn_pvt;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

Line 643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

639: p_data => x_msg_data,
640: p_encoded => fnd_api.g_false);
641: WHEN OTHERS THEN
642: Rollback to Process_Disp_Mtl_Txn_pvt;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
645: p_procedure_name => l_api_name,
646: p_error_text => SQLERRM);
647: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 649: p_encoded => fnd_api.g_false);

645: p_procedure_name => l_api_name,
646: p_error_text => SQLERRM);
647: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
648: p_data => x_msg_data,
649: p_encoded => fnd_api.g_false);
650: END Process_Disp_Mtl_Txn;
651:
652: ------------------------
653: -- Start of Comments --

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

662: -- End of Comments.
663:
664: PROCEDURE Get_Disp_For_Mtl_Txn (
665: p_api_version IN NUMBER,
666: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
667: p_commit IN VARCHAR2 := FND_API.G_FALSE,
668: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
669: x_return_status OUT NOCOPY VARCHAR2,
670: x_msg_count OUT NOCOPY NUMBER,

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

663:
664: PROCEDURE Get_Disp_For_Mtl_Txn (
665: p_api_version IN NUMBER,
666: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
667: p_commit IN VARCHAR2 := FND_API.G_FALSE,
668: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
669: x_return_status OUT NOCOPY VARCHAR2,
670: x_msg_count OUT NOCOPY NUMBER,
671: x_msg_data OUT NOCOPY VARCHAR2,

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

664: PROCEDURE Get_Disp_For_Mtl_Txn (
665: p_api_version IN NUMBER,
666: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
667: p_commit IN VARCHAR2 := FND_API.G_FALSE,
668: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
669: x_return_status OUT NOCOPY VARCHAR2,
670: x_msg_count OUT NOCOPY NUMBER,
671: x_msg_data OUT NOCOPY VARCHAR2,
672: p_wo_mtl_txn_id IN NUMBER,

Line 924: x_return_status := FND_API.G_RET_STS_SUCCESS;

920: -- Standard start of API savepoint
921: SAVEPOINT Get_Mtl_Txn_Type_pvt;
922:
923: -- Initialize Procedure return status to success
924: x_return_status := FND_API.G_RET_STS_SUCCESS;
925:
926: -- Initialize message list if p_init_msg_list is set to TRUE
927: IF FND_API.To_Boolean(p_init_msg_list) THEN
928: FND_MSG_PUB.Initialize;

Line 927: IF FND_API.To_Boolean(p_init_msg_list) THEN

923: -- Initialize Procedure return status to success
924: x_return_status := FND_API.G_RET_STS_SUCCESS;
925:
926: -- Initialize message list if p_init_msg_list is set to TRUE
927: IF FND_API.To_Boolean(p_init_msg_list) THEN
928: FND_MSG_PUB.Initialize;
929: END IF;
930:
931: OPEN get_mtl_txn_csr(p_wo_mtl_txn_id);

Line 938: RAISE FND_API.G_EXC_ERROR;

934: CLOSE get_mtl_txn_csr;
935: FND_MESSAGE.Set_Name('AHL','AHL_PRD_MTL_TXN_ID_INV');
936: FND_MESSAGE.Set_Token('MTL_TXN_ID', p_wo_mtl_txn_id);
937: FND_MSG_PUB.ADD;
938: RAISE FND_API.G_EXC_ERROR;
939: END IF;
940: CLOSE get_mtl_txn_csr;
941:
942: --If return material transaction, fetch all matching disp for wo, mtl_txn

Line 1021: p_encoded => fnd_api.g_false

1017: -- Standard call to get message count and if count is 1, get message info
1018: FND_MSG_PUB.Count_And_Get
1019: ( p_count => x_msg_count,
1020: p_data => x_msg_data,
1021: p_encoded => fnd_api.g_false
1022: );
1023:
1024: EXCEPTION
1025: WHEN FND_API.G_EXC_ERROR THEN

Line 1025: WHEN FND_API.G_EXC_ERROR THEN

1021: p_encoded => fnd_api.g_false
1022: );
1023:
1024: EXCEPTION
1025: WHEN FND_API.G_EXC_ERROR THEN
1026: Rollback to Get_Mtl_Txn_Type_pvt;
1027: x_return_status := FND_API.G_RET_STS_ERROR;
1028: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1029: p_data => x_msg_data,

Line 1027: x_return_status := FND_API.G_RET_STS_ERROR;

1023:
1024: EXCEPTION
1025: WHEN FND_API.G_EXC_ERROR THEN
1026: Rollback to Get_Mtl_Txn_Type_pvt;
1027: x_return_status := FND_API.G_RET_STS_ERROR;
1028: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1029: p_data => x_msg_data,
1030: p_encoded => fnd_api.g_false);
1031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1030: p_encoded => fnd_api.g_false);

1026: Rollback to Get_Mtl_Txn_Type_pvt;
1027: x_return_status := FND_API.G_RET_STS_ERROR;
1028: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1029: p_data => x_msg_data,
1030: p_encoded => fnd_api.g_false);
1031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1032: Rollback to Get_Mtl_Txn_Type_pvt;
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1027: x_return_status := FND_API.G_RET_STS_ERROR;
1028: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1029: p_data => x_msg_data,
1030: p_encoded => fnd_api.g_false);
1031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1032: Rollback to Get_Mtl_Txn_Type_pvt;
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1035: p_data => x_msg_data,

Line 1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1029: p_data => x_msg_data,
1030: p_encoded => fnd_api.g_false);
1031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1032: Rollback to Get_Mtl_Txn_Type_pvt;
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1035: p_data => x_msg_data,
1036: p_encoded => fnd_api.g_false);
1037: WHEN OTHERS THEN

Line 1036: p_encoded => fnd_api.g_false);

1032: Rollback to Get_Mtl_Txn_Type_pvt;
1033: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1034: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1035: p_data => x_msg_data,
1036: p_encoded => fnd_api.g_false);
1037: WHEN OTHERS THEN
1038: Rollback to Get_Mtl_Txn_Type_pvt;
1039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1040: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,

Line 1039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1035: p_data => x_msg_data,
1036: p_encoded => fnd_api.g_false);
1037: WHEN OTHERS THEN
1038: Rollback to Get_Mtl_Txn_Type_pvt;
1039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1040: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
1041: p_procedure_name => l_api_name,
1042: p_error_text => SQLERRM);
1043: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1045: p_encoded => fnd_api.g_false);

1041: p_procedure_name => l_api_name,
1042: p_error_text => SQLERRM);
1043: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1044: p_data => x_msg_data,
1045: p_encoded => fnd_api.g_false);
1046: END Get_Disp_For_Mtl_Txn;
1047:
1048: ----------------------
1049: -- Function name : Calculate_Txned_Qty