[Home] [Help]
1: PACKAGE BODY IGW_BUDGETS_PVT AS
2: --$Header: igwvbvsb.pls 115.35 2004/04/14 22:28:47 vmedikon ship $
3:
4: procedure manage_budget_deletion
5: (p_delete_level VARCHAR2
113: , ibc.line_item_cost
114: , igw_budget_integration.get_oh_cost_ss(ibc.line_item_id) indirect_cost
115: , ibp.start_date
116: , ibp.end_date
117: FROM igw_budgets ib
118: , igw_budget_periods ibp
119: , igw_budget_details ibc
120: WHERE ib.proposal_id = ibp.proposal_id
121: AND ib.version_id = ibp.version_id
137: , nvl(ibc.line_item_cost,0)+nvl(ibc.eb_cost,0) direct_cost
138: , ibc.oh_cost indirect_cost
139: , ibp.start_date
140: , ibp.end_date
141: FROM igw_budgets ib
142: , igw_budget_periods ibp
143: , igw_budget_complete_v ibc
144: WHERE ib.proposal_id = ibp.proposal_id
145: AND ib.version_id = ibp.version_id
155:
156: cursor c_budget_indirect_cost is
157: SELECT ibc.budget_period_id
158: , sum(igw_budget_integration.get_oh_cost_ss(ibc.line_item_id)) indirect_cost
159: FROM igw_budgets ib
160: , igw_budget_periods ibp
161: , igw_budget_details ibc
162: WHERE ib.proposal_id = ibp.proposal_id
163: AND ib.version_id = ibp.version_id
174: igw_budget_complete_v */
175: /*
176: SELECT ibc.budget_period_id
177: , sum(ibc.oh_cost) indirect_cost
178: FROM igw_budgets ib
179: , igw_budget_periods ibp
180: , igw_budget_complete_v ibc
181: WHERE ib.proposal_id = ibp.proposal_id
182: AND ib.version_id = ibp.version_id
218: -- dbms_output.put_line('--------till here 1----------');
219:
220: SELECT version_id
221: INTO l_version_id
222: FROM igw_budgets
223: WHERE proposal_id = p_proposal_id
224: AND final_version_flag = 'Y';
225:
226: -- dbms_output.put_line('--------till here 2----------');
548: begin
549: -- dbms_output.put_line('copy finaL 1');
550: select version_id
551: into l_final_version
552: from igw_budgets
553: where proposal_id = p_proposal_id
554: and final_version_flag = 'Y';
555: exception
556: when no_data_found then
644: x_return_status := 'S';
645:
646: select final_version_flag
647: into l_final_version_flag
648: from igw_budgets
649: where proposal_id = p_proposal_id
650: and version_id <> nvl(p_version_id,0)
651: and final_version_flag = 'Y';
652:
860:
861: begin
862: select nvl(max(version_id),0)+1
863: into l_version_id
864: from igw_budgets
865: where proposal_id = p_proposal_id;
866: exception
867: when no_data_found then
868: l_version_id := nvl(p_version_id,0) + 1;
869: when others then
870: raise;
871: end;
872:
873: igw_budgets_tbh.insert_row(
874: p_proposal_id => p_proposal_id
875: ,p_version_id => l_version_id
876: ,p_start_date => l_start_date
877: ,p_end_date => l_end_date
1069: ,x_msg_data OUT NOCOPY VARCHAR2) IS
1070:
1071: cursor c_rate_class is
1072: select oh_rate_class_id
1073: from igw_budgets
1074: where rowid = p_rowid;
1075:
1076: l_api_name VARCHAR2(30) := 'UPDATE_BUDGET_VERSION';
1077: l_rate_class_id NUMBER(15) := p_oh_rate_class_id;
1174: End if;
1175:
1176: BEGIN
1177: SELECT 'x' INTO l_dummy
1178: FROM igw_budgets
1179: WHERE ((proposal_id = p_proposal_id AND version_id = p_version_id)
1180: OR rowid = p_rowid)
1181: AND record_version_number = p_record_version_number;
1182: EXCEPTION
1205: END IF;
1206:
1207: if (NOT FND_API.TO_BOOLEAN (p_validate_only)) then
1208:
1209: igw_budgets_tbh.update_row(
1210: p_rowid => p_rowid
1211: ,p_proposal_id => p_proposal_id
1212: ,p_version_id => p_version_id
1213: ,p_start_date => p_start_date
1356: x_return_status := 'S';
1357:
1358: BEGIN
1359: SELECT 'x' INTO l_dummy
1360: FROM igw_budgets
1361: WHERE ((proposal_id = p_proposal_id AND version_id = p_version_id)
1362: OR rowid = p_rowid)
1363: AND record_version_number = p_record_version_number;
1364: EXCEPTION
1387: END IF;
1388:
1389: if (NOT FND_API.TO_BOOLEAN (p_validate_only)) then
1390:
1391: igw_budgets_tbh.delete_row (
1392: p_rowid => p_rowid,
1393: p_proposal_id => p_proposal_id,
1394: p_version_id => p_version_id,
1395: p_record_version_number => p_record_version_number,
1394: p_version_id => p_version_id,
1395: p_record_version_number => p_record_version_number,
1396: x_return_status => l_return_status);
1397:
1398: igw_budgets_pvt.manage_budget_deletion(
1399: p_delete_level => 'BUDGET_VERSION'
1400: ,p_proposal_id => p_proposal_id
1401: ,p_version_id => p_version_id
1402: ,x_return_status => l_return_status);
1454:
1455:
1456: END; --DELETE BUDGET VERSION
1457:
1458: END IGW_BUDGETS_PVT;