DBA Data[Home] [Help]

APPS.OKL_SUBSIDY_POOL_APPROVAL_PVT dependencies on OKL_API

Line 70: x_return_status := OKL_API.G_RET_STS_SUCCESS;

66: is_debug_procedure_on BOOLEAN;
67: is_debug_statement_on BOOLEAN;
68:
69: BEGIN
70: x_return_status := OKL_API.G_RET_STS_SUCCESS;
71:
72: l_debug_enabled := okl_debug_pub.check_log_enabled;
73: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
74: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 79: x_return_status := OKL_API.START_ACTIVITY(

75: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSICB.pls call submit_pool_for_approval');
76: END IF;
77:
78: -- call START_ACTIVITY to create savepoint, check compatibility and initialize message list
79: x_return_status := OKL_API.START_ACTIVITY(
80: p_api_name => l_api_name
81: ,p_pkg_name => G_PKG_NAME
82: ,p_init_msg_list => p_init_msg_list
83: ,l_api_version => l_api_version

Line 89: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

85: ,p_api_type => g_api_type
86: ,x_return_status => x_return_status);
87:
88: -- check if activity started successfully
89: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
90: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
91: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
92: RAISE OKL_API.G_EXCEPTION_ERROR;
93: END IF;

Line 90: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

86: ,x_return_status => x_return_status);
87:
88: -- check if activity started successfully
89: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
90: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
91: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
92: RAISE OKL_API.G_EXCEPTION_ERROR;
93: END IF;
94:

Line 91: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

87:
88: -- check if activity started successfully
89: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
90: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
91: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
92: RAISE OKL_API.G_EXCEPTION_ERROR;
93: END IF;
94:
95: -- check for logging on STATEMENT level

Line 92: RAISE OKL_API.G_EXCEPTION_ERROR;

88: -- check if activity started successfully
89: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
90: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
91: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
92: RAISE OKL_API.G_EXCEPTION_ERROR;
93: END IF;
94:
95: -- check for logging on STATEMENT level
96: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 100: IF(p_subsidy_pool_id IS NULL OR p_subsidy_pool_id = OKL_API.G_MISS_NUM)THEN

96: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);
97:
98: x_total_budgets := 0;
99: -- validate if subsidy pool id passed is valid
100: IF(p_subsidy_pool_id IS NULL OR p_subsidy_pool_id = OKL_API.G_MISS_NUM)THEN
101: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'p_subsidy_pool_id');
102: x_return_status := OKC_API.G_RET_STS_ERROR;
103: RAISE OKL_API.G_EXCEPTION_ERROR;
104: END IF;

Line 103: RAISE OKL_API.G_EXCEPTION_ERROR;

99: -- validate if subsidy pool id passed is valid
100: IF(p_subsidy_pool_id IS NULL OR p_subsidy_pool_id = OKL_API.G_MISS_NUM)THEN
101: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'p_subsidy_pool_id');
102: x_return_status := OKC_API.G_RET_STS_ERROR;
103: RAISE OKL_API.G_EXCEPTION_ERROR;
104: END IF;
105: -- get the subsidy pool details to process
106: OPEN c_get_pool_details_csr; FETCH c_get_pool_details_csr INTO cv_pool_details_csr;
107: CLOSE c_get_pool_details_csr;

Line 113: RAISE OKL_API.G_EXCEPTION_ERROR;

109: -- if the pool status is not new, then error out. initial pool approval should have the pool status and the line status as NEW
110: IF(cv_pool_details_csr.decision_status_code <> 'NEW')THEN
111: OKC_API.set_message(G_APP_NAME, G_INVALID_POOL_STATUS, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
112: x_return_status := OKC_API.G_RET_STS_ERROR;
113: RAISE OKL_API.G_EXCEPTION_ERROR;
114: END IF;
115:
116: -- check for pool expiration here. pool could be logically expired by the time user submits for approval.
117: -- in such a case, expire the pool and throw the error

Line 134: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN

130: 'expiring subsidy pool '||cv_pool_details_csr.subsidy_pool_name||' with effective end date '||cv_pool_details_csr.effective_to_date
131: );
132: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
133:
134: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;

Line 135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

131: );
132: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
133:
134: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;
139: -- cannot submit pool for approval while the pool is expired.

Line 136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN

132: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
133:
134: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;
139: -- cannot submit pool for approval while the pool is expired.
140: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);

Line 137: RAISE OKL_API.G_EXCEPTION_ERROR;

133:
134: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
135: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;
139: -- cannot submit pool for approval while the pool is expired.
140: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
141: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 140: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);

136: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;
139: -- cannot submit pool for approval while the pool is expired.
140: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
141: RAISE OKL_API.G_EXCEPTION_ERROR;
142: END IF;
143:
144: -- verify if the subsidy pool has been associated with any subsidy. for approval, the pool should be associated to

Line 141: RAISE OKL_API.G_EXCEPTION_ERROR;

137: RAISE OKL_API.G_EXCEPTION_ERROR;
138: END IF;
139: -- cannot submit pool for approval while the pool is expired.
140: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
141: RAISE OKL_API.G_EXCEPTION_ERROR;
142: END IF;
143:
144: -- verify if the subsidy pool has been associated with any subsidy. for approval, the pool should be associated to
145: -- at least one subsidy

Line 151: RAISE OKL_API.G_EXCEPTION_ERROR;

147: CLOSE c_chk_subsidy_assoc_csr;
148: IF(NVL(lv_dummy_var,'N')<> 'X')THEN
149: OKC_API.set_message(G_APP_NAME, G_POOL_NO_SUB_ASSOC, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
150: x_return_status := OKC_API.G_RET_STS_ERROR;
151: RAISE OKL_API.G_EXCEPTION_ERROR;
152: END IF;
153: -- get the number of subsidy pool budget lines
154: lv_number_of_lines:=0;
155: OPEN c_get_pool_line_number; FETCH c_get_pool_line_number INTO lv_number_of_lines;

Line 160: RAISE OKL_API.G_EXCEPTION_ERROR;

156: CLOSE c_get_pool_line_number;
157: IF(lv_number_of_lines = 0)THEN
158: OKC_API.set_message(G_APP_NAME, G_POOL_HAS_NO_LINES, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
159: x_return_status := OKC_API.G_RET_STS_ERROR;
160: RAISE OKL_API.G_EXCEPTION_ERROR;
161: ELSIF(lv_number_of_lines > 1)THEN -- for initial pool approval, only one budget line is allowed.
162: OKC_API.set_message(G_APP_NAME, G_POOL_HAS_MORE_LINES, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
163: x_return_status := OKC_API.G_RET_STS_ERROR;
164: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 164: RAISE OKL_API.G_EXCEPTION_ERROR;

160: RAISE OKL_API.G_EXCEPTION_ERROR;
161: ELSIF(lv_number_of_lines > 1)THEN -- for initial pool approval, only one budget line is allowed.
162: OKC_API.set_message(G_APP_NAME, G_POOL_HAS_MORE_LINES, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name);
163: x_return_status := OKC_API.G_RET_STS_ERROR;
164: RAISE OKL_API.G_EXCEPTION_ERROR;
165: END IF;
166:
167: -- get the budget line details
168: OPEN c_get_pool_line_details_csr; FETCH c_get_pool_line_details_csr INTO cv_get_pool_line_details_csr;

Line 175: RAISE OKL_API.G_EXCEPTION_ERROR;

171: OR cv_get_pool_line_details_csr.decision_status_code <> 'NEW')THEN
172: OKC_API.set_message(G_APP_NAME, G_POOL_LINE_INVALID, 'POOL_NAME', cv_pool_details_csr.subsidy_pool_name
173: ,'AMOUNT',cv_get_pool_line_details_csr.budget_amount);
174: x_return_status := OKC_API.G_RET_STS_ERROR;
175: RAISE OKL_API.G_EXCEPTION_ERROR;
176: END IF;
177:
178: -- now that all the required validations are passed, update the pool and line status to pending approval
179: l_pool_status := G_PENDING_STATUS_CODE;

Line 196: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

192: 'okl_subsidy_pool_pvt.set_decision_status_code to pending returned with status '||x_return_status|| ' x_msg_data '||x_msg_data
193: );
194: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
195:
196: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
197: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
198: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
199: RAISE OKL_API.G_EXCEPTION_ERROR;
200: END IF;

Line 197: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

193: );
194: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
195:
196: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
197: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
198: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
199: RAISE OKL_API.G_EXCEPTION_ERROR;
200: END IF;
201: l_pool_status := G_PENDING_STATUS_CODE;

Line 198: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

194: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
195:
196: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
197: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
198: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
199: RAISE OKL_API.G_EXCEPTION_ERROR;
200: END IF;
201: l_pool_status := G_PENDING_STATUS_CODE;
202: okl_subsidy_pool_budget_pvt.set_decision_status_code(p_api_version => p_api_version

Line 199: RAISE OKL_API.G_EXCEPTION_ERROR;

195:
196: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
197: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
198: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
199: RAISE OKL_API.G_EXCEPTION_ERROR;
200: END IF;
201: l_pool_status := G_PENDING_STATUS_CODE;
202: okl_subsidy_pool_budget_pvt.set_decision_status_code(p_api_version => p_api_version
203: ,p_init_msg_list => p_init_msg_list

Line 218: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

214: 'okl_subsidy_pool_budget_pvt.set_decision_status_code to pending returned with status '||x_return_status|| ' x_msg_data '||x_msg_data
215: );
216: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
217:
218: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
219: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
220: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
221: RAISE OKL_API.G_EXCEPTION_ERROR;
222: END IF;

Line 219: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

215: );
216: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
217:
218: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
219: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
220: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
221: RAISE OKL_API.G_EXCEPTION_ERROR;
222: END IF;
223: -- copy this value back to the out parameter once pending for approval is set successfully

Line 220: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

216: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
217:
218: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
219: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
220: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
221: RAISE OKL_API.G_EXCEPTION_ERROR;
222: END IF;
223: -- copy this value back to the out parameter once pending for approval is set successfully
224: x_pool_status := G_PENDING_STATUS_CODE;

Line 221: RAISE OKL_API.G_EXCEPTION_ERROR;

217:
218: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
219: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
220: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
221: RAISE OKL_API.G_EXCEPTION_ERROR;
222: END IF;
223: -- copy this value back to the out parameter once pending for approval is set successfully
224: x_pool_status := G_PENDING_STATUS_CODE;
225: -- read the profile OKL: Subsidy Pool Approval Process Access

Line 247: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

243: 'okl_subsidy_pool_pvt.set_decision_status_code to active returned with status '||x_return_status||' x_msg_data '||x_msg_data
244: );
245: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
246:
247: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
250: RAISE OKL_API.G_EXCEPTION_ERROR;
251: END IF;

Line 248: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

244: );
245: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
246:
247: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
250: RAISE OKL_API.G_EXCEPTION_ERROR;
251: END IF;
252: -- since no approval process is selected, approve the line by default

Line 249: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

245: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
246:
247: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
250: RAISE OKL_API.G_EXCEPTION_ERROR;
251: END IF;
252: -- since no approval process is selected, approve the line by default
253: l_pool_status := G_ACTIVE_STATUS_CODE;

Line 250: RAISE OKL_API.G_EXCEPTION_ERROR;

246:
247: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
248: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
249: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
250: RAISE OKL_API.G_EXCEPTION_ERROR;
251: END IF;
252: -- since no approval process is selected, approve the line by default
253: l_pool_status := G_ACTIVE_STATUS_CODE;
254: okl_subsidy_pool_budget_pvt.set_decision_status_code(p_api_version => p_api_version

Line 270: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

266: 'okl_subsidy_pool_budget_pvt.set_decision_status_code to active returned with status '||x_return_status||' x_msg_data ' ||x_msg_data
267: );
268: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
269:
270: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
273: RAISE OKL_API.G_EXCEPTION_ERROR;
274: END IF;

Line 271: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

267: );
268: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
269:
270: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
273: RAISE OKL_API.G_EXCEPTION_ERROR;
274: END IF;
275: -- since this is the initial approval, the total budget amount equals the budget amount on the line

Line 272: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

268: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
269:
270: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
273: RAISE OKL_API.G_EXCEPTION_ERROR;
274: END IF;
275: -- since this is the initial approval, the total budget amount equals the budget amount on the line
276: okl_subsidy_pool_pvt.update_total_budget(p_api_version => p_api_version

Line 273: RAISE OKL_API.G_EXCEPTION_ERROR;

269:
270: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
271: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
272: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
273: RAISE OKL_API.G_EXCEPTION_ERROR;
274: END IF;
275: -- since this is the initial approval, the total budget amount equals the budget amount on the line
276: okl_subsidy_pool_pvt.update_total_budget(p_api_version => p_api_version
277: ,p_init_msg_list => p_init_msg_list

Line 291: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

287: 'okl_subsidy_pool_pvt.update_total_budget returned with status '||x_return_status||' x_msg_data '||x_msg_data
288: );
289: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
290:
291: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;

Line 292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

288: );
289: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
290:
291: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:

Line 293: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

289: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
290:
291: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:
297: -- copy this value back to the out parameter once activated successfully

Line 294: RAISE OKL_API.G_EXCEPTION_ERROR;

290:
291: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
292: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
293: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
294: RAISE OKL_API.G_EXCEPTION_ERROR;
295: END IF;
296:
297: -- copy this value back to the out parameter once activated successfully
298: x_pool_status := G_ACTIVE_STATUS_CODE;

Line 316: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

312: 'okl_subsidy_pool_wf.raise_pool_event_approval returned with status '||x_return_status||' x_msg_data '||x_msg_data
313: );
314: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
315:
316: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
317: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
318: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_ERROR;
320: END IF;

Line 317: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

313: );
314: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
315:
316: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
317: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
318: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_ERROR;
320: END IF;
321: END IF;

Line 318: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

314: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
315:
316: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
317: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
318: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_ERROR;
320: END IF;
321: END IF;
322:

Line 319: RAISE OKL_API.G_EXCEPTION_ERROR;

315:
316: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
317: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
318: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
319: RAISE OKL_API.G_EXCEPTION_ERROR;
320: END IF;
321: END IF;
322:
323: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 327: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

323: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
324: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSICB.pls call submit_pool_for_approval');
325: END IF;
326:
327: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
328:
329: EXCEPTION
330: WHEN OKL_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 330: WHEN OKL_API.G_EXCEPTION_ERROR THEN

326:
327: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
328:
329: EXCEPTION
330: WHEN OKL_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
332: p_api_name => l_api_name,
333: p_pkg_name => G_PKG_NAME,
334: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

327: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
328:
329: EXCEPTION
330: WHEN OKL_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
332: p_api_name => l_api_name,
333: p_pkg_name => G_PKG_NAME,
334: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
335: x_msg_count => x_msg_count,

Line 334: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

330: WHEN OKL_API.G_EXCEPTION_ERROR THEN
331: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
332: p_api_name => l_api_name,
333: p_pkg_name => G_PKG_NAME,
334: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
335: x_msg_count => x_msg_count,
336: x_msg_data => x_msg_data,
337: p_api_type => g_api_type);
338:

Line 339: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

335: x_msg_count => x_msg_count,
336: x_msg_data => x_msg_data,
337: p_api_type => g_api_type);
338:
339: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
340: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
341: p_api_name => l_api_name,
342: p_pkg_name => G_PKG_NAME,
343: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 340: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

336: x_msg_data => x_msg_data,
337: p_api_type => g_api_type);
338:
339: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
340: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
341: p_api_name => l_api_name,
342: p_pkg_name => G_PKG_NAME,
343: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
344: x_msg_count => x_msg_count,

Line 343: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

339: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
340: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
341: p_api_name => l_api_name,
342: p_pkg_name => G_PKG_NAME,
343: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
344: x_msg_count => x_msg_count,
345: x_msg_data => x_msg_data,
346: p_api_type => g_api_type);
347: WHEN OTHERS THEN

Line 348: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

344: x_msg_count => x_msg_count,
345: x_msg_data => x_msg_data,
346: p_api_type => g_api_type);
347: WHEN OTHERS THEN
348: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
349: p_api_name => l_api_name,
350: p_pkg_name => G_PKG_NAME,
351: p_exc_name => 'OTHERS',
352: x_msg_count => x_msg_count,

Line 397: x_return_status := OKL_API.G_RET_STS_SUCCESS;

393: is_debug_procedure_on BOOLEAN;
394: is_debug_statement_on BOOLEAN;
395:
396: BEGIN
397: x_return_status := OKL_API.G_RET_STS_SUCCESS;
398:
399: l_debug_enabled := okl_debug_pub.check_log_enabled;
400: is_debug_procedure_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_PROCEDURE);
401: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 406: x_return_status := OKL_API.START_ACTIVITY(

402: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRSICB.pls call submit_budget_for_approval');
403: END IF;
404:
405: -- call START_ACTIVITY to create savepoint, check compatibility and initialize message list
406: x_return_status := OKL_API.START_ACTIVITY(
407: p_api_name => l_api_name
408: ,p_pkg_name => G_PKG_NAME
409: ,p_init_msg_list => p_init_msg_list
410: ,l_api_version => l_api_version

Line 416: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

412: ,p_api_type => g_api_type
413: ,x_return_status => x_return_status);
414:
415: -- check if activity started successfully
416: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
419: RAISE OKL_API.G_EXCEPTION_ERROR;
420: END IF;

Line 417: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

413: ,x_return_status => x_return_status);
414:
415: -- check if activity started successfully
416: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
419: RAISE OKL_API.G_EXCEPTION_ERROR;
420: END IF;
421:

Line 418: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

414:
415: -- check if activity started successfully
416: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
419: RAISE OKL_API.G_EXCEPTION_ERROR;
420: END IF;
421:
422: -- check for logging on STATEMENT level

Line 419: RAISE OKL_API.G_EXCEPTION_ERROR;

415: -- check if activity started successfully
416: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
417: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
418: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
419: RAISE OKL_API.G_EXCEPTION_ERROR;
420: END IF;
421:
422: -- check for logging on STATEMENT level
423: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);

Line 426: IF(p_subsidy_pool_budget_id IS NULL OR p_subsidy_pool_budget_id = OKL_API.G_MISS_NUM)THEN

422: -- check for logging on STATEMENT level
423: is_debug_statement_on := okl_debug_pub.check_log_on(l_module,FND_LOG.LEVEL_STATEMENT);
424:
425: -- validate if subsidy pool budget id passed is valid
426: IF(p_subsidy_pool_budget_id IS NULL OR p_subsidy_pool_budget_id = OKL_API.G_MISS_NUM)THEN
427: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'p_subsidy_pool_budget_id');
428: x_return_status := OKC_API.G_RET_STS_ERROR;
429: RAISE OKL_API.G_EXCEPTION_ERROR;
430: END IF;

Line 429: RAISE OKL_API.G_EXCEPTION_ERROR;

425: -- validate if subsidy pool budget id passed is valid
426: IF(p_subsidy_pool_budget_id IS NULL OR p_subsidy_pool_budget_id = OKL_API.G_MISS_NUM)THEN
427: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'p_subsidy_pool_budget_id');
428: x_return_status := OKC_API.G_RET_STS_ERROR;
429: RAISE OKL_API.G_EXCEPTION_ERROR;
430: END IF;
431:
432: -- get the pool and the budget line information
433: OPEN c_get_pool_info_csr; FETCH c_get_pool_info_csr INTO cv_get_pool_info;

Line 440: RAISE OKL_API.G_EXCEPTION_ERROR;

436: -- check if the pool status is ACTIVE, if not ACTIVE, throw error
437: IF(cv_get_pool_info.pool_status <> 'ACTIVE')THEN
438: OKC_API.set_message(G_APP_NAME, G_POOL_IS_NOT_ACTIVE, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);
439: x_return_status := OKC_API.G_RET_STS_ERROR;
440: RAISE OKL_API.G_EXCEPTION_ERROR;
441: END IF;
442:
443: -- check for pool expiration here. pool could be logically expired by the time user submits line for approval.
444: -- in such a case, expire the pool and throw the error

Line 461: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN

457: 'expiring subsidy pool '||cv_get_pool_info.subsidy_pool_name||' with effective end date '||cv_get_pool_info.pool_end_date
458: );
459: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
460:
461: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
462: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;

Line 462: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

458: );
459: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
460:
461: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
462: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;
466: -- cannot submit pool for approval while the pool is expired.

Line 463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN

459: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
460:
461: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
462: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;
466: -- cannot submit pool for approval while the pool is expired.
467: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);

Line 464: RAISE OKL_API.G_EXCEPTION_ERROR;

460:
461: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)THEN
462: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;
466: -- cannot submit pool for approval while the pool is expired.
467: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);
468: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 467: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);

463: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR)THEN
464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;
466: -- cannot submit pool for approval while the pool is expired.
467: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);
468: RAISE OKL_API.G_EXCEPTION_ERROR;
469: END IF;
470: -- check if the line status is NEW, if not throw an error. this check is required as the user might resubmit the same
471: -- line for approval, by clicking on the refresh icon (even when the submit for approval is disabled)

Line 468: RAISE OKL_API.G_EXCEPTION_ERROR;

464: RAISE OKL_API.G_EXCEPTION_ERROR;
465: END IF;
466: -- cannot submit pool for approval while the pool is expired.
467: OKL_API.set_message(G_APP_NAME, G_SUB_POOL_EXIPRED_WF, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name);
468: RAISE OKL_API.G_EXCEPTION_ERROR;
469: END IF;
470: -- check if the line status is NEW, if not throw an error. this check is required as the user might resubmit the same
471: -- line for approval, by clicking on the refresh icon (even when the submit for approval is disabled)
472: IF(cv_get_pool_info.line_status <> 'NEW')THEN

Line 476: RAISE OKL_API.G_EXCEPTION_ERROR;

472: IF(cv_get_pool_info.line_status <> 'NEW')THEN
473: OKC_API.set_message(G_APP_NAME, G_POOL_LINE_INVALID, 'POOL_NAME', cv_get_pool_info.subsidy_pool_name
474: ,'AMOUNT',cv_get_pool_info.budget_amount);
475: x_return_status := OKC_API.G_RET_STS_ERROR;
476: RAISE OKL_API.G_EXCEPTION_ERROR;
477: END IF;
478:
479: -- now that the validations have been passed, set the budget line to pending for approval
480: l_budget_status := G_PENDING_STATUS_CODE;

Line 497: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

493: 'okl_subsidy_pool_budget_pvt.set_decision_status_code to pending returned with status '||x_return_status||' x_msg_data '||x_msg_data
494: );
495: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
496:
497: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
500: RAISE OKL_API.G_EXCEPTION_ERROR;
501: END IF;

Line 498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

494: );
495: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
496:
497: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
500: RAISE OKL_API.G_EXCEPTION_ERROR;
501: END IF;
502:

Line 499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

495: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
496:
497: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
500: RAISE OKL_API.G_EXCEPTION_ERROR;
501: END IF;
502:
503: -- check if the operation is of type REDUCTION, in which case the budget amount is reduced from the total budget immediately.

Line 500: RAISE OKL_API.G_EXCEPTION_ERROR;

496:
497: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
498: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
499: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
500: RAISE OKL_API.G_EXCEPTION_ERROR;
501: END IF;
502:
503: -- check if the operation is of type REDUCTION, in which case the budget amount is reduced from the total budget immediately.
504: -- if this REDUCTION request is subsequently rejected, then the amount is added back to the total budget

Line 509: OKL_API.set_message(G_APP_NAME, G_POOL_LINE_INVALID_AMT, 'AMOUNT', cv_get_pool_info.budget_amount);

505: IF(cv_get_pool_info.budget_type_code = 'REDUCTION')THEN
506: lv_calc_total_budget := 0;
507: lv_calc_total_budget := cv_get_pool_info.total_budgets - cv_get_pool_info.budget_amount;
508: IF(lv_calc_total_budget <= 0)THEN
509: OKL_API.set_message(G_APP_NAME, G_POOL_LINE_INVALID_AMT, 'AMOUNT', cv_get_pool_info.budget_amount);
510: RAISE OKL_API.G_EXCEPTION_ERROR;
511: ELSE
512: okl_subsidy_pool_pvt.update_total_budget(p_api_version => p_api_version
513: ,p_init_msg_list => p_init_msg_list

Line 510: RAISE OKL_API.G_EXCEPTION_ERROR;

506: lv_calc_total_budget := 0;
507: lv_calc_total_budget := cv_get_pool_info.total_budgets - cv_get_pool_info.budget_amount;
508: IF(lv_calc_total_budget <= 0)THEN
509: OKL_API.set_message(G_APP_NAME, G_POOL_LINE_INVALID_AMT, 'AMOUNT', cv_get_pool_info.budget_amount);
510: RAISE OKL_API.G_EXCEPTION_ERROR;
511: ELSE
512: okl_subsidy_pool_pvt.update_total_budget(p_api_version => p_api_version
513: ,p_init_msg_list => p_init_msg_list
514: ,x_return_status => x_return_status

Line 528: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

524: ' x_msg_data '||x_msg_data
525: );
526: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
527:
528: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
529: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
530: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
531: RAISE OKL_API.G_EXCEPTION_ERROR;
532: END IF;

Line 529: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

525: );
526: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
527:
528: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
529: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
530: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
531: RAISE OKL_API.G_EXCEPTION_ERROR;
532: END IF;
533: END IF;

Line 530: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

526: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
527:
528: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
529: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
530: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
531: RAISE OKL_API.G_EXCEPTION_ERROR;
532: END IF;
533: END IF;
534: END IF; -- end of cv_get_pool_info.budget_type_code = 'REDUCTION'

Line 531: RAISE OKL_API.G_EXCEPTION_ERROR;

527:
528: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
529: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
530: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
531: RAISE OKL_API.G_EXCEPTION_ERROR;
532: END IF;
533: END IF;
534: END IF; -- end of cv_get_pool_info.budget_type_code = 'REDUCTION'
535:

Line 559: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

555: 'okl_subsidy_pool_budget_pvt.set_decision_status_code to active returned with status '||x_return_status||' x_msg_data '||x_msg_data
556: );
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558:
559: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
560: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
561: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
562: RAISE OKL_API.G_EXCEPTION_ERROR;
563: END IF;

Line 560: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

556: );
557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558:
559: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
560: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
561: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
562: RAISE OKL_API.G_EXCEPTION_ERROR;
563: END IF;
564: IF(cv_get_pool_info.budget_type_code = 'ADDITION')THEN

Line 561: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

557: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
558:
559: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
560: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
561: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
562: RAISE OKL_API.G_EXCEPTION_ERROR;
563: END IF;
564: IF(cv_get_pool_info.budget_type_code = 'ADDITION')THEN
565: lv_calc_total_budget := 0;

Line 562: RAISE OKL_API.G_EXCEPTION_ERROR;

558:
559: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
560: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
561: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
562: RAISE OKL_API.G_EXCEPTION_ERROR;
563: END IF;
564: IF(cv_get_pool_info.budget_type_code = 'ADDITION')THEN
565: lv_calc_total_budget := 0;
566: lv_calc_total_budget := cv_get_pool_info.total_budgets + cv_get_pool_info.budget_amount;

Line 584: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

580: ' x_msg_data '||x_msg_data
581: );
582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
587: RAISE OKL_API.G_EXCEPTION_ERROR;
588: END IF;

Line 585: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

581: );
582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
587: RAISE OKL_API.G_EXCEPTION_ERROR;
588: END IF;
589: END IF;

Line 586: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

582: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
583:
584: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
587: RAISE OKL_API.G_EXCEPTION_ERROR;
588: END IF;
589: END IF;
590: x_pool_budget_status := G_ACTIVE_STATUS_CODE;

Line 587: RAISE OKL_API.G_EXCEPTION_ERROR;

583:
584: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
585: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
586: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
587: RAISE OKL_API.G_EXCEPTION_ERROR;
588: END IF;
589: END IF;
590: x_pool_budget_status := G_ACTIVE_STATUS_CODE;
591: ELSIF(l_approval_process in ('AME','WF'))THEN

Line 607: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

603: 'okl_subsidy_pool_wf.raise_budget_event_approval returned with status '||x_return_status||' x_msg_data '||x_msg_data
604: );
605: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
606:
607: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
610: RAISE OKL_API.G_EXCEPTION_ERROR;
611: END IF;

Line 608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

604: );
605: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
606:
607: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
610: RAISE OKL_API.G_EXCEPTION_ERROR;
611: END IF;
612: END IF;

Line 609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

605: END IF; -- end of NVL(l_debug_enabled,'N')='Y'
606:
607: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
610: RAISE OKL_API.G_EXCEPTION_ERROR;
611: END IF;
612: END IF;
613:

Line 610: RAISE OKL_API.G_EXCEPTION_ERROR;

606:
607: IF(x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
608: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
609: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
610: RAISE OKL_API.G_EXCEPTION_ERROR;
611: END IF;
612: END IF;
613:
614: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN

Line 618: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

614: IF(l_debug_enabled='Y' AND is_debug_procedure_on) THEN
615: okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRSICB.pls call submit_budget_for_approval');
616: END IF;
617:
618: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
619:
620: EXCEPTION
621: WHEN OKL_API.G_EXCEPTION_ERROR THEN
622: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

Line 621: WHEN OKL_API.G_EXCEPTION_ERROR THEN

617:
618: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
619:
620: EXCEPTION
621: WHEN OKL_API.G_EXCEPTION_ERROR THEN
622: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
623: p_api_name => l_api_name,
624: p_pkg_name => G_PKG_NAME,
625: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

Line 622: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

618: OKL_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
619:
620: EXCEPTION
621: WHEN OKL_API.G_EXCEPTION_ERROR THEN
622: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
623: p_api_name => l_api_name,
624: p_pkg_name => G_PKG_NAME,
625: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
626: x_msg_count => x_msg_count,

Line 625: p_exc_name => 'OKL_API.G_RET_STS_ERROR',

621: WHEN OKL_API.G_EXCEPTION_ERROR THEN
622: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
623: p_api_name => l_api_name,
624: p_pkg_name => G_PKG_NAME,
625: p_exc_name => 'OKL_API.G_RET_STS_ERROR',
626: x_msg_count => x_msg_count,
627: x_msg_data => x_msg_data,
628: p_api_type => g_api_type);
629:

Line 630: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

626: x_msg_count => x_msg_count,
627: x_msg_data => x_msg_data,
628: p_api_type => g_api_type);
629:
630: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
631: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
632: p_api_name => l_api_name,
633: p_pkg_name => G_PKG_NAME,
634: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 631: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

627: x_msg_data => x_msg_data,
628: p_api_type => g_api_type);
629:
630: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
631: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
632: p_api_name => l_api_name,
633: p_pkg_name => G_PKG_NAME,
634: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
635: x_msg_count => x_msg_count,

Line 634: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',

630: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
631: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
632: p_api_name => l_api_name,
633: p_pkg_name => G_PKG_NAME,
634: p_exc_name => 'OKL_API.G_RET_STS_UNEXP_ERROR',
635: x_msg_count => x_msg_count,
636: x_msg_data => x_msg_data,
637: p_api_type => g_api_type);
638: WHEN OTHERS THEN

Line 639: x_return_status := OKL_API.HANDLE_EXCEPTIONS(

635: x_msg_count => x_msg_count,
636: x_msg_data => x_msg_data,
637: p_api_type => g_api_type);
638: WHEN OTHERS THEN
639: x_return_status := OKL_API.HANDLE_EXCEPTIONS(
640: p_api_name => l_api_name,
641: p_pkg_name => G_PKG_NAME,
642: p_exc_name => 'OTHERS',
643: x_msg_count => x_msg_count,