DBA Data[Home] [Help]

APPS.GMIVTDX dependencies on FND_API

Line 66: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

62: +==========================================================================+ */
63:
64: PROCEDURE create_txn_update_balances
65: ( p_api_version IN NUMBER
66: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
67: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
68: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
69: , x_return_status OUT NOCOPY VARCHAR2
70: , x_msg_count OUT NOCOPY NUMBER

Line 67: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

63:
64: PROCEDURE create_txn_update_balances
65: ( p_api_version IN NUMBER
66: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
67: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
68: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
69: , x_return_status OUT NOCOPY VARCHAR2
70: , x_msg_count OUT NOCOPY NUMBER
71: , x_msg_data OUT NOCOPY VARCHAR2

Line 68: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

64: PROCEDURE create_txn_update_balances
65: ( p_api_version IN NUMBER
66: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
67: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
68: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
69: , x_return_status OUT NOCOPY VARCHAR2
70: , x_msg_count OUT NOCOPY NUMBER
71: , x_msg_data OUT NOCOPY VARCHAR2
72: , p_transfer_id IN NUMBER

Line 93: IF FND_API.to_boolean(p_init_msg_list) THEN

89: AND line_id = Vline_id;
90:
91: BEGIN
92:
93: IF FND_API.to_boolean(p_init_msg_list) THEN
94: FND_MSG_PUB.Initialize;
95: END IF;
96:
97: -- Standard call to check for call compatibility.

Line 98: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

94: FND_MSG_PUB.Initialize;
95: END IF;
96:
97: -- Standard call to check for call compatibility.
98: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
99: p_api_version ,
100: l_api_name ,
101: G_PKG_NAME ) THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

98: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
99: p_api_version ,
100: l_api_name ,
101: G_PKG_NAME ) THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104: x_return_status :=FND_API.G_RET_STS_SUCCESS;
105:
106: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

Line 104: x_return_status :=FND_API.G_RET_STS_SUCCESS;

100: l_api_name ,
101: G_PKG_NAME ) THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104: x_return_status :=FND_API.G_RET_STS_SUCCESS;
105:
106: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
107: log_msg('Beginning of procedure create_txn_update_balances');
108: END IF;

Line 158: RAISE FND_API.G_EXC_ERROR;

154: END IF;
155: FND_MESSAGE.SET_NAME('INV','INV_INVALID_ATTRIBUTE');
156: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','TRANSACTION'),FALSE);
157: FND_MSG_PUB.Add;
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160:
161: SELECT item_um,item_um2,
162: lot_ctl,lot_indivisible

Line 175: , p_init_msg_list => FND_API.G_FALSE

171:
172: create_txn_update_bal_in_opm
173: (
174: p_api_version => p_api_version
175: , p_init_msg_list => FND_API.G_FALSE
176: , p_commit => FND_API.G_FALSE
177: , p_validation_level => p_validation_level
178: , x_return_status => x_return_status
179: , x_msg_count => x_msg_count

Line 176: , p_commit => FND_API.G_FALSE

172: create_txn_update_bal_in_opm
173: (
174: p_api_version => p_api_version
175: , p_init_msg_list => FND_API.G_FALSE
176: , p_commit => FND_API.G_FALSE
177: , p_validation_level => p_validation_level
178: , x_return_status => x_return_status
179: , x_msg_count => x_msg_count
180: , x_msg_data => x_msg_data

Line 190: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

186:
187: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
188: log_msg('After call to procedure create_txn_update_balances_in_opm. return status is '||x_return_status);
189: END IF;
190: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
191: RAISE FND_API.G_EXC_ERROR;
192: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;

Line 191: RAISE FND_API.G_EXC_ERROR;

187: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
188: log_msg('After call to procedure create_txn_update_balances_in_opm. return status is '||x_return_status);
189: END IF;
190: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
191: RAISE FND_API.G_EXC_ERROR;
192: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;
195:

Line 192: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

188: log_msg('After call to procedure create_txn_update_balances_in_opm. return status is '||x_return_status);
189: END IF;
190: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
191: RAISE FND_API.G_EXC_ERROR;
192: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;
195:
196: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN

Line 193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

189: END IF;
190: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
191: RAISE FND_API.G_EXC_ERROR;
192: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
193: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
194: END IF;
195:
196: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
197: log_msg('before calling create_txn_update_bal_in_odm');

Line 203: , p_init_msg_list => FND_API.G_FALSE

199:
200: create_txn_update_bal_in_odm
201: (
202: p_api_version => p_api_version
203: , p_init_msg_list => FND_API.G_FALSE
204: , p_commit => FND_API.G_FALSE
205: , p_validation_level => p_validation_level
206: , x_return_status => x_return_status
207: , x_msg_count => x_msg_count

Line 204: , p_commit => FND_API.G_FALSE

200: create_txn_update_bal_in_odm
201: (
202: p_api_version => p_api_version
203: , p_init_msg_list => FND_API.G_FALSE
204: , p_commit => FND_API.G_FALSE
205: , p_validation_level => p_validation_level
206: , x_return_status => x_return_status
207: , x_msg_count => x_msg_count
208: , x_msg_data => x_msg_data

Line 219: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

215: );
216: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
217: log_msg('After call to procedure create_txn_update_balances_in_odm. return status is '||x_return_status||' transaction header id is '||to_char(x_transaction_header_id));
218: END IF;
219: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
220: RAISE FND_API.G_EXC_ERROR;
221: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;

Line 220: RAISE FND_API.G_EXC_ERROR;

216: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
217: log_msg('After call to procedure create_txn_update_balances_in_odm. return status is '||x_return_status||' transaction header id is '||to_char(x_transaction_header_id));
218: END IF;
219: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
220: RAISE FND_API.G_EXC_ERROR;
221: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;
224:

Line 221: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

217: log_msg('After call to procedure create_txn_update_balances_in_odm. return status is '||x_return_status||' transaction header id is '||to_char(x_transaction_header_id));
218: END IF;
219: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
220: RAISE FND_API.G_EXC_ERROR;
221: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;
224:
225: FND_MSG_PUB.Count_AND_GET

Line 222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

218: END IF;
219: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
220: RAISE FND_API.G_EXC_ERROR;
221: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;
224:
225: FND_MSG_PUB.Count_AND_GET
226: (p_count => x_msg_count, p_data => x_msg_data);

Line 231: WHEN FND_API.G_EXC_ERROR THEN

227:
228:
229: EXCEPTION
230:
231: WHEN FND_API.G_EXC_ERROR THEN
232: x_return_status := FND_API.G_RET_STS_ERROR;
233: FND_MSG_PUB.Count_AND_GET
234: (p_count => x_msg_count, p_data => x_msg_data);
235:

Line 232: x_return_status := FND_API.G_RET_STS_ERROR;

228:
229: EXCEPTION
230:
231: WHEN FND_API.G_EXC_ERROR THEN
232: x_return_status := FND_API.G_RET_STS_ERROR;
233: FND_MSG_PUB.Count_AND_GET
234: (p_count => x_msg_count, p_data => x_msg_data);
235:
236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

232: x_return_status := FND_API.G_RET_STS_ERROR;
233: FND_MSG_PUB.Count_AND_GET
234: (p_count => x_msg_count, p_data => x_msg_data);
235:
236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: FND_MSG_PUB.Count_AND_GET
239: (p_count => x_msg_count, p_data => x_msg_data);
240:

Line 237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

233: FND_MSG_PUB.Count_AND_GET
234: (p_count => x_msg_count, p_data => x_msg_data);
235:
236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: FND_MSG_PUB.Count_AND_GET
239: (p_count => x_msg_count, p_data => x_msg_data);
240:
241: WHEN OTHERS THEN

Line 242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

238: FND_MSG_PUB.Count_AND_GET
239: (p_count => x_msg_count, p_data => x_msg_data);
240:
241: WHEN OTHERS THEN
242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
243: IF (SQLCODE IS NOT NULL) THEN
244: FND_MESSAGE.SET_NAME('GMI','GMI_DXFR_SQL_ERROR');
245: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
246: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM(SQLCODE));

Line 277: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

273: +==========================================================================+ */
274:
275: PROCEDURE create_txn_update_bal_in_opm
276: ( p_api_version IN NUMBER
277: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
278: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
279: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
280: , x_return_status OUT NOCOPY VARCHAR2
281: , x_msg_count OUT NOCOPY NUMBER

Line 278: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

274:
275: PROCEDURE create_txn_update_bal_in_opm
276: ( p_api_version IN NUMBER
277: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
278: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
279: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
280: , x_return_status OUT NOCOPY VARCHAR2
281: , x_msg_count OUT NOCOPY NUMBER
282: , x_msg_data OUT NOCOPY VARCHAR2

Line 279: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

275: PROCEDURE create_txn_update_bal_in_opm
276: ( p_api_version IN NUMBER
277: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
278: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
279: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
280: , x_return_status OUT NOCOPY VARCHAR2
281: , x_msg_count OUT NOCOPY NUMBER
282: , x_msg_data OUT NOCOPY VARCHAR2
283: , p_hdr_row IN gmi_discrete_transfers%ROWTYPE

Line 296: IF FND_API.to_boolean(p_init_msg_list) THEN

292: TYPE tran_rec_tbl IS TABLE OF GMI_TRANS_ENGINE_PUB.ictran_rec INDEX BY BINARY_INTEGER;
293: l_tran_rec_tbl tran_rec_tbl;
294: BEGIN
295:
296: IF FND_API.to_boolean(p_init_msg_list) THEN
297: FND_MSG_PUB.Initialize;
298: END IF;
299:
300: SAVEPOINT create_transaction_in_opm;

Line 303: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

299:
300: SAVEPOINT create_transaction_in_opm;
301:
302: -- Standard call to check for call compatibility.
303: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
304: p_api_version ,
305: l_api_name ,
306: G_PKG_NAME ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

303: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
304: p_api_version ,
305: l_api_name ,
306: G_PKG_NAME ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
308: END IF;
309:
310: x_return_status :=FND_API.G_RET_STS_SUCCESS;
311:

Line 310: x_return_status :=FND_API.G_RET_STS_SUCCESS;

306: G_PKG_NAME ) THEN
307: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
308: END IF;
309:
310: x_return_status :=FND_API.G_RET_STS_SUCCESS;
311:
312: --we need to construct the record for inserting transactions in OPM.
313: --{
314: IF (p_line_row.lot_level = 0) THEN --lots at line level

Line 385: RAISE FND_API.G_EXC_ERROR;

381: ) THEN
382: FND_MESSAGE.SET_NAME('GMI','GMI_DXFR_INDIVISIBLE_LOT');
383: FND_MESSAGE.SET_TOKEN('LINE_NO',to_char(l_tran_rec_tbl(i).doc_line));
384: FND_MSG_PUB.Add;
385: RAISE FND_API.G_EXC_ERROR;
386: END IF;
387: ELSE
388: FND_MESSAGE.SET_NAME('GMI','GMI_DXFR_CANNOT_GET_ONHAND');
389: FND_MESSAGE.SET_TOKEN('LINE_NO',to_char(l_tran_rec_tbl(i).doc_line));

Line 391: RAISE FND_API.G_EXC_ERROR;

387: ELSE
388: FND_MESSAGE.SET_NAME('GMI','GMI_DXFR_CANNOT_GET_ONHAND');
389: FND_MESSAGE.SET_TOKEN('LINE_NO',to_char(l_tran_rec_tbl(i).doc_line));
390: FND_MSG_PUB.Add;
391: RAISE FND_API.G_EXC_ERROR;
392: END IF;--}
393:
394: END IF;--}
395:

Line 403: , p_init_msg_list => FND_API.G_FALSE

399: --lets call the GMI engine to post completed transaction
400: GMI_TRANS_ENGINE_PVT.create_completed_transaction
401: (
402: p_api_version => 1.0
403: , p_init_msg_list => FND_API.G_FALSE
404: , p_commit => FND_API.G_FALSE
405: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
406: , x_return_status => x_return_status
407: , x_msg_count => x_msg_count

Line 404: , p_commit => FND_API.G_FALSE

400: GMI_TRANS_ENGINE_PVT.create_completed_transaction
401: (
402: p_api_version => 1.0
403: , p_init_msg_list => FND_API.G_FALSE
404: , p_commit => FND_API.G_FALSE
405: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
406: , x_return_status => x_return_status
407: , x_msg_count => x_msg_count
408: , x_msg_data => x_msg_data

Line 405: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

401: (
402: p_api_version => 1.0
403: , p_init_msg_list => FND_API.G_FALSE
404: , p_commit => FND_API.G_FALSE
405: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
406: , x_return_status => x_return_status
407: , x_msg_count => x_msg_count
408: , x_msg_data => x_msg_data
409: , p_tran_rec => l_tran_rec_tbl(i)

Line 416: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

412:
413: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
414: log_msg('After the call to GMI_TRANS_ENGINE_PVT.create_completed_transaction. return status is '||x_return_status);
415: END IF;
416: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
417: RAISE FND_API.G_EXC_ERROR;
418: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
420: END IF;

Line 417: RAISE FND_API.G_EXC_ERROR;

413: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
414: log_msg('After the call to GMI_TRANS_ENGINE_PVT.create_completed_transaction. return status is '||x_return_status);
415: END IF;
416: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
417: RAISE FND_API.G_EXC_ERROR;
418: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
420: END IF;
421:

Line 418: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

414: log_msg('After the call to GMI_TRANS_ENGINE_PVT.create_completed_transaction. return status is '||x_return_status);
415: END IF;
416: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
417: RAISE FND_API.G_EXC_ERROR;
418: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
420: END IF;
421:
422: END LOOP;--}

Line 419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

415: END IF;
416: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
417: RAISE FND_API.G_EXC_ERROR;
418: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
420: END IF;
421:
422: END LOOP;--}
423:

Line 434: WHEN FND_API.G_EXC_ERROR THEN

430:
431:
432: EXCEPTION
433:
434: WHEN FND_API.G_EXC_ERROR THEN
435: ROLLBACK to create_transaction_in_opm;
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: FND_MSG_PUB.Count_AND_GET
438: (p_count => x_msg_count, p_data => x_msg_data);

Line 436: x_return_status := FND_API.G_RET_STS_ERROR;

432: EXCEPTION
433:
434: WHEN FND_API.G_EXC_ERROR THEN
435: ROLLBACK to create_transaction_in_opm;
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: FND_MSG_PUB.Count_AND_GET
438: (p_count => x_msg_count, p_data => x_msg_data);
439:
440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

436: x_return_status := FND_API.G_RET_STS_ERROR;
437: FND_MSG_PUB.Count_AND_GET
438: (p_count => x_msg_count, p_data => x_msg_data);
439:
440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
441: ROLLBACK to create_transaction_in_opm;
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: FND_MSG_PUB.Count_AND_GET
444: (p_count => x_msg_count, p_data => x_msg_data);

Line 442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

438: (p_count => x_msg_count, p_data => x_msg_data);
439:
440: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
441: ROLLBACK to create_transaction_in_opm;
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: FND_MSG_PUB.Count_AND_GET
444: (p_count => x_msg_count, p_data => x_msg_data);
445:
446: WHEN OTHERS THEN

Line 448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

444: (p_count => x_msg_count, p_data => x_msg_data);
445:
446: WHEN OTHERS THEN
447: ROLLBACK to create_transaction_in_opm;
448: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
449: IF (SQLCODE IS NOT NULL) THEN
450: FND_MESSAGE.SET_NAME('GMI','GMI_DXFR_SQL_ERROR');
451: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
452: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM(SQLCODE));

Line 480: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

476: +==========================================================================+ */
477:
478: PROCEDURE create_txn_update_bal_in_odm
479: ( p_api_version IN NUMBER
480: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
481: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
482: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
483: , x_return_status OUT NOCOPY VARCHAR2
484: , x_msg_count OUT NOCOPY NUMBER

Line 481: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

477:
478: PROCEDURE create_txn_update_bal_in_odm
479: ( p_api_version IN NUMBER
480: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
481: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
482: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
483: , x_return_status OUT NOCOPY VARCHAR2
484: , x_msg_count OUT NOCOPY NUMBER
485: , x_msg_data OUT NOCOPY VARCHAR2

Line 482: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

478: PROCEDURE create_txn_update_bal_in_odm
479: ( p_api_version IN NUMBER
480: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
481: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
482: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
483: , x_return_status OUT NOCOPY VARCHAR2
484: , x_msg_count OUT NOCOPY NUMBER
485: , x_msg_data OUT NOCOPY VARCHAR2
486: , p_hdr_row IN gmi_discrete_transfers%ROWTYPE

Line 509: IF FND_API.to_boolean(p_init_msg_list) THEN

505: WHERE um_code = Vum_code;
506:
507: BEGIN
508:
509: IF FND_API.to_boolean(p_init_msg_list) THEN
510: FND_MSG_PUB.Initialize;
511: END IF;
512:
513: SAVEPOINT create_transaction_in_odm;

Line 516: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

512:
513: SAVEPOINT create_transaction_in_odm;
514:
515: -- Standard call to check for call compatibility.
516: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
517: p_api_version ,
518: l_api_name ,
519: G_PKG_NAME ) THEN
520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

516: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
517: p_api_version ,
518: l_api_name ,
519: G_PKG_NAME ) THEN
520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
521: END IF;
522:
523: x_return_status :=FND_API.G_RET_STS_SUCCESS;
524:

Line 523: x_return_status :=FND_API.G_RET_STS_SUCCESS;

519: G_PKG_NAME ) THEN
520: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
521: END IF;
522:
523: x_return_status :=FND_API.G_RET_STS_SUCCESS;
524:
525: --we need to construct the record for inserting transactions in ODM.
526: --then we need to insert into mtl_material_transactions_temp table.
527: --this is done for each line.

Line 958: WHEN FND_API.G_EXC_ERROR THEN

954:
955:
956: EXCEPTION
957:
958: WHEN FND_API.G_EXC_ERROR THEN
959: ROLLBACK to create_transaction_in_odm;
960: x_return_status := FND_API.G_RET_STS_ERROR;
961: FND_MSG_PUB.Count_AND_GET
962: (p_count => x_msg_count, p_data => x_msg_data);

Line 960: x_return_status := FND_API.G_RET_STS_ERROR;

956: EXCEPTION
957:
958: WHEN FND_API.G_EXC_ERROR THEN
959: ROLLBACK to create_transaction_in_odm;
960: x_return_status := FND_API.G_RET_STS_ERROR;
961: FND_MSG_PUB.Count_AND_GET
962: (p_count => x_msg_count, p_data => x_msg_data);
963:
964: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 964: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

960: x_return_status := FND_API.G_RET_STS_ERROR;
961: FND_MSG_PUB.Count_AND_GET
962: (p_count => x_msg_count, p_data => x_msg_data);
963:
964: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
965: ROLLBACK to create_transaction_in_odm;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
967: FND_MSG_PUB.Count_AND_GET
968: (p_count => x_msg_count, p_data => x_msg_data);

Line 966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

962: (p_count => x_msg_count, p_data => x_msg_data);
963:
964: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
965: ROLLBACK to create_transaction_in_odm;
966: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
967: FND_MSG_PUB.Count_AND_GET
968: (p_count => x_msg_count, p_data => x_msg_data);
969:
970: WHEN OTHERS THEN

Line 978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

974: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
975: FND_MESSAGE.SET_TOKEN('ERRM',SQLERRM(SQLCODE));
976: FND_MSG_PUB.Add;
977: END IF;
978: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
979: FND_MSG_PUB.Count_AND_GET
980: (p_count => x_msg_count, p_data => x_msg_data);
981:
982: END create_txn_update_bal_in_odm;