DBA Data[Home] [Help]

APPS.DPP_LISTPRICE_PVT dependencies on FND_MSG_PUB

Line 11: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

7: -- NOTE :
8: -- End of Comments
9:
10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'DPP_LISTPRICE_PVT';
11: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
12: G_FILE_NAME CONSTANT VARCHAR2(14) := 'dppvlprb.pls';
13:
14: ---------------------------------------------------------------------
15: -- PROCEDURE

Line 100: FND_MSG_PUB.initialize;

96: END IF;
97: -- Initialize message list if p_init_msg_list is set to TRUE.
98: IF FND_API.to_Boolean( p_init_msg_list )
99: THEN
100: FND_MSG_PUB.initialize;
101: END IF;
102: -- Debug Message
103: IF g_debug THEN
104: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');

Line 115: FND_MSG_PUB.add;

111: --
112: IF l_txn_hdr_rec.org_id IS NULL THEN
113: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
114: FND_MESSAGE.set_token('ID', 'Org ID');
115: FND_MSG_PUB.add;
116: RAISE FND_API.G_EXC_ERROR;
117: ELSIF l_txn_hdr_rec.Transaction_Number IS NULL THEN
118: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
119: FND_MESSAGE.set_token('ID', 'Transaction Number');

Line 120: FND_MSG_PUB.add;

116: RAISE FND_API.G_EXC_ERROR;
117: ELSIF l_txn_hdr_rec.Transaction_Number IS NULL THEN
118: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
119: FND_MESSAGE.set_token('ID', 'Transaction Number');
120: FND_MSG_PUB.add;
121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF l_txn_hdr_rec.Transaction_Header_ID IS NULL THEN
123: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
124: FND_MESSAGE.set_token('ID', 'Transaction Header ID');

Line 125: FND_MSG_PUB.add;

121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF l_txn_hdr_rec.Transaction_Header_ID IS NULL THEN
123: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
124: FND_MESSAGE.set_token('ID', 'Transaction Header ID');
125: FND_MSG_PUB.add;
126: RAISE FND_API.G_EXC_ERROR;
127: END IF;
128: --Assign
129: l_Transaction_Number := ''''||l_txn_hdr_rec.Transaction_Number||'''';

Line 143: FND_MSG_PUB.add;

139: AND miaaiv.attribute_name = 'MTL_SYSTEM_ITEMS.LIST_PRICE_PER_UNIT';
140: EXCEPTION
141: WHEN NO_DATA_FOUND THEN --
142: FND_MESSAGE.set_name('DPP', 'DPP_INVALID_CONTROL_LEVEL');
143: FND_MSG_PUB.add;
144: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
145: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
146: END IF;
147: RAISE FND_API.G_EXC_ERROR;

Line 144: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

140: EXCEPTION
141: WHEN NO_DATA_FOUND THEN --
142: FND_MESSAGE.set_name('DPP', 'DPP_INVALID_CONTROL_LEVEL');
143: FND_MSG_PUB.add;
144: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
145: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
146: END IF;
147: RAISE FND_API.G_EXC_ERROR;
148: WHEN OTHERS THEN

Line 145: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

141: WHEN NO_DATA_FOUND THEN --
142: FND_MESSAGE.set_name('DPP', 'DPP_INVALID_CONTROL_LEVEL');
143: FND_MSG_PUB.add;
144: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
145: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
146: END IF;
147: RAISE FND_API.G_EXC_ERROR;
148: WHEN OTHERS THEN
149: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 153: FND_MSG_PUB.add;

149: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
150: fnd_message.set_token('ROUTINE', 'DPP_LISTPRICE_PVT');
151: fnd_message.set_token('ERRNO', sqlcode);
152: fnd_message.set_token('REASON', sqlerrm);
153: FND_MSG_PUB.add;
154: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
155: END;
156: IF l_item_cost_tbl.EXISTS(1) THEN
157: FOR i IN l_item_cost_tbl.FIRST..l_item_cost_tbl.LAST LOOP

Line 177: FND_MSG_PUB.add;

173:
174: IF l_item_cost_tbl(i).inventory_item_id IS NULL THEN
175: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
176: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
177: FND_MSG_PUB.add;
178: RAISE FND_API.G_EXC_ERROR;
179: END IF;
180: l_count := 0;
181: FOR Item_rec IN Item_cur(l_item_cost_tbl(i).inventory_item_id,l_txn_hdr_rec.org_id, l_control_level) LOOP

Line 260: FND_MSG_PUB.add;

256: END LOOP;
257: ELSE
258: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
259: FND_MESSAGE.set_token('ID', 'Line Details');
260: FND_MSG_PUB.add;
261: RAISE FND_API.G_EXC_ERROR;
262: END IF;
263:
264: BEGIN

Line 288: fnd_msg_pub.add;

284: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
285: fnd_message.set_token('ROUTINE', 'DPP_LISTPRICE_PVT.Update_ListPrice');
286: fnd_message.set_token('ERRNO', sqlcode);
287: fnd_message.set_token('REASON', sqlerrm);
288: fnd_msg_pub.add;
289: END;
290: IF x_return_status NOT IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) THEN
291: x_return_status := l_return_status;
292: END IF;

Line 340: /* FND_MSG_PUB.Count_And_Get

336: IF g_debug THEN
337: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
338: END IF;
339: -- Standard call to get message count and if count is 1, get message info.
340: /* FND_MSG_PUB.Count_And_Get
341: (p_count => x_msg_count,
342: p_data => x_msg_data
343: );
344: IF x_msg_count > 1 THEN

Line 346: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

342: p_data => x_msg_data
343: );
344: IF x_msg_count > 1 THEN
345: FOR I IN 1..x_msg_count LOOP
346: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
347: END LOOP;
348: END IF;*/
349:
350:

Line 357: FND_MSG_PUB.Count_And_Get (

353: WHEN DPP_UTILITY_PVT.resource_locked THEN
354: ROLLBACK TO UPDATE_LISTPRICE_PVT;
355: x_return_status := FND_API.g_ret_sts_error;
356: DPP_UTILITY_PVT.Error_Message(p_message_name => 'API_RESOURCE_LOCKED');
357: FND_MSG_PUB.Count_And_Get (
358: p_encoded => FND_API.G_FALSE,
359: p_count => x_msg_count,
360: p_data => x_msg_data
361: );

Line 365: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

361: );
362:
363: IF x_msg_count > 1 THEN
364: FOR I IN 1..x_msg_count LOOP
365: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
366: END LOOP;
367: END IF;
368:
369: WHEN FND_API.G_EXC_ERROR THEN

Line 373: FND_MSG_PUB.Count_And_Get (

369: WHEN FND_API.G_EXC_ERROR THEN
370: ROLLBACK TO UPDATE_LISTPRICE_PVT;
371: x_return_status := FND_API.G_RET_STS_ERROR;
372: -- Standard call to get message count and if count=1, get the message
373: FND_MSG_PUB.Count_And_Get (
374: p_encoded => FND_API.G_FALSE,
375: p_count => x_msg_count,
376: p_data => x_msg_data
377: );

Line 380: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

376: p_data => x_msg_data
377: );
378: IF x_msg_count > 1 THEN
379: FOR I IN 1..x_msg_count LOOP
380: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
381: END LOOP;
382: END IF;
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 388: FND_MSG_PUB.Count_And_Get (

384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: ROLLBACK TO UPDATE_LISTPRICE_PVT;
386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
387: -- Standard call to get message count and if count=1, get the message
388: FND_MSG_PUB.Count_And_Get (
389: p_encoded => FND_API.G_FALSE,
390: p_count => x_msg_count,
391: p_data => x_msg_data
392: );

Line 395: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

391: p_data => x_msg_data
392: );
393: IF x_msg_count > 1 THEN
394: FOR I IN 1..x_msg_count LOOP
395: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
396: END LOOP;
397: END IF;
398:
399: WHEN OTHERS THEN

Line 406: fnd_msg_pub.add;

402: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
403: fnd_message.set_token('ROUTINE', l_full_name);
404: fnd_message.set_token('ERRNO', sqlcode);
405: fnd_message.set_token('REASON', sqlerrm);
406: fnd_msg_pub.add;
407: -- Standard call to get message count and if count=1, get the message
408: FND_MSG_PUB.Count_And_Get (
409: p_encoded => FND_API.G_FALSE,
410: p_count => x_msg_count,

Line 408: FND_MSG_PUB.Count_And_Get (

404: fnd_message.set_token('ERRNO', sqlcode);
405: fnd_message.set_token('REASON', sqlerrm);
406: fnd_msg_pub.add;
407: -- Standard call to get message count and if count=1, get the message
408: FND_MSG_PUB.Count_And_Get (
409: p_encoded => FND_API.G_FALSE,
410: p_count => x_msg_count,
411: p_data => x_msg_data
412: );

Line 416: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

412: );
413:
414: IF x_msg_count > 1 THEN
415: FOR I IN 1..x_msg_count LOOP
416: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
417: END LOOP;
418: END IF;
419:
420: END Update_ListPrice;