1: PACKAGE BODY FPA_PROCESS_RST_PVT as
2: /* $Header: FPAVRSTB.pls 120.1 2005/08/18 11:48:28 appldev ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(200) := 'FPA_PROCESS_RST_PVT';
5: G_APP_NAME CONSTANT VARCHAR2(3) := FPA_UTILITIES_PVT.G_APP_NAME;
6: G_API_TYPE CONSTANT VARCHAR2(4) := '_PVT';
7: L_API_NAME CONSTANT VARCHAR2(35) := 'PROCESS_RST';
8:
9: PROCEDURE Update_Calc_Pjt_Scorecard_Aw
26:
27: BEGIN
28:
29:
30: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
31: -- call START_ACTIVITY to create savepoint, check compatibility
32: -- and initialize message list
33:
34: x_return_status := FPA_UTILITIES_PVT.START_ACTIVITY(
30: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
31: -- call START_ACTIVITY to create savepoint, check compatibility
32: -- and initialize message list
33:
34: x_return_status := FPA_UTILITIES_PVT.START_ACTIVITY(
35: p_api_name => l_api_name,
36: p_pkg_name => G_PKG_NAME,
37: p_init_msg_list => p_init_msg_list,
38: l_api_version => l_api_version,
42: x_return_status => x_return_status);
43:
44:
45: -- check if activity started successfully
46: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
47: l_msg_log := 'start_activity';
48: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
49: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
50: l_msg_log := 'start_activity';
44:
45: -- check if activity started successfully
46: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
47: l_msg_log := 'start_activity';
48: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
49: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
50: l_msg_log := 'start_activity';
51: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
52: end if;
45: -- check if activity started successfully
46: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
47: l_msg_log := 'start_activity';
48: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
49: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
50: l_msg_log := 'start_activity';
51: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
52: end if;
53:
47: l_msg_log := 'start_activity';
48: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
49: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
50: l_msg_log := 'start_activity';
51: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
52: end if;
53:
54: FPA_UTILITIES_PVT.Attach_AW
55: (p_api_version => l_api_version,
50: l_msg_log := 'start_activity';
51: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
52: end if;
53:
54: FPA_UTILITIES_PVT.Attach_AW
55: (p_api_version => l_api_version,
56: p_attach_mode => 'rw',
57: x_return_status => x_return_status,
58: x_msg_count => x_msg_count,
58: x_msg_count => x_msg_count,
59: x_msg_data => x_msg_data);
60:
61:
62: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
63:
64: FPA_SCORECARDS_PVT.Update_Calc_Pjt_Scorecard_Aw
65: (p_api_version => p_api_version,
66: p_init_msg_list => p_init_msg_list,
77: dbms_aw.execute('UPDATE');
78: COMMIT;
79: END IF;
80:
81: FPA_UTILITIES_PVT.Detach_AW
82: (p_api_version => 1.0,
83: x_return_status => x_return_status,
84: x_msg_count => x_msg_count,
85: x_msg_data => x_msg_data);
83: x_return_status => x_return_status,
84: x_msg_count => x_msg_count,
85: x_msg_data => x_msg_data);
86:
87: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
88:
89: FPA_UTILITIES_PVT.END_ACTIVITY(
90: p_api_name => l_api_name,
91: p_pkg_name => G_PKG_NAME,
85: x_msg_data => x_msg_data);
86:
87: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
88:
89: FPA_UTILITIES_PVT.END_ACTIVITY(
90: p_api_name => l_api_name,
91: p_pkg_name => G_PKG_NAME,
92: p_msg_log => null,
93: x_msg_count => x_msg_count,
93: x_msg_count => x_msg_count,
94: x_msg_data => x_msg_data);
95:
96: EXCEPTION
97: when FPA_UTILITIES_PVT.G_EXCEPTION_ERROR then
98:
99: FPA_UTILITIES_PVT.Detach_AW(
100: p_api_version => l_api_version,
101: x_return_status => x_return_status,
95:
96: EXCEPTION
97: when FPA_UTILITIES_PVT.G_EXCEPTION_ERROR then
98:
99: FPA_UTILITIES_PVT.Detach_AW(
100: p_api_version => l_api_version,
101: x_return_status => x_return_status,
102: x_msg_count => x_msg_count,
103: x_msg_data => x_msg_data);
101: x_return_status => x_return_status,
102: x_msg_count => x_msg_count,
103: x_msg_data => x_msg_data);
104:
105: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
106: p_api_name => l_api_name,
107: p_pkg_name => G_PKG_NAME,
108: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_ERROR',
109: p_msg_log => l_msg_log,
104:
105: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
106: p_api_name => l_api_name,
107: p_pkg_name => G_PKG_NAME,
108: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_ERROR',
109: p_msg_log => l_msg_log,
110: x_msg_count => x_msg_count,
111: x_msg_data => x_msg_data,
112: p_api_type => G_API_TYPE);
110: x_msg_count => x_msg_count,
111: x_msg_data => x_msg_data,
112: p_api_type => G_API_TYPE);
113:
114: when FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR then
115:
116: FPA_UTILITIES_PVT.Detach_AW(
117: p_api_version => l_api_version,
118: x_return_status => x_return_status,
112: p_api_type => G_API_TYPE);
113:
114: when FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR then
115:
116: FPA_UTILITIES_PVT.Detach_AW(
117: p_api_version => l_api_version,
118: x_return_status => x_return_status,
119: x_msg_count => x_msg_count,
120: x_msg_data => x_msg_data);
118: x_return_status => x_return_status,
119: x_msg_count => x_msg_count,
120: x_msg_data => x_msg_data);
121:
122: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
123: p_api_name => l_api_name,
124: p_pkg_name => G_PKG_NAME,
125: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR',
126: p_msg_log => l_msg_log,
121:
122: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
123: p_api_name => l_api_name,
124: p_pkg_name => G_PKG_NAME,
125: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR',
126: p_msg_log => l_msg_log,
127: x_msg_count => x_msg_count,
128: x_msg_data => x_msg_data,
129: p_api_type => G_API_TYPE);
129: p_api_type => G_API_TYPE);
130:
131: when OTHERS then
132:
133: FPA_UTILITIES_PVT.Detach_AW(
134: p_api_version => l_api_version,
135: x_return_status => x_return_status,
136: x_msg_count => x_msg_count,
137: x_msg_data => x_msg_data);
135: x_return_status => x_return_status,
136: x_msg_count => x_msg_count,
137: x_msg_data => x_msg_data);
138:
139: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
140: p_api_name => l_api_name,
141: p_pkg_name => G_PKG_NAME,
142: p_exc_name => 'OTHERS',
143: p_msg_log => l_msg_log||SQLERRM,
167: l_msg_log VARCHAR2(200) := null;
168:
169: BEGIN
170:
171: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
172: -- call START_ACTIVITY to create savepoint, check compatibility
173: -- and initialize message list
174:
175: x_return_status := FPA_UTILITIES_PVT.START_ACTIVITY(
171: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
172: -- call START_ACTIVITY to create savepoint, check compatibility
173: -- and initialize message list
174:
175: x_return_status := FPA_UTILITIES_PVT.START_ACTIVITY(
176: p_api_name => l_api_name,
177: p_pkg_name => G_PKG_NAME,
178: p_init_msg_list => p_init_msg_list,
179: l_api_version => l_api_version,
183: x_return_status => x_return_status);
184:
185:
186: -- check if activity started successfully
187: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
188: l_msg_log := 'start_activity';
189: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
190: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
191: l_msg_log := 'start_activity';
185:
186: -- check if activity started successfully
187: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
188: l_msg_log := 'start_activity';
189: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
190: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
191: l_msg_log := 'start_activity';
192: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
193: end if;
186: -- check if activity started successfully
187: if (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR) then
188: l_msg_log := 'start_activity';
189: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
190: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
191: l_msg_log := 'start_activity';
192: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
193: end if;
194:
188: l_msg_log := 'start_activity';
189: raise FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR;
190: elsif (x_return_status = FPA_UTILITIES_PVT.G_RET_STS_ERROR) then
191: l_msg_log := 'start_activity';
192: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
193: end if;
194:
195: FPA_UTILITIES_PVT.Attach_AW
196: (p_api_version => l_api_version,
191: l_msg_log := 'start_activity';
192: raise FPA_UTILITIES_PVT.G_EXCEPTION_ERROR;
193: end if;
194:
195: FPA_UTILITIES_PVT.Attach_AW
196: (p_api_version => l_api_version,
197: p_attach_mode => 'rw',
198: x_return_status => x_return_status,
199: x_msg_count => x_msg_count,
199: x_msg_count => x_msg_count,
200: x_msg_data => x_msg_data);
201:
202:
203: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
204:
205:
206: FPA_SCORECARDS_PVT.Update_Calc_Scen_Scorecard_Aw
207: (p_api_version => p_api_version,
221: COMMIT;
222: END IF;
223:
224: -- Detach AW Workspace
225: FPA_UTILITIES_PVT.Detach_AW
226: (p_api_version => 1.0,
227: x_return_status => x_return_status,
228: x_msg_count => x_msg_count,
229: x_msg_data => x_msg_data);
227: x_return_status => x_return_status,
228: x_msg_count => x_msg_count,
229: x_msg_data => x_msg_data);
230:
231: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
232:
233: FPA_UTILITIES_PVT.END_ACTIVITY(
234: p_api_name => l_api_name,
235: p_pkg_name => G_PKG_NAME,
229: x_msg_data => x_msg_data);
230:
231: x_return_status := FPA_UTILITIES_PVT.G_RET_STS_SUCCESS;
232:
233: FPA_UTILITIES_PVT.END_ACTIVITY(
234: p_api_name => l_api_name,
235: p_pkg_name => G_PKG_NAME,
236: p_msg_log => null,
237: x_msg_count => x_msg_count,
237: x_msg_count => x_msg_count,
238: x_msg_data => x_msg_data);
239:
240: EXCEPTION
241: when FPA_UTILITIES_PVT.G_EXCEPTION_ERROR then
242:
243: FPA_UTILITIES_PVT.Detach_AW(
244: p_api_version => l_api_version,
245: x_return_status => x_return_status,
239:
240: EXCEPTION
241: when FPA_UTILITIES_PVT.G_EXCEPTION_ERROR then
242:
243: FPA_UTILITIES_PVT.Detach_AW(
244: p_api_version => l_api_version,
245: x_return_status => x_return_status,
246: x_msg_count => x_msg_count,
247: x_msg_data => x_msg_data);
245: x_return_status => x_return_status,
246: x_msg_count => x_msg_count,
247: x_msg_data => x_msg_data);
248:
249: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
250: p_api_name => l_api_name,
251: p_pkg_name => G_PKG_NAME,
252: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_ERROR',
253: p_msg_log => l_msg_log,
248:
249: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
250: p_api_name => l_api_name,
251: p_pkg_name => G_PKG_NAME,
252: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_ERROR',
253: p_msg_log => l_msg_log,
254: x_msg_count => x_msg_count,
255: x_msg_data => x_msg_data,
256: p_api_type => G_API_TYPE);
254: x_msg_count => x_msg_count,
255: x_msg_data => x_msg_data,
256: p_api_type => G_API_TYPE);
257:
258: when FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR then
259:
260: FPA_UTILITIES_PVT.Detach_AW(
261: p_api_version => l_api_version,
262: x_return_status => x_return_status,
256: p_api_type => G_API_TYPE);
257:
258: when FPA_UTILITIES_PVT.G_EXCEPTION_UNEXPECTED_ERROR then
259:
260: FPA_UTILITIES_PVT.Detach_AW(
261: p_api_version => l_api_version,
262: x_return_status => x_return_status,
263: x_msg_count => x_msg_count,
264: x_msg_data => x_msg_data);
262: x_return_status => x_return_status,
263: x_msg_count => x_msg_count,
264: x_msg_data => x_msg_data);
265:
266: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
267: p_api_name => l_api_name,
268: p_pkg_name => G_PKG_NAME,
269: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR',
270: p_msg_log => l_msg_log,
265:
266: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
267: p_api_name => l_api_name,
268: p_pkg_name => G_PKG_NAME,
269: p_exc_name => 'FPA_UTILITIES_PVT.G_RET_STS_UNEXP_ERROR',
270: p_msg_log => l_msg_log,
271: x_msg_count => x_msg_count,
272: x_msg_data => x_msg_data,
273: p_api_type => G_API_TYPE);
273: p_api_type => G_API_TYPE);
274:
275: when OTHERS then
276:
277: FPA_UTILITIES_PVT.Detach_AW(
278: p_api_version => l_api_version,
279: x_return_status => x_return_status,
280: x_msg_count => x_msg_count,
281: x_msg_data => x_msg_data);
279: x_return_status => x_return_status,
280: x_msg_count => x_msg_count,
281: x_msg_data => x_msg_data);
282:
283: x_return_status := FPA_UTILITIES_PVT.HANDLE_EXCEPTIONS(
284: p_api_name => l_api_name,
285: p_pkg_name => G_PKG_NAME,
286: p_exc_name => 'OTHERS',
287: p_msg_log => l_msg_log||SQLERRM,