eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_CASH_APPLN_RULE_PVT dependencies on OKL_API

Line 9: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,

5: -- Procedures and Functions
6: ---------------------------------------------------------------------------
7: PROCEDURE manipulate_rule(
8: p_api_version IN NUMBER,
9: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
10: p_catv_rec IN catv_rec_type,
11: x_catv_rec OUT NOCOPY catv_rec_type,
12: x_return_status OUT NOCOPY VARCHAR2,
13: x_msg_count OUT NOCOPY NUMBER,

Line 17: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

13: x_msg_count OUT NOCOPY NUMBER,
14: x_msg_data OUT NOCOPY VARCHAR2) IS
15:
16: l_api_name CONSTANT VARCHAR2(30) := 'manipulate_rule';
17: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
18:
19: date_invalid_err CONSTANT VARCHAR2(30) := 'INVALID';
20: date_gap_err CONSTANT VARCHAR2(30) := 'GAP';
21: date_overlap_err CONSTANT VARCHAR2(30) := 'OVERLAP';

Line 70: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

66: --Validate start and end dates
67: FUNCTION validate_dates(p_catv_rec IN catv_rec_type
68: ,x_err_type OUT NOCOPY VARCHAR2) RETURN VARCHAR2 IS
69: l_catv_rec catv_rec_type := p_catv_rec;
70: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
71:
72: /*TYPE date_range_type IS RECORD (start_date DATE := NULL
73: ,end_date DATE := NULL);
74:

Line 120: IF(nvl(l_catv_rec.default_rule, okl_api.g_miss_char) = okl_api.g_miss_char) THEN

116: BEGIN
117: --pgomes 01/13/2003 commented out code
118: --check for mandatory end date is removed
119: /*
120: IF(nvl(l_catv_rec.default_rule, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
121: IF(NVL(l_catv_rec.end_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
122: --dbms_output.put_line('end date null');
123: x_err_type := date_enddate_err;
124: l_return_status := Okl_Api.G_RET_STS_ERROR;

Line 121: IF(NVL(l_catv_rec.end_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN

117: --pgomes 01/13/2003 commented out code
118: --check for mandatory end date is removed
119: /*
120: IF(nvl(l_catv_rec.default_rule, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
121: IF(NVL(l_catv_rec.end_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
122: --dbms_output.put_line('end date null');
123: x_err_type := date_enddate_err;
124: l_return_status := Okl_Api.G_RET_STS_ERROR;
125: END IF;

Line 124: l_return_status := Okl_Api.G_RET_STS_ERROR;

120: IF(nvl(l_catv_rec.default_rule, okl_api.g_miss_char) = okl_api.g_miss_char) THEN
121: IF(NVL(l_catv_rec.end_date, okl_api.g_miss_date) = okl_api.g_miss_date) THEN
122: --dbms_output.put_line('end date null');
123: x_err_type := date_enddate_err;
124: l_return_status := Okl_Api.G_RET_STS_ERROR;
125: END IF;
126: END IF;
127: */
128:

Line 129: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

125: END IF;
126: END IF;
127: */
128:
129: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
130: IF(l_catv_rec.start_date > NVL(l_catv_rec.end_date, l_catv_rec.start_date)) THEN
131: --dbms_output.put_line('start date > end date');
132: x_err_type := date_invalid_err;
133: l_return_status := Okl_Api.G_RET_STS_ERROR;

Line 133: l_return_status := Okl_Api.G_RET_STS_ERROR;

129: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
130: IF(l_catv_rec.start_date > NVL(l_catv_rec.end_date, l_catv_rec.start_date)) THEN
131: --dbms_output.put_line('start date > end date');
132: x_err_type := date_invalid_err;
133: l_return_status := Okl_Api.G_RET_STS_ERROR;
134: END IF;
135: END IF;
136:
137: --check for overlaps

Line 138: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

134: END IF;
135: END IF;
136:
137: --check for overlaps
138: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
139: FOR cur IN l_date_overlap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
140: --dbms_output.put_line('overlap in dates');
141: x_err_type := date_overlap_err;
142: l_return_status := Okl_Api.G_RET_STS_ERROR;

Line 142: l_return_status := Okl_Api.G_RET_STS_ERROR;

138: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
139: FOR cur IN l_date_overlap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
140: --dbms_output.put_line('overlap in dates');
141: x_err_type := date_overlap_err;
142: l_return_status := Okl_Api.G_RET_STS_ERROR;
143: END LOOP;
144: END IF;
145:
146: --check for gaps in start date

Line 147: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

143: END LOOP;
144: END IF;
145:
146: --check for gaps in start date
147: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
148: FOR cur IN l_date_bef_gap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
149: IF ((trunc(l_catv_rec.start_date) - trunc(cur.end_date)) > 1) THEN
150: --dbms_output.put_line('gap between dates : before');
151: x_err_type := date_gap_err;

Line 152: l_return_status := Okl_Api.G_RET_STS_ERROR;

148: FOR cur IN l_date_bef_gap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
149: IF ((trunc(l_catv_rec.start_date) - trunc(cur.end_date)) > 1) THEN
150: --dbms_output.put_line('gap between dates : before');
151: x_err_type := date_gap_err;
152: l_return_status := Okl_Api.G_RET_STS_ERROR;
153: END IF;
154: EXIT;
155: END LOOP;
156: END IF;

Line 159: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

155: END LOOP;
156: END IF;
157:
158: --check for gaps in end date
159: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
160: FOR cur IN l_date_aft_gap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
161: IF ((trunc(cur.start_date) - trunc(nvl(l_catv_rec.end_date, l_catv_rec.start_date))) > 1) THEN
162: --dbms_output.put_line('gap between dates : after');
163: x_err_type := date_gap_err;

Line 164: l_return_status := Okl_Api.G_RET_STS_ERROR;

160: FOR cur IN l_date_aft_gap_csr(l_catv_rec.id, l_catv_rec.cau_id, l_catv_rec.start_date, l_catv_rec.end_date) LOOP
161: IF ((trunc(cur.start_date) - trunc(nvl(l_catv_rec.end_date, l_catv_rec.start_date))) > 1) THEN
162: --dbms_output.put_line('gap between dates : after');
163: x_err_type := date_gap_err;
164: l_return_status := Okl_Api.G_RET_STS_ERROR;
165: END IF;
166: EXIT;
167: END LOOP;
168: END IF;

Line 171: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

167: END LOOP;
168: END IF;
169:
170: IF(x_err_type = date_enddate_err) THEN
171: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
172: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_END');
173: ELSIF(x_err_type = date_invalid_err) THEN
174: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
175: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');

Line 174: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

170: IF(x_err_type = date_enddate_err) THEN
171: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
172: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_END');
173: ELSIF(x_err_type = date_invalid_err) THEN
174: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
175: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');
176: ELSIF(x_err_type = date_overlap_err) THEN
177: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
178: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_OVER');

Line 177: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

173: ELSIF(x_err_type = date_invalid_err) THEN
174: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
175: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');
176: ELSIF(x_err_type = date_overlap_err) THEN
177: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
178: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_OVER');
179: ELSIF(x_err_type = date_gap_err) THEN
180: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
181: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_GAP');

Line 180: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

176: ELSIF(x_err_type = date_overlap_err) THEN
177: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
178: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_OVER');
179: ELSIF(x_err_type = date_gap_err) THEN
180: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
181: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_GAP');
182: END IF;
183:
184: RETURN l_return_status;

Line 196: WHERE ((NVL(l_catv_rec.cau_id, okl_api.g_miss_num) = okl_api.g_miss_num) OR

192:
193: CURSOR l_def_csr(cp_cau_id IN NUMBER) IS
194: SELECT cau_id
195: FROM OKL_CASH_ALLCTN_RLS
196: WHERE ((NVL(l_catv_rec.cau_id, okl_api.g_miss_num) = okl_api.g_miss_num) OR
197: (l_catv_rec.cau_id IS NOT NULL AND cau_id = cp_cau_id))
198: AND default_rule = 'YES';
199: BEGIN
200: FOR cur IN l_def_csr(l_catv_rec.cau_id) LOOP

Line 212: IF (l_catv_rec.name = Okl_Api.G_MISS_CHAR or l_catv_rec.name IS NULL) THEN

208: BEGIN
209: l_catv_rec := p_catv_rec;
210:
211: --check for required fields
212: IF (l_catv_rec.name = Okl_Api.G_MISS_CHAR or l_catv_rec.name IS NULL) THEN
213: l_req_field_miss := TRUE;
214: END IF;
215:
216: IF (l_catv_rec.description = Okl_Api.G_MISS_CHAR or l_catv_rec.description IS NULL) THEN

Line 216: IF (l_catv_rec.description = Okl_Api.G_MISS_CHAR or l_catv_rec.description IS NULL) THEN

212: IF (l_catv_rec.name = Okl_Api.G_MISS_CHAR or l_catv_rec.name IS NULL) THEN
213: l_req_field_miss := TRUE;
214: END IF;
215:
216: IF (l_catv_rec.description = Okl_Api.G_MISS_CHAR or l_catv_rec.description IS NULL) THEN
217: l_req_field_miss := TRUE;
218: END IF;
219:
220: IF (l_catv_rec.start_date = Okl_Api.G_MISS_DATE or l_catv_rec.start_date IS NULL) THEN

Line 220: IF (l_catv_rec.start_date = Okl_Api.G_MISS_DATE or l_catv_rec.start_date IS NULL) THEN

216: IF (l_catv_rec.description = Okl_Api.G_MISS_CHAR or l_catv_rec.description IS NULL) THEN
217: l_req_field_miss := TRUE;
218: END IF;
219:
220: IF (l_catv_rec.start_date = Okl_Api.G_MISS_DATE or l_catv_rec.start_date IS NULL) THEN
221: l_req_field_miss := TRUE;
222: END IF;
223:
224: /*IF (l_catv_rec.end_date = Okl_Api.G_MISS_DATE or l_catv_rec.end_date IS NULL) THEN

Line 224: /*IF (l_catv_rec.end_date = Okl_Api.G_MISS_DATE or l_catv_rec.end_date IS NULL) THEN

220: IF (l_catv_rec.start_date = Okl_Api.G_MISS_DATE or l_catv_rec.start_date IS NULL) THEN
221: l_req_field_miss := TRUE;
222: END IF;
223:
224: /*IF (l_catv_rec.end_date = Okl_Api.G_MISS_DATE or l_catv_rec.end_date IS NULL) THEN
225: l_req_field_miss := TRUE;
226: END IF;*/
227:
228: IF (l_catv_rec.amount_tolerance_percent = Okl_Api.G_MISS_NUM or l_catv_rec.amount_tolerance_percent IS NULL) THEN

Line 228: IF (l_catv_rec.amount_tolerance_percent = Okl_Api.G_MISS_NUM or l_catv_rec.amount_tolerance_percent IS NULL) THEN

224: /*IF (l_catv_rec.end_date = Okl_Api.G_MISS_DATE or l_catv_rec.end_date IS NULL) THEN
225: l_req_field_miss := TRUE;
226: END IF;*/
227:
228: IF (l_catv_rec.amount_tolerance_percent = Okl_Api.G_MISS_NUM or l_catv_rec.amount_tolerance_percent IS NULL) THEN
229: l_req_field_miss := TRUE;
230: END IF;
231:
232: IF (l_catv_rec.days_past_quote_valid_toleranc = Okl_Api.G_MISS_NUM or l_catv_rec.days_past_quote_valid_toleranc IS NULL) THEN

Line 232: IF (l_catv_rec.days_past_quote_valid_toleranc = Okl_Api.G_MISS_NUM or l_catv_rec.days_past_quote_valid_toleranc IS NULL) THEN

228: IF (l_catv_rec.amount_tolerance_percent = Okl_Api.G_MISS_NUM or l_catv_rec.amount_tolerance_percent IS NULL) THEN
229: l_req_field_miss := TRUE;
230: END IF;
231:
232: IF (l_catv_rec.days_past_quote_valid_toleranc = Okl_Api.G_MISS_NUM or l_catv_rec.days_past_quote_valid_toleranc IS NULL) THEN
233: l_req_field_miss := TRUE;
234: END IF;
235: -- sjalasut. removed validation as part of user defined streams build.
236: /*IF (l_catv_rec.months_to_bill_ahead = Okl_Api.G_MISS_NUM or l_catv_rec.months_to_bill_ahead IS NULL) THEN

Line 236: /*IF (l_catv_rec.months_to_bill_ahead = Okl_Api.G_MISS_NUM or l_catv_rec.months_to_bill_ahead IS NULL) THEN

232: IF (l_catv_rec.days_past_quote_valid_toleranc = Okl_Api.G_MISS_NUM or l_catv_rec.days_past_quote_valid_toleranc IS NULL) THEN
233: l_req_field_miss := TRUE;
234: END IF;
235: -- sjalasut. removed validation as part of user defined streams build.
236: /*IF (l_catv_rec.months_to_bill_ahead = Okl_Api.G_MISS_NUM or l_catv_rec.months_to_bill_ahead IS NULL) THEN
237: l_req_field_miss := TRUE;
238: END IF;*/
239:
240: IF(l_req_field_miss) THEN

Line 253: IF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num)

249: l_cauv_rec.id := l_catv_rec.cau_id;
250: l_cauv_rec.name := l_catv_rec.name;
251: l_cauv_rec.description := l_catv_rec.description;
252:
253: IF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num)
254: and (l_catv_rec.cau_id IS NULL or l_catv_rec.cau_id = okl_api.g_miss_num)) THEN
255: --CREATE HDR AND LINE
256:
257: --check for unique rule name

Line 254: and (l_catv_rec.cau_id IS NULL or l_catv_rec.cau_id = okl_api.g_miss_num)) THEN

250: l_cauv_rec.name := l_catv_rec.name;
251: l_cauv_rec.description := l_catv_rec.description;
252:
253: IF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num)
254: and (l_catv_rec.cau_id IS NULL or l_catv_rec.cau_id = okl_api.g_miss_num)) THEN
255: --CREATE HDR AND LINE
256:
257: --check for unique rule name
258: FOR cur IN l_cau_name_csr(l_cauv_rec.name) LOOP

Line 259: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

255: --CREATE HDR AND LINE
256:
257: --check for unique rule name
258: FOR cur IN l_cau_name_csr(l_cauv_rec.name) LOOP
259: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
260: p_msg_name => 'OKL_BPD_CASH_APPLN_NAME_ERROR',
261: p_token1 => 'RULE_NAME',
262: p_token1_value => cur.name);
263: l_return_status := okl_api.G_RET_STS_ERROR;

Line 263: l_return_status := okl_api.G_RET_STS_ERROR;

259: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
260: p_msg_name => 'OKL_BPD_CASH_APPLN_NAME_ERROR',
261: p_token1 => 'RULE_NAME',
262: p_token1_value => cur.name);
263: l_return_status := okl_api.G_RET_STS_ERROR;
264: raise G_EXCEPTION_HALT_VALIDATION;
265: END LOOP;
266:
267: --check if line is a default line

Line 275: --(l_catv_rec.end_date = okl_api.g_miss_date) OR

271: l_catv_rec.end_date := null;
272: END IF;
273:
274: IF((trunc(l_catv_rec.start_date) < trunc(sysdate)) OR
275: --(l_catv_rec.end_date = okl_api.g_miss_date) OR
276: (nvl(l_catv_rec.end_date, l_catv_rec.start_date) < trunc(sysdate))
277: ) THEN
278: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
279: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');

Line 278: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

274: IF((trunc(l_catv_rec.start_date) < trunc(sysdate)) OR
275: --(l_catv_rec.end_date = okl_api.g_miss_date) OR
276: (nvl(l_catv_rec.end_date, l_catv_rec.start_date) < trunc(sysdate))
277: ) THEN
278: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
279: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');
280:
281: l_return_status := Okl_Api.G_RET_STS_ERROR;
282: raise G_EXCEPTION_HALT_VALIDATION;

Line 281: l_return_status := Okl_Api.G_RET_STS_ERROR;

277: ) THEN
278: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
279: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');
280:
281: l_return_status := Okl_Api.G_RET_STS_ERROR;
282: raise G_EXCEPTION_HALT_VALIDATION;
283: END IF;
284:
285: --Validate dates

Line 287: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

283: END IF;
284:
285: --Validate dates
286: l_return_status := validate_dates(l_catv_rec, lx_date_err);
287: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
288: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
289: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
290: raise G_EXCEPTION_HALT_VALIDATION;
291: END IF;

Line 288: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

284:
285: --Validate dates
286: l_return_status := validate_dates(l_catv_rec, lx_date_err);
287: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
288: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
289: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
290: raise G_EXCEPTION_HALT_VALIDATION;
291: END IF;
292:

Line 294: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

290: raise G_EXCEPTION_HALT_VALIDATION;
291: END IF;
292:
293: --create rule hdr and line
294: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
295: --create rule hdr
296: okl_csh_allctn_rl_hdr_pub.insert_csh_allctn_rl_hdr(
297: p_api_version => p_api_version
298: ,p_init_msg_list => p_init_msg_list

Line 305: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

301: ,x_msg_data => x_msg_data
302: ,p_cauv_rec => l_cauv_rec
303: ,x_cauv_rec => lx_cauv_rec);
304:
305: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
306: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
307: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
308: raise okl_api.G_EXCEPTION_ERROR;
309: END IF;

Line 306: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

302: ,p_cauv_rec => l_cauv_rec
303: ,x_cauv_rec => lx_cauv_rec);
304:
305: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
306: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
307: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
308: raise okl_api.G_EXCEPTION_ERROR;
309: END IF;
310:

Line 308: raise okl_api.G_EXCEPTION_ERROR;

304:
305: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
306: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
307: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
308: raise okl_api.G_EXCEPTION_ERROR;
309: END IF;
310:
311: l_catv_rec.cau_id := lx_cauv_rec.id;
312: IF (l_catv_rec.under_payment_allocation_code IS NULL or l_catv_rec.under_payment_allocation_code = okl_api.g_miss_char) THEN

Line 312: IF (l_catv_rec.under_payment_allocation_code IS NULL or l_catv_rec.under_payment_allocation_code = okl_api.g_miss_char) THEN

308: raise okl_api.G_EXCEPTION_ERROR;
309: END IF;
310:
311: l_catv_rec.cau_id := lx_cauv_rec.id;
312: IF (l_catv_rec.under_payment_allocation_code IS NULL or l_catv_rec.under_payment_allocation_code = okl_api.g_miss_char) THEN
313: l_catv_rec.under_payment_allocation_code := 'T';
314: END IF;
315:
316: IF (l_catv_rec.over_payment_allocation_code IS NULL or l_catv_rec.over_payment_allocation_code = okl_api.g_miss_char) THEN

Line 316: IF (l_catv_rec.over_payment_allocation_code IS NULL or l_catv_rec.over_payment_allocation_code = okl_api.g_miss_char) THEN

312: IF (l_catv_rec.under_payment_allocation_code IS NULL or l_catv_rec.under_payment_allocation_code = okl_api.g_miss_char) THEN
313: l_catv_rec.under_payment_allocation_code := 'T';
314: END IF;
315:
316: IF (l_catv_rec.over_payment_allocation_code IS NULL or l_catv_rec.over_payment_allocation_code = okl_api.g_miss_char) THEN
317: l_catv_rec.over_payment_allocation_code := 'M';
318: END IF;
319:
320: IF (l_catv_rec.receipt_msmtch_allocation_code IS NULL or l_catv_rec.receipt_msmtch_allocation_code = okl_api.g_miss_char) THEN

Line 320: IF (l_catv_rec.receipt_msmtch_allocation_code IS NULL or l_catv_rec.receipt_msmtch_allocation_code = okl_api.g_miss_char) THEN

316: IF (l_catv_rec.over_payment_allocation_code IS NULL or l_catv_rec.over_payment_allocation_code = okl_api.g_miss_char) THEN
317: l_catv_rec.over_payment_allocation_code := 'M';
318: END IF;
319:
320: IF (l_catv_rec.receipt_msmtch_allocation_code IS NULL or l_catv_rec.receipt_msmtch_allocation_code = okl_api.g_miss_char) THEN
321: l_catv_rec.receipt_msmtch_allocation_code := 'A';
322: END IF;
323:
324: --create rule line

Line 334: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

330: ,x_msg_data => x_msg_data
331: ,p_catv_rec => l_catv_rec
332: ,x_catv_rec => lx_catv_rec);
333:
334: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
337: raise okl_api.G_EXCEPTION_ERROR;
338: END IF;

Line 335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

331: ,p_catv_rec => l_catv_rec
332: ,x_catv_rec => lx_catv_rec);
333:
334: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
337: raise okl_api.G_EXCEPTION_ERROR;
338: END IF;
339: END IF;

Line 337: raise okl_api.G_EXCEPTION_ERROR;

333:
334: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
335: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
336: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
337: raise okl_api.G_EXCEPTION_ERROR;
338: END IF;
339: END IF;
340: ELSIF ((l_catv_rec.id IS NOT NULL) and (l_catv_rec.id <> okl_api.g_miss_num)
341: and l_catv_rec.cau_id IS NOT NULL) THEN

Line 340: ELSIF ((l_catv_rec.id IS NOT NULL) and (l_catv_rec.id <> okl_api.g_miss_num)

336: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
337: raise okl_api.G_EXCEPTION_ERROR;
338: END IF;
339: END IF;
340: ELSIF ((l_catv_rec.id IS NOT NULL) and (l_catv_rec.id <> okl_api.g_miss_num)
341: and l_catv_rec.cau_id IS NOT NULL) THEN
342: --UPDATE HDR AND LINE
343:
344: --check if line is a default line

Line 360: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

356: END IF;
357:
358: --Validate dates
359: l_return_status := validate_dates(l_catv_rec, lx_date_err);
360: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
361: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
362: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
363: raise G_EXCEPTION_HALT_VALIDATION;
364: END IF;

Line 361: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

357:
358: --Validate dates
359: l_return_status := validate_dates(l_catv_rec, lx_date_err);
360: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
361: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
362: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
363: raise G_EXCEPTION_HALT_VALIDATION;
364: END IF;
365:

Line 367: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

363: raise G_EXCEPTION_HALT_VALIDATION;
364: END IF;
365:
366: --update rule hdr and line
367: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
368: --get hdr version
369: FOR cur IN l_cau_obj_ver_csr(l_cauv_rec.id) LOOP
370: l_cauv_rec.object_version_number := cur.object_version_number;
371: END LOOP;

Line 383: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

379: ,x_msg_data => x_msg_data
380: ,p_cauv_rec => l_cauv_rec
381: ,x_cauv_rec => lx_cauv_rec);
382:
383: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
384: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
385: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
386: raise okl_api.G_EXCEPTION_ERROR;
387: END IF;

Line 384: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

380: ,p_cauv_rec => l_cauv_rec
381: ,x_cauv_rec => lx_cauv_rec);
382:
383: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
384: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
385: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
386: raise okl_api.G_EXCEPTION_ERROR;
387: END IF;
388:

Line 386: raise okl_api.G_EXCEPTION_ERROR;

382:
383: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
384: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
385: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
386: raise okl_api.G_EXCEPTION_ERROR;
387: END IF;
388:
389:
390: --update rule line

Line 400: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

396: ,x_msg_data => x_msg_data
397: ,p_catv_rec => l_catv_rec
398: ,x_catv_rec => lx_catv_rec);
399:
400: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
401: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
402: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
403: raise okl_api.G_EXCEPTION_ERROR;
404: END IF;

Line 401: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

397: ,p_catv_rec => l_catv_rec
398: ,x_catv_rec => lx_catv_rec);
399:
400: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
401: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
402: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
403: raise okl_api.G_EXCEPTION_ERROR;
404: END IF;
405: END IF;

Line 403: raise okl_api.G_EXCEPTION_ERROR;

399:
400: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
401: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
402: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
403: raise okl_api.G_EXCEPTION_ERROR;
404: END IF;
405: END IF;
406: -- sjalasut. case of creating a new rule version
407: ELSIF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num) and l_catv_rec.cau_id IS NOT NULL) THEN

Line 407: ELSIF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num) and l_catv_rec.cau_id IS NOT NULL) THEN

403: raise okl_api.G_EXCEPTION_ERROR;
404: END IF;
405: END IF;
406: -- sjalasut. case of creating a new rule version
407: ELSIF ((l_catv_rec.id IS NULL or l_catv_rec.id = okl_api.g_miss_num) and l_catv_rec.cau_id IS NOT NULL) THEN
408: --UPDATE HEADER CREATE LINE ONLY
409: --check to see if the version name passed is the same as the original rule
410: FOR cur IN l_cau_obj_ver_csr(l_catv_rec.cau_id) LOOP
411: l_rule_name := cur.name;

Line 414: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

410: FOR cur IN l_cau_obj_ver_csr(l_catv_rec.cau_id) LOOP
411: l_rule_name := cur.name;
412:
413: IF (l_rule_name <> l_catv_rec.name) THEN
414: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
415: p_msg_name => 'OKL_BPD_CASH_APPLN_NAME_VER');
416: l_return_status := Okl_Api.G_RET_STS_ERROR;
417: raise G_EXCEPTION_HALT_VALIDATION;
418: END IF;

Line 416: l_return_status := Okl_Api.G_RET_STS_ERROR;

412:
413: IF (l_rule_name <> l_catv_rec.name) THEN
414: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
415: p_msg_name => 'OKL_BPD_CASH_APPLN_NAME_VER');
416: l_return_status := Okl_Api.G_RET_STS_ERROR;
417: raise G_EXCEPTION_HALT_VALIDATION;
418: END IF;
419: END LOOP;
420:

Line 423: --(l_catv_rec.end_date = okl_api.g_miss_date) OR

419: END LOOP;
420:
421: --check if dates of new version are in the past
422: IF((trunc(l_catv_rec.start_date) < trunc(sysdate)) OR
423: --(l_catv_rec.end_date = okl_api.g_miss_date) OR
424: (nvl(l_catv_rec.end_date, l_catv_rec.start_date) < trunc(sysdate))
425: ) THEN
426: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
427: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');

Line 426: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

422: IF((trunc(l_catv_rec.start_date) < trunc(sysdate)) OR
423: --(l_catv_rec.end_date = okl_api.g_miss_date) OR
424: (nvl(l_catv_rec.end_date, l_catv_rec.start_date) < trunc(sysdate))
425: ) THEN
426: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
427: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');
428:
429: l_return_status := Okl_Api.G_RET_STS_ERROR;
430: raise G_EXCEPTION_HALT_VALIDATION;

Line 429: l_return_status := Okl_Api.G_RET_STS_ERROR;

425: ) THEN
426: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
427: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_PAST');
428:
429: l_return_status := Okl_Api.G_RET_STS_ERROR;
430: raise G_EXCEPTION_HALT_VALIDATION;
431: END IF;
432:
433: --Update the end date of previous line to (start date minus 1) of the new line

Line 444: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

440: END LOOP;
441:
442: --Validate dates for prev line
443: l_return_status := validate_dates(l_prev_catv_rec, lx_date_err);
444: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
445: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
446: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
447: raise G_EXCEPTION_HALT_VALIDATION;
448: END IF;

Line 445: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

441:
442: --Validate dates for prev line
443: l_return_status := validate_dates(l_prev_catv_rec, lx_date_err);
444: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
445: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
446: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
447: raise G_EXCEPTION_HALT_VALIDATION;
448: END IF;
449:

Line 460: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

456: ,x_msg_data => x_msg_data
457: ,p_catv_rec => l_prev_catv_rec
458: ,x_catv_rec => lx_prev_catv_rec);
459:
460: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
461: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
462: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
463: raise okl_api.G_EXCEPTION_ERROR;
464: END IF;

Line 461: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

457: ,p_catv_rec => l_prev_catv_rec
458: ,x_catv_rec => lx_prev_catv_rec);
459:
460: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
461: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
462: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
463: raise okl_api.G_EXCEPTION_ERROR;
464: END IF;
465: --check if line is a default line

Line 463: raise okl_api.G_EXCEPTION_ERROR;

459:
460: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
461: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
462: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
463: raise okl_api.G_EXCEPTION_ERROR;
464: END IF;
465: --check if line is a default line
466: l_default_cau_id := validate_default_rule(l_catv_rec);
467: IF(l_catv_rec.cau_id = l_default_cau_id)THEN

Line 476: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

472: END IF;
473:
474: --Validate dates
475: l_return_status := validate_dates(l_catv_rec, lx_date_err);
476: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
477: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
478: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
479: raise G_EXCEPTION_HALT_VALIDATION;
480: END IF;

Line 477: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

473:
474: --Validate dates
475: l_return_status := validate_dates(l_catv_rec, lx_date_err);
476: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
477: /*OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
478: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
479: raise G_EXCEPTION_HALT_VALIDATION;
480: END IF;
481:

Line 482: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN

478: p_msg_name => 'OKL_BPD_CASH_APPLN_DATE_ERROR');*/
479: raise G_EXCEPTION_HALT_VALIDATION;
480: END IF;
481:
482: IF (l_return_status = Okl_Api.G_RET_STS_SUCCESS) THEN
483: --get hdr version
484: FOR cur IN l_cau_obj_ver_csr(l_cauv_rec.id) LOOP
485: l_cauv_rec.object_version_number := cur.object_version_number;
486: END LOOP;

Line 498: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

494: ,x_msg_data => x_msg_data
495: ,p_cauv_rec => l_cauv_rec
496: ,x_cauv_rec => lx_cauv_rec);
497:
498: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
499: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
500: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
501: raise okl_api.G_EXCEPTION_ERROR;
502: END IF;

Line 499: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

495: ,p_cauv_rec => l_cauv_rec
496: ,x_cauv_rec => lx_cauv_rec);
497:
498: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
499: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
500: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
501: raise okl_api.G_EXCEPTION_ERROR;
502: END IF;
503:

Line 501: raise okl_api.G_EXCEPTION_ERROR;

497:
498: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
499: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
500: p_msg_name => 'OKL_BPD_CASH_APPLN_HDR_ERROR');
501: raise okl_api.G_EXCEPTION_ERROR;
502: END IF;
503:
504:
505: --create rule line

Line 515: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN

511: ,x_msg_data => x_msg_data
512: ,p_catv_rec => l_catv_rec
513: ,x_catv_rec => lx_catv_rec);
514:
515: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
516: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
517: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
518: raise okl_api.G_EXCEPTION_ERROR;
519: END IF;

Line 516: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

512: ,p_catv_rec => l_catv_rec
513: ,x_catv_rec => lx_catv_rec);
514:
515: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
516: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
517: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
518: raise okl_api.G_EXCEPTION_ERROR;
519: END IF;
520: END IF;

Line 518: raise okl_api.G_EXCEPTION_ERROR;

514:
515: IF(l_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
516: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
517: p_msg_name => 'OKL_BPD_CASH_APPLN_LN_ERROR');
518: raise okl_api.G_EXCEPTION_ERROR;
519: END IF;
520: END IF;
521: ELSE
522: null;

Line 525: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN

521: ELSE
522: null;
523: END IF;
524:
525: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
528: RAISE okl_api.G_EXCEPTION_ERROR;
529: END IF;

Line 526: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;

522: null;
523: END IF;
524:
525: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
528: RAISE okl_api.G_EXCEPTION_ERROR;
529: END IF;
530:

Line 527: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN

523: END IF;
524:
525: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
528: RAISE okl_api.G_EXCEPTION_ERROR;
529: END IF;
530:
531: x_catv_rec := lx_catv_rec;

Line 528: RAISE okl_api.G_EXCEPTION_ERROR;

524:
525: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
526: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
527: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
528: RAISE okl_api.G_EXCEPTION_ERROR;
529: END IF;
530:
531: x_catv_rec := lx_catv_rec;
532: x_return_status := l_return_status;

Line 537: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

533: EXCEPTION
534: WHEN G_EXCEPTION_HALT_VALIDATION THEN
535: x_return_status := l_return_status;
536: WHEN OTHERS THEN
537: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
538: ,p_msg_name => G_UNEXPECTED_ERROR
539: ,p_token1 => G_SQLCODE_TOKEN
540: ,p_token1_value => SQLCODE
541: ,p_token2 => G_SQLERRM_TOKEN

Line 548: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

544: ,p_token3_value => G_PKG_NAME
545: ,p_token4 => 'Procedure'
546: ,p_token4_value => l_api_name
547: );
548: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
549: END manipulate_rule;
550:
551: ---------------------------------------------------------------------------
552: -- PROCEDURE maint_cash_appln_rule

Line 556: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,

552: -- PROCEDURE maint_cash_appln_rule
553: ---------------------------------------------------------------------------
554: PROCEDURE maint_cash_appln_rule(
555: p_api_version IN NUMBER,
556: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
557: p_catv_tbl IN catv_tbl_type,
558: x_catv_tbl OUT NOCOPY catv_tbl_type,
559: x_return_status OUT NOCOPY VARCHAR2,
560: x_msg_count OUT NOCOPY NUMBER,

Line 563: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;

559: x_return_status OUT NOCOPY VARCHAR2,
560: x_msg_count OUT NOCOPY NUMBER,
561: x_msg_data OUT NOCOPY VARCHAR2) IS
562:
563: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
564: l_api_version CONSTANT NUMBER := 1;
565: l_api_name CONSTANT VARCHAR2(30) := 'maint_cash_appln_rule';
566:
567: l_catv_rec catv_rec_type;

Line 608: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN

604: x_return_status => l_return_status,
605: x_msg_count => x_msg_count,
606: x_msg_data => x_msg_data);
607:
608: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
611: RAISE okl_api.G_EXCEPTION_ERROR;
612: END IF;

Line 609: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;

605: x_msg_count => x_msg_count,
606: x_msg_data => x_msg_data);
607:
608: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
611: RAISE okl_api.G_EXCEPTION_ERROR;
612: END IF;
613:

Line 610: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN

606: x_msg_data => x_msg_data);
607:
608: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
611: RAISE okl_api.G_EXCEPTION_ERROR;
612: END IF;
613:
614: lx_catv_tbl(cnt) := lx_catv_rec;

Line 611: RAISE okl_api.G_EXCEPTION_ERROR;

607:
608: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
609: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
610: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
611: RAISE okl_api.G_EXCEPTION_ERROR;
612: END IF;
613:
614: lx_catv_tbl(cnt) := lx_catv_rec;
615: cnt := l_catv_tbl.NEXT(cnt);

Line 621: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);

617:
618: -- Processing ends
619: x_catv_tbl := lx_catv_tbl;
620: x_return_status := l_return_status;
621: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
622: EXCEPTION
623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
624: x_return_status := OKL_API.G_RET_STS_ERROR;
625: WHEN OTHERS THEN

Line 623: WHEN OKL_API.G_EXCEPTION_ERROR THEN

619: x_catv_tbl := lx_catv_tbl;
620: x_return_status := l_return_status;
621: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
622: EXCEPTION
623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
624: x_return_status := OKL_API.G_RET_STS_ERROR;
625: WHEN OTHERS THEN
626: x_return_status := OKC_API.HANDLE_EXCEPTIONS
627: (

Line 624: x_return_status := OKL_API.G_RET_STS_ERROR;

620: x_return_status := l_return_status;
621: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
622: EXCEPTION
623: WHEN OKL_API.G_EXCEPTION_ERROR THEN
624: x_return_status := OKL_API.G_RET_STS_ERROR;
625: WHEN OTHERS THEN
626: x_return_status := OKC_API.HANDLE_EXCEPTIONS
627: (
628: l_api_name,