[Home] [Help]
133: x_return_status := FND_API.G_RET_STS_SUCCESS;
134:
135:
136: -- Standard call to get message count and if count is 1, get message info.
137: FND_MSG_PUB.Count_And_Get
138: ( p_count => x_msg_count,
139: p_data => x_msg_data
140: );
141:
143: WHEN FND_API.G_EXC_ERROR THEN
144: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
145: P_API_NAME => L_API_NAME
146: ,P_PKG_NAME => G_PKG_NAME
147: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
148: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
149: ,P_ROLLBACK_FLAG => l_Rollback
150: ,X_MSG_COUNT => X_MSG_COUNT
151: ,X_MSG_DATA => X_MSG_DATA
153: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
154: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
155: P_API_NAME => L_API_NAME
156: ,P_PKG_NAME => G_PKG_NAME
157: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
158: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
159: ,P_ROLLBACK_FLAG => l_Rollback
160: ,X_MSG_COUNT => X_MSG_COUNT
161: ,X_MSG_DATA => X_MSG_DATA
180: l_msg_index_out NUMBER;
181: x_msg_data_temp Varchar2(2000);
182: x_msg_data Varchar2(4000);
183: Begin
184: If fnd_msg_pub.count_msg > 0 Then
185: FOR i IN REVERSE 1..fnd_msg_pub.count_msg Loop
186: fnd_msg_pub.get(p_msg_index => i,
187: p_encoded => 'F',
188: p_data => x_msg_data_temp,
181: x_msg_data_temp Varchar2(2000);
182: x_msg_data Varchar2(4000);
183: Begin
184: If fnd_msg_pub.count_msg > 0 Then
185: FOR i IN REVERSE 1..fnd_msg_pub.count_msg Loop
186: fnd_msg_pub.get(p_msg_index => i,
187: p_encoded => 'F',
188: p_data => x_msg_data_temp,
189: p_msg_index_out => l_msg_index_out);
182: x_msg_data Varchar2(4000);
183: Begin
184: If fnd_msg_pub.count_msg > 0 Then
185: FOR i IN REVERSE 1..fnd_msg_pub.count_msg Loop
186: fnd_msg_pub.get(p_msg_index => i,
187: p_encoded => 'F',
188: p_data => x_msg_data_temp,
189: p_msg_index_out => l_msg_index_out);
190: x_msg_data := x_msg_data || x_msg_data_temp;
189: p_msg_index_out => l_msg_index_out);
190: x_msg_data := x_msg_data || x_msg_data_temp;
191: End Loop;
192: FND_FILE.put_line(FND_FILE.log,x_msg_data);
193: fnd_msg_pub.delete_msg;
194: End if;
195: End;
196:
197: PROCEDURE Generate_Recommendations (
289:
290: -- Initialize message list if p_init_msg_list is set to TRUE.
291: IF FND_API.to_Boolean( l_init_msg_list )
292: THEN
293: FND_MSG_PUB.initialize;
294: END IF;
295:
296:
297: -- Initialize API return status to SUCCESS
327: End If;
328: -- End If;
329: fnd_message.set_name('CSP','CSP_ASL_MSG');
330: fnd_message.set_token('VALUE','calculate_forecast');
331: fnd_msg_pub.add;
332: Add_Err_Msg;
333: -- Calculate New Product Planning
334: -- Re-establish Savepoint
335: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
346: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
347: End If;
348: fnd_message.set_name('CSP','CSP_ASL_MSG');
349: fnd_message.set_token('VALUE','calculate_new_product_planning');
350: fnd_msg_pub.add;
351: Add_Err_Msg;
352: -- Calculate Product Norm
353: If l_pnorm_count > 0 Then
354: -- Re-establish Savepoint
367: End If;
368: End If;
369: fnd_message.set_name('CSP','CSP_ASL_MSG');
370: fnd_message.set_token('VALUE','calculate_product_norm');
371: fnd_msg_pub.add;
372: Add_Err_Msg;
373: -- Calculate Territory Norm
374: If l_tnorm_count > 0 Then
375: -- Re-establish Savepoint
388: End If;
389: End If;
390: fnd_message.set_name('CSP','CSP_ASL_MSG');
391: fnd_message.set_token('VALUE','calculate_territory_norm');
392: fnd_msg_pub.add;
393: Add_Err_Msg;
394: -- Re-establish Savepoint
395: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
396: --- Create header records for Stock list items at Subinventory Level
444:
445: COMMIT;
446: fnd_message.set_name('CSP','CSP_ASL_MSG');
447: fnd_message.set_token('VALUE','Stock List Update');
448: fnd_msg_pub.add;
449: Add_Err_Msg;
450:
451: -- Re-establish Savepoint
452: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
502: COMMIT;
503:
504: fnd_message.set_name('CSP','CSP_ASL_MSG');
505: fnd_message.set_token('VALUE','Insert Usage Headers Update');
506: fnd_msg_pub.add;
507: Add_Err_Msg;
508: -- Re-establish Savepoint
509: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
510: INSERT INTO CSP_USAGE_HEADERS
616:
617: COMMIT;
618: fnd_message.set_name('CSP','CSP_ASL_MSG');
619: fnd_message.set_token('VALUE','Insert Usage Headers Update2');
620: fnd_msg_pub.add;
621: Add_Err_Msg;
622:
623: -- Re-establish Savepoint
624: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
636:
637: COMMIT;
638: fnd_message.set_name('CSP','CSP_ASL_MSG');
639: fnd_message.set_token('VALUE','Excluded Items');
640: fnd_msg_pub.add;
641: Add_Err_Msg;
642:
643: -- Re-establish Savepoint
644: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
674:
675: COMMIT;
676: fnd_message.set_name('CSP','CSP_ASL_MSG');
677: fnd_message.set_token('VALUE','Min Max');
678: fnd_msg_pub.add;
679: Add_Err_Msg;
680:
681: -- Re-establish Savepoint
682: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
710:
711: COMMIT;
712: fnd_message.set_name('CSP','CSP_ASL_MSG');
713: fnd_message.set_token('VALUE','Min Max');
714: fnd_msg_pub.add;
715: Add_Err_Msg;
716:
717: -- Re-establish Savepoint
718: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
774: and process_status = 'O';
775: COMMIT;
776: fnd_message.set_name('CSP','CSP_ASL_MSG');
777: fnd_message.set_token('VALUE','Tracking signal');
778: fnd_msg_pub.add;
779: Add_Err_Msg;
780:
781: -- Re-establish Savepoint
782: SAVEPOINT GENERATE_RECOMMENDATIONS_PVT;
830: End If;
831:
832: fnd_message.set_name('CSP','CSP_ASL_MSG');
833: fnd_message.set_token('VALUE','Apply Business Rules');
834: fnd_msg_pub.add;
835: Add_Err_Msg;
836: end if;
837: --
838: -- End of API body
844: COMMIT WORK;
845: END IF;
846:
847: -- Standard call to get message count and if count is 1, get message info.
848: FND_MSG_PUB.Count_And_Get
849: ( p_count => x_msg_count,
850: p_data => x_msg_data
851: );
852: retcode := 0;
857: errbuf := X_Msg_Data;
858: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
859: P_API_NAME => L_API_NAME
860: ,P_PKG_NAME => G_PKG_NAME
861: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
862: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
863: ,P_ROLLBACK_FLAG => l_Rollback
864: ,X_MSG_COUNT => X_MSG_COUNT
865: ,X_MSG_DATA => X_MSG_DATA
870: errbuf := X_Msg_Data;
871: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
872: P_API_NAME => L_API_NAME
873: ,P_PKG_NAME => G_PKG_NAME
874: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
875: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
876: ,P_ROLLBACK_FLAG => l_Rollback
877: ,X_MSG_COUNT => X_MSG_COUNT
878: ,X_MSG_DATA => X_MSG_DATA
884: retcode := 2;
885: errbuf := SQLERRM;
886: fnd_message.set_name('CSP','CSP_ASL_MSG');
887: fnd_message.set_token('VALUE',l_sqlcode || ' ' || l_sqlerrm);
888: fnd_msg_pub.add;
889: Add_Err_Msg;
890: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
891: P_API_NAME => L_API_NAME
892: ,P_PKG_NAME => G_PKG_NAME
943:
944: -- Initialize message list if p_init_msg_list is set to TRUE.
945: IF FND_API.to_Boolean( p_init_msg_list )
946: THEN
947: FND_MSG_PUB.initialize;
948: END IF;
949:
950:
951: -- Initialize API return status to SUCCESS
986:
987:
988:
989: -- Standard call to get message count and if count is 1, get message info.
990: FND_MSG_PUB.Count_And_Get
991: ( p_count => x_msg_count,
992: p_data => x_msg_data
993: );
994:
996: WHEN FND_API.G_EXC_ERROR THEN
997: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
998: P_API_NAME => L_API_NAME
999: ,P_PKG_NAME => G_PKG_NAME
1000: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1001: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1002: ,P_ROLLBACK_FLAG => 'N'
1003: ,X_MSG_COUNT => X_MSG_COUNT
1004: ,X_MSG_DATA => X_MSG_DATA
1007: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1008: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1009: P_API_NAME => L_API_NAME
1010: ,P_PKG_NAME => G_PKG_NAME
1011: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1012: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1013: ,P_ROLLBACK_FLAG => 'N'
1014: ,X_MSG_COUNT => X_MSG_COUNT
1015: ,X_MSG_DATA => X_MSG_DATA
1074:
1075: -- Initialize message list if p_init_msg_list is set to TRUE.
1076: IF FND_API.to_Boolean( l_init_msg_list )
1077: THEN
1078: FND_MSG_PUB.initialize;
1079: END IF;
1080:
1081:
1082:
1181: --
1182: -- End of API body
1183: --
1184: -- Standard call to get message count and if count is 1, get message info.
1185: FND_MSG_PUB.Count_And_Get
1186: ( p_count => x_msg_count,
1187: p_data => x_msg_data
1188: );
1189: retcode := 0;
1193: errbuf := X_Msg_Data;
1194: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1195: P_API_NAME => L_API_NAME
1196: ,P_PKG_NAME => G_PKG_NAME
1197: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1198: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1199: ,P_ROLLBACK_FLAG => 'Y'
1200: ,X_MSG_COUNT => X_MSG_COUNT
1201: ,X_MSG_DATA => X_MSG_DATA
1206: errbuf := X_Msg_Data;
1207: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1208: P_API_NAME => L_API_NAME
1209: ,P_PKG_NAME => G_PKG_NAME
1210: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1211: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1212: ,P_ROLLBACK_FLAG => 'Y'
1213: ,X_MSG_COUNT => X_MSG_COUNT
1214: ,X_MSG_DATA => X_MSG_DATA
1446:
1447: -- Initialize message list if p_init_msg_list is set to TRUE.
1448: IF FND_API.to_Boolean( p_init_msg_list )
1449: THEN
1450: FND_MSG_PUB.initialize;
1451: END IF;
1452:
1453:
1454: -- Initialize API return status to SUCCESS
1640: END IF;
1641:
1642:
1643: -- Standard call to get message count and if count is 1, get message info.
1644: FND_MSG_PUB.Count_And_Get
1645: ( p_count => x_msg_count,
1646: p_data => x_msg_data
1647: );
1648:
1650: WHEN FND_API.G_EXC_ERROR THEN
1651: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1652: P_API_NAME => L_API_NAME
1653: ,P_PKG_NAME => G_PKG_NAME
1654: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1655: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1656: ,P_ROLLBACK_FLAG => 'N'
1657: ,X_MSG_COUNT => X_MSG_COUNT
1658: ,X_MSG_DATA => X_MSG_DATA
1661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1662: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1663: P_API_NAME => L_API_NAME
1664: ,P_PKG_NAME => G_PKG_NAME
1665: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1666: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1667: ,P_ROLLBACK_FLAG => 'N'
1668: ,X_MSG_COUNT => X_MSG_COUNT
1669: ,X_MSG_DATA => X_MSG_DATA
1722:
1723: -- Initialize message list if p_init_msg_list is set to TRUE.
1724: IF FND_API.to_Boolean( p_init_msg_list )
1725: THEN
1726: FND_MSG_PUB.initialize;
1727: END IF;
1728:
1729: INSERT INTO CSP_USAGE_HEADERS
1730: (USAGE_HEADER_ID,
1772: END IF;
1773:
1774:
1775: -- Standard call to get message count and if count is 1, get message info.
1776: FND_MSG_PUB.Count_And_Get
1777: ( p_count => x_msg_count,
1778: p_data => x_msg_data
1779: );
1780:
1782: WHEN FND_API.G_EXC_ERROR THEN
1783: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1784: P_API_NAME => L_API_NAME
1785: ,P_PKG_NAME => G_PKG_NAME
1786: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1787: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1788: ,P_ROLLBACK_FLAG => 'N'
1789: ,X_MSG_COUNT => X_MSG_COUNT
1790: ,X_MSG_DATA => X_MSG_DATA
1793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1794: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1795: P_API_NAME => L_API_NAME
1796: ,P_PKG_NAME => G_PKG_NAME
1797: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1798: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1799: ,P_ROLLBACK_FLAG => 'N'
1800: ,X_MSG_COUNT => X_MSG_COUNT
1801: ,X_MSG_DATA => X_MSG_DATA
1854:
1855: -- Initialize message list if p_init_msg_list is set to TRUE.
1856: IF FND_API.to_Boolean( p_init_msg_list )
1857: THEN
1858: FND_MSG_PUB.initialize;
1859: END IF;
1860:
1861: INSERT INTO CSP_USAGE_HEADERS
1862: (USAGE_HEADER_ID,
1903: END IF;
1904:
1905:
1906: -- Standard call to get message count and if count is 1, get message info.
1907: FND_MSG_PUB.Count_And_Get
1908: ( p_count => x_msg_count,
1909: p_data => x_msg_data
1910: );
1911:
1913: WHEN FND_API.G_EXC_ERROR THEN
1914: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1915: P_API_NAME => L_API_NAME
1916: ,P_PKG_NAME => G_PKG_NAME
1917: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1918: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1919: ,P_ROLLBACK_FLAG => 'N'
1920: ,X_MSG_COUNT => X_MSG_COUNT
1921: ,X_MSG_DATA => X_MSG_DATA
1924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1925: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
1926: P_API_NAME => L_API_NAME
1927: ,P_PKG_NAME => G_PKG_NAME
1928: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1929: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
1930: ,P_ROLLBACK_FLAG => 'N'
1931: ,X_MSG_COUNT => X_MSG_COUNT
1932: ,X_MSG_DATA => X_MSG_DATA
1985:
1986: -- Initialize message list if p_init_msg_list is set to TRUE.
1987: IF FND_API.to_Boolean( p_init_msg_list )
1988: THEN
1989: FND_MSG_PUB.initialize;
1990: END IF;
1991:
1992: INSERT INTO CSP_USAGE_HEADERS
1993: (USAGE_HEADER_ID,
2034: END IF;
2035:
2036:
2037: -- Standard call to get message count and if count is 1, get message info.
2038: FND_MSG_PUB.Count_And_Get
2039: ( p_count => x_msg_count,
2040: p_data => x_msg_data
2041: );
2042:
2044: WHEN FND_API.G_EXC_ERROR THEN
2045: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2046: P_API_NAME => L_API_NAME
2047: ,P_PKG_NAME => G_PKG_NAME
2048: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2049: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2050: ,P_ROLLBACK_FLAG => 'N'
2051: ,X_MSG_COUNT => X_MSG_COUNT
2052: ,X_MSG_DATA => X_MSG_DATA
2055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2056: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2057: P_API_NAME => L_API_NAME
2058: ,P_PKG_NAME => G_PKG_NAME
2059: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2060: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2061: ,P_ROLLBACK_FLAG => 'N'
2062: ,X_MSG_COUNT => X_MSG_COUNT
2063: ,X_MSG_DATA => X_MSG_DATA
2135:
2136: -- Initialize message list if p_init_msg_list is set to TRUE.
2137: IF FND_API.to_Boolean( p_init_msg_list )
2138: THEN
2139: FND_MSG_PUB.initialize;
2140: END IF;
2141:
2142:
2143: -- Initialize API return status to SUCCESS
2276: END IF;
2277:
2278:
2279: -- Standard call to get message count and if count is 1, get message info.
2280: FND_MSG_PUB.Count_And_Get
2281: ( p_count => x_msg_count,
2282: p_data => x_msg_data
2283: );
2284:
2286: WHEN FND_API.G_EXC_ERROR THEN
2287: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2288: P_API_NAME => L_API_NAME
2289: ,P_PKG_NAME => G_PKG_NAME
2290: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2291: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2292: ,P_ROLLBACK_FLAG => 'N'
2293: ,X_MSG_COUNT => X_MSG_COUNT
2294: ,X_MSG_DATA => X_MSG_DATA
2296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2297: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2298: P_API_NAME => L_API_NAME
2299: ,P_PKG_NAME => G_PKG_NAME
2300: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2301: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2302: ,P_ROLLBACK_FLAG => 'N'
2303: ,X_MSG_COUNT => X_MSG_COUNT
2304: ,X_MSG_DATA => X_MSG_DATA
2370:
2371: -- Initialize message list if p_init_msg_list is set to TRUE.
2372: IF FND_API.to_Boolean( p_init_msg_list )
2373: THEN
2374: FND_MSG_PUB.initialize;
2375: END IF;
2376:
2377:
2378: -- Initialize API return status to SUCCESS
2532: END IF;
2533:
2534:
2535: -- Standard call to get message count and if count is 1, get message info.
2536: FND_MSG_PUB.Count_And_Get
2537: ( p_count => x_msg_count,
2538: p_data => x_msg_data
2539: );
2540:
2542: WHEN FND_API.G_EXC_ERROR THEN
2543: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2544: P_API_NAME => L_API_NAME
2545: ,P_PKG_NAME => G_PKG_NAME
2546: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2547: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2548: ,P_ROLLBACK_FLAG => 'N'
2549: ,X_MSG_COUNT => X_MSG_COUNT
2550: ,X_MSG_DATA => X_MSG_DATA
2553: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2554: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2555: P_API_NAME => L_API_NAME
2556: ,P_PKG_NAME => G_PKG_NAME
2557: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2558: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2559: ,P_ROLLBACK_FLAG => 'N'
2560: ,X_MSG_COUNT => X_MSG_COUNT
2561: ,X_MSG_DATA => X_MSG_DATA
2733: END IF;
2734:
2735:
2736: -- Standard call to get message count and if count is 1, get message info.
2737: FND_MSG_PUB.Count_And_Get
2738: ( p_count => x_msg_count,
2739: p_data => x_msg_data
2740: );
2741:
2743: WHEN FND_API.G_EXC_ERROR THEN
2744: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2745: P_API_NAME => L_API_NAME
2746: ,P_PKG_NAME => G_PKG_NAME
2747: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
2748: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2749: ,P_ROLLBACK_FLAG => 'N'
2750: ,X_MSG_COUNT => X_MSG_COUNT
2751: ,X_MSG_DATA => X_MSG_DATA
2754: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2755: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
2756: P_API_NAME => L_API_NAME
2757: ,P_PKG_NAME => G_PKG_NAME
2758: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
2759: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
2760: ,P_ROLLBACK_FLAG => 'N'
2761: ,X_MSG_COUNT => X_MSG_COUNT
2762: ,X_MSG_DATA => X_MSG_DATA
3075: COMMIT WORK;
3076: END IF;
3077:
3078: -- Standard call to get message count and if count is 1, get message info.
3079: FND_MSG_PUB.Count_And_Get
3080: ( p_count => x_msg_count,
3081: p_data => x_msg_data
3082: );
3083: EXCEPTION
3085: retcode := 2;
3086: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
3087: P_API_NAME => L_API_NAME
3088: ,P_PKG_NAME => G_PKG_NAME
3089: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
3090: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
3091: ,P_ROLLBACK_FLAG => 'N'
3092: ,X_MSG_COUNT => X_MSG_COUNT
3093: ,X_MSG_DATA => X_MSG_DATA
3097: retcode := 2;
3098: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
3099: P_API_NAME => L_API_NAME
3100: ,P_PKG_NAME => G_PKG_NAME
3101: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
3102: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
3103: ,P_ROLLBACK_FLAG => 'N'
3104: ,X_MSG_COUNT => X_MSG_COUNT
3105: ,X_MSG_DATA => X_MSG_DATA
3186:
3187: -- Initialize message list if p_init_msg_list is set to TRUE.
3188: IF FND_API.to_Boolean( p_init_msg_list )
3189: THEN
3190: FND_MSG_PUB.initialize;
3191: END IF;
3192:
3193: -- Initialize API return status to SUCCESS
3194: x_return_status := FND_API.G_RET_STS_SUCCESS;
3230: COMMIT WORK;
3231: END IF;
3232:
3233: -- Standard call to get message count and if count is 1, get message info.
3234: FND_MSG_PUB.Count_And_Get
3235: ( p_count => x_msg_count,
3236: p_data => x_msg_data
3237: );
3238:
3240: WHEN FND_API.G_EXC_ERROR THEN
3241: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
3242: P_API_NAME => L_API_NAME
3243: ,P_PKG_NAME => G_PKG_NAME
3244: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
3245: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
3246: ,P_ROLLBACK_FLAG => 'N'
3247: ,X_MSG_COUNT => X_MSG_COUNT
3248: ,X_MSG_DATA => X_MSG_DATA
3251: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3252: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
3253: P_API_NAME => L_API_NAME
3254: ,P_PKG_NAME => G_PKG_NAME
3255: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
3256: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PVT
3257: ,P_ROLLBACK_FLAG => 'N'
3258: ,X_MSG_COUNT => X_MSG_COUNT
3259: ,X_MSG_DATA => X_MSG_DATA