DBA Data[Home] [Help]

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: -- Debug Message
148: IF g_debug THEN

Line 162: FND_MSG_PUB.add;

158: DPP_Utility_PVT.debug_message('Vendor ID cannot be NULL');
159: END IF;
160: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
161: FND_MESSAGE.set_token('ID', 'Vendor ID');
162: FND_MSG_PUB.add;
163: RAISE FND_API.G_EXC_ERROR;
164: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
165: IF g_debug THEN
166: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');

Line 170: FND_MSG_PUB.add;

166: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');
167: END IF;
168: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
169: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
170: FND_MSG_PUB.add;
171: RAISE FND_API.G_EXC_ERROR;
172: ELSE
173: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id)
174: LOOP

Line 207: FND_MSG_PUB.add;

203: DPP_Utility_PVT.debug_message('Inventory Item ID cannot be NULL');
204: END IF;
205: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
206: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
207: FND_MSG_PUB.add;
208: RAISE FND_API.G_EXC_ERROR;
209:
210: ELSE
211: OPEN get_pricelist_csr(l_pl_notify_line_tbl(i).inventory_item_id, l_pl_notify_hdr_rec.org_id);

Line 245: FND_MSG_PUB.Count_And_Get

241: IF g_debug THEN
242: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
243: END IF;
244: -- Standard call to get message count and if count is 1, get message info.
245: FND_MSG_PUB.Count_And_Get
246: (p_count => x_msg_count,
247: p_data => x_msg_data
248: );
249:

Line 258: FND_MSG_PUB.Count_And_Get (

254: WHEN FND_API.G_EXC_ERROR THEN
255:
256: x_return_status := FND_API.G_RET_STS_ERROR;
257: -- Standard call to get message count and if count=1, get the message
258: FND_MSG_PUB.Count_And_Get (
259: p_encoded => FND_API.G_FALSE,
260: p_count => x_msg_count,
261: p_data => x_msg_data
262: );

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

261: p_data => x_msg_data
262: );
263: IF x_msg_count > 1 THEN
264: FOR I IN 1..x_msg_count LOOP
265: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
266: END LOOP;
267: END IF;
268:
269:

Line 274: FND_MSG_PUB.Count_And_Get (

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

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

277: p_data => x_msg_data
278: );
279: IF x_msg_count > 1 THEN
280: FOR I IN 1..x_msg_count LOOP
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:

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

285:
286: WHEN OTHERS THEN
287:
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
289: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
290: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
291: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_OutboundPricelists');
292: fnd_message.set_token('ERRNO', sqlcode);
293: fnd_message.set_token('REASON', sqlerrm);

Line 296: FND_MSG_PUB.Count_And_Get (

292: fnd_message.set_token('ERRNO', sqlcode);
293: fnd_message.set_token('REASON', sqlerrm);
294: END IF;
295: -- Standard call to get message count and if count=1, get the message
296: FND_MSG_PUB.Count_And_Get (
297: p_encoded => FND_API.G_FALSE,
298: p_count => x_msg_count,
299: p_data => x_msg_data
300: );

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

299: p_data => x_msg_data
300: );
301: IF x_msg_count > 1 THEN
302: FOR I IN 1..x_msg_count LOOP
303: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
304: END LOOP;
305: END IF;
306:
307:

Line 450: FND_MSG_PUB.initialize;

446: END IF;
447: -- Initialize message list if p_init_msg_list is set to TRUE.
448: IF FND_API.to_Boolean( p_init_msg_list )
449: THEN
450: FND_MSG_PUB.initialize;
451: END IF;
452:
453: -- Debug Message
454: IF g_debug THEN

Line 469: FND_MSG_PUB.add;

465: DPP_Utility_PVT.debug_message('Vendor ID cannot be NULL');
466: END IF;
467: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
468: FND_MESSAGE.set_token('ID', 'Vendor ID');
469: FND_MSG_PUB.add;
470: RAISE FND_API.G_EXC_ERROR;
471: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
472: IF g_debug THEN
473: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');

Line 477: FND_MSG_PUB.add;

473: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');
474: END IF;
475: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
476: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
477: FND_MSG_PUB.add;
478: RAISE FND_API.G_EXC_ERROR;
479: ELSE
480: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id)
481: LOOP

Line 512: FND_MSG_PUB.add;

508: DPP_Utility_PVT.debug_message('Inventory Item ID cannot be NULL');
509: END IF;
510: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
511: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
512: FND_MSG_PUB.add;
513: RAISE FND_API.G_EXC_ERROR;
514:
515: ELSE
516:

Line 552: FND_MSG_PUB.Count_And_Get

548: IF g_debug THEN
549: DPP_UTILITY_PVT.debug_message('Private API: ' || l_full_name || 'end');
550: END IF;
551: -- Standard call to get message count and if count is 1, get message info.
552: FND_MSG_PUB.Count_And_Get
553: (p_count => x_msg_count,
554: p_data => x_msg_data
555: );
556:

Line 563: FND_MSG_PUB.Count_And_Get (

559: WHEN FND_API.G_EXC_ERROR THEN
560:
561: x_return_status := FND_API.G_RET_STS_ERROR;
562: -- Standard call to get message count and if count=1, get the message
563: FND_MSG_PUB.Count_And_Get (
564: p_encoded => FND_API.G_FALSE,
565: p_count => x_msg_count,
566: p_data => x_msg_data
567: );

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

566: p_data => x_msg_data
567: );
568: IF x_msg_count > 1 THEN
569: FOR I IN 1..x_msg_count LOOP
570: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
571: END LOOP;
572: END IF;
573:
574: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 578: FND_MSG_PUB.Count_And_Get (

574: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
575:
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
577: -- Standard call to get message count and if count=1, get the message
578: FND_MSG_PUB.Count_And_Get (
579: p_encoded => FND_API.G_FALSE,
580: p_count => x_msg_count,
581: p_data => x_msg_data
582: );

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

581: p_data => x_msg_data
582: );
583: IF x_msg_count > 1 THEN
584: FOR I IN 1..x_msg_count LOOP
585: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
586: END LOOP;
587: END IF;
588:
589: WHEN OTHERS THEN

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

588:
589: WHEN OTHERS THEN
590:
591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
592: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
593: THEN
594: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
595: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_InboundPricelists');
596: fnd_message.set_token('ERRNO', sqlcode);

Line 598: FND_MSG_PUB.ADD;

594: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
595: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_InboundPricelists');
596: fnd_message.set_token('ERRNO', sqlcode);
597: fnd_message.set_token('REASON', sqlerrm);
598: FND_MSG_PUB.ADD;
599: DPP_UTILITY_PVT.debug_message('Error in notify inbound pricelists: '||SQLERRM);
600: END IF;
601: -- Standard call to get message count and if count=1, get the message
602: FND_MSG_PUB.Count_And_Get (

Line 602: FND_MSG_PUB.Count_And_Get (

598: FND_MSG_PUB.ADD;
599: DPP_UTILITY_PVT.debug_message('Error in notify inbound pricelists: '||SQLERRM);
600: END IF;
601: -- Standard call to get message count and if count=1, get the message
602: FND_MSG_PUB.Count_And_Get (
603: p_encoded => FND_API.G_FALSE,
604: p_count => x_msg_count,
605: p_data => x_msg_data
606: );

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

605: p_data => x_msg_data
606: );
607: IF x_msg_count > 1 THEN
608: FOR I IN 1..x_msg_count LOOP
609: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
610: END LOOP;
611: END IF;
612:
613: END Notify_InboundPricelists;

Line 762: FND_MSG_PUB.initialize;

758: END IF;
759: -- Initialize message list if p_init_msg_list is set to TRUE.
760: IF FND_API.to_Boolean( p_init_msg_list )
761: THEN
762: FND_MSG_PUB.initialize;
763: END IF;
764:
765: -- Debug Message
766: IF g_debug THEN

Line 782: FND_MSG_PUB.add;

778: DPP_Utility_PVT.debug_message('Vendor ID cannot be NULL');
779: END IF;
780: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
781: FND_MESSAGE.set_token('ID', 'Vendor ID');
782: FND_MSG_PUB.add;
783: RAISE FND_API.G_EXC_ERROR;
784: ELSIF l_pl_notify_hdr_rec.vendor_site_id IS NULL THEN
785: IF g_debug THEN
786: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');

Line 790: FND_MSG_PUB.add;

786: DPP_Utility_PVT.debug_message('Vendor Site ID cannot be NULL');
787: END IF;
788: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
789: FND_MESSAGE.set_token('ID', 'Vendor Site ID');
790: FND_MSG_PUB.add;
791: RAISE FND_API.G_EXC_ERROR;
792: ELSIF l_pl_notify_hdr_rec.org_id IS NULL THEN
793: IF g_debug THEN
794: DPP_Utility_PVT.debug_message('Org ID cannot be NULL');

Line 798: FND_MSG_PUB.add;

794: DPP_Utility_PVT.debug_message('Org ID cannot be NULL');
795: END IF;
796: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
797: FND_MESSAGE.set_token('ID', 'Org ID');
798: FND_MSG_PUB.add;
799: RAISE FND_API.G_EXC_ERROR;
800: ELSE
801: FOR get_vendor_rec IN get_vendor_csr(p_pl_notify_hdr_rec.vendor_id) LOOP
802: p_pl_notify_hdr_rec.vendor_name := get_vendor_rec.vendor_name;

Line 822: FND_MSG_PUB.add;

818: DPP_Utility_PVT.debug_message('Inventory Item ID cannot be NULL');
819: END IF;
820: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
821: FND_MESSAGE.set_token('ID', 'Inventory Item ID');
822: FND_MSG_PUB.add;
823: RAISE FND_API.G_EXC_ERROR;
824: ELSE
825: FOR get_item_number_rec IN get_item_number_csr(l_pl_notify_line_tbl(i).Inventory_Item_ID) LOOP
826: l_pl_notify_line_tbl(i).Item_Number := get_item_number_rec.concatenated_segments ;

Line 847: FND_MSG_PUB.add;

843: DPP_Utility_PVT.debug_message('Line detals cannot be NULL');
844: END IF;
845: FND_MESSAGE.set_name('DPP', 'DPP_API_INPUT_ID_MISSING');
846: FND_MESSAGE.set_token('ID', 'Line Details');
847: FND_MSG_PUB.add;
848: RAISE FND_API.G_EXC_ERROR;
849: END IF;
850: END IF;
851:

Line 863: FND_MSG_PUB.Count_And_Get

859: IF g_debug THEN
860: DPP_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
861: END IF;
862: -- Standard call to get message count and if count is 1, get message info.
863: FND_MSG_PUB.Count_And_Get
864: (p_count => x_msg_count,
865: p_data => x_msg_data
866: );
867: EXCEPTION

Line 873: FND_MSG_PUB.Count_And_Get (

869: WHEN FND_API.G_EXC_ERROR THEN
870:
871: x_return_status := FND_API.G_RET_STS_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: );

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

876: p_data => x_msg_data
877: );
878: IF x_msg_count > 1 THEN
879: FOR I IN 1..x_msg_count LOOP
880: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
881: END LOOP;
882: END IF;
883:
884:

Line 889: FND_MSG_PUB.Count_And_Get (

885: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
886:
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: -- Standard call to get message count and if count=1, get the message
889: FND_MSG_PUB.Count_And_Get (
890: p_encoded => FND_API.G_FALSE,
891: p_count => x_msg_count,
892: p_data => x_msg_data
893: );

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

892: p_data => x_msg_data
893: );
894: IF x_msg_count > 1 THEN
895: FOR I IN 1..x_msg_count LOOP
896: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
897: END LOOP;
898: END IF;
899:
900: WHEN OTHERS THEN

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

899:
900: WHEN OTHERS THEN
901:
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
904: THEN
905: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
906: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_Promotions');
907: fnd_message.set_token('ERRNO', sqlcode);

Line 909: FND_MSG_PUB.ADD;

905: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
906: fnd_message.set_token('ROUTINE', 'DPP_PRICING_PVT.Notify_Promotions');
907: fnd_message.set_token('ERRNO', sqlcode);
908: fnd_message.set_token('REASON', sqlerrm);
909: FND_MSG_PUB.ADD;
910: DPP_UTILITY_PVT.debug_message('Error in notify promotions: '||SQLERRM);
911: END IF;
912: -- Standard call to get message count and if count=1, get the message
913: FND_MSG_PUB.Count_And_Get (

Line 913: FND_MSG_PUB.Count_And_Get (

909: FND_MSG_PUB.ADD;
910: DPP_UTILITY_PVT.debug_message('Error in notify promotions: '||SQLERRM);
911: END IF;
912: -- Standard call to get message count and if count=1, get the message
913: FND_MSG_PUB.Count_And_Get (
914: p_encoded => FND_API.G_FALSE,
915: p_count => x_msg_count,
916: p_data => x_msg_data
917: );

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

916: p_data => x_msg_data
917: );
918: IF x_msg_count > 1 THEN
919: FOR I IN 1..x_msg_count LOOP
920: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
921: END LOOP;
922: END IF;
923:
924: END Notify_Promotions;