69: RETURN l_version_id;
70: Exception
71: when no_data_found then
72: fnd_message.set_name('IGW', 'IGW_NO_FINAL_BUDGET_VERSION');
73: fnd_msg_pub.add;
74: RETURN NULL;
75: raise FND_API.G_EXC_ERROR;
76: when others then
77: RETURN NULL;
74: RETURN NULL;
75: raise FND_API.G_EXC_ERROR;
76: when others then
77: RETURN NULL;
78: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'GET_FINAL_VERSION');
79: End get_final_version;
80:
81: --------------------------------------------------------------------------------------------------
82: Function get_award_role(p_role_code VARCHAR2) RETURN VARCHAR2 is
144: l_category_budget_just LONG;
145: l_proposal_budget_just LONG;
146:
147: BEGIN
148: fnd_msg_pub.initialize;
149: l_version_id := get_final_version(p_proposal_id);
150: if l_version_id is null then
151: raise FND_API.G_EXC_ERROR;
152: end if;
252: EXCEPTION
253: when FND_API.G_EXC_ERROR then
254: x_return_status := 'E';
255: --x_msg_data := l_msg_data;
256: --x_msg_data := fnd_msg_pub.get(p_msg_index=>1, p_encoded=>'TRUE');
257: --dbms_output.put_line('x_msg_data right after EXCEPTION is '||x_msg_data);
258: --fnd_msg_pub.count_and_get(p_count => x_msg_count,
259: --p_data => x_msg_data);
260: when others then
254: x_return_status := 'E';
255: --x_msg_data := l_msg_data;
256: --x_msg_data := fnd_msg_pub.get(p_msg_index=>1, p_encoded=>'TRUE');
257: --dbms_output.put_line('x_msg_data right after EXCEPTION is '||x_msg_data);
258: --fnd_msg_pub.count_and_get(p_count => x_msg_count,
259: --p_data => x_msg_data);
260: when others then
261: x_return_status := 'U';
262: x_msg_data := SQLCODE||' '||SQLERRM;
259: --p_data => x_msg_data);
260: when others then
261: x_return_status := 'U';
262: x_msg_data := SQLCODE||' '||SQLERRM;
263: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_BUDGET_JUSTIFICATION');
264: END create_budget_justification;
265: --------------------------------------------------------------------------------------------------
266: PROCEDURE dump_justification (p_proposal_id NUMBER
267: ,p_proposal_form_number VARCHAR2
320: EXCEPTION
321: when FND_API.G_EXC_ERROR then
322: x_return_status := 'E';
323: --dbms_output.put_line('x_msg_data right after EXCEPTION is '||x_msg_data);
324: --fnd_msg_pub.count_and_get(p_count => x_msg_count,
325: --p_data => x_msg_data);
326: when others then
327: x_return_status := 'U';
328: x_msg_data := SQLCODE||' '||SQLERRM;
325: --p_data => x_msg_data);
326: when others then
327: x_return_status := 'U';
328: x_msg_data := SQLCODE||' '||SQLERRM;
329: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'DUMP_JUSTIFICATION');
330: END;
331:
332:
333: --------------------------------------------------------------------------------------------------
341: , explanation
342: from igw_org_questions
343: where explanation is not null;
344: BEGIN
345: fnd_msg_pub.initialize;
346:
347: --deleting previously precessed data
348: delete from igw_report_q_explanation
349: where p_proposal_form_number = p_proposal_form_number;
366: EXCEPTION
367: when others then
368: x_return_status := 'U';
369: x_msg_data := SQLCODE||' '||SQLERRM;
370: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'IGW_REPORT_PROCESSING:CREATE_Q_EXPLANATION');
371: END create_q_explanation;
372:
373: --------------------------------------------------------------------------------------------------
374: PROCEDURE create_base_rate (p_proposal_id NUMBER
396: l_return_status VARCHAR2(1);
397: l_msg_data VARCHAR2(200);
398:
399: BEGIN
400: fnd_msg_pub.initialize;
401: l_version_id := get_final_version(p_proposal_id);
402:
403: --deleting previously precessed data
404: delete from igw_report_budget_base_rate
516: EXCEPTION
517: when FND_API.G_EXC_ERROR then
518: x_return_status := l_return_status;
519: x_msg_data := l_msg_data;
520: fnd_msg_pub.count_and_get(p_count => x_msg_count,
521: p_data => x_msg_data);
522:
523: when others then
524: x_return_status := 'U';
522:
523: when others then
524: x_return_status := 'U';
525: x_msg_data := SQLCODE||' '||SQLERRM;
526: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_BASE_RATE');
527: fnd_msg_pub.count_and_get(p_count => x_msg_count,
528: p_data => x_msg_data);
529: END create_base_rate;
530:
523: when others then
524: x_return_status := 'U';
525: x_msg_data := SQLCODE||' '||SQLERRM;
526: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_BASE_RATE');
527: fnd_msg_pub.count_and_get(p_count => x_msg_count,
528: p_data => x_msg_data);
529: END create_base_rate;
530:
531:
589: l_return_status VARCHAR2(1);
590: l_msg_data VARCHAR2(200);
591:
592: BEGIN
593: fnd_msg_pub.initialize;
594: l_version_id := get_final_version(p_proposal_id);
595: if l_version_id is null then
596: raise FND_API.G_EXC_ERROR;
597: end if;
890: EXCEPTION
891: when FND_API.G_EXC_ERROR then
892: x_return_status := l_return_status;
893: x_msg_data := l_msg_data;
894: fnd_msg_pub.count_and_get(p_count => x_msg_count,
895: p_data => x_msg_data);
896:
897: when others then
898: x_return_status := 'U';
897: when others then
898: x_return_status := 'U';
899: x_msg_data := SQLCODE||' '||SQLERRM;
900: --dbms_output.put_line(x_msg_data);
901: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_REPORTING_DATA');
902: fnd_msg_pub.count_and_get(p_count => x_msg_count,
903: p_data => x_msg_data);
904:
905: END create_reporting_data;
898: x_return_status := 'U';
899: x_msg_data := SQLCODE||' '||SQLERRM;
900: --dbms_output.put_line(x_msg_data);
901: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_REPORTING_DATA');
902: fnd_msg_pub.count_and_get(p_count => x_msg_count,
903: p_data => x_msg_data);
904:
905: END create_reporting_data;
906: --------------------------------------------------------------------------------------------------
940: l_return_status VARCHAR2(1);
941: l_msg_data VARCHAR2(200);
942:
943: BEGIN
944: fnd_msg_pub.initialize;
945: l_version_id := get_final_version(p_proposal_id);
946: if l_version_id is null then
947: raise FND_API.G_EXC_ERROR;
948: end if;
996: EXCEPTION
997: when FND_API.G_EXC_ERROR then
998: x_return_status := l_return_status;
999: x_msg_data := l_msg_data;
1000: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1001: p_data => x_msg_data);
1002:
1003: when others then
1004: x_return_status := 'U';
1004: x_return_status := 'U';
1005:
1006: x_msg_data := SQLCODE||' '||SQLERRM;
1007: --dbms_output.put_line('the x_msg_dat is'||x_msg_data);
1008: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_ITEMIZED_BUDGET');
1009: --fnd_msg_pub.add;
1010: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1011: p_data => x_msg_data);
1012:
1005:
1006: x_msg_data := SQLCODE||' '||SQLERRM;
1007: --dbms_output.put_line('the x_msg_dat is'||x_msg_data);
1008: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_ITEMIZED_BUDGET');
1009: --fnd_msg_pub.add;
1010: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1011: p_data => x_msg_data);
1012:
1013: END create_itemized_budget;
1006: x_msg_data := SQLCODE||' '||SQLERRM;
1007: --dbms_output.put_line('the x_msg_dat is'||x_msg_data);
1008: fnd_msg_pub.add_exc_msg(G_PKG_NAME, 'CREATE_ITEMIZED_BUDGET');
1009: --fnd_msg_pub.add;
1010: fnd_msg_pub.count_and_get(p_count => x_msg_count,
1011: p_data => x_msg_data);
1012:
1013: END create_itemized_budget;
1014: