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 101: FND_MSG_PUB.initialize;

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

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 339: /* FND_MSG_PUB.Count_And_Get

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

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

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

Line 356: FND_MSG_PUB.Count_And_Get (

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

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

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

Line 372: FND_MSG_PUB.Count_And_Get (

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

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

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

Line 387: FND_MSG_PUB.Count_And_Get (

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

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

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

Line 405: fnd_msg_pub.add;

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

Line 407: FND_MSG_PUB.Count_And_Get (

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

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

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