284: l_msg_data VARCHAR2(200);
285: l_msg_count NUMBER(10);
286:
287: BEGIN
288: fnd_msg_pub.initialize;
289: begin
290: select '1'
291: into l_value
292: from igw_budget_details pbd
296: and rownum < 2;
297:
298: if l_value is not null then
299: fnd_message.set_name('IGW', 'IGW_CANNOT_GENERATE_PERIODS');
300: fnd_msg_pub.add;
301: l_return_status := 'E';
302: RAISE FND_API.G_EXC_ERROR;
303: end if;
304: exception
372: when no_data_found then
373: l_msg_data := 'IGW_PERIOD_NOT_CONSECUTIVE';
374: l_return_status := 'E';
375: fnd_message.set_name('IGW', 'IGW_PERIOD_NOT_CONSECUTIVE');
376: fnd_msg_pub.add;
377: RAISE FND_API.G_EXC_ERROR;
378: end;
379:
380:
389: when no_data_found then
390: l_msg_data := 'IGW_PERIOD_NOT_CONSECUTIVE';
391: l_return_status := 'E';
392: fnd_message.set_name('IGW', 'IGW_PERIOD_NOT_CONSECUTIVE');
393: fnd_msg_pub.add;
394: RAISE FND_API.G_EXC_ERROR;
395: end;
396: end if;
397:
578: when no_data_found then
579: l_msg_data := 'IGW_PERIOD_NOT_CONSECUTIVE';
580: l_return_status := 'E';
581: fnd_message.set_name('IGW', 'IGW_PERIOD_NOT_CONSECUTIVE');
582: fnd_msg_pub.add;
583: RAISE FND_API.G_EXC_ERROR;
584: end;
585:
586: if i = (l_no_of_periods - 1) then
1057: if l_dummy_value is not null then
1058: l_msg_data := 'IGW_BUDGET_PERIOD_NOT_EQUAL';
1059: l_return_status := 'S';
1060: fnd_message.set_name('IGW', 'IGW_BUDGET_PERIOD_NOT_EQUAL');
1061: fnd_msg_pub.add;
1062: --raised the error volutarily to get the message count
1063: RAISE FND_API.G_EXC_ERROR;
1064: end if;
1065:
1066: EXCEPTION
1067: when FND_API.G_EXC_ERROR then
1068: x_return_status := l_return_status;
1069: x_msg_data := l_msg_data;
1070: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1071: p_data => x_msg_data);
1072: when others then
1073: x_return_status := 'U';
1074: x_msg_data := SQLCODE||' '||SQLERRM;
1071: p_data => x_msg_data);
1072: when others then
1073: x_return_status := 'U';
1074: x_msg_data := SQLCODE||' '||SQLERRM;
1075: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'GENERATE_LINES');
1076: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1077: p_data => x_msg_data);
1078: END generate_lines;
1079: ------------------------------------------------------------------------------------------------
1072: when others then
1073: x_return_status := 'U';
1074: x_msg_data := SQLCODE||' '||SQLERRM;
1075: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'GENERATE_LINES');
1076: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1077: p_data => x_msg_data);
1078: END generate_lines;
1079: ------------------------------------------------------------------------------------------------
1080:
1191: l_return_status VARCHAR2(1);
1192: l_msg_data VARCHAR2(200);
1193: l_msg_count NUMBER(10);
1194: BEGIN
1195: fnd_msg_pub.initialize;
1196: open c_budget_periods;
1197: fetch c_budget_periods into l_no_of_periods;
1198: close c_budget_periods;
1199:
1271: when no_data_found then
1272: l_msg_data := 'IGW_PERIOD_NOT_CONSECUTIVE';
1273: l_return_status := 'E';
1274: fnd_message.set_name('IGW', 'IGW_PERIOD_NOT_CONSECUTIVE');
1275: fnd_msg_pub.add;
1276: RAISE FND_API.G_EXC_ERROR;
1277: end;
1278:
1279:
1480: when no_data_found then
1481: l_msg_data := 'IGW_PERIOD_NOT_CONSECUTIVE';
1482: l_return_status := 'E';
1483: fnd_message.set_name('IGW', 'IGW_PERIOD_NOT_CONSECUTIVE');
1484: fnd_msg_pub.add;
1485: RAISE FND_API.G_EXC_ERROR;
1486: end;
1487:
1488:
1910: if l_dummy_value is not null then
1911: l_msg_data := 'IGW_BUDGET_PERIOD_NOT_EQUAL';
1912: l_return_status := 'S';
1913: fnd_message.set_name('IGW', 'IGW_BUDGET_PERIOD_NOT_EQUAL');
1914: fnd_msg_pub.add;
1915: --raised the error volutarily to get the message count
1916: RAISE FND_API.G_EXC_ERROR;
1917: end if;
1918:
1919: EXCEPTION
1920: when FND_API.G_EXC_ERROR then
1921: x_return_status := l_return_status;
1922: x_msg_data := l_msg_data;
1923: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1924: p_data => x_msg_data);
1925: when others then
1926: x_return_status := 'U';
1927: x_msg_data := SQLCODE||' '||SQLERRM;
1924: p_data => x_msg_data);
1925: when others then
1926: x_return_status := 'U';
1927: x_msg_data := SQLCODE||' '||SQLERRM;
1928: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'APPLY_FUTURE_PERIODS');
1929: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1930: p_data => x_msg_data);
1931: END apply_future_periods;
1932: ----------------------------------------------------------------------------------------------
1925: when others then
1926: x_return_status := 'U';
1927: x_msg_data := SQLCODE||' '||SQLERRM;
1928: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'APPLY_FUTURE_PERIODS');
1929: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1930: p_data => x_msg_data);
1931: END apply_future_periods;
1932: ----------------------------------------------------------------------------------------------
1933:
1962:
1963: insufficient_amount EXCEPTION;
1964:
1965: BEGIN
1966: fnd_msg_pub.initialize;
1967: open c_budget_periods;
1968: fetch c_budget_periods into l_total_cost;
1969: close c_budget_periods;
1970:
2004: EXCEPTION
2005: when FND_API.G_EXC_ERROR then
2006: x_return_status := l_return_status;
2007: x_msg_data := l_msg_data;
2008: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2009: p_data => x_msg_data);
2010:
2011: when insufficient_amount then
2012: x_return_status := 'E';
2012: x_return_status := 'E';
2013: x_msg_data := 'IGW_INSUFFICIENT_AMOUNT';
2014: fnd_message.set_name('IGW', 'IGW_INSUFFICIENT_AMOUNT');
2015: --dbms_output.put_line('FIRING THE FOLLOWING'||'IGW_INSUFFICIENT_AMOUNT');
2016: fnd_msg_pub.add;
2017: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2018: p_data => x_msg_data);
2019: when others then
2020: x_return_status := 'U';
2013: x_msg_data := 'IGW_INSUFFICIENT_AMOUNT';
2014: fnd_message.set_name('IGW', 'IGW_INSUFFICIENT_AMOUNT');
2015: --dbms_output.put_line('FIRING THE FOLLOWING'||'IGW_INSUFFICIENT_AMOUNT');
2016: fnd_msg_pub.add;
2017: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2018: p_data => x_msg_data);
2019: when others then
2020: x_return_status := 'U';
2021: x_msg_data := SQLCODE||' '||SQLERRM;
2018: p_data => x_msg_data);
2019: when others then
2020: x_return_status := 'U';
2021: x_msg_data := SQLCODE||' '||SQLERRM;
2022: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT');
2023: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2024:
2025: END sync_to_cost_limit;
2026: ------------------------------------------------------------------------------------------
2019: when others then
2020: x_return_status := 'U';
2021: x_msg_data := SQLCODE||' '||SQLERRM;
2022: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT');
2023: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2024:
2025: END sync_to_cost_limit;
2026: ------------------------------------------------------------------------------------------
2027:
2061: where line_item_id = p_line_item_id;
2062: Begin
2063: x_return_status := 'S';
2064:
2065: --fnd_msg_pub.initialize;
2066:
2067: open c_budget;
2068: fetch c_budget into l_proposal_id, l_version_id
2069: , l_budget_period_id, l_expenditure_category_flag, l_expenditure_type;
2094: end if;
2095:
2096: if l_personnel_attached_flag = 'Y' then
2097: fnd_message.set_name('IGW', 'IGW_NO_PERSONNEL_SYNC');
2098: fnd_msg_pub.add;
2099: Raise FND_API.G_EXC_ERROR;
2100: end if;
2101:
2102: begin
2155: x_return_status := l_return_status;
2156:
2157: If x_msg_count > 0 THEN
2158: If x_msg_count = 1 THEN
2159: fnd_msg_pub.get
2160: (p_encoded => FND_API.G_TRUE ,
2161: p_msg_index => 1,
2162: p_data => x_msg_data,
2163: p_msg_index_out => l_msg_index_out );
2191: Exception
2192: when FND_API.G_EXC_ERROR then
2193: --x_return_status := l_return_status;
2194: --x_msg_data := l_msg_data;
2195: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2196: p_data => x_msg_data);
2197: when others then
2198: x_return_status := 'U';
2199: x_msg_data := SQLCODE||' '||SQLERRM;
2196: p_data => x_msg_data);
2197: when others then
2198: x_return_status := 'U';
2199: x_msg_data := SQLCODE||' '||SQLERRM;
2200: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT_WRAP');
2201: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2202: End;
2203: ------------------------------------------------------------------------------------------
2204: PROCEDURE sync_to_cost_limit_wrap_2(
2197: when others then
2198: x_return_status := 'U';
2199: x_msg_data := SQLCODE||' '||SQLERRM;
2200: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT_WRAP');
2201: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2202: End;
2203: ------------------------------------------------------------------------------------------
2204: PROCEDURE sync_to_cost_limit_wrap_2(
2205: p_line_item_id NUMBER
2221: where line_item_id = p_line_item_id;
2222:
2223: Begin
2224: x_return_status := 'S';
2225: fnd_msg_pub.initialize;
2226:
2227:
2228:
2229: sync_to_cost_limit_wrap(p_line_item_id
2245: ,x_msg_count );
2246: end if;
2247: Exception
2248: when FND_API.G_EXC_ERROR then
2249: fnd_msg_pub.count_and_get(p_count => x_msg_count,
2250: p_data => x_msg_data);
2251: when others then
2252: x_return_status := 'U';
2253: x_msg_data := SQLCODE||' '||SQLERRM;
2250: p_data => x_msg_data);
2251: when others then
2252: x_return_status := 'U';
2253: x_msg_data := SQLCODE||' '||SQLERRM;
2254: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT_WRAP_2');
2255: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2256: End;
2257:
2258:
2251: when others then
2252: x_return_status := 'U';
2253: x_msg_data := SQLCODE||' '||SQLERRM;
2254: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'SYNC_TO_COST_LIMIT_WRAP_2');
2255: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2256: End;
2257:
2258:
2259: END IGW_GENERATE_PERIODS;