DBA Data[Home] [Help]

APPS.DPP_COVEREDINVENTORY_PVT dependencies on FND_API

Line 30: p_Init_msg_List IN VARCHAR2 := fnd_api.g_False,

26: ----------------------------------------------------------------------
27:
28: PROCEDURE Select_CoveredInventory
29: (p_api_Version IN NUMBER,
30: p_Init_msg_List IN VARCHAR2 := fnd_api.g_False,
31: p_Commit IN VARCHAR2 := fnd_api.g_False,
32: p_Validation_Level IN NUMBER := fnd_api.g_Valid_Level_Full,
33: x_Return_Status OUT NOCOPY VARCHAR2,
34: x_msg_Count OUT NOCOPY NUMBER,

Line 31: p_Commit IN VARCHAR2 := fnd_api.g_False,

27:
28: PROCEDURE Select_CoveredInventory
29: (p_api_Version IN NUMBER,
30: p_Init_msg_List IN VARCHAR2 := fnd_api.g_False,
31: p_Commit IN VARCHAR2 := fnd_api.g_False,
32: p_Validation_Level IN NUMBER := fnd_api.g_Valid_Level_Full,
33: x_Return_Status OUT NOCOPY VARCHAR2,
34: x_msg_Count OUT NOCOPY NUMBER,
35: x_msg_Data OUT NOCOPY VARCHAR2,

Line 32: p_Validation_Level IN NUMBER := fnd_api.g_Valid_Level_Full,

28: PROCEDURE Select_CoveredInventory
29: (p_api_Version IN NUMBER,
30: p_Init_msg_List IN VARCHAR2 := fnd_api.g_False,
31: p_Commit IN VARCHAR2 := fnd_api.g_False,
32: p_Validation_Level IN NUMBER := fnd_api.g_Valid_Level_Full,
33: x_Return_Status OUT NOCOPY VARCHAR2,
34: x_msg_Count OUT NOCOPY NUMBER,
35: x_msg_Data OUT NOCOPY VARCHAR2,
36: p_Inv_hdr_rec IN DPP_INV_HDR_REC_TYPE,

Line 135: IF NOT FND_API.Compatible_API_Call ( l_api_version,

131:
132: -- Standard begin of API savepoint
133: SAVEPOINT Select_CoveredInventory_PVT;
134: -- Standard call to check for call compatibility.
135: IF NOT FND_API.Compatible_API_Call ( l_api_version,
136: p_api_version,
137: l_api_name,
138: G_PKG_NAME)
139: THEN

Line 140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

136: p_api_version,
137: l_api_name,
138: G_PKG_NAME)
139: THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142: -- Initialize message list if p_init_msg_list is set to TRUE.
143: IF FND_API.to_Boolean( p_init_msg_list )
144: THEN

Line 143: IF FND_API.to_Boolean( p_init_msg_list )

139: THEN
140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141: END IF;
142: -- Initialize message list if p_init_msg_list is set to TRUE.
143: IF FND_API.to_Boolean( p_init_msg_list )
144: THEN
145: FND_MSG_PUB.initialize;
146: END IF;
147:

Line 151: l_return_status := FND_API.G_RET_STS_SUCCESS;

147:
148: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'start');
149:
150: -- Initialize API return status to sucess
151: l_return_status := FND_API.G_RET_STS_SUCCESS;
152: --
153: -- API body
154: --
155: IF l_hdr_rec.org_id IS NULL THEN

Line 159: RAISE FND_API.G_EXC_ERROR;

155: IF l_hdr_rec.org_id IS NULL THEN
156: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
157: FND_MESSAGE.set_token('ID', 'Org ID');
158: FND_MSG_PUB.add;
159: RAISE FND_API.G_EXC_ERROR;
160: ELSIF l_hdr_rec.effective_start_date IS NULL THEN
161: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
162: FND_MESSAGE.set_token('ID', 'Effective Start Date');
163: FND_MSG_PUB.add;

Line 164: RAISE FND_API.G_EXC_ERROR;

160: ELSIF l_hdr_rec.effective_start_date IS NULL THEN
161: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
162: FND_MESSAGE.set_token('ID', 'Effective Start Date');
163: FND_MSG_PUB.add;
164: RAISE FND_API.G_EXC_ERROR;
165: ELSIF l_hdr_rec.effective_end_date IS NULL THEN
166: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
167: FND_MESSAGE.set_token('ID', 'Effective End Date');
168: FND_MSG_PUB.add;

Line 169: RAISE FND_API.G_EXC_ERROR;

165: ELSIF l_hdr_rec.effective_end_date IS NULL THEN
166: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
167: FND_MESSAGE.set_token('ID', 'Effective End Date');
168: FND_MSG_PUB.add;
169: RAISE FND_API.G_EXC_ERROR;
170: ELSE
171: FOR i IN l_covered_inv_tbl.FIRST..l_covered_inv_tbl.LAST LOOP
172: IF l_covered_inv_tbl(i).Transaction_Line_Id IS NULL THEN
173: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');

Line 176: RAISE FND_API.G_EXC_ERROR;

172: IF l_covered_inv_tbl(i).Transaction_Line_Id IS NULL THEN
173: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
174: FND_MESSAGE.set_token('ID', 'Transaction Line ID');
175: FND_MSG_PUB.add;
176: RAISE FND_API.G_EXC_ERROR;
177: ELSIF l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
178: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
179: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
180: FND_MSG_PUB.add;

Line 181: RAISE FND_API.G_EXC_ERROR;

177: ELSIF l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
178: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
179: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
180: FND_MSG_PUB.add;
181: RAISE FND_API.G_EXC_ERROR;
182: ELSE
183: FOR get_covered_inventory_rec IN get_covered_inventory_csr(l_hdr_rec.org_id, l_hdr_rec.effective_start_date, l_hdr_rec.effective_end_date, l_covered_inv_tbl(i).Inventory_ITem_ID)
184: LOOP
185: l_covered_inv_tbl(i).covered_quantity := NVL(get_covered_inventory_rec.covered_qty,0);

Line 235: x_return_status := FND_API.G_RET_STS_ERROR;

231: AND rownum = 1;
232: EXCEPTION
233: WHEN OTHERS THEN
234: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error in fetching primary UOM: ' || SQLERRM);
235: x_return_status := FND_API.G_RET_STS_ERROR;
236: END;
237: l_covered_inv_tbl(i).uom_code := l_primary_uom_code; -- Default to Primary UOM
238: END IF; -- onhand qty null if
239: END IF; -- txn line id null if

Line 246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

242: p_covered_inv_tbl := l_covered_inv_tbl;
243: x_return_status := l_return_status;
244: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'select_coveredinventory(): x_return_status: ' || x_return_status);
245:
246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;

Line 247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

243: x_return_status := l_return_status;
244: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'select_coveredinventory(): x_return_status: ' || x_return_status);
245:
246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251:

Line 248: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

244: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'select_coveredinventory(): x_return_status: ' || x_return_status);
245:
246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251:
252: -- Standard check for p_commit

Line 249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

245:
246: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
247: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
248: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251:
252: -- Standard check for p_commit
253: IF FND_API.to_Boolean( p_commit )

Line 253: IF FND_API.to_Boolean( p_commit )

249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: END IF;
251:
252: -- Standard check for p_commit
253: IF FND_API.to_Boolean( p_commit )
254: THEN
255: COMMIT WORK;
256: END IF;
257:

Line 269: WHEN FND_API.G_EXC_ERROR THEN

265:
266: --Exception Handling
267: EXCEPTION
268:
269: WHEN FND_API.G_EXC_ERROR THEN
270: ROLLBACK TO Select_CoveredInventory_PVT;
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: -- Standard call to get message count and if count=1, get the message
273: FND_MSG_PUB.Count_And_Get (

Line 271: x_return_status := FND_API.G_RET_STS_ERROR;

267: EXCEPTION
268:
269: WHEN FND_API.G_EXC_ERROR THEN
270: ROLLBACK TO Select_CoveredInventory_PVT;
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: -- Standard call to get message count and if count=1, get the message
273: FND_MSG_PUB.Count_And_Get (
274: p_encoded => FND_API.G_FALSE,
275: p_count => x_msg_count,

Line 274: p_encoded => FND_API.G_FALSE,

270: ROLLBACK TO Select_CoveredInventory_PVT;
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: -- Standard call to get message count and if count=1, get the message
273: FND_MSG_PUB.Count_And_Get (
274: p_encoded => FND_API.G_FALSE,
275: p_count => x_msg_count,
276: p_data => x_msg_data
277: );
278:

Line 285: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

281: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
282: END LOOP;
283: END IF;
284:
285: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
286: ROLLBACK TO Select_CoveredInventory_PVT;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: -- Standard call to get message count and if count=1, get the message
289: FND_MSG_PUB.Count_And_Get (

Line 287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

283: END IF;
284:
285: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
286: ROLLBACK TO Select_CoveredInventory_PVT;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: -- Standard call to get message count and if count=1, get the message
289: FND_MSG_PUB.Count_And_Get (
290: p_encoded => FND_API.G_FALSE,
291: p_count => x_msg_count,

Line 290: p_encoded => FND_API.G_FALSE,

286: ROLLBACK TO Select_CoveredInventory_PVT;
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
288: -- Standard call to get message count and if count=1, get the message
289: FND_MSG_PUB.Count_And_Get (
290: p_encoded => FND_API.G_FALSE,
291: p_count => x_msg_count,
292: p_data => x_msg_data
293: );
294: IF x_msg_count > 1 THEN

Line 302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

298: END IF;
299:
300: WHEN OTHERS THEN
301: ROLLBACK TO Select_CoveredInventory_PVT;
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
304: fnd_message.set_token('ROUTINE', 'DPP_COVEREDINVENTORY_PVT.Select_CoveredInventory');
305: fnd_message.set_token('ERRNO', sqlcode);
306: fnd_message.set_token('REASON', sqlerrm);

Line 310: p_encoded => FND_API.G_FALSE,

306: fnd_message.set_token('REASON', sqlerrm);
307: FND_MSG_PUB.add;
308: -- Standard call to get message count and if count=1, get the message
309: FND_MSG_PUB.Count_And_Get (
310: p_encoded => FND_API.G_FALSE,
311: p_count => x_msg_count,
312: p_data => x_msg_data
313: );
314: IF x_msg_count > 1 THEN

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

336: ----------------------------------------------------------------------
337:
338: PROCEDURE Populate_CoveredInventory(
339: p_api_version IN NUMBER
340: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
341: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
342: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
343: ,x_return_status OUT NOCOPY VARCHAR2
344: ,x_msg_count OUT NOCOPY NUMBER

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

337:
338: PROCEDURE Populate_CoveredInventory(
339: p_api_version IN NUMBER
340: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
341: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
342: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
343: ,x_return_status OUT NOCOPY VARCHAR2
344: ,x_msg_count OUT NOCOPY NUMBER
345: ,x_msg_data OUT NOCOPY VARCHAR2

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

338: PROCEDURE Populate_CoveredInventory(
339: p_api_version IN NUMBER
340: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
341: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
342: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
343: ,x_return_status OUT NOCOPY VARCHAR2
344: ,x_msg_count OUT NOCOPY NUMBER
345: ,x_msg_data OUT NOCOPY VARCHAR2
346: ,p_inv_hdr_rec IN dpp_inv_hdr_rec_type

Line 375: IF NOT FND_API.Compatible_API_Call ( l_api_version,

371:
372: -- Standard begin of API savepoint
373: SAVEPOINT Populate_CoveredInventory_PVT;
374: -- Standard call to check for call compatibility.
375: IF NOT FND_API.Compatible_API_Call ( l_api_version,
376: p_api_version,
377: l_api_name,
378: G_PKG_NAME)
379: THEN

Line 380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

376: p_api_version,
377: l_api_name,
378: G_PKG_NAME)
379: THEN
380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
381: END IF;
382: -- Initialize message list if p_init_msg_list is set to TRUE.
383: IF FND_API.to_Boolean( p_init_msg_list )
384: THEN

Line 383: IF FND_API.to_Boolean( p_init_msg_list )

379: THEN
380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
381: END IF;
382: -- Initialize message list if p_init_msg_list is set to TRUE.
383: IF FND_API.to_Boolean( p_init_msg_list )
384: THEN
385: FND_MSG_PUB.initialize;
386: END IF;
387:

Line 392: l_return_status := FND_API.G_RET_STS_SUCCESS;

388:
389: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'start');
390:
391: -- Initialize API return status to sucess
392: l_return_status := FND_API.G_RET_STS_SUCCESS;
393: --
394: -- API body
395: --
396: BEGIN

Line 399: ,execution_status = DECODE(l_return_status,FND_API.G_RET_STS_SUCCESS,'SUCCESS','WARNING')

395: --
396: BEGIN
397: UPDATE DPP_EXECUTION_DETAILS
398: SET execution_end_date = sysdate
399: ,execution_status = DECODE(l_return_status,FND_API.G_RET_STS_SUCCESS,'SUCCESS','WARNING')
400: ,last_update_date = sysdate
401: ,last_updated_by = l_inv_hdr_rec.Last_Updated_By
402: ,last_update_login = l_inv_hdr_rec.Last_Updated_By
403: ,provider_process_id = l_inv_hdr_rec.Provider_Process_Id

Line 411: RAISE FND_API.G_EXC_ERROR;

407:
408: IF SQL%ROWCOUNT = 0 THEN
409:
410: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Invalid value for Execution Detail ID: ' || l_inv_hdr_rec.Execution_Detail_ID);
411: RAISE FND_API.G_EXC_ERROR;
412: END IF;
413:
414: EXCEPTION
415: WHEN OTHERS THEN

Line 417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

413:
414: EXCEPTION
415: WHEN OTHERS THEN
416: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(('Error in Updating DPP_EXECUTION_DETAILS: ' || SQLERRM || ' from Populate Covered Inventory API'),1,4000));
417: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
418: END ;
419:
420: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
421: p_api_version => l_api_version

Line 422: ,p_init_msg_list => FND_API.G_FALSE

418: END ;
419:
420: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
421: p_api_version => l_api_version
422: ,p_init_msg_list => FND_API.G_FALSE
423: ,p_commit => FND_API.G_FALSE
424: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
425: ,x_return_status => l_return_status
426: ,x_msg_count => l_msg_count

Line 423: ,p_commit => FND_API.G_FALSE

419:
420: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
421: p_api_version => l_api_version
422: ,p_init_msg_list => FND_API.G_FALSE
423: ,p_commit => FND_API.G_FALSE
424: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
425: ,x_return_status => l_return_status
426: ,x_msg_count => l_msg_count
427: ,x_msg_data => l_msg_data

Line 424: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

420: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
421: p_api_version => l_api_version
422: ,p_init_msg_list => FND_API.G_FALSE
423: ,p_commit => FND_API.G_FALSE
424: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
425: ,x_return_status => l_return_status
426: ,x_msg_count => l_msg_count
427: ,x_msg_data => l_msg_data
428: ,p_inv_hdr_rec => l_inv_hdr_rec

Line 435: IF FND_API.to_Boolean( p_commit )

431:
432: x_return_status := l_return_status;
433:
434: -- Standard check for p_commit
435: IF FND_API.to_Boolean( p_commit )
436: THEN
437: COMMIT WORK;
438: END IF;
439:

Line 451: x_return_status := FND_API.g_ret_sts_error;

447: --Exception Handling
448: EXCEPTION
449: WHEN DPP_UTILITY_PVT.resource_locked THEN
450: ROLLBACK TO Populate_CoveredInventory_PVT;
451: x_return_status := FND_API.g_ret_sts_error;
452: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
453: FND_MSG_PUB.Count_And_Get (
454: p_encoded => FND_API.G_FALSE,
455: p_count => x_msg_count,

Line 454: p_encoded => FND_API.G_FALSE,

450: ROLLBACK TO Populate_CoveredInventory_PVT;
451: x_return_status := FND_API.g_ret_sts_error;
452: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
453: FND_MSG_PUB.Count_And_Get (
454: p_encoded => FND_API.G_FALSE,
455: p_count => x_msg_count,
456: p_data => x_msg_data
457: );
458: IF x_msg_count > 1 THEN

Line 464: WHEN FND_API.G_EXC_ERROR THEN

460: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
461: END LOOP;
462: END IF;
463:
464: WHEN FND_API.G_EXC_ERROR THEN
465: ROLLBACK TO Populate_CoveredInventory_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR;
467: -- Standard call to get message count and if count=1, get the message
468: FND_MSG_PUB.Count_And_Get (

Line 466: x_return_status := FND_API.G_RET_STS_ERROR;

462: END IF;
463:
464: WHEN FND_API.G_EXC_ERROR THEN
465: ROLLBACK TO Populate_CoveredInventory_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR;
467: -- Standard call to get message count and if count=1, get the message
468: FND_MSG_PUB.Count_And_Get (
469: p_encoded => FND_API.G_FALSE,
470: p_count => x_msg_count,

Line 469: p_encoded => FND_API.G_FALSE,

465: ROLLBACK TO Populate_CoveredInventory_PVT;
466: x_return_status := FND_API.G_RET_STS_ERROR;
467: -- Standard call to get message count and if count=1, get the message
468: FND_MSG_PUB.Count_And_Get (
469: p_encoded => FND_API.G_FALSE,
470: p_count => x_msg_count,
471: p_data => x_msg_data
472: );
473: IF x_msg_count > 1 THEN

Line 479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

475: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
476: END LOOP;
477: END IF;
478:
479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
480: ROLLBACK TO Populate_CoveredInventory_PVT;
481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (

Line 481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

477: END IF;
478:
479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
480: ROLLBACK TO Populate_CoveredInventory_PVT;
481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (
484: p_encoded => FND_API.G_FALSE,
485: p_count => x_msg_count,

Line 484: p_encoded => FND_API.G_FALSE,

480: ROLLBACK TO Populate_CoveredInventory_PVT;
481: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
482: -- Standard call to get message count and if count=1, get the message
483: FND_MSG_PUB.Count_And_Get (
484: p_encoded => FND_API.G_FALSE,
485: p_count => x_msg_count,
486: p_data => x_msg_data
487: );
488: IF x_msg_count > 1 THEN

Line 496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

492: END IF;
493:
494: WHEN OTHERS THEN
495: ROLLBACK TO Populate_CoveredInventory_PVT;
496: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
497: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
498: fnd_message.set_token('ROUTINE', 'DPP_COVEREDINVENTORY_PVT.Populate_CoveredInventory');
499: fnd_message.set_token('ERRNO', sqlcode);
500: fnd_message.set_token('REASON', sqlerrm);

Line 504: p_encoded => FND_API.G_FALSE,

500: fnd_message.set_token('REASON', sqlerrm);
501: FND_MSG_PUB.add;
502: -- Standard call to get message count and if count=1, get the message
503: FND_MSG_PUB.Count_And_Get (
504: p_encoded => FND_API.G_FALSE,
505: p_count => x_msg_count,
506: p_data => x_msg_data
507: );
508: IF x_msg_count > 1 THEN

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

515:
516:
517: PROCEDURE Update_CoveredInventory(
518: p_api_version IN NUMBER
519: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
520: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
521: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
522: ,x_return_status OUT NOCOPY VARCHAR2
523: ,x_msg_count OUT NOCOPY NUMBER

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

516:
517: PROCEDURE Update_CoveredInventory(
518: p_api_version IN NUMBER
519: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
520: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
521: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
522: ,x_return_status OUT NOCOPY VARCHAR2
523: ,x_msg_count OUT NOCOPY NUMBER
524: ,x_msg_data OUT NOCOPY VARCHAR2

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

517: PROCEDURE Update_CoveredInventory(
518: p_api_version IN NUMBER
519: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
520: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
521: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
522: ,x_return_status OUT NOCOPY VARCHAR2
523: ,x_msg_count OUT NOCOPY NUMBER
524: ,x_msg_data OUT NOCOPY VARCHAR2
525: ,p_inv_hdr_rec IN dpp_inv_hdr_rec_type

Line 560: IF NOT FND_API.Compatible_API_Call ( l_api_version,

556: BEGIN
557: -- Standard begin of API savepoint
558: SAVEPOINT Update_CoveredInventory_PVT;
559: -- Standard call to check for call compatibility.
560: IF NOT FND_API.Compatible_API_Call ( l_api_version,
561: p_api_version,
562: l_api_name,
563: G_PKG_NAME)
564: THEN

Line 565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

561: p_api_version,
562: l_api_name,
563: G_PKG_NAME)
564: THEN
565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
566: END IF;
567: -- Initialize message list if p_init_msg_list is set to TRUE.
568: IF FND_API.to_Boolean( p_init_msg_list )
569: THEN

Line 568: IF FND_API.to_Boolean( p_init_msg_list )

564: THEN
565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
566: END IF;
567: -- Initialize message list if p_init_msg_list is set to TRUE.
568: IF FND_API.to_Boolean( p_init_msg_list )
569: THEN
570: FND_MSG_PUB.initialize;
571: END IF;
572:

Line 576: l_return_status := FND_API.G_RET_STS_SUCCESS;

572:
573: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'start');
574:
575: -- Initialize API return status to sucess
576: l_return_status := FND_API.G_RET_STS_SUCCESS;
577: --
578: -- API body
579: --
580: --Check whether the last updated by value is passed

Line 585: RAISE FND_API.G_EXC_ERROR;

581: IF l_inv_hdr_rec.Last_Updated_By IS NULL THEN
582: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
583: FND_MESSAGE.set_token('ID', 'Last Updated By');
584: FND_MSG_PUB.add;
585: RAISE FND_API.G_EXC_ERROR;
586: ELSIF l_inv_hdr_rec.effective_start_date IS NULL THEN
587: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
588: FND_MESSAGE.set_token('ID', 'Effective Start Date');
589: FND_MSG_PUB.add;

Line 590: RAISE FND_API.G_EXC_ERROR;

586: ELSIF l_inv_hdr_rec.effective_start_date IS NULL THEN
587: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
588: FND_MESSAGE.set_token('ID', 'Effective Start Date');
589: FND_MSG_PUB.add;
590: RAISE FND_API.G_EXC_ERROR;
591: ELSIF l_inv_hdr_rec.effective_end_date IS NULL THEN
592: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
593: FND_MESSAGE.set_token('ID', 'Effective End Date');
594: FND_MSG_PUB.add;

Line 595: RAISE FND_API.G_EXC_ERROR;

591: ELSIF l_inv_hdr_rec.effective_end_date IS NULL THEN
592: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
593: FND_MESSAGE.set_token('ID', 'Effective End Date');
594: FND_MSG_PUB.add;
595: RAISE FND_API.G_EXC_ERROR;
596: END IF;
597:
598: FOR i IN l_covered_inv_tbl.FIRST..l_covered_inv_tbl.LAST LOOP
599: IF l_covered_inv_tbl(i).Transaction_Line_Id IS NULL THEN

Line 603: RAISE FND_API.G_EXC_ERROR;

599: IF l_covered_inv_tbl(i).Transaction_Line_Id IS NULL THEN
600: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
601: FND_MESSAGE.set_token('ID', 'Transaction Line ID');
602: FND_MSG_PUB.add;
603: RAISE FND_API.G_EXC_ERROR;
604: ELSIF
605: l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
606: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
607: FND_MESSAGE.set_token('ID', 'Inventory Item ID');

Line 609: RAISE FND_API.G_EXC_ERROR;

605: l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
606: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
607: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
608: FND_MSG_PUB.add;
609: RAISE FND_API.G_EXC_ERROR;
610: ELSIF
611: l_covered_inv_tbl(i).UOM_Code IS NULL THEN
612: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
613: FND_MESSAGE.set_token('ID', 'UOM Code');

Line 615: RAISE FND_API.G_EXC_ERROR;

611: l_covered_inv_tbl(i).UOM_Code IS NULL THEN
612: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
613: FND_MESSAGE.set_token('ID', 'UOM Code');
614: FND_MSG_PUB.add;
615: RAISE FND_API.G_EXC_ERROR;
616: ELSE
617: BEGIN
618: UPDATE DPP_TRANSACTION_LINES_ALL
619: SET covered_inventory = NVL(l_covered_inv_tbl(i).Covered_quantity,0),

Line 633: RAISE FND_API.G_EXC_ERROR;

629: IF SQL%ROWCOUNT = 0 THEN
630:
631: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Invalid value for Transaction Line ID: ' || l_covered_inv_tbl(i).Transaction_Line_Id);
632:
633: RAISE FND_API.G_EXC_ERROR;
634: END IF;
635: EXCEPTION
636: WHEN OTHERS THEN
637: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(('Error in Updating DPP_TRANSACTION_LINES_ALL: ' || SQLERRM || ' from Update Covered Inventory API'),1,4000));

Line 638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

634: END IF;
635: EXCEPTION
636: WHEN OTHERS THEN
637: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, substr(('Error in Updating DPP_TRANSACTION_LINES_ALL: ' || SQLERRM || ' from Update Covered Inventory API'),1,4000));
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END ;
640:
641: --Get the supplier trade profile value to include price increase value for claim or not
642: BEGIN

Line 661: RAISE FND_API.g_exc_error;

657: FND_MSG_PUB.add;
658: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
659: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
660: END IF;
661: RAISE FND_API.g_exc_error;
662: WHEN OTHERS THEN
663: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
664: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
665: fnd_message.set_token('ERRNO', sqlcode);

Line 673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

669: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
670: FND_MSG_PUB.add;
671: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
672: END IF;
673: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
674: END;
675:
676: IF (l_price_change_flag = 'N') THEN -- Only Price Decrease
677: UPDATE dpp_transaction_lines_all dtla

Line 752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

748: fnd_message.set_token('ERRNO', sqlcode);
749: fnd_message.set_token('REASON', sqlerrm);
750: FND_MSG_PUB.add;
751: END IF;
752: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
753: END;
754: --Insert child records if covered quantity <> 0
755: IF NVL(l_covered_inv_tbl(i).Covered_quantity,0) <> 0 THEN
756: FOR j IN l_covered_inv_tbl(i).wh_line_tbl.FIRST..l_covered_inv_tbl(i).wh_line_tbl.LAST LOOP

Line 864: ,p_init_msg_list => FND_API.G_FALSE

860: END LOOP;
861:
862: --For insertion into Log table
863: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
864: ,p_init_msg_list => FND_API.G_FALSE
865: ,p_commit => FND_API.G_FALSE
866: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
867: ,x_return_status => l_return_status
868: ,x_msg_count => l_msg_count

Line 865: ,p_commit => FND_API.G_FALSE

861:
862: --For insertion into Log table
863: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
864: ,p_init_msg_list => FND_API.G_FALSE
865: ,p_commit => FND_API.G_FALSE
866: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
867: ,x_return_status => l_return_status
868: ,x_msg_count => l_msg_count
869: ,x_msg_data => l_msg_data

Line 866: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

862: --For insertion into Log table
863: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
864: ,p_init_msg_list => FND_API.G_FALSE
865: ,p_commit => FND_API.G_FALSE
866: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
867: ,x_return_status => l_return_status
868: ,x_msg_count => l_msg_count
869: ,x_msg_data => l_msg_data
870: ,p_txn_lines_tbl => l_txn_lines_tbl

Line 874: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

870: ,p_txn_lines_tbl => l_txn_lines_tbl
871: );
872:
873: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'return status for Insert_LinesLog =>'||l_return_status);
874: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
875: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, substr(('Message dat for the DPP Insert_LinesLog API =>'||l_msg_data),1,4000));
876: END IF;
877:
878:

Line 881: IF FND_API.to_Boolean(p_commit) THEN

877:
878:
879: x_return_status := l_return_status;
880: -- Standard check for p_commit
881: IF FND_API.to_Boolean(p_commit) THEN
882: COMMIT WORK;
883: END IF;
884:
885: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'end');

Line 897: x_return_status := FND_API.g_ret_sts_error;

893: --Exception Handling
894: EXCEPTION
895: WHEN DPP_UTILITY_PVT.resource_locked THEN
896: ROLLBACK TO Update_CoveredInventory_PVT;
897: x_return_status := FND_API.g_ret_sts_error;
898: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
899: FND_MSG_PUB.Count_And_Get (
900: p_encoded => FND_API.G_FALSE,
901: p_count => x_msg_count,

Line 900: p_encoded => FND_API.G_FALSE,

896: ROLLBACK TO Update_CoveredInventory_PVT;
897: x_return_status := FND_API.g_ret_sts_error;
898: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
899: FND_MSG_PUB.Count_And_Get (
900: p_encoded => FND_API.G_FALSE,
901: p_count => x_msg_count,
902: p_data => x_msg_data
903: );
904: IF x_msg_count > 1 THEN

Line 910: WHEN FND_API.G_EXC_ERROR THEN

906: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
907: END LOOP;
908: END IF;
909:
910: WHEN FND_API.G_EXC_ERROR THEN
911: ROLLBACK TO Update_CoveredInventory_PVT;
912: x_return_status := FND_API.G_RET_STS_ERROR;
913: -- Standard call to get message count and if count=1, get the message
914: FND_MSG_PUB.Count_And_Get (

Line 912: x_return_status := FND_API.G_RET_STS_ERROR;

908: END IF;
909:
910: WHEN FND_API.G_EXC_ERROR THEN
911: ROLLBACK TO Update_CoveredInventory_PVT;
912: x_return_status := FND_API.G_RET_STS_ERROR;
913: -- Standard call to get message count and if count=1, get the message
914: FND_MSG_PUB.Count_And_Get (
915: p_encoded => FND_API.G_FALSE,
916: p_count => x_msg_count,

Line 915: p_encoded => FND_API.G_FALSE,

911: ROLLBACK TO Update_CoveredInventory_PVT;
912: x_return_status := FND_API.G_RET_STS_ERROR;
913: -- Standard call to get message count and if count=1, get the message
914: FND_MSG_PUB.Count_And_Get (
915: p_encoded => FND_API.G_FALSE,
916: p_count => x_msg_count,
917: p_data => x_msg_data
918: );
919: IF x_msg_count > 1 THEN

Line 925: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

921: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
922: END LOOP;
923: END IF;
924:
925: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
926: ROLLBACK TO Update_CoveredInventory_PVT;
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: -- Standard call to get message count and if count=1, get the message
929: FND_MSG_PUB.Count_And_Get (

Line 927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

923: END IF;
924:
925: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
926: ROLLBACK TO Update_CoveredInventory_PVT;
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: -- Standard call to get message count and if count=1, get the message
929: FND_MSG_PUB.Count_And_Get (
930: p_encoded => FND_API.G_FALSE,
931: p_count => x_msg_count,

Line 930: p_encoded => FND_API.G_FALSE,

926: ROLLBACK TO Update_CoveredInventory_PVT;
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: -- Standard call to get message count and if count=1, get the message
929: FND_MSG_PUB.Count_And_Get (
930: p_encoded => FND_API.G_FALSE,
931: p_count => x_msg_count,
932: p_data => x_msg_data
933: );
934: IF x_msg_count > 1 THEN

Line 942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

938: END IF;
939:
940: WHEN OTHERS THEN
941: ROLLBACK TO Update_CoveredInventory_PVT;
942: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
943: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
944: fnd_message.set_token('ROUTINE', 'DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory');
945: fnd_message.set_token('ERRNO', sqlcode);
946: fnd_message.set_token('REASON', sqlerrm);

Line 950: p_encoded => FND_API.G_FALSE,

946: fnd_message.set_token('REASON', sqlerrm);
947: FND_MSG_PUB.add;
948: -- Standard call to get message count and if count=1, get the message
949: FND_MSG_PUB.Count_And_Get (
950: p_encoded => FND_API.G_FALSE,
951: p_count => x_msg_count,
952: p_data => x_msg_data
953: );
954: IF x_msg_count > 1 THEN