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: -- Debug Message

Line 152: l_return_status := FND_API.G_RET_STS_SUCCESS;

148: IF g_debug THEN
149: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
150: END IF;
151: -- Initialize API return status to sucess
152: l_return_status := FND_API.G_RET_STS_SUCCESS;
153: --
154: -- API body
155: --
156: IF l_hdr_rec.org_id IS NULL THEN

Line 160: RAISE FND_API.G_EXC_ERROR;

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

Line 165: RAISE FND_API.G_EXC_ERROR;

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

Line 170: RAISE FND_API.G_EXC_ERROR;

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

Line 177: RAISE FND_API.G_EXC_ERROR;

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

Line 182: RAISE FND_API.G_EXC_ERROR;

178: ELSIF l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
179: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
180: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
181: FND_MSG_PUB.add;
182: RAISE FND_API.G_EXC_ERROR;
183: ELSE
184: 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)
185: LOOP
186: 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 ('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 248: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

244: IF DPP_DEBUG_HIGH_ON THEN
245: DPP_UTILITY_pvt.debug_message ('select_coveredinventory(): x_return_status: ' || x_return_status);
246: END IF;
247:
248: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
252: END IF;

Line 249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

245: DPP_UTILITY_pvt.debug_message ('select_coveredinventory(): x_return_status: ' || x_return_status);
246: END IF;
247:
248: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
250: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
252: END IF;
253:

Line 250: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

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

Line 251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 255: IF FND_API.to_Boolean( p_commit )

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

Line 272: WHEN FND_API.G_EXC_ERROR THEN

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

Line 274: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 277: p_encoded => FND_API.G_FALSE,

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

Line 288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 293: p_encoded => FND_API.G_FALSE,

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

Line 305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 313: p_encoded => FND_API.G_FALSE,

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

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

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

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

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

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

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

Line 378: IF NOT FND_API.Compatible_API_Call ( l_api_version,

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

Line 383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 386: IF FND_API.to_Boolean( p_init_msg_list )

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

Line 396: l_return_status := FND_API.G_RET_STS_SUCCESS;

392: IF g_debug THEN
393: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
394: END IF;
395: -- Initialize API return status to sucess
396: l_return_status := FND_API.G_RET_STS_SUCCESS;
397: --
398: -- API body
399: --
400: BEGIN

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

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

Line 416: RAISE FND_API.G_EXC_ERROR;

412: IF SQL%ROWCOUNT = 0 THEN
413: -- Debug Message
414: IF g_debug THEN
415: DPP_UTILITY_PVT.debug_message('Invalid value for Execution Detail ID: ' || l_inv_hdr_rec.Execution_Detail_ID);
416: RAISE FND_API.G_EXC_ERROR;
417: END IF;
418: END IF;
419:
420: EXCEPTION

Line 423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

419:
420: EXCEPTION
421: WHEN OTHERS THEN
422: DPP_UTILITY_PVT.debug_message(substr(('Error in Updating DPP_EXECUTION_DETAILS: ' || SQLERRM || ' from Populate Covered Inventory API'),1,4000));
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: END ;
425:
426: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
427: p_api_version => l_api_version

Line 428: ,p_init_msg_list => FND_API.G_FALSE

424: END ;
425:
426: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
427: p_api_version => l_api_version
428: ,p_init_msg_list => FND_API.G_FALSE
429: ,p_commit => FND_API.G_FALSE
430: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
431: ,x_return_status => l_return_status
432: ,x_msg_count => l_msg_count

Line 429: ,p_commit => FND_API.G_FALSE

425:
426: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
427: p_api_version => l_api_version
428: ,p_init_msg_list => FND_API.G_FALSE
429: ,p_commit => FND_API.G_FALSE
430: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
431: ,x_return_status => l_return_status
432: ,x_msg_count => l_msg_count
433: ,x_msg_data => l_msg_data

Line 430: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

426: DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory(
427: p_api_version => l_api_version
428: ,p_init_msg_list => FND_API.G_FALSE
429: ,p_commit => FND_API.G_FALSE
430: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
431: ,x_return_status => l_return_status
432: ,x_msg_count => l_msg_count
433: ,x_msg_data => l_msg_data
434: ,p_inv_hdr_rec => l_inv_hdr_rec

Line 441: IF FND_API.to_Boolean( p_commit )

437:
438: x_return_status := l_return_status;
439:
440: -- Standard check for p_commit
441: IF FND_API.to_Boolean( p_commit )
442: THEN
443: COMMIT WORK;
444: END IF;
445: -- Debug Message

Line 459: x_return_status := FND_API.g_ret_sts_error;

455: --Exception Handling
456: EXCEPTION
457: WHEN DPP_UTILITY_PVT.resource_locked THEN
458: ROLLBACK TO Populate_CoveredInventory_PVT;
459: x_return_status := FND_API.g_ret_sts_error;
460: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
461: FND_MSG_PUB.Count_And_Get (
462: p_encoded => FND_API.G_FALSE,
463: p_count => x_msg_count,

Line 462: p_encoded => FND_API.G_FALSE,

458: ROLLBACK TO Populate_CoveredInventory_PVT;
459: x_return_status := FND_API.g_ret_sts_error;
460: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
461: FND_MSG_PUB.Count_And_Get (
462: p_encoded => FND_API.G_FALSE,
463: p_count => x_msg_count,
464: p_data => x_msg_data
465: );
466: IF x_msg_count > 1 THEN

Line 472: WHEN FND_API.G_EXC_ERROR THEN

468: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
469: END LOOP;
470: END IF;
471:
472: WHEN FND_API.G_EXC_ERROR THEN
473: ROLLBACK TO Populate_CoveredInventory_PVT;
474: x_return_status := FND_API.G_RET_STS_ERROR;
475: -- Standard call to get message count and if count=1, get the message
476: FND_MSG_PUB.Count_And_Get (

Line 474: x_return_status := FND_API.G_RET_STS_ERROR;

470: END IF;
471:
472: WHEN FND_API.G_EXC_ERROR THEN
473: ROLLBACK TO Populate_CoveredInventory_PVT;
474: x_return_status := FND_API.G_RET_STS_ERROR;
475: -- Standard call to get message count and if count=1, get the message
476: FND_MSG_PUB.Count_And_Get (
477: p_encoded => FND_API.G_FALSE,
478: p_count => x_msg_count,

Line 477: p_encoded => FND_API.G_FALSE,

473: ROLLBACK TO Populate_CoveredInventory_PVT;
474: x_return_status := FND_API.G_RET_STS_ERROR;
475: -- Standard call to get message count and if count=1, get the message
476: FND_MSG_PUB.Count_And_Get (
477: p_encoded => FND_API.G_FALSE,
478: p_count => x_msg_count,
479: p_data => x_msg_data
480: );
481: IF x_msg_count > 1 THEN

Line 487: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

483: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
484: END LOOP;
485: END IF;
486:
487: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
488: ROLLBACK TO Populate_CoveredInventory_PVT;
489: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
490: -- Standard call to get message count and if count=1, get the message
491: FND_MSG_PUB.Count_And_Get (

Line 489: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

485: END IF;
486:
487: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
488: ROLLBACK TO Populate_CoveredInventory_PVT;
489: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
490: -- Standard call to get message count and if count=1, get the message
491: FND_MSG_PUB.Count_And_Get (
492: p_encoded => FND_API.G_FALSE,
493: p_count => x_msg_count,

Line 492: p_encoded => FND_API.G_FALSE,

488: ROLLBACK TO Populate_CoveredInventory_PVT;
489: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
490: -- Standard call to get message count and if count=1, get the message
491: FND_MSG_PUB.Count_And_Get (
492: p_encoded => FND_API.G_FALSE,
493: p_count => x_msg_count,
494: p_data => x_msg_data
495: );
496: IF x_msg_count > 1 THEN

Line 504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

500: END IF;
501:
502: WHEN OTHERS THEN
503: ROLLBACK TO Populate_CoveredInventory_PVT;
504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
505: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
506: fnd_message.set_token('ROUTINE', 'DPP_COVEREDINVENTORY_PVT.Populate_CoveredInventory');
507: fnd_message.set_token('ERRNO', sqlcode);
508: fnd_message.set_token('REASON', sqlerrm);

Line 512: p_encoded => FND_API.G_FALSE,

508: fnd_message.set_token('REASON', sqlerrm);
509: FND_MSG_PUB.add;
510: -- Standard call to get message count and if count=1, get the message
511: FND_MSG_PUB.Count_And_Get (
512: p_encoded => FND_API.G_FALSE,
513: p_count => x_msg_count,
514: p_data => x_msg_data
515: );
516: IF x_msg_count > 1 THEN

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

523:
524:
525: PROCEDURE Update_CoveredInventory(
526: p_api_version IN NUMBER
527: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
528: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
529: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
530: ,x_return_status OUT NOCOPY VARCHAR2
531: ,x_msg_count OUT NOCOPY NUMBER

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

524:
525: PROCEDURE Update_CoveredInventory(
526: p_api_version IN NUMBER
527: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
528: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
529: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
530: ,x_return_status OUT NOCOPY VARCHAR2
531: ,x_msg_count OUT NOCOPY NUMBER
532: ,x_msg_data OUT NOCOPY VARCHAR2

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

525: PROCEDURE Update_CoveredInventory(
526: p_api_version IN NUMBER
527: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
528: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
529: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
530: ,x_return_status OUT NOCOPY VARCHAR2
531: ,x_msg_count OUT NOCOPY NUMBER
532: ,x_msg_data OUT NOCOPY VARCHAR2
533: ,p_inv_hdr_rec IN dpp_inv_hdr_rec_type

Line 565: IF NOT FND_API.Compatible_API_Call ( l_api_version,

561: BEGIN
562: -- Standard begin of API savepoint
563: SAVEPOINT Update_CoveredInventory_PVT;
564: -- Standard call to check for call compatibility.
565: IF NOT FND_API.Compatible_API_Call ( l_api_version,
566: p_api_version,
567: l_api_name,
568: G_PKG_NAME)
569: THEN

Line 570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

566: p_api_version,
567: l_api_name,
568: G_PKG_NAME)
569: THEN
570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571: END IF;
572: -- Initialize message list if p_init_msg_list is set to TRUE.
573: IF FND_API.to_Boolean( p_init_msg_list )
574: THEN

Line 573: IF FND_API.to_Boolean( p_init_msg_list )

569: THEN
570: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
571: END IF;
572: -- Initialize message list if p_init_msg_list is set to TRUE.
573: IF FND_API.to_Boolean( p_init_msg_list )
574: THEN
575: FND_MSG_PUB.initialize;
576: END IF;
577: -- Debug Message

Line 582: l_return_status := FND_API.G_RET_STS_SUCCESS;

578: IF g_debug THEN
579: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
580: END IF;
581: -- Initialize API return status to sucess
582: l_return_status := FND_API.G_RET_STS_SUCCESS;
583: --
584: -- API body
585: --
586: --Check whether the last updated by value is passed

Line 591: RAISE FND_API.G_EXC_ERROR;

587: IF l_inv_hdr_rec.Last_Updated_By IS NULL THEN
588: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
589: FND_MESSAGE.set_token('ID', 'Last Updated By');
590: FND_MSG_PUB.add;
591: RAISE FND_API.G_EXC_ERROR;
592: ELSIF l_inv_hdr_rec.effective_start_date IS NULL THEN
593: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
594: FND_MESSAGE.set_token('ID', 'Effective Start Date');
595: FND_MSG_PUB.add;

Line 596: RAISE FND_API.G_EXC_ERROR;

592: ELSIF l_inv_hdr_rec.effective_start_date IS NULL THEN
593: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
594: FND_MESSAGE.set_token('ID', 'Effective Start Date');
595: FND_MSG_PUB.add;
596: RAISE FND_API.G_EXC_ERROR;
597: ELSIF l_inv_hdr_rec.effective_end_date IS NULL THEN
598: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
599: FND_MESSAGE.set_token('ID', 'Effective End Date');
600: FND_MSG_PUB.add;

Line 601: RAISE FND_API.G_EXC_ERROR;

597: ELSIF l_inv_hdr_rec.effective_end_date IS NULL THEN
598: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
599: FND_MESSAGE.set_token('ID', 'Effective End Date');
600: FND_MSG_PUB.add;
601: RAISE FND_API.G_EXC_ERROR;
602: END IF;
603:
604: FOR i IN l_covered_inv_tbl.FIRST..l_covered_inv_tbl.LAST LOOP
605: IF l_covered_inv_tbl(i).Transaction_Line_Id IS NULL THEN

Line 609: RAISE FND_API.G_EXC_ERROR;

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

Line 615: RAISE FND_API.G_EXC_ERROR;

611: l_covered_inv_tbl(i).inventory_item_id IS NULL THEN
612: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
613: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
614: FND_MSG_PUB.add;
615: RAISE FND_API.G_EXC_ERROR;
616: ELSIF
617: l_covered_inv_tbl(i).UOM_Code IS NULL THEN
618: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
619: FND_MESSAGE.set_token('ID', 'UOM Code');

Line 621: RAISE FND_API.G_EXC_ERROR;

617: l_covered_inv_tbl(i).UOM_Code IS NULL THEN
618: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
619: FND_MESSAGE.set_token('ID', 'UOM Code');
620: FND_MSG_PUB.add;
621: RAISE FND_API.G_EXC_ERROR;
622: ELSE
623: BEGIN
624: UPDATE DPP_TRANSACTION_LINES_ALL
625: SET covered_inventory = NVL(l_covered_inv_tbl(i).Covered_quantity,0),

Line 638: RAISE FND_API.G_EXC_ERROR;

634: IF SQL%ROWCOUNT = 0 THEN
635: -- Debug Message
636: DPP_UTILITY_PVT.debug_message('Invalid value for Transaction Line ID: ' || l_covered_inv_tbl(i).Transaction_Line_Id);
637:
638: RAISE FND_API.G_EXC_ERROR;
639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
642: DPP_UTILITY_PVT.debug_message(substr(('Error in Updating DPP_TRANSACTION_LINES_ALL: ' || SQLERRM || ' from Update Covered Inventory API'),1,4000));

Line 643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

639: END IF;
640: EXCEPTION
641: WHEN OTHERS THEN
642: DPP_UTILITY_PVT.debug_message(substr(('Error in Updating DPP_TRANSACTION_LINES_ALL: ' || SQLERRM || ' from Update Covered Inventory API'),1,4000));
643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
644: END ;
645: END IF;
646: -- Assign values to l_txn_lines_tbl for History
647: l_txn_lines_tbl(i).log_mode := 'U';

Line 697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

693: fnd_message.set_token('ERRNO', sqlcode);
694: fnd_message.set_token('REASON', sqlerrm);
695: FND_MSG_PUB.add;
696: END IF;
697: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
698: END;
699: --Insert child records if covered quantity <> 0
700: IF NVL(l_covered_inv_tbl(i).Covered_quantity,0) <> 0 THEN
701: FOR j IN l_covered_inv_tbl(i).wh_line_tbl.FIRST..l_covered_inv_tbl(i).wh_line_tbl.LAST LOOP

Line 807: ,p_init_msg_list => FND_API.G_FALSE

803: END LOOP;
804:
805: --For insertion into Log table
806: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
807: ,p_init_msg_list => FND_API.G_FALSE
808: ,p_commit => FND_API.G_FALSE
809: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
810: ,x_return_status => l_return_status
811: ,x_msg_count => l_msg_count

Line 808: ,p_commit => FND_API.G_FALSE

804:
805: --For insertion into Log table
806: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
807: ,p_init_msg_list => FND_API.G_FALSE
808: ,p_commit => FND_API.G_FALSE
809: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
810: ,x_return_status => l_return_status
811: ,x_msg_count => l_msg_count
812: ,x_msg_data => l_msg_data

Line 809: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

805: --For insertion into Log table
806: DPP_LOG_PVT.Insert_LinesLog(p_api_version => 1.0
807: ,p_init_msg_list => FND_API.G_FALSE
808: ,p_commit => FND_API.G_FALSE
809: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
810: ,x_return_status => l_return_status
811: ,x_msg_count => l_msg_count
812: ,x_msg_data => l_msg_data
813: ,p_txn_lines_tbl => l_txn_lines_tbl

Line 817: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

813: ,p_txn_lines_tbl => l_txn_lines_tbl
814: );
815: IF g_debug THEN
816: dpp_utility_pvt.debug_message('return status for Insert_LinesLog =>'||l_return_status);
817: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
818: dpp_utility_pvt.debug_message(substr(('Message dat for the DPP Insert_LinesLog API =>'||l_msg_data),1,4000));
819: END IF;
820: END IF;
821:

Line 824: IF FND_API.to_Boolean(p_commit) THEN

820: END IF;
821:
822: x_return_status := l_return_status;
823: -- Standard check for p_commit
824: IF FND_API.to_Boolean(p_commit) THEN
825: COMMIT WORK;
826: END IF;
827: -- Debug Message
828: IF g_debug THEN

Line 841: x_return_status := FND_API.g_ret_sts_error;

837: --Exception Handling
838: EXCEPTION
839: WHEN DPP_UTILITY_PVT.resource_locked THEN
840: ROLLBACK TO Update_CoveredInventory_PVT;
841: x_return_status := FND_API.g_ret_sts_error;
842: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
843: FND_MSG_PUB.Count_And_Get (
844: p_encoded => FND_API.G_FALSE,
845: p_count => x_msg_count,

Line 844: p_encoded => FND_API.G_FALSE,

840: ROLLBACK TO Update_CoveredInventory_PVT;
841: x_return_status := FND_API.g_ret_sts_error;
842: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
843: FND_MSG_PUB.Count_And_Get (
844: p_encoded => FND_API.G_FALSE,
845: p_count => x_msg_count,
846: p_data => x_msg_data
847: );
848: IF x_msg_count > 1 THEN

Line 854: WHEN FND_API.G_EXC_ERROR THEN

850: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
851: END LOOP;
852: END IF;
853:
854: WHEN FND_API.G_EXC_ERROR THEN
855: ROLLBACK TO Update_CoveredInventory_PVT;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: -- Standard call to get message count and if count=1, get the message
858: FND_MSG_PUB.Count_And_Get (

Line 856: x_return_status := FND_API.G_RET_STS_ERROR;

852: END IF;
853:
854: WHEN FND_API.G_EXC_ERROR THEN
855: ROLLBACK TO Update_CoveredInventory_PVT;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: -- Standard call to get message count and if count=1, get the message
858: FND_MSG_PUB.Count_And_Get (
859: p_encoded => FND_API.G_FALSE,
860: p_count => x_msg_count,

Line 859: p_encoded => FND_API.G_FALSE,

855: ROLLBACK TO Update_CoveredInventory_PVT;
856: x_return_status := FND_API.G_RET_STS_ERROR;
857: -- Standard call to get message count and if count=1, get the message
858: FND_MSG_PUB.Count_And_Get (
859: p_encoded => FND_API.G_FALSE,
860: p_count => x_msg_count,
861: p_data => x_msg_data
862: );
863: IF x_msg_count > 1 THEN

Line 869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

865: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
866: END LOOP;
867: END IF;
868:
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Update_CoveredInventory_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: -- Standard call to get message count and if count=1, get the message
873: FND_MSG_PUB.Count_And_Get (

Line 871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

867: END IF;
868:
869: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
870: ROLLBACK TO Update_CoveredInventory_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: -- Standard call to get message count and if count=1, get the message
873: FND_MSG_PUB.Count_And_Get (
874: p_encoded => FND_API.G_FALSE,
875: p_count => x_msg_count,

Line 874: p_encoded => FND_API.G_FALSE,

870: ROLLBACK TO Update_CoveredInventory_PVT;
871: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
872: -- Standard call to get message count and if count=1, get the message
873: FND_MSG_PUB.Count_And_Get (
874: p_encoded => FND_API.G_FALSE,
875: p_count => x_msg_count,
876: p_data => x_msg_data
877: );
878: IF x_msg_count > 1 THEN

Line 886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

882: END IF;
883:
884: WHEN OTHERS THEN
885: ROLLBACK TO Update_CoveredInventory_PVT;
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
888: fnd_message.set_token('ROUTINE', 'DPP_COVEREDINVENTORY_PVT.Update_CoveredInventory');
889: fnd_message.set_token('ERRNO', sqlcode);
890: fnd_message.set_token('REASON', sqlerrm);

Line 894: p_encoded => FND_API.G_FALSE,

890: fnd_message.set_token('REASON', sqlerrm);
891: FND_MSG_PUB.add;
892: -- Standard call to get message count and if count=1, get the message
893: FND_MSG_PUB.Count_And_Get (
894: p_encoded => FND_API.G_FALSE,
895: p_count => x_msg_count,
896: p_data => x_msg_data
897: );
898: IF x_msg_count > 1 THEN