DBA Data[Home] [Help]

APPS.AS_FOUNDATION_PVT dependencies on FND_MSG_PUB

Line 30: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)

26:
27: if (p_col_choice is NULL and p_col_name is NOT NULL)
28: or (p_col_choice is NOT NULL and p_col_name is NULL)
29: then
30: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
31: then
32: fnd_message.set_name('AS', 'API_MISSING_ORDERBY_ELEMENT');
33: fnd_msg_pub.add;
34: end if;

Line 33: fnd_msg_pub.add;

29: then
30: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
31: then
32: fnd_message.set_name('AS', 'API_MISSING_ORDERBY_ELEMENT');
33: fnd_msg_pub.add;
34: end if;
35: raise fnd_api.g_exc_error;
36: end if;
37:

Line 43: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)

39: -- Greater than maximum order by columns
40: or floor(p_col_choice/10) = 0
41: -- only one digit
42: then
43: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
44: then
45: fnd_message.set_name('AS', 'API_INVALID_ORDERBY_CHOICE');
46: fnd_message.set_token('PARAM',p_col_choice, false);
47: fnd_msg_pub.add;

Line 47: fnd_msg_pub.add;

43: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
44: then
45: fnd_message.set_name('AS', 'API_INVALID_ORDERBY_CHOICE');
46: fnd_message.set_token('PARAM',p_col_choice, false);
47: fnd_msg_pub.add;
48: end if;
49: raise fnd_api.g_exc_error;
50: return '';
51: end if;

Line 66: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)

62: elsif (mod(p_col_choice, 10) = 0)
63: then
64: return(l_col_name || ' DESC, ');
65: else
66: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
67: then
68: fnd_message.set_name('AS', 'API_INVALID_ORDERBY_CHOICE');
69: fnd_message.set_token('PARAM',p_col_choice, false);
70: fnd_msg_pub.add;

Line 70: fnd_msg_pub.add;

66: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
67: then
68: fnd_message.set_name('AS', 'API_INVALID_ORDERBY_CHOICE');
69: fnd_message.set_token('PARAM',p_col_choice, false);
70: fnd_msg_pub.add;
71: end if;
72: raise fnd_api.g_exc_error;
73: return '';
74: end if;

Line 103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

99: p_api_version_number,
100: l_api_name,
101: G_PKG_NAME)
102: THEN
103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
104: THEN
105: FND_MESSAGE.Set_Name('AS', 'API_UNEXP_ERROR_IN_PROCESSING');
106: FND_MESSAGE.Set_Token('ROW', 'TRANSLATE_ORDERBY', TRUE);
107: FND_MSG_PUB.ADD;

Line 107: FND_MSG_PUB.ADD;

103: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
104: THEN
105: FND_MESSAGE.Set_Name('AS', 'API_UNEXP_ERROR_IN_PROCESSING');
106: FND_MESSAGE.Set_Token('ROW', 'TRANSLATE_ORDERBY', TRUE);
107: FND_MSG_PUB.ADD;
108: END IF;
109: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
110: END IF;
111:

Line 115: FND_MSG_PUB.initialize;

111:
112: -- Initialize message list if p_init_msg_list is set to TRUE.
113: IF FND_API.to_Boolean( p_init_msg_list )
114: THEN
115: FND_MSG_PUB.initialize;
116: END IF;
117:
118: -- Initialize API return status to success
119: --

Line 130: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

126: -- Validate Environment
127:
128: IF FND_GLOBAL.User_Id IS NULL
129: THEN
130: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
131: THEN
132: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
133: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
134: FND_MSG_PUB.ADD;

Line 134: FND_MSG_PUB.ADD;

130: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
131: THEN
132: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
133: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
134: FND_MSG_PUB.ADD;
135: END IF;
136: END IF;
137:
138: -- initialize the table to ''.

Line 247: FND_MSG_PUB.Count_And_Get

243: WHEN FND_API.G_EXC_ERROR THEN
244:
245: x_return_status := FND_API.G_RET_STS_ERROR ;
246:
247: FND_MSG_PUB.Count_And_Get
248: ( p_count => x_msg_count,
249: p_data => x_msg_data
250: );
251:

Line 257: FND_MSG_PUB.Count_And_Get

253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
254:
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
256:
257: FND_MSG_PUB.Count_And_Get
258: ( p_count => x_msg_count,
259: p_data => x_msg_data
260: );
261:

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

264:
265:
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
267:
268: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
269: THEN
270: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
271: END IF;
272:

Line 270: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
267:
268: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
269: THEN
270: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
271: END IF;
272:
273: FND_MSG_PUB.Count_And_Get
274: ( p_count => x_msg_count,

Line 273: FND_MSG_PUB.Count_And_Get

269: THEN
270: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
271: END IF;
272:
273: FND_MSG_PUB.Count_And_Get
274: ( p_count => x_msg_count,
275: p_data => x_msg_data
276: );
277:

Line 327: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

323: p_api_version_number,
324: l_api_name,
325: G_PKG_NAME)
326: THEN
327: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
328: THEN
329: FND_MESSAGE.Set_Name('AS', 'API_UNEXP_ERROR_IN_PROCESSING');
330: FND_MESSAGE.Set_Token('ROW', 'AS_ACCESSES', TRUE);
331: FND_MSG_PUB.ADD;

Line 331: FND_MSG_PUB.ADD;

327: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
328: THEN
329: FND_MESSAGE.Set_Name('AS', 'API_UNEXP_ERROR_IN_PROCESSING');
330: FND_MESSAGE.Set_Token('ROW', 'AS_ACCESSES', TRUE);
331: FND_MSG_PUB.ADD;
332: END IF;
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END IF;
335:

Line 339: FND_MSG_PUB.initialize;

335:
336: -- Initialize message list if p_init_msg_list is set to TRUE.
337: IF FND_API.to_Boolean( p_init_msg_list )
338: THEN
339: FND_MSG_PUB.initialize;
340: END IF;
341:
342: -- Initialize API return status to success
343: --

Line 354: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)

350: -- Validate Environment
351:
352: IF FND_GLOBAL.User_Id IS NULL
353: THEN
354: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
355: THEN
356: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
357: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
358: FND_MSG_PUB.ADD;

Line 358: FND_MSG_PUB.ADD;

354: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
355: THEN
356: FND_MESSAGE.Set_Name('AS', 'UT_CANNOT_GET_PROFILE_VALUE');
357: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
358: FND_MSG_PUB.ADD;
359: END IF;
360: END IF;
361:
362: l_period_set_name := fnd_profile.value('AS_FORECAST_CALENDAR');

Line 380: FND_MSG_PUB.Count_And_Get

376: WHEN FND_API.G_EXC_ERROR THEN
377:
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379:
380: FND_MSG_PUB.Count_And_Get
381: ( p_count => x_msg_count,
382: p_data => x_msg_data
383: );
384:

Line 390: FND_MSG_PUB.Count_And_Get

386: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
387:
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
389:
390: FND_MSG_PUB.Count_And_Get
391: ( p_count => x_msg_count,
392: p_data => x_msg_data
393: );
394:

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

397:
398:
399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
400:
401: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
402: THEN
403: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
404: END IF;
405:

Line 403: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

399: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
400:
401: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
402: THEN
403: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
404: END IF;
405:
406: FND_MSG_PUB.Count_And_Get
407: ( p_count => x_msg_count,

Line 406: FND_MSG_PUB.Count_And_Get

402: THEN
403: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
404: END IF;
405:
406: FND_MSG_PUB.Count_And_Get
407: ( p_count => x_msg_count,
408: p_data => x_msg_data
409: );
410: end;

Line 675: FND_MSG_PUB.initialize;

671:
672:
673: -- Initialize message list if p_init_msg_list is set to TRUE.
674: IF FND_API.to_Boolean( p_init_msg_list ) THEN
675: FND_MSG_PUB.initialize;
676: END IF;
677:
678: -- Debug Message
679: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 679: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

675: FND_MSG_PUB.initialize;
676: END IF;
677:
678: -- Debug Message
679: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
680: -- THEN
681: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_items: Start');
682: -- END IF;
683:

Line 709: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

705:
706: If (p_inventory_item_rec.Inventory_Item_id IS NULL) Then
707:
708: -- Debug Message
709: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
710: -- THEN
711: -- dbms_output.put_line('AS_Foundation_PVT - Open NO ID Cursor to Select');
712: -- END IF;
713:

Line 722: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

718: p_inventory_item_rec.collateral_flag,
719: p_inventory_item_rec.bom_item_type );
720:
721: -- Debug Message
722: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
723: -- THEN
724: -- dbms_output.put_line('AS_Foundation_PVT - Fetching');
725: -- END IF;
726:

Line 752: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

748: x_inventory_item_tbl(l_cur_index) := l_inventory_item_rec;
749: End Loop;
750:
751: -- Debug Message
752: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
753: -- dbms_output.put_line('AS_Foundation_PVT - Closing Cursor');
754: -- dbms_output.put_line('AS_Foundation_PVT - retrived lines =' || to_char(l_cur_index));
755: -- END IF;
756:

Line 761: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

757: Close C_Get_inv_items_NO_inv_id;
758: Else
759:
760: -- Debug Message
761: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
762: -- dbms_output.put_line('AS_Foundation_PVT - Open With ID Cursor to Select');
763: -- END IF;
764:
765: Open C_Get_inv_items_w_inv_id(p_inventory_item_rec.inventory_item_id,

Line 773: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

769: p_inventory_item_rec.collateral_flag,
770: p_inventory_item_rec.bom_item_type );
771:
772: -- Debug Message
773: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
774: -- dbms_output.put_line('AS_Foundation_PVT - Fetching');
775: -- END IF;
776:
777: Loop

Line 802: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

798: x_inventory_item_tbl(l_cur_index) := l_inventory_item_rec;
799: End Loop;
800:
801: -- Debug Message
802: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
803: -- dbms_output.put_line('AS_Foundation_PVT - Closing Cursor');
804: -- dbms_output.put_line('AS_Foundation_PVT - retrived lines =' || to_char(l_cur_index));
805: -- END IF;
806:

Line 817: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

813:
814: x_return_status := FND_API.G_RET_STS_SUCCESS;
815:
816: -- Success Message
817: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
818: THEN
819: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
820: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
821: FND_MSG_PUB.Add;

Line 821: FND_MSG_PUB.Add;

817: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
818: THEN
819: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
820: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
821: FND_MSG_PUB.Add;
822: END IF;
823:
824:
825: -- Debug Message

Line 826: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

822: END IF;
823:
824:
825: -- Debug Message
826: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
827: -- THEN
828: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_items: End');
829: -- END IF;
830:

Line 832: FND_MSG_PUB.Count_And_Get

828: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_items: End');
829: -- END IF;
830:
831: -- Standard call to get message count and if count is 1, get message info.
832: FND_MSG_PUB.Count_And_Get
833: ( p_count => x_msg_count,
834: p_data => x_msg_data
835: );
836:

Line 844: FND_MSG_PUB.Count_And_Get

840: WHEN FND_API.G_EXC_ERROR THEN
841:
842: x_return_status := FND_API.G_RET_STS_ERROR ;
843:
844: FND_MSG_PUB.Count_And_Get
845: ( p_count => x_msg_count,
846: p_data => x_msg_data
847: );
848:

Line 854: FND_MSG_PUB.Count_And_Get

850: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
851:
852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
853:
854: FND_MSG_PUB.Count_And_Get
855: ( p_count => x_msg_count,
856: p_data => x_msg_data
857: );
858:

Line 863: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

859: WHEN NO_DATA_FOUND THEN
860:
861: x_return_status := FND_API.G_RET_STS_ERROR ;
862:
863: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
864: -- THEN
865: -- dbms_output.put_line('AS_Foundation_PVT - Cannot Find Inventory Item');
866: -- END IF;
867:

Line 869: FND_MSG_PUB.Count_And_Get

865: -- dbms_output.put_line('AS_Foundation_PVT - Cannot Find Inventory Item');
866: -- END IF;
867:
868:
869: FND_MSG_PUB.Count_And_Get
870: ( p_count => x_msg_count,
871: p_data => x_msg_data
872: );
873:

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

876:
877:
878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
879:
880: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
881: THEN
882: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
883: END IF;
884:

Line 882: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
879:
880: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
881: THEN
882: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
883: END IF;
884:
885: FND_MSG_PUB.Count_And_Get
886: ( p_count => x_msg_count,

Line 885: FND_MSG_PUB.Count_And_Get

881: THEN
882: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
883: END IF;
884:
885: FND_MSG_PUB.Count_And_Get
886: ( p_count => x_msg_count,
887: p_data => x_msg_data
888: );
889:

Line 995: FND_MSG_PUB.initialize;

991:
992:
993: -- Initialize message list if p_init_msg_list is set to TRUE.
994: IF FND_API.to_Boolean( p_init_msg_list ) THEN
995: FND_MSG_PUB.initialize;
996: END IF;
997:
998: -- Debug Message
999: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 999: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

995: FND_MSG_PUB.initialize;
996: END IF;
997:
998: -- Debug Message
999: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1000: -- THEN
1001: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_itemPrice: Start');
1002: -- END IF;
1003:

Line 1028: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1024: -- API BODY
1025:
1026:
1027: -- Debug Message
1028: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1029: -- THEN
1030: -- dbms_output.put_line('AS_Foundation_PVT - Open Primary Cursor to Select');
1031: -- END IF;
1032:

Line 1038: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1034: p_inventory_item_rec.primary_uom_code,
1035: p_price_list_id );
1036:
1037: -- Debug Message
1038: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1039: -- THEN
1040: -- dbms_output.put_line('AS_Foundation_PVT - Fetching');
1041: -- END IF;
1042:

Line 1055: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1051: p_price_list_id );
1052:
1053:
1054: -- Debug Message
1055: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1056: -- dbms_output.put_line('AS_Foundation_PVT - Open Secondary Cursor');
1057: -- END IF;
1058:
1059: Fetch C_Get_inv_item_second_pr into l_list_price, l_currency_code;

Line 1062: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1058:
1059: Fetch C_Get_inv_item_second_pr into l_list_price, l_currency_code;
1060:
1061: If (C_Get_inv_item_second_pr%NOTFOUND = TRUE) Then
1062: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1063: -- dbms_output.put_line('AS_Foundation_PVT - Cannot Find List Price');
1064: -- END IF;
1065: l_list_price := NULL;
1066: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1072: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069: End if;
1070:
1071: -- Debug Message
1072: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1073: -- dbms_output.put_line('AS_Foundation_PVT - Closing Secondary Cursor');
1074: -- END IF;
1075:
1076: Close C_Get_inv_item_second_pr;

Line 1083: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1079: x_return_status := FND_API.G_RET_STS_SUCCESS;
1080: End if;
1081:
1082: -- Debug Message
1083: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1084: -- dbms_output.put_line('AS_Foundation_PVT - Closing Primary Cursor');
1085: -- END IF;
1086:
1087: Close C_Get_inv_item_price;

Line 1096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

1092: x_currency_code := l_currency_code;
1093:
1094:
1095: -- Success Message
1096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1097: THEN
1098: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1099: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1100: FND_MSG_PUB.Add;

Line 1100: FND_MSG_PUB.Add;

1096: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1097: THEN
1098: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1099: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1100: FND_MSG_PUB.Add;
1101: END IF;
1102:
1103:
1104: -- Debug Message

Line 1105: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1101: END IF;
1102:
1103:
1104: -- Debug Message
1105: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1106: --THEN
1107: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_itemPrice: End');
1108: -- END IF;
1109:

Line 1111: FND_MSG_PUB.Count_And_Get

1107: -- dbms_output.put_line('AS_Foundation_PVT.Get_inventory_itemPrice: End');
1108: -- END IF;
1109:
1110: -- Standard call to get message count and if count is 1, get message info.
1111: FND_MSG_PUB.Count_And_Get
1112: ( p_count => x_msg_count,
1113: p_data => x_msg_data
1114: );
1115:

Line 1123: FND_MSG_PUB.Count_And_Get

1119: WHEN FND_API.G_EXC_ERROR THEN
1120:
1121: x_return_status := FND_API.G_RET_STS_ERROR ;
1122:
1123: FND_MSG_PUB.Count_And_Get
1124: ( p_count => x_msg_count,
1125: p_data => x_msg_data
1126: );
1127:

Line 1133: FND_MSG_PUB.Count_And_Get

1129: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1130:
1131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1132:
1133: FND_MSG_PUB.Count_And_Get
1134: ( p_count => x_msg_count,
1135: p_data => x_msg_data
1136: );
1137:

Line 1142: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1138: WHEN NO_DATA_FOUND THEN
1139:
1140: x_return_status := FND_API.G_RET_STS_ERROR ;
1141:
1142: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1143: -- THEN
1144: -- dbms_output.put_line('AS_Foundation_PVT - Cannot Find Inventory Item List Price');
1145: -- END IF;
1146:

Line 1148: FND_MSG_PUB.Count_And_Get

1144: -- dbms_output.put_line('AS_Foundation_PVT - Cannot Find Inventory Item List Price');
1145: -- END IF;
1146:
1147:
1148: FND_MSG_PUB.Count_And_Get
1149: ( p_count => x_msg_count,
1150: p_data => x_msg_data
1151: );
1152:

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

1155:
1156:
1157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1158:
1159: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1160: THEN
1161: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1162: END IF;
1163:

Line 1161: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1158:
1159: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1160: THEN
1161: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1162: END IF;
1163:
1164: FND_MSG_PUB.Count_And_Get
1165: ( p_count => x_msg_count,

Line 1164: FND_MSG_PUB.Count_And_Get

1160: THEN
1161: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1162: END IF;
1163:
1164: FND_MSG_PUB.Count_And_Get
1165: ( p_count => x_msg_count,
1166: p_data => x_msg_data
1167: );
1168:

Line 1208: FND_MSG_PUB.initialize;

1204: END IF;
1205:
1206: -- Initialize message list if p_init_msg_list is set to TRUE.
1207: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1208: FND_MSG_PUB.initialize;
1209: END IF;
1210:
1211: -- Debug Message
1212: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1212: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1208: FND_MSG_PUB.initialize;
1209: END IF;
1210:
1211: -- Debug Message
1212: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1213: -- THEN
1214: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_List_Id: Start');
1215: -- END IF;
1216:

Line 1221: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1217: -- Initialize API return status to success
1218: x_return_status := FND_API.G_RET_STS_SUCCESS;
1219:
1220: -- Debug Message
1221: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1222: -- THEN
1223: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_List_Id - Open Price list Cursor');
1224: -- END IF;
1225:

Line 1233: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1229: -- END IF;
1230: OPEN l_price_list_id_csr(FND_PROFILE.Value('AS_MC_PRICE_LIST_GROUP'),p_currency_code);
1231:
1232: -- Debug Message
1233: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1234: -- THEN
1235: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_List_Id - Fetching');
1236: -- END IF;
1237:

Line 1243: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1239: -- Fix bug 858247 Jshang, when price list id is missing, set it to NULL instead of 0
1240: IF l_price_list_id_csr%NOTFOUND THEN
1241: -- l_price_list_id := 0;
1242: l_price_list_id := NULL;
1243: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1244: -- dbms_output.put_line('AS_FOUNDATION_PVT.Get_Price_List_Id - No Price List Id is found');
1245: -- END IF;
1246: x_return_status := FND_API.G_RET_STS_SUCCESS;
1247: Else

Line 1255: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

1251: x_price_list_id := l_price_list_id;
1252:
1253:
1254: -- Success Message
1255: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1256: THEN
1257: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1258: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1259: FND_MSG_PUB.Add;

Line 1259: FND_MSG_PUB.Add;

1255: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1256: THEN
1257: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1258: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1259: FND_MSG_PUB.Add;
1260: END IF;
1261:
1262: -- Debug Message
1263: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1263: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1259: FND_MSG_PUB.Add;
1260: END IF;
1261:
1262: -- Debug Message
1263: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1264: -- THEN
1265: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_List_Id: End');
1266: -- END IF;
1267:

Line 1269: FND_MSG_PUB.Count_And_Get

1265: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_List_Id: End');
1266: -- END IF;
1267:
1268: -- Standard call to get message count and if count is 1, get message info.
1269: FND_MSG_PUB.Count_And_Get
1270: ( p_count => x_msg_count,
1271: p_data => x_msg_data
1272: );
1273:

Line 1278: FND_MSG_PUB.Count_And_Get

1274: EXCEPTION
1275:
1276: WHEN FND_API.G_EXC_ERROR THEN
1277: x_return_status := FND_API.G_RET_STS_ERROR ;
1278: FND_MSG_PUB.Count_And_Get
1279: ( p_count => x_msg_count,
1280: p_data => x_msg_data
1281: );
1282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1284: FND_MSG_PUB.Count_And_Get

1280: p_data => x_msg_data
1281: );
1282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1283: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1284: FND_MSG_PUB.Count_And_Get
1285: ( p_count => x_msg_count,
1286: p_data => x_msg_data
1287: );
1288: WHEN NO_DATA_FOUND THEN

Line 1290: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1286: p_data => x_msg_data
1287: );
1288: WHEN NO_DATA_FOUND THEN
1289: x_return_status := FND_API.G_RET_STS_ERROR ;
1290: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1291: -- THEN
1292: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1293: -- END IF;
1294: FND_MSG_PUB.Count_And_Get

Line 1294: FND_MSG_PUB.Count_And_Get

1290: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1291: -- THEN
1292: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1293: -- END IF;
1294: FND_MSG_PUB.Count_And_Get
1295: ( p_count => x_msg_count,
1296: p_data => x_msg_data
1297: );
1298: WHEN OTHERS THEN

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

1296: p_data => x_msg_data
1297: );
1298: WHEN OTHERS THEN
1299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1300: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1301: THEN
1302: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1303: END IF;
1304: FND_MSG_PUB.Count_And_Get

Line 1302: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1298: WHEN OTHERS THEN
1299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1300: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1301: THEN
1302: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1303: END IF;
1304: FND_MSG_PUB.Count_And_Get
1305: ( p_count => x_msg_count,
1306: p_data => x_msg_data

Line 1304: FND_MSG_PUB.Count_And_Get

1300: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1301: THEN
1302: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1303: END IF;
1304: FND_MSG_PUB.Count_And_Get
1305: ( p_count => x_msg_count,
1306: p_data => x_msg_data
1307: );
1308:

Line 1353: FND_MSG_PUB.initialize;

1349: END IF;
1350:
1351: -- Initialize message list if p_init_msg_list is set to TRUE.
1352: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1353: FND_MSG_PUB.initialize;
1354: END IF;
1355:
1356: -- Debug Message
1357: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1357: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1353: FND_MSG_PUB.initialize;
1354: END IF;
1355:
1356: -- Debug Message
1357: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1358: -- THEN
1359: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info: Start');
1360: -- END IF;
1361:

Line 1378: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1374: x_price_list_id => l_price_list_id);
1375: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1376: raise FND_API.G_EXC_ERROR;
1377: END IF;
1378: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1379: -- dbms_output.put_line('AS_FOUNDATION_PVT.Get_Price_Info - Price_list_id : ' || to_char(l_price_list_id));
1380: -- END IF;
1381: Get_inventory_itemPrice( p_api_version_number => 2.0,
1382: p_init_msg_list => FND_API.G_FALSE,

Line 1400: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1396: Elsif (p_secondary_interest_code_id IS NOT NULL) THEN
1397: open l_secondary_price_csr(p_secondary_interest_code_id,p_currency_code);
1398: fetch l_secondary_price_csr into l_price;
1399: IF l_secondary_price_csr%NOTFOUND THEN
1400: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1401: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info - Cannot find price');
1402: -- END IF;
1403: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1404: FND_MESSAGE.Set_Name('AS','FC_SEC_NO_LIST_PRICE');

Line 1403: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

1399: IF l_secondary_price_csr%NOTFOUND THEN
1400: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1401: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info - Cannot find price');
1402: -- END IF;
1403: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1404: FND_MESSAGE.Set_Name('AS','FC_SEC_NO_LIST_PRICE');
1405: FND_MSG_PUB.ADD;
1406: END IF;
1407: l_price := NULL;

Line 1405: FND_MSG_PUB.ADD;

1401: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info - Cannot find price');
1402: -- END IF;
1403: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1404: FND_MESSAGE.Set_Name('AS','FC_SEC_NO_LIST_PRICE');
1405: FND_MSG_PUB.ADD;
1406: END IF;
1407: l_price := NULL;
1408: -- close l_secondary_price_csr;
1409: -- raise FND_API.G_EXC_ERROR;

Line 1413: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1409: -- raise FND_API.G_EXC_ERROR;
1410: END IF;
1411: close l_secondary_price_csr;
1412: Else
1413: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1414: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info - Wrong Parameter');
1415: -- END IF;
1416: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1417: FND_MESSAGE.Set_Name('AS','API_UNEXP_ERROR_IN_PROCESSING');

Line 1416: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1412: Else
1413: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1414: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info - Wrong Parameter');
1415: -- END IF;
1416: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1417: FND_MESSAGE.Set_Name('AS','API_UNEXP_ERROR_IN_PROCESSING');
1418: FND_MESSAGE.Set_Token('ROW','AS_FOUNDATION');
1419: FND_MSG_PUB.ADD;
1420: END IF;

Line 1419: FND_MSG_PUB.ADD;

1415: -- END IF;
1416: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1417: FND_MESSAGE.Set_Name('AS','API_UNEXP_ERROR_IN_PROCESSING');
1418: FND_MESSAGE.Set_Token('ROW','AS_FOUNDATION');
1419: FND_MSG_PUB.ADD;
1420: END IF;
1421: raise FND_API.G_EXC_ERROR;
1422: END IF;
1423: x_price_list_id := l_price_list_id;

Line 1426: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)

1422: END IF;
1423: x_price_list_id := l_price_list_id;
1424: x_price := l_price;
1425: -- Success Message
1426: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1427: THEN
1428: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1429: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1430: FND_MSG_PUB.Add;

Line 1430: FND_MSG_PUB.Add;

1426: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1427: THEN
1428: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1429: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1430: FND_MSG_PUB.Add;
1431: END IF;
1432:
1433: -- Debug Message
1434: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

Line 1434: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1430: FND_MSG_PUB.Add;
1431: END IF;
1432:
1433: -- Debug Message
1434: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1435: -- THEN
1436: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info: End');
1437: -- END IF;
1438:

Line 1440: FND_MSG_PUB.Count_And_Get

1436: -- dbms_output.put_line('AS_Foundation_PVT.Get_Price_Info: End');
1437: -- END IF;
1438:
1439: -- Standard call to get message count and if count is 1, get message info.
1440: FND_MSG_PUB.Count_And_Get
1441: ( p_count => x_msg_count,
1442: p_data => x_msg_data
1443: );
1444:

Line 1449: FND_MSG_PUB.Count_And_Get

1445: EXCEPTION
1446:
1447: WHEN FND_API.G_EXC_ERROR THEN
1448: x_return_status := FND_API.G_RET_STS_ERROR ;
1449: FND_MSG_PUB.Count_And_Get
1450: ( p_count => x_msg_count,
1451: p_data => x_msg_data
1452: );
1453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1455: FND_MSG_PUB.Count_And_Get

1451: p_data => x_msg_data
1452: );
1453: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1454: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1455: FND_MSG_PUB.Count_And_Get
1456: ( p_count => x_msg_count,
1457: p_data => x_msg_data
1458: );
1459: WHEN NO_DATA_FOUND THEN

Line 1461: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1457: p_data => x_msg_data
1458: );
1459: WHEN NO_DATA_FOUND THEN
1460: x_return_status := FND_API.G_RET_STS_ERROR ;
1461: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1462: -- THEN
1463: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1464: -- END IF;
1465: FND_MSG_PUB.Count_And_Get

Line 1465: FND_MSG_PUB.Count_And_Get

1461: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1462: -- THEN
1463: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1464: -- END IF;
1465: FND_MSG_PUB.Count_And_Get
1466: ( p_count => x_msg_count,
1467: p_data => x_msg_data
1468: );
1469: WHEN OTHERS THEN

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

1467: p_data => x_msg_data
1468: );
1469: WHEN OTHERS THEN
1470: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1471: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1472: THEN
1473: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1474: END IF;
1475: FND_MSG_PUB.Count_And_Get

Line 1473: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1469: WHEN OTHERS THEN
1470: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1471: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1472: THEN
1473: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1474: END IF;
1475: FND_MSG_PUB.Count_And_Get
1476: ( p_count => x_msg_count,
1477: p_data => x_msg_data

Line 1475: FND_MSG_PUB.Count_And_Get

1471: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1472: THEN
1473: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1474: END IF;
1475: FND_MSG_PUB.Count_And_Get
1476: ( p_count => x_msg_count,
1477: p_data => x_msg_data
1478: );
1479:

Line 1574: FND_MSG_PUB.initialize;

1570: END IF;
1571:
1572: -- Initialize message list if p_init_msg_list is set to TRUE.
1573: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1574: FND_MSG_PUB.initialize;
1575: END IF;
1576:
1577: -- Debug Message
1578: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 1578: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1574: FND_MSG_PUB.initialize;
1575: END IF;
1576:
1577: -- Debug Message
1578: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1579: -- dbms_output.put_line('AS_Foundation_PVT.Check_Volume_Amount: Start');
1580: -- END IF;
1581:
1582: -- Initialize API return status to success

Line 1588: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1584:
1585: -- API body
1586: l_volume_forecast_enable := NVL(FND_PROFILE.Value('AS_VOLUME_FORECASTING_ENABLED'),'N');
1587: -- Debug Message
1588: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1589: -- dbms_output.put_line('AS_Foundation_PVT - AS_VOLUME_FORECASTING_ENABLED:' || l_volume_forecast_enable);
1590: -- END IF;
1591: x_vol_tolerance_margin := l_vol_tolerance_margin;
1592: IF (p_inventory_item_rec.inventory_item_id IS NOT NULL) THEN

Line 1603: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1599: x_msg_count => l_msg_count,
1600: x_msg_data => l_msg_data,
1601: x_inventory_item_tbl => l_inv_item_tbl);
1602: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1603: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1604: -- dbms_output.put_line('AS_FOUNDATION_PVT - Item : Not Found');
1605: -- END IF;
1606: raise FND_API.G_EXC_ERROR;
1607: END IF;

Line 1613: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1609: l_inv_item_tbl(1).Primary_UOM_Code := p_inventory_item_rec.Primary_UOM_Code;
1610: END IF;
1611: x_uom_code := l_inv_item_tbl(1).Primary_UOM_Code;
1612: -- Debug Message
1613: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1614: -- dbms_output.put_line('AS_Foundation_PVT - UOM:' || x_uom_code);
1615: -- END IF;
1616: Get_Price_Info(
1617: p_api_version_number => 2.0,

Line 1641: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1637: x_price_list_id => l_price_list_id,
1638: x_price => l_price);
1639: END IF;
1640: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1641: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1642: -- dbms_output.put_line('AS_FOUNDATION_PVT - Price : Not Found');
1643: -- END IF;
1644: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1645: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');

Line 1644: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1640: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1641: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1642: -- dbms_output.put_line('AS_FOUNDATION_PVT - Price : Not Found');
1643: -- END IF;
1644: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1645: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1646: FND_MESSAGE.Set_Token('COLUMN','Price', FALSE);
1647: FND_MSG_PUB.ADD;
1648: END IF;

Line 1647: FND_MSG_PUB.ADD;

1643: -- END IF;
1644: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1645: FND_MESSAGE.Set_Name('AS', 'API_MISSING_ID');
1646: FND_MESSAGE.Set_Token('COLUMN','Price', FALSE);
1647: FND_MSG_PUB.ADD;
1648: END IF;
1649: raise FND_API.G_EXC_ERROR;
1650: END IF;
1651:

Line 1665: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1661: x_amount := NULL;
1662: ELSE
1663: x_amount := p_amount;
1664: END IF;
1665: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1666: -- dbms_output.put_line('AS_FOUNDATION_PVT - price is missing');
1667: -- END IF;
1668: ELSE
1669: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 1669: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1665: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1666: -- dbms_output.put_line('AS_FOUNDATION_PVT - price is missing');
1667: -- END IF;
1668: ELSE
1669: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1670: --dbms_output.put_line('AS_FOUNDATION_PVT - volume and amount are missing');
1671: -- END IF;
1672: x_volume := NULL;
1673: x_amount := NULL;

Line 1687: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1683: x_volume := p_volume;
1684: l_amount_floor := p_volume * l_price * (100 - l_vol_tolerance_margin) / 100;
1685: l_amount_ceiling := p_volume * l_price * (100 + l_vol_tolerance_margin) / 100;
1686: IF p_amount > l_amount_ceiling OR p_amount < l_amount_floor THEN
1687: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1688: -- dbms_output.put_line('AS_FOUNDATION_PVT - Validate volume, amount : Exceeds Margin');
1689: -- END IF;
1690: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1691: FND_MESSAGE.Set_Name('AS', 'API_EXCEED_MARGIN');

Line 1690: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

1686: IF p_amount > l_amount_ceiling OR p_amount < l_amount_floor THEN
1687: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1688: -- dbms_output.put_line('AS_FOUNDATION_PVT - Validate volume, amount : Exceeds Margin');
1689: -- END IF;
1690: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1691: FND_MESSAGE.Set_Name('AS', 'API_EXCEED_MARGIN');
1692: FND_MSG_PUB.ADD;
1693: END IF;
1694: raise FND_API.G_EXC_ERROR;

Line 1692: FND_MSG_PUB.ADD;

1688: -- dbms_output.put_line('AS_FOUNDATION_PVT - Validate volume, amount : Exceeds Margin');
1689: -- END IF;
1690: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1691: FND_MESSAGE.Set_Name('AS', 'API_EXCEED_MARGIN');
1692: FND_MSG_PUB.ADD;
1693: END IF;
1694: raise FND_API.G_EXC_ERROR;
1695: END IF;
1696: END IF; -- End of p_volume and p_amount Checking

Line 1712: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN

1708:
1709: x_price_list_id := l_price_list_id;
1710: x_price := l_price;
1711: -- Success Message
1712: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1713: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1714: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1715: FND_MSG_PUB.Add;
1716: END IF;

Line 1715: FND_MSG_PUB.Add;

1711: -- Success Message
1712: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS) THEN
1713: FND_MESSAGE.Set_Name('AS', 'API_SUCCESS');
1714: FND_MESSAGE.Set_Token('ROW', 'AS_Foundation', TRUE);
1715: FND_MSG_PUB.Add;
1716: END IF;
1717:
1718: -- Debug Message
1719: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 1719: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1715: FND_MSG_PUB.Add;
1716: END IF;
1717:
1718: -- Debug Message
1719: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1720: -- dbms_output.put_line('AS_Foundation_PVT.Check_Volume_Amount: End');
1721: -- END IF;
1722:
1723: -- Standard call to get message count and if count is 1, get message info.

Line 1724: FND_MSG_PUB.Count_And_Get

1720: -- dbms_output.put_line('AS_Foundation_PVT.Check_Volume_Amount: End');
1721: -- END IF;
1722:
1723: -- Standard call to get message count and if count is 1, get message info.
1724: FND_MSG_PUB.Count_And_Get
1725: ( p_count => x_msg_count,
1726: p_data => x_msg_data
1727: );
1728:

Line 1732: FND_MSG_PUB.Count_And_Get

1728:
1729: EXCEPTION
1730: WHEN FND_API.G_EXC_ERROR THEN
1731: x_return_status := FND_API.G_RET_STS_ERROR ;
1732: FND_MSG_PUB.Count_And_Get
1733: ( p_count => x_msg_count,
1734: p_data => x_msg_data
1735: );
1736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1738: FND_MSG_PUB.Count_And_Get

1734: p_data => x_msg_data
1735: );
1736: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1737: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1738: FND_MSG_PUB.Count_And_Get
1739: ( p_count => x_msg_count,
1740: p_data => x_msg_data
1741: );
1742: WHEN NO_DATA_FOUND THEN

Line 1744: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)

1740: p_data => x_msg_data
1741: );
1742: WHEN NO_DATA_FOUND THEN
1743: x_return_status := FND_API.G_RET_STS_ERROR ;
1744: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1745: -- THEN
1746: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1747: -- END IF;
1748: FND_MSG_PUB.Count_And_Get

Line 1748: FND_MSG_PUB.Count_And_Get

1744: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
1745: -- THEN
1746: -- dbms_output.put_line('AS_Foundation_PVT. - Cannot Find Price List Id');
1747: -- END IF;
1748: FND_MSG_PUB.Count_And_Get
1749: ( p_count => x_msg_count,
1750: p_data => x_msg_data
1751: );
1752: WHEN OTHERS THEN

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

1750: p_data => x_msg_data
1751: );
1752: WHEN OTHERS THEN
1753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1754: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1755: THEN
1756: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1757: END IF;
1758: FND_MSG_PUB.Count_And_Get

Line 1756: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1752: WHEN OTHERS THEN
1753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1754: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1755: THEN
1756: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1757: END IF;
1758: FND_MSG_PUB.Count_And_Get
1759: ( p_count => x_msg_count,
1760: p_data => x_msg_data

Line 1758: FND_MSG_PUB.Count_And_Get

1754: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1755: THEN
1756: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1757: END IF;
1758: FND_MSG_PUB.Count_And_Get
1759: ( p_count => x_msg_count,
1760: p_data => x_msg_data
1761: );
1762: END Check_Volume_Amount;

Line 1770: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1766: p_flex_where_tbl_type IN AS_FOUNDATION_PVT.flex_where_tbl_type,
1767: x_flex_where_clause OUT NOCOPY VARCHAR2) IS
1768: l_flex_where_cl VARCHAR2(2000) := NULL;
1769: BEGIN
1770: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1771: -- dbms_output.put_line('AS_FOUNDATION_PVT Generate Flexfield Where: begin');
1772: -- END IF;
1773:
1774: FOR i IN 1..p_flex_where_tbl_type.count LOOP

Line 1783: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1779: END IF;
1780: END LOOP;
1781: x_flex_where_clause := l_flex_where_cl;
1782:
1783: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1784: -- dbms_output.put_line('AS_FOUNDATION_PVT Generate Flexfield Where: end');
1785: -- END IF;
1786: END;
1787:

Line 1793: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1789: p_flex_where_tbl_type IN AS_FOUNDATION_PVT.flex_where_tbl_type,
1790: x_flex_where_clause OUT NOCOPY VARCHAR2) IS
1791: l_flex_where_cl VARCHAR2(2000) := NULL;
1792: BEGIN
1793: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1794: -- dbms_output.put_line('AS_FOUNDATION_PVT Generate Flexfield Where: begin');
1795: -- END IF;
1796:
1797: FOR i IN 1..p_flex_where_tbl_type.count LOOP

Line 1806: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1802: END IF;
1803: END LOOP;
1804: x_flex_where_clause := l_flex_where_cl;
1805:
1806: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1807: -- dbms_output.put_line('AS_FOUNDATION_PVT Generate Flexfield Where: end');
1808: -- END IF;
1809: END;
1810:

Line 1815: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1811: PROCEDURE Bind_Flexfield_Where(
1812: p_cursor_id IN NUMBER,
1813: p_flex_where_tbl_type IN AS_FOUNDATION_PVT.flex_where_tbl_type) IS
1814: BEGIN
1815: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1816: -- dbms_output.put_line('AS_FOUNDATION_PVT Bind Flexfield Where: begin');
1817: -- END IF;
1818:
1819: FOR i IN 1..p_flex_where_tbl_type.count LOOP

Line 1827: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

1823: p_flex_where_tbl_type(i).value);
1824: END IF;
1825: END LOOP;
1826:
1827: -- IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
1828: -- dbms_output.put_line('AS_FOUNDATION_PVT Bind Flexfield Where: end');
1829: -- END IF;
1830: END;
1831:

Line 1860: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);

1856: and lng.language_id = x_lang_id;
1857: BEGIN
1858: FOR l_count in 1..p_message_count LOOP
1859:
1860: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);
1861: fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
1862: OPEN Get_Appl_Id (l_appl_short_name);
1863: FETCH Get_Appl_Id into l_id;
1864: CLOSE Get_Appl_Id;

Line 1875: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);

1871: FETCH Get_Message_Num into l_message_num;
1872: CLOSE Get_Message_Num;
1873: END IF;
1874:
1875: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);
1876:
1877: IF NVL(l_message_num, 0) <> 0
1878: THEN
1879: l_temp_msg := 'APP-' || to_char(l_message_num) || ': ';

Line 1887: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);

1883:
1884: IF l_count = 1
1885: THEN
1886: l_msg_list := l_msg_list || l_temp_msg ||
1887: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
1888: ELSE
1889: l_msg_list := l_msg_list || l_temp_msg ||
1890: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
1891: END IF;

Line 1890: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);

1886: l_msg_list := l_msg_list || l_temp_msg ||
1887: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
1888: ELSE
1889: l_msg_list := l_msg_list || l_temp_msg ||
1890: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
1891: END IF;
1892:
1893: l_msg_list := l_msg_list || '
1894: ';