eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.DPP_PRICING_PVT dependencies on FND_MSG_PUB

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

14: -- ===============================================================
15:
16: G_PKG_NAME CONSTANT VARCHAR2(30) := 'DPP_PRICING_PVT';
17:
18: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
19: G_FILE_NAME CONSTANT VARCHAR2(14) := 'dppvqpnb.pls';
20: g_trunc_sysdate DATE := trunc(sysdate);
21:
22: -- ==============================================================================

Line 144: FND_MSG_PUB.initialize;

140: END IF;
141: -- Initialize message list if p_init_msg_list is set to TRUE.
142: IF FND_API.to_Boolean( p_init_msg_list )
143: THEN
144: FND_MSG_PUB.initialize;
145: END IF;
146:
147:
148: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'start');

Line 159: FND_MSG_PUB.add;

155: IF l_pl_notify_hdr_rec.vendor_id IS NULL THEN
156: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor ID cannot be NULL');
157: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
158: FND_MESSAGE.set_token('ID', 'Vendor ID');
159: FND_MSG_PUB.add;
160: RAISE FND_API.G_EXC_ERROR;
161: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
162: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
163: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');

Line 165: FND_MSG_PUB.add;

161: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
162: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
163: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
164: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
165: FND_MSG_PUB.add;
166: RAISE FND_API.G_EXC_ERROR;
167: ELSE
168: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id)
169: LOOP

Line 201: FND_MSG_PUB.add;

197: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Inventory Item ID cannot be NULL');
198:
199: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
200: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
201: FND_MSG_PUB.add;
202: RAISE FND_API.G_EXC_ERROR;
203:
204: ELSE
205: OPEN get_pricelist_csr(l_pl_notify_line_tbl(i).inventory_item_id, l_pl_notify_hdr_rec.org_id);

Line 236: FND_MSG_PUB.Count_And_Get

232:
233: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'end');
234:
235: -- Standard call to get message count and if count is 1, get message info.
236: FND_MSG_PUB.Count_And_Get
237: (p_count => x_msg_count,
238: p_data => x_msg_data
239: );
240:

Line 249: FND_MSG_PUB.Count_And_Get (

245: WHEN FND_API.G_EXC_ERROR THEN
246:
247: x_return_status := FND_API.G_RET_STS_ERROR;
248: -- Standard call to get message count and if count=1, get the message
249: FND_MSG_PUB.Count_And_Get (
250: p_encoded => FND_API.G_FALSE,
251: p_count => x_msg_count,
252: p_data => x_msg_data
253: );

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

252: p_data => x_msg_data
253: );
254: IF x_msg_count > 1 THEN
255: FOR I IN 1..x_msg_count LOOP
256: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
257: END LOOP;
258: END IF;
259:
260:

Line 265: FND_MSG_PUB.Count_And_Get (

261: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
262:
263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
264: -- Standard call to get message count and if count=1, get the message
265: FND_MSG_PUB.Count_And_Get (
266: p_encoded => FND_API.G_FALSE,
267: p_count => x_msg_count,
268: p_data => x_msg_data
269: );

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

268: p_data => x_msg_data
269: );
270: IF x_msg_count > 1 THEN
271: FOR I IN 1..x_msg_count LOOP
272: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
273: END LOOP;
274: END IF;
275:
276:

Line 280: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

276:
277: WHEN OTHERS THEN
278:
279: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
280: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
281: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
282: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_OutboundPricelists');
283: fnd_message.set_token('ERRNO', sqlcode);
284: fnd_message.set_token('REASON', sqlerrm);

Line 287: FND_MSG_PUB.Count_And_Get (

283: fnd_message.set_token('ERRNO', sqlcode);
284: fnd_message.set_token('REASON', sqlerrm);
285: END IF;
286: -- Standard call to get message count and if count=1, get the message
287: FND_MSG_PUB.Count_And_Get (
288: p_encoded => FND_API.G_FALSE,
289: p_count => x_msg_count,
290: p_data => x_msg_data
291: );

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

290: p_data => x_msg_data
291: );
292: IF x_msg_count > 1 THEN
293: FOR I IN 1..x_msg_count LOOP
294: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
295: END LOOP;
296: END IF;
297:
298:

Line 441: FND_MSG_PUB.initialize;

437: END IF;
438: -- Initialize message list if p_init_msg_list is set to TRUE.
439: IF FND_API.to_Boolean( p_init_msg_list )
440: THEN
441: FND_MSG_PUB.initialize;
442: END IF;
443:
444:
445: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_full_name || 'start');

Line 457: FND_MSG_PUB.add;

453: IF l_pl_notify_hdr_rec.vendor_id IS NULL THEN
454: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor ID cannot be NULL');
455: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
456: FND_MESSAGE.set_token('ID', 'Vendor ID');
457: FND_MSG_PUB.add;
458: RAISE FND_API.G_EXC_ERROR;
459: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
460: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
461: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');

Line 463: FND_MSG_PUB.add;

459: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
460: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
461: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
462: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
463: FND_MSG_PUB.add;
464: RAISE FND_API.G_EXC_ERROR;
465: ELSE
466: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id)
467: LOOP

Line 496: FND_MSG_PUB.add;

492: IF l_pl_notify_line_tbl(i).inventory_item_id IS NULL THEN
493: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Inventory Item ID cannot be NULL');
494: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
495: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
496: FND_MSG_PUB.add;
497: RAISE FND_API.G_EXC_ERROR;
498:
499: ELSE
500:

Line 533: FND_MSG_PUB.Count_And_Get

529:
530: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_full_name || 'end');
531:
532: -- Standard call to get message count and if count is 1, get message info.
533: FND_MSG_PUB.Count_And_Get
534: (p_count => x_msg_count,
535: p_data => x_msg_data
536: );
537:

Line 544: FND_MSG_PUB.Count_And_Get (

540: WHEN FND_API.G_EXC_ERROR THEN
541:
542: x_return_status := FND_API.G_RET_STS_ERROR;
543: -- Standard call to get message count and if count=1, get the message
544: FND_MSG_PUB.Count_And_Get (
545: p_encoded => FND_API.G_FALSE,
546: p_count => x_msg_count,
547: p_data => x_msg_data
548: );

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

547: p_data => x_msg_data
548: );
549: IF x_msg_count > 1 THEN
550: FOR I IN 1..x_msg_count LOOP
551: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
552: END LOOP;
553: END IF;
554:
555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 559: FND_MSG_PUB.Count_And_Get (

555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
556:
557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
558: -- Standard call to get message count and if count=1, get the message
559: FND_MSG_PUB.Count_And_Get (
560: p_encoded => FND_API.G_FALSE,
561: p_count => x_msg_count,
562: p_data => x_msg_data
563: );

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

562: p_data => x_msg_data
563: );
564: IF x_msg_count > 1 THEN
565: FOR I IN 1..x_msg_count LOOP
566: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
567: END LOOP;
568: END IF;
569:
570: WHEN OTHERS THEN

Line 573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

569:
570: WHEN OTHERS THEN
571:
572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
574: THEN
575: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
576: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_InboundPricelists');
577: fnd_message.set_token('ERRNO', sqlcode);

Line 579: FND_MSG_PUB.ADD;

575: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
576: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_InboundPricelists');
577: fnd_message.set_token('ERRNO', sqlcode);
578: fnd_message.set_token('REASON', sqlerrm);
579: FND_MSG_PUB.ADD;
580: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error in notify inbound pricelists: '||SQLERRM);
581: END IF;
582: -- Standard call to get message count and if count=1, get the message
583: FND_MSG_PUB.Count_And_Get (

Line 583: FND_MSG_PUB.Count_And_Get (

579: FND_MSG_PUB.ADD;
580: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error in notify inbound pricelists: '||SQLERRM);
581: END IF;
582: -- Standard call to get message count and if count=1, get the message
583: FND_MSG_PUB.Count_And_Get (
584: p_encoded => FND_API.G_FALSE,
585: p_count => x_msg_count,
586: p_data => x_msg_data
587: );

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

586: p_data => x_msg_data
587: );
588: IF x_msg_count > 1 THEN
589: FOR I IN 1..x_msg_count LOOP
590: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
591: END LOOP;
592: END IF;
593:
594: END Notify_InboundPricelists;

Line 743: FND_MSG_PUB.initialize;

739: END IF;
740: -- Initialize message list if p_init_msg_list is set to TRUE.
741: IF FND_API.to_Boolean( p_init_msg_list )
742: THEN
743: FND_MSG_PUB.initialize;
744: END IF;
745:
746:
747: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'start');

Line 760: FND_MSG_PUB.add;

756: IF l_pl_notify_hdr_rec.vendor_id IS NULL THEN
757: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor ID cannot be NULL');
758: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
759: FND_MESSAGE.set_token('ID', 'Vendor ID');
760: FND_MSG_PUB.add;
761: RAISE FND_API.G_EXC_ERROR;
762: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
763: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
764: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');

Line 766: FND_MSG_PUB.add;

762: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
763: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Vendor Site ID cannot be NULL');
764: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
765: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
766: FND_MSG_PUB.add;
767: RAISE FND_API.G_EXC_ERROR;
768: ELSIF l_pl_notify_hdr_rec.org_id IS NULL THEN
769: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Org ID cannot be NULL');
770: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');

Line 772: FND_MSG_PUB.add;

768: ELSIF l_pl_notify_hdr_rec.org_id IS NULL THEN
769: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Org ID cannot be NULL');
770: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
771: FND_MESSAGE.set_token('ID', 'Org ID');
772: FND_MSG_PUB.add;
773: RAISE FND_API.G_EXC_ERROR;
774: ELSE
775: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id) LOOP
776: p_pl_notify_hdr_rec.vendor_name := get_vendor_rec.vendor_name;

Line 794: FND_MSG_PUB.add;

790: IF l_pl_notify_line_tbl(i).inventory_item_id IS NULL THEN
791: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Inventory Item ID cannot be NULL');
792: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
793: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
794: FND_MSG_PUB.add;
795: RAISE FND_API.G_EXC_ERROR;
796: ELSE
797: FOR get_item_number_rec IN get_item_number_csr(l_pl_notify_line_tbl(i).Inventory_Item_ID) LOOP
798: l_pl_notify_line_tbl(i).Item_Number := get_item_number_rec.concatenated_segments ;

Line 817: FND_MSG_PUB.add;

813: ELSE
814: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Line detals cannot be NULL');
815: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
816: FND_MESSAGE.set_token('ID', 'Line Details');
817: FND_MSG_PUB.add;
818: RAISE FND_API.G_EXC_ERROR;
819: END IF;
820: END IF;
821:

Line 829: FND_MSG_PUB.Count_And_Get

825: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'return status for API =>'||x_return_status);
826:
827: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Private API: ' || l_api_name || 'end');
828: -- Standard call to get message count and if count is 1, get message info.
829: FND_MSG_PUB.Count_And_Get
830: (p_count => x_msg_count,
831: p_data => x_msg_data
832: );
833: EXCEPTION

Line 839: FND_MSG_PUB.Count_And_Get (

835: WHEN FND_API.G_EXC_ERROR THEN
836:
837: x_return_status := FND_API.G_RET_STS_ERROR;
838: -- Standard call to get message count and if count=1, get the message
839: FND_MSG_PUB.Count_And_Get (
840: p_encoded => FND_API.G_FALSE,
841: p_count => x_msg_count,
842: p_data => x_msg_data
843: );

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

842: p_data => x_msg_data
843: );
844: IF x_msg_count > 1 THEN
845: FOR I IN 1..x_msg_count LOOP
846: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
847: END LOOP;
848: END IF;
849:
850:

Line 855: FND_MSG_PUB.Count_And_Get (

851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
852:
853: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
854: -- Standard call to get message count and if count=1, get the message
855: FND_MSG_PUB.Count_And_Get (
856: p_encoded => FND_API.G_FALSE,
857: p_count => x_msg_count,
858: p_data => x_msg_data
859: );

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

858: p_data => x_msg_data
859: );
860: IF x_msg_count > 1 THEN
861: FOR I IN 1..x_msg_count LOOP
862: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
863: END LOOP;
864: END IF;
865:
866: WHEN OTHERS THEN

Line 869: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

865:
866: WHEN OTHERS THEN
867:
868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
869: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
870: THEN
871: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
872: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_Promotions');
873: fnd_message.set_token('ERRNO', sqlcode);

Line 875: FND_MSG_PUB.ADD;

871: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
872: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_Promotions');
873: fnd_message.set_token('ERRNO', sqlcode);
874: fnd_message.set_token('REASON', sqlerrm);
875: FND_MSG_PUB.ADD;
876: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error in notify promotions: '||SQLERRM);
877: END IF;
878: -- Standard call to get message count and if count=1, get the message
879: FND_MSG_PUB.Count_And_Get (

Line 879: FND_MSG_PUB.Count_And_Get (

875: FND_MSG_PUB.ADD;
876: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Error in notify promotions: '||SQLERRM);
877: END IF;
878: -- Standard call to get message count and if count=1, get the message
879: FND_MSG_PUB.Count_And_Get (
880: p_encoded => FND_API.G_FALSE,
881: p_count => x_msg_count,
882: p_data => x_msg_data
883: );

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

882: p_data => x_msg_data
883: );
884: IF x_msg_count > 1 THEN
885: FOR I IN 1..x_msg_count LOOP
886: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
887: END LOOP;
888: END IF;
889:
890: END Notify_Promotions;