DBA Data[Home] [Help]

APPS.OKL_ACCT_EVENT_PVT dependencies on OKC_API

Line 6: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE

2: /* $Header: OKLCAETB.pls 115.9 2002/04/16 16:46:30 pkm ship $ */
3:
4: PROCEDURE create_acct_event(
5: p_api_version IN NUMBER
6: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
7: ,x_return_status OUT NOCOPY VARCHAR2
8: ,x_msg_count OUT NOCOPY NUMBER
9: ,x_msg_data OUT NOCOPY VARCHAR2
10: ,p_aetv_rec IN aetv_rec_type

Line 18: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

14: ,x_aehv_tbl OUT NOCOPY aehv_tbl_type
15: ,x_aelv_tbl OUT NOCOPY aelv_tbl_type
16: )
17: AS
18: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
19: l_aetv_rec aetv_rec_type;
20: l_aehv_tbl aehv_tbl_type := p_aehv_tbl;
21: l_aelv_tbl aelv_tbl_type := p_aelv_tbl;
22: i NUMBER;

Line 35: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

31: x_msg_data,
32: p_aetv_rec,
33: x_aetv_rec);
34:
35: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
36:
37: -- Populate the foreign key for the line
38: IF (l_aehv_tbl.COUNT > 0) THEN
39: i := l_aehv_tbl.FIRST;

Line 58: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

54: l_aehv_tbl,
55: x_aehv_tbl);
56:
57:
58: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
59:
60: -- Populate the foreign key for the detail
61: IF (l_aehv_tbl.COUNT > 0) THEN
62: i := l_aehv_tbl.FIRST;

Line 94: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

90:
91:
92: EXCEPTION
93: WHEN G_EXCEPTION_HALT_VALIDATION THEN
94: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
95:
96: WHEN OTHERS THEN
97: Okc_Api.set_message(p_app_name => g_app_name,
98: p_msg_name => g_unexpected_error,

Line 97: Okc_Api.set_message(p_app_name => g_app_name,

93: WHEN G_EXCEPTION_HALT_VALIDATION THEN
94: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
95:
96: WHEN OTHERS THEN
97: Okc_Api.set_message(p_app_name => g_app_name,
98: p_msg_name => g_unexpected_error,
99: p_token1 => g_sqlcode_token,
100: p_token1_value => SQLCODE,
101: p_token2 => g_sqlerrm_token,

Line 103: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

99: p_token1 => g_sqlcode_token,
100: p_token1_value => SQLCODE,
101: p_token2 => g_sqlerrm_token,
102: p_token2_value => SQLERRM);
103: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
104:
105: END create_acct_event;
106:
107: --Object type procedure for update

Line 110: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE

106:
107: --Object type procedure for update
108: PROCEDURE update_acct_event(
109: p_api_version IN NUMBER
110: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
111: ,x_return_status OUT NOCOPY VARCHAR2
112: ,x_msg_count OUT NOCOPY NUMBER
113: ,x_msg_data OUT NOCOPY VARCHAR2
114: ,p_aetv_rec IN aetv_rec_type

Line 122: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

118: ,x_aehv_tbl OUT NOCOPY aehv_tbl_type
119: ,x_aelv_tbl OUT NOCOPY aelv_tbl_type
120: )
121: AS
122: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
123:
124: BEGIN
125: --Update the Master
126: update_acct_event(

Line 135: IF x_return_status = Okc_Api.G_RET_STS_SUCCESS THEN

131: x_msg_data,
132: p_aetv_rec,
133: x_aetv_rec);
134:
135: IF x_return_status = Okc_Api.G_RET_STS_SUCCESS THEN
136:
137: --Update the line
138: update_acct_header(
139: p_api_version,

Line 147: IF (x_return_status = Okc_Api.G_RET_STS_SUCCESS) THEN

143: x_msg_data,
144: p_aehv_tbl,
145: x_aehv_tbl);
146:
147: IF (x_return_status = Okc_Api.G_RET_STS_SUCCESS) THEN
148:
149: --Update the detail
150: update_acct_lines(
151: p_api_version,

Line 168: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE

164:
165: --Object type procedure for validate
166: PROCEDURE validate_acct_event(
167: p_api_version IN NUMBER
168: ,p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE
169: ,x_return_status OUT NOCOPY VARCHAR2
170: ,x_msg_count OUT NOCOPY NUMBER
171: ,x_msg_data OUT NOCOPY VARCHAR2
172: ,p_aetv_rec IN aetv_rec_type

Line 177: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

173: ,p_aehv_tbl IN aehv_tbl_type
174: ,p_aelv_tbl IN aelv_tbl_type
175: )
176: AS
177: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
178: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
179:
180: BEGIN
181:

Line 178: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

174: ,p_aelv_tbl IN aelv_tbl_type
175: )
176: AS
177: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
178: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
179:
180: BEGIN
181:
182: --Validate the Master

Line 191: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

187: x_msg_count,
188: x_msg_data,
189: p_aetv_rec);
190:
191: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
192: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
193: l_overall_status := x_return_status;
194: END IF;
195: END IF;

Line 192: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

188: x_msg_data,
189: p_aetv_rec);
190:
191: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
192: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
193: l_overall_status := x_return_status;
194: END IF;
195: END IF;
196:

Line 207: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

203: x_msg_count,
204: x_msg_data,
205: p_aehv_tbl);
206:
207: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
208: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: l_overall_status := x_return_status;
210: END IF;
211: END IF;

Line 208: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

204: x_msg_data,
205: p_aehv_tbl);
206:
207: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
208: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
209: l_overall_status := x_return_status;
210: END IF;
211: END IF;
212:

Line 222: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

218: x_msg_count,
219: x_msg_data,
220: p_aelv_tbl);
221:
222: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
223: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
224: l_overall_status := x_return_status;
225: END IF;
226: END IF;

Line 223: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

219: x_msg_data,
220: p_aelv_tbl);
221:
222: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
223: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
224: l_overall_status := x_return_status;
225: END IF;
226: END IF;
227:

Line 233: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

229:
230:
231: EXCEPTION
232: WHEN G_EXCEPTION_HALT_VALIDATION THEN
233: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
234:
235: WHEN OTHERS THEN
236: Okc_Api.set_message(p_app_name => g_app_name,
237: p_msg_name => g_unexpected_error,

Line 236: Okc_Api.set_message(p_app_name => g_app_name,

232: WHEN G_EXCEPTION_HALT_VALIDATION THEN
233: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
234:
235: WHEN OTHERS THEN
236: Okc_Api.set_message(p_app_name => g_app_name,
237: p_msg_name => g_unexpected_error,
238: p_token1 => g_sqlcode_token,
239: p_token1_value => SQLCODE,
240: p_token2 => g_sqlerrm_token,

Line 242: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

238: p_token1 => g_sqlcode_token,
239: p_token1_value => SQLCODE,
240: p_token2 => g_sqlerrm_token,
241: p_token2_value => SQLERRM);
242: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
243:
244: END validate_acct_event;
245:
246:

Line 249: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

245:
246:
247: PROCEDURE create_acct_event(
248: p_api_version IN NUMBER,
249: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
250: x_return_status OUT NOCOPY VARCHAR2,
251: x_msg_count OUT NOCOPY NUMBER,
252: x_msg_data OUT NOCOPY VARCHAR2,
253: p_aetv_rec IN aetv_rec_type,

Line 270: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

266: END create_acct_event;
267:
268: PROCEDURE create_acct_event(
269: p_api_version IN NUMBER,
270: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
271: x_return_status OUT NOCOPY VARCHAR2,
272: x_msg_count OUT NOCOPY NUMBER,
273: x_msg_data OUT NOCOPY VARCHAR2,
274: p_aetv_tbl IN aetv_tbl_type,

Line 278: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

274: p_aetv_tbl IN aetv_tbl_type,
275: x_aetv_tbl OUT NOCOPY aetv_tbl_type) IS
276:
277: i NUMBER := 0;
278: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
279:
280: BEGIN
281:
282: Okc_Api.init_msg_list(p_init_msg_list);

Line 282: Okc_Api.init_msg_list(p_init_msg_list);

278: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
279:
280: BEGIN
281:
282: Okc_Api.init_msg_list(p_init_msg_list);
283: -- Make sure PL/SQL table has records in it before passing
284: IF (p_aetv_tbl.COUNT > 0) THEN
285: i := p_aetv_tbl.FIRST;
286: LOOP

Line 289: p_init_msg_list => Okc_Api.G_FALSE,

285: i := p_aetv_tbl.FIRST;
286: LOOP
287: create_Acct_event(
288: p_api_version => p_api_version,
289: p_init_msg_list => Okc_Api.G_FALSE,
290: x_return_status => x_return_status,
291: x_msg_count => x_msg_count,
292: x_msg_data => x_msg_data,
293: p_aetv_rec => p_aetv_tbl(i),

Line 296: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

292: x_msg_data => x_msg_data,
293: p_aetv_rec => p_aetv_tbl(i),
294: x_aetv_rec => x_aetv_tbl(i));
295:
296: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
297: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
298: l_overall_status := x_return_status;
299: END IF;
300: END IF;

Line 297: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

293: p_aetv_rec => p_aetv_tbl(i),
294: x_aetv_rec => x_aetv_tbl(i));
295:
296: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
297: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
298: l_overall_status := x_return_status;
299: END IF;
300: END IF;
301:

Line 317: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

313:
314:
315: PROCEDURE lock_acct_event(
316: p_api_version IN NUMBER,
317: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
318: x_return_status OUT NOCOPY VARCHAR2,
319: x_msg_count OUT NOCOPY NUMBER,
320: x_msg_data OUT NOCOPY VARCHAR2,
321: p_aetv_rec IN aetv_rec_type) IS

Line 334: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

330: END lock_acct_event;
331:
332: PROCEDURE lock_acct_event(
333: p_api_version IN NUMBER,
334: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
335: x_return_status OUT NOCOPY VARCHAR2,
336: x_msg_count OUT NOCOPY NUMBER,
337: x_msg_data OUT NOCOPY VARCHAR2,
338: p_aetv_tbl IN aetv_tbl_type) IS

Line 340: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

336: x_msg_count OUT NOCOPY NUMBER,
337: x_msg_data OUT NOCOPY VARCHAR2,
338: p_aetv_tbl IN aetv_tbl_type) IS
339:
340: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
341: i NUMBER := 0;
342:
343: BEGIN
344:

Line 345: Okc_Api.init_msg_list(p_init_msg_list);

341: i NUMBER := 0;
342:
343: BEGIN
344:
345: Okc_Api.init_msg_list(p_init_msg_list);
346: -- Make sure PL/SQL table has records in it before passing
347: IF (p_aetv_tbl.COUNT > 0) THEN
348: i := p_aetv_tbl.FIRST;
349: LOOP

Line 353: p_init_msg_list => Okc_Api.G_FALSE,

349: LOOP
350:
351: lock_acct_event(
352: p_api_version => p_api_version,
353: p_init_msg_list => Okc_Api.G_FALSE,
354: x_return_status => x_return_status,
355: x_msg_count => x_msg_count,
356: x_msg_data => x_msg_data,
357: p_aetv_rec => p_aetv_tbl(i));

Line 359: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

355: x_msg_count => x_msg_count,
356: x_msg_data => x_msg_data,
357: p_aetv_rec => p_aetv_tbl(i));
358:
359: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
360: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
361: l_overall_status := x_return_status;
362: END IF;
363: END IF;

Line 360: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN

356: x_msg_data => x_msg_data,
357: p_aetv_rec => p_aetv_tbl(i));
358:
359: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
360: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
361: l_overall_status := x_return_status;
362: END IF;
363: END IF;
364:

Line 377: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

373: END lock_acct_event;
374:
375: PROCEDURE update_acct_event(
376: p_api_version IN NUMBER,
377: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
378: x_return_status OUT NOCOPY VARCHAR2,
379: x_msg_count OUT NOCOPY NUMBER,
380: x_msg_data OUT NOCOPY VARCHAR2,
381: p_aetv_rec IN aetv_rec_type,

Line 397: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

393: END update_acct_event;
394:
395: PROCEDURE update_acct_event(
396: p_api_version IN NUMBER,
397: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
398: x_return_status OUT NOCOPY VARCHAR2,
399: x_msg_count OUT NOCOPY NUMBER,
400: x_msg_data OUT NOCOPY VARCHAR2,
401: p_aetv_tbl IN aetv_tbl_type,

Line 404: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

400: x_msg_data OUT NOCOPY VARCHAR2,
401: p_aetv_tbl IN aetv_tbl_type,
402: x_aetv_tbl OUT NOCOPY aetv_tbl_type) IS
403: i NUMBER := 0;
404: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
405:
406: BEGIN
407:
408: Okc_Api.init_msg_list(p_init_msg_list);

Line 408: Okc_Api.init_msg_list(p_init_msg_list);

404: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
405:
406: BEGIN
407:
408: Okc_Api.init_msg_list(p_init_msg_list);
409: -- Make sure PL/SQL table has records in it before passing
410: IF (p_aetv_tbl.COUNT > 0) THEN
411: i := p_aetv_tbl.FIRST;
412: LOOP

Line 415: p_init_msg_list => Okc_Api.G_FALSE,

411: i := p_aetv_tbl.FIRST;
412: LOOP
413: update_acct_event(
414: p_api_version => p_api_version,
415: p_init_msg_list => Okc_Api.G_FALSE,
416: x_return_status => x_return_status,
417: x_msg_count => x_msg_count,
418: x_msg_data => x_msg_data,
419: p_aetv_rec => p_aetv_tbl(i),

Line 422: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

418: x_msg_data => x_msg_data,
419: p_aetv_rec => p_aetv_tbl(i),
420: x_aetv_rec => x_aetv_tbl(i));
421:
422: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
423: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
424: l_overall_status := x_return_status;
425: END IF;
426: END IF;

Line 423: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

419: p_aetv_rec => p_aetv_tbl(i),
420: x_aetv_rec => x_aetv_tbl(i));
421:
422: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
423: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
424: l_overall_status := x_return_status;
425: END IF;
426: END IF;
427:

Line 439: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

435:
436:
437:
438: PROCEDURE delete_acct_event(p_api_version IN NUMBER,
439: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
440: x_return_status OUT NOCOPY VARCHAR2,
441: x_msg_count OUT NOCOPY NUMBER,
442: x_msg_data OUT NOCOPY VARCHAR2,
443: p_aetv_rec IN aetv_rec_type)

Line 447: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

443: p_aetv_rec IN aetv_rec_type)
444:
445: IS
446:
447: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
448:
449: CURSOR aeh_csr(v_aet_id NUMBER)
450: IS
451: SELECT ae_header_id

Line 474: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

470:
471: END IF;
472: CLOSE aeh_csr;
473:
474: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
475:
476: OKL_AET_PVT.delete_row(p_api_version => p_api_version,
477: p_init_msg_list => p_init_msg_list,
478: x_return_status => x_return_status,

Line 491: OKC_API.set_message(p_app_name => g_app_name,

487: WHEN G_EXCEPTION_HALT_VALIDATION THEN
488: NULL;
489:
490: WHEN OTHERS THEN
491: OKC_API.set_message(p_app_name => g_app_name,
492: p_msg_name => g_unexpected_error,
493: p_token1 => g_sqlcode_token,
494: p_token1_value => SQLCODE,
495: p_token2 => g_sqlerrm_token,

Line 497: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

493: p_token1 => g_sqlcode_token,
494: p_token1_value => SQLCODE,
495: p_token2 => g_sqlerrm_token,
496: p_token2_value => SQLERRM);
497: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
498: END delete_acct_event;
499:
500:
501: PROCEDURE delete_acct_event(

Line 503: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

499:
500:
501: PROCEDURE delete_acct_event(
502: p_api_version IN NUMBER,
503: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
504: x_return_status OUT NOCOPY VARCHAR2,
505: x_msg_count OUT NOCOPY NUMBER,
506: x_msg_data OUT NOCOPY VARCHAR2,
507: p_aetv_tbl IN aetv_tbl_type) IS

Line 509: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

505: x_msg_count OUT NOCOPY NUMBER,
506: x_msg_data OUT NOCOPY VARCHAR2,
507: p_aetv_tbl IN aetv_tbl_type) IS
508: i NUMBER :=0;
509: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
510: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
511:
512: BEGIN
513: --Initialize the return status

Line 510: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

506: x_msg_data OUT NOCOPY VARCHAR2,
507: p_aetv_tbl IN aetv_tbl_type) IS
508: i NUMBER :=0;
509: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
510: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
511:
512: BEGIN
513: --Initialize the return status
514: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 514: x_return_status := OKC_API.G_RET_STS_SUCCESS;

510: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
511:
512: BEGIN
513: --Initialize the return status
514: x_return_status := OKC_API.G_RET_STS_SUCCESS;
515:
516: IF (p_aetv_tbl.COUNT > 0) THEN
517: i := p_aetv_tbl.FIRST;
518: LOOP

Line 528: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

524: ,x_msg_count
525: ,x_msg_data
526: ,p_aetv_tbl(i));
527:
528: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
529: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
530: l_overall_status := x_return_status;
531: END IF;
532: END IF;

Line 529: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

525: ,x_msg_data
526: ,p_aetv_tbl(i));
527:
528: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
529: IF (l_overall_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
530: l_overall_status := x_return_status;
531: END IF;
532: END IF;
533:

Line 547: OKC_API.set_message(p_app_name => g_app_name,

543: WHEN G_EXCEPTION_HALT_VALIDATION THEN
544: NULL;
545:
546: WHEN OTHERS THEN
547: OKC_API.set_message(p_app_name => g_app_name,
548: p_msg_name => g_unexpected_error,
549: p_token1 => g_sqlcode_token,
550: p_token1_value => SQLCODE,
551: p_token2 => g_sqlerrm_token,

Line 553: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

549: p_token1 => g_sqlcode_token,
550: p_token1_value => SQLCODE,
551: p_token2 => g_sqlerrm_token,
552: p_token2_value => SQLERRM);
553: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
554: END delete_acct_event;
555:
556: PROCEDURE validate_acct_event(
557: p_api_version IN NUMBER,

Line 558: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

554: END delete_acct_event;
555:
556: PROCEDURE validate_acct_event(
557: p_api_version IN NUMBER,
558: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
559: x_return_status OUT NOCOPY VARCHAR2,
560: x_msg_count OUT NOCOPY NUMBER,
561: x_msg_data OUT NOCOPY VARCHAR2,
562: p_aetv_rec IN aetv_rec_type) IS

Line 576: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

572:
573:
574: PROCEDURE validate_acct_event(
575: p_api_version IN NUMBER,
576: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
577: x_return_status OUT NOCOPY VARCHAR2,
578: x_msg_count OUT NOCOPY NUMBER,
579: x_msg_data OUT NOCOPY VARCHAR2,
580: p_aetv_tbl IN aetv_tbl_type) IS

Line 583: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

579: x_msg_data OUT NOCOPY VARCHAR2,
580: p_aetv_tbl IN aetv_tbl_type) IS
581:
582: i NUMBER := 0;
583: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
584:
585: BEGIN
586:
587: Okc_Api.init_msg_list(p_init_msg_list);

Line 587: Okc_Api.init_msg_list(p_init_msg_list);

583: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
584:
585: BEGIN
586:
587: Okc_Api.init_msg_list(p_init_msg_list);
588: -- Make sure PL/SQL table has records in it before passing
589: IF (p_aetv_tbl.COUNT > 0) THEN
590: i := p_aetv_tbl.FIRST;
591: LOOP

Line 594: p_init_msg_list => Okc_Api.G_FALSE,

590: i := p_aetv_tbl.FIRST;
591: LOOP
592: validate_acct_event(
593: p_api_version => p_api_version,
594: p_init_msg_list => Okc_Api.G_FALSE,
595: x_return_status => x_return_status,
596: x_msg_count => x_msg_count,
597: x_msg_data => x_msg_data,
598: p_aetv_rec => p_aetv_tbl(i));

Line 600: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

596: x_msg_count => x_msg_count,
597: x_msg_data => x_msg_data,
598: p_aetv_rec => p_aetv_tbl(i));
599:
600: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
601: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
602: l_overall_status := x_return_status;
603: END IF;
604: END IF;

Line 601: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN

597: x_msg_data => x_msg_data,
598: p_aetv_rec => p_aetv_tbl(i));
599:
600: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
601: IF (l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
602: l_overall_status := x_return_status;
603: END IF;
604: END IF;
605:

Line 616: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

612: END validate_acct_event;
613:
614: PROCEDURE create_acct_header(
615: p_api_version IN NUMBER,
616: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
617: x_return_status OUT NOCOPY VARCHAR2,
618: x_msg_count OUT NOCOPY NUMBER,
619: x_msg_data OUT NOCOPY VARCHAR2,
620: p_aehv_rec IN aehv_rec_type,

Line 634: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

630: x_msg_data,
631: p_aehv_rec,
632: x_aehv_rec);
633:
634: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
635: NULL;
636: -- Custom code by developer Update_Minor_Version(p_aehv_rec.dnz_chr_id);
637: END IF;
638:

Line 643: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

639: END create_acct_header;
640:
641: PROCEDURE create_acct_header(
642: p_api_version IN NUMBER,
643: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
644: x_return_status OUT NOCOPY VARCHAR2,
645: x_msg_count OUT NOCOPY NUMBER,
646: x_msg_data OUT NOCOPY VARCHAR2,
647: p_aehv_tbl IN aehv_tbl_type,

Line 650: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

646: x_msg_data OUT NOCOPY VARCHAR2,
647: p_aehv_tbl IN aehv_tbl_type,
648: x_aehv_tbl OUT NOCOPY aehv_tbl_type) IS
649: i NUMBER := 0;
650: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
651: BEGIN
652:
653: Okc_Api.init_msg_list(p_init_msg_list);
654: -- Make sure PL/SQL table has records in it before passing

Line 653: Okc_Api.init_msg_list(p_init_msg_list);

649: i NUMBER := 0;
650: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
651: BEGIN
652:
653: Okc_Api.init_msg_list(p_init_msg_list);
654: -- Make sure PL/SQL table has records in it before passing
655: IF (p_aehv_tbl.COUNT > 0) THEN
656: i := p_aehv_tbl.FIRST;
657: LOOP

Line 660: p_init_msg_list => Okc_Api.G_FALSE,

656: i := p_aehv_tbl.FIRST;
657: LOOP
658: create_Acct_header(
659: p_api_version => p_api_version,
660: p_init_msg_list => Okc_Api.G_FALSE,
661: x_return_status => x_return_status,
662: x_msg_count => x_msg_count,
663: x_msg_data => x_msg_data,
664: p_aehv_rec => p_aehv_tbl(i),

Line 668: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

664: p_aehv_rec => p_aehv_tbl(i),
665: x_aehv_rec => x_aehv_tbl(i));
666:
667: -- store the highest degree of error
668: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
669: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
670: l_overall_status := x_return_status;
671: END IF;
672: END IF;

Line 669: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

665: x_aehv_rec => x_aehv_tbl(i));
666:
667: -- store the highest degree of error
668: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
669: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
670: l_overall_status := x_return_status;
671: END IF;
672: END IF;
673:

Line 686: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

682: END create_acct_header;
683:
684: PROCEDURE lock_acct_header(
685: p_api_version IN NUMBER,
686: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
687: x_return_status OUT NOCOPY VARCHAR2,
688: x_msg_count OUT NOCOPY NUMBER,
689: x_msg_data OUT NOCOPY VARCHAR2,
690: p_aehv_rec IN aehv_rec_type) IS

Line 703: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

699: END lock_acct_header;
700:
701: PROCEDURE lock_acct_header(
702: p_api_version IN NUMBER,
703: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
704: x_return_status OUT NOCOPY VARCHAR2,
705: x_msg_count OUT NOCOPY NUMBER,
706: x_msg_data OUT NOCOPY VARCHAR2,
707: p_aehv_tbl IN aehv_tbl_type) IS

Line 710: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

706: x_msg_data OUT NOCOPY VARCHAR2,
707: p_aehv_tbl IN aehv_tbl_type) IS
708:
709: i NUMBER := 0;
710: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
711: BEGIN
712:
713: Okc_Api.init_msg_list(p_init_msg_list);
714: -- Make sure PL/SQL table has records in it before passing

Line 713: Okc_Api.init_msg_list(p_init_msg_list);

709: i NUMBER := 0;
710: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
711: BEGIN
712:
713: Okc_Api.init_msg_list(p_init_msg_list);
714: -- Make sure PL/SQL table has records in it before passing
715: IF (p_aehv_tbl.COUNT > 0) THEN
716: i := p_aehv_tbl.FIRST;
717: LOOP

Line 720: p_init_msg_list => Okc_Api.G_FALSE,

716: i := p_aehv_tbl.FIRST;
717: LOOP
718: lock_acct_header(
719: p_api_version => p_api_version,
720: p_init_msg_list => Okc_Api.G_FALSE,
721: x_return_status => x_return_status,
722: x_msg_count => x_msg_count,
723: x_msg_data => x_msg_data,
724: p_aehv_rec => p_aehv_tbl(i));

Line 727: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

723: x_msg_data => x_msg_data,
724: p_aehv_rec => p_aehv_tbl(i));
725:
726: -- store the highest degree of error
727: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
728: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
729: l_overall_status := x_return_status;
730: END IF;
731: END IF;

Line 728: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

724: p_aehv_rec => p_aehv_tbl(i));
725:
726: -- store the highest degree of error
727: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
728: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
729: l_overall_status := x_return_status;
730: END IF;
731: END IF;
732:

Line 745: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

741: END lock_acct_header;
742:
743: PROCEDURE update_acct_header(
744: p_api_version IN NUMBER,
745: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
746: x_return_status OUT NOCOPY VARCHAR2,
747: x_msg_count OUT NOCOPY NUMBER,
748: x_msg_data OUT NOCOPY VARCHAR2,
749: p_aehv_rec IN aehv_rec_type,

Line 761: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

757: x_msg_data,
758: p_aehv_rec,
759: x_aehv_rec);
760:
761: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
762: NULL;
763: -- Custom code by developer Update_Minor_Version(p_aehv_rec.dnz_chr_id);
764: END IF;
765: END update_acct_header;

Line 770: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

766:
767:
768: PROCEDURE update_acct_header(
769: p_api_version IN NUMBER,
770: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
771: x_return_status OUT NOCOPY VARCHAR2,
772: x_msg_count OUT NOCOPY NUMBER,
773: x_msg_data OUT NOCOPY VARCHAR2,
774: p_aehv_tbl IN aehv_tbl_type,

Line 778: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

774: p_aehv_tbl IN aehv_tbl_type,
775: x_aehv_tbl OUT NOCOPY aehv_tbl_type) IS
776:
777: i NUMBER := 0;
778: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
779:
780: BEGIN
781:
782: Okc_Api.init_msg_list(p_init_msg_list);

Line 782: Okc_Api.init_msg_list(p_init_msg_list);

778: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
779:
780: BEGIN
781:
782: Okc_Api.init_msg_list(p_init_msg_list);
783: -- Make sure PL/SQL table has records in it before passing
784: IF (p_aehv_tbl.COUNT > 0) THEN
785: i := p_aehv_tbl.FIRST;
786: LOOP

Line 789: p_init_msg_list => Okc_Api.G_FALSE,

785: i := p_aehv_tbl.FIRST;
786: LOOP
787: update_Acct_header(
788: p_api_version => p_api_version,
789: p_init_msg_list => Okc_Api.G_FALSE,
790: x_return_status => x_return_status,
791: x_msg_count => x_msg_count,
792: x_msg_data => x_msg_data,
793: p_aehv_rec => p_aehv_tbl(i),

Line 797: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

793: p_aehv_rec => p_aehv_tbl(i),
794: x_aehv_rec => x_aehv_tbl(i));
795:
796: -- store the highest degree of error
797: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
798: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
799: l_overall_status := x_return_status;
800: END IF;
801: END IF;

Line 798: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

794: x_aehv_rec => x_aehv_tbl(i));
795:
796: -- store the highest degree of error
797: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
798: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
799: l_overall_status := x_return_status;
800: END IF;
801: END IF;
802:

Line 815: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

811: END update_acct_header;
812:
813:
814: PROCEDURE delete_acct_header(p_api_version IN NUMBER,
815: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
816: x_return_status OUT NOCOPY VARCHAR2,
817: x_msg_count OUT NOCOPY NUMBER,
818: x_msg_data OUT NOCOPY VARCHAR2,
819: p_aehv_rec IN aehv_rec_type) IS

Line 822: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

818: x_msg_data OUT NOCOPY VARCHAR2,
819: p_aehv_rec IN aehv_rec_type) IS
820:
821: i NUMBER :=0;
822: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
823: l_aelv_tbl OKL_AEL_PVT.AELV_TBL_TYPE;
824:
825: CURSOR ael_csr(v_aeh_id NUMBER) IS
826: SELECT ae_line_id

Line 855: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

851: p_aelv_tbl => l_aelv_tbl);
852:
853: END IF;
854:
855: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
856:
857: --Delete the Header
858:
859: okl_aeh_pvt.delete_row(p_api_version => p_api_version,

Line 873: OKC_API.set_message(p_app_name => g_app_name,

869: WHEN G_EXCEPTION_HALT_VALIDATION THEN
870: NULL;
871:
872: WHEN OTHERS THEN
873: OKC_API.set_message(p_app_name => g_app_name,
874: p_msg_name => g_unexpected_error,
875: p_token1 => g_sqlcode_token,
876: p_token1_value => SQLCODE,
877: p_token2 => g_sqlerrm_token,

Line 879: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

875: p_token1 => g_sqlcode_token,
876: p_token1_value => SQLCODE,
877: p_token2 => g_sqlerrm_token,
878: p_token2_value => SQLERRM);
879: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
880: END delete_acct_header;
881:
882: PROCEDURE delete_acct_header(
883: p_api_version IN NUMBER,

Line 884: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

880: END delete_acct_header;
881:
882: PROCEDURE delete_acct_header(
883: p_api_version IN NUMBER,
884: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
885: x_return_status OUT NOCOPY VARCHAR2,
886: x_msg_count OUT NOCOPY NUMBER,
887: x_msg_data OUT NOCOPY VARCHAR2,
888: p_aehv_tbl IN aehv_tbl_type) IS

Line 890: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

886: x_msg_count OUT NOCOPY NUMBER,
887: x_msg_data OUT NOCOPY VARCHAR2,
888: p_aehv_tbl IN aehv_tbl_type) IS
889: i NUMBER :=0;
890: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
891: BEGIN
892:
893: Okc_Api.init_msg_list(p_init_msg_list);
894: -- Make sure PL/SQL table has records in it before passing

Line 893: Okc_Api.init_msg_list(p_init_msg_list);

889: i NUMBER :=0;
890: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
891: BEGIN
892:
893: Okc_Api.init_msg_list(p_init_msg_list);
894: -- Make sure PL/SQL table has records in it before passing
895: IF (p_aehv_tbl.COUNT > 0) THEN
896: i := p_aehv_tbl.FIRST;
897: LOOP

Line 900: p_init_msg_list => Okc_Api.G_FALSE,

896: i := p_aehv_tbl.FIRST;
897: LOOP
898: delete_acct_header(
899: p_api_version => p_api_version,
900: p_init_msg_list => Okc_Api.G_FALSE,
901: x_return_status => x_return_status,
902: x_msg_count => x_msg_count,
903: x_msg_data => x_msg_data,
904: p_aehv_rec => p_aehv_tbl(i));

Line 907: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

903: x_msg_data => x_msg_data,
904: p_aehv_rec => p_aehv_tbl(i));
905:
906: -- store the highest degree of error
907: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
908: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
909: l_overall_status := x_return_status;
910: END IF;
911: END IF;

Line 908: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

904: p_aehv_rec => p_aehv_tbl(i));
905:
906: -- store the highest degree of error
907: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
908: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
909: l_overall_status := x_return_status;
910: END IF;
911: END IF;
912:

Line 926: OKC_API.set_message(p_app_name => g_app_name,

922: WHEN G_EXCEPTION_HALT_VALIDATION THEN
923: NULL;
924:
925: WHEN OTHERS THEN
926: OKC_API.set_message(p_app_name => g_app_name,
927: p_msg_name => g_unexpected_error,
928: p_token1 => g_sqlcode_token,
929: p_token1_value => SQLCODE,
930: p_token2 => g_sqlerrm_token,

Line 932: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

928: p_token1 => g_sqlcode_token,
929: p_token1_value => SQLCODE,
930: p_token2 => g_sqlerrm_token,
931: p_token2_value => SQLERRM);
932: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
933: END delete_acct_header;
934:
935: PROCEDURE validate_acct_header(
936: p_api_version IN NUMBER,

Line 937: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

933: END delete_acct_header;
934:
935: PROCEDURE validate_acct_header(
936: p_api_version IN NUMBER,
937: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
938: x_return_status OUT NOCOPY VARCHAR2,
939: x_msg_count OUT NOCOPY NUMBER,
940: x_msg_data OUT NOCOPY VARCHAR2,
941: p_aehv_rec IN aehv_rec_type) IS

Line 955: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

951:
952:
953: PROCEDURE validate_acct_header(
954: p_api_version IN NUMBER,
955: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
956: x_return_status OUT NOCOPY VARCHAR2,
957: x_msg_count OUT NOCOPY NUMBER,
958: x_msg_data OUT NOCOPY VARCHAR2,
959: p_aehv_tbl IN aehv_tbl_type) IS

Line 962: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

958: x_msg_data OUT NOCOPY VARCHAR2,
959: p_aehv_tbl IN aehv_tbl_type) IS
960:
961: i NUMBER := 0;
962: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
963:
964: BEGIN
965:
966: Okc_Api.init_msg_list(p_init_msg_list);

Line 966: Okc_Api.init_msg_list(p_init_msg_list);

962: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
963:
964: BEGIN
965:
966: Okc_Api.init_msg_list(p_init_msg_list);
967: -- Make sure PL/SQL table has records in it before passing
968: IF (p_aehv_tbl.COUNT > 0) THEN
969: i := p_aehv_tbl.FIRST;
970: LOOP

Line 973: p_init_msg_list => Okc_Api.G_FALSE,

969: i := p_aehv_tbl.FIRST;
970: LOOP
971: validate_acct_header(
972: p_api_version => p_api_version,
973: p_init_msg_list => Okc_Api.G_FALSE,
974: x_return_status => x_return_status,
975: x_msg_count => x_msg_count,
976: x_msg_data => x_msg_data,
977: p_aehv_rec => p_aehv_tbl(i));

Line 980: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

976: x_msg_data => x_msg_data,
977: p_aehv_rec => p_aehv_tbl(i));
978:
979: -- store the highest degree of error
980: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
981: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
982: l_overall_status := x_return_status;
983: END IF;
984: END IF;

Line 981: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

977: p_aehv_rec => p_aehv_tbl(i));
978:
979: -- store the highest degree of error
980: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
981: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
982: l_overall_status := x_return_status;
983: END IF;
984: END IF;
985:

Line 998: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

994: END validate_acct_header;
995:
996: PROCEDURE create_acct_lines(
997: p_api_version IN NUMBER,
998: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
999: x_return_status OUT NOCOPY VARCHAR2,
1000: x_msg_count OUT NOCOPY NUMBER,
1001: x_msg_data OUT NOCOPY VARCHAR2,
1002: p_aelv_rec IN aelv_rec_type,

Line 1014: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

1010: x_msg_data,
1011: p_aelv_rec,
1012: x_aelv_rec);
1013:
1014: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1015: NULL;
1016: -- Custom code by developer Update_Minor_Version(p_aelv_rec.dnz_chr_id);
1017: END IF;
1018:

Line 1024: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1020:
1021:
1022: PROCEDURE create_acct_lines(
1023: p_api_version IN NUMBER,
1024: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1025: x_return_status OUT NOCOPY VARCHAR2,
1026: x_msg_count OUT NOCOPY NUMBER,
1027: x_msg_data OUT NOCOPY VARCHAR2,
1028: p_aelv_tbl IN aelv_tbl_type,

Line 1032: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1028: p_aelv_tbl IN aelv_tbl_type,
1029: x_aelv_tbl OUT NOCOPY aelv_tbl_type) IS
1030:
1031: i NUMBER := 0;
1032: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1033:
1034: BEGIN
1035:
1036: Okc_Api.init_msg_list(p_init_msg_list);

Line 1036: Okc_Api.init_msg_list(p_init_msg_list);

1032: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1033:
1034: BEGIN
1035:
1036: Okc_Api.init_msg_list(p_init_msg_list);
1037: -- Make sure PL/SQL table has records in it before passing
1038: IF (p_aelv_tbl.COUNT > 0) THEN
1039: i := p_aelv_tbl.FIRST;
1040: LOOP

Line 1043: p_init_msg_list => Okc_Api.G_FALSE,

1039: i := p_aelv_tbl.FIRST;
1040: LOOP
1041: create_acct_lines(
1042: p_api_version => p_api_version,
1043: p_init_msg_list => Okc_Api.G_FALSE,
1044: x_return_status => x_return_status,
1045: x_msg_count => x_msg_count,
1046: x_msg_data => x_msg_data,
1047: p_aelv_rec => p_aelv_tbl(i),

Line 1051: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1047: p_aelv_rec => p_aelv_tbl(i),
1048: x_aelv_rec => x_aelv_tbl(i));
1049:
1050: -- store the highest degree of error
1051: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1052: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1053: l_overall_status := x_return_status;
1054: END IF;
1055: END IF;

Line 1052: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1048: x_aelv_rec => x_aelv_tbl(i));
1049:
1050: -- store the highest degree of error
1051: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1052: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1053: l_overall_status := x_return_status;
1054: END IF;
1055: END IF;
1056:

Line 1069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1065: END create_acct_lines;
1066:
1067: PROCEDURE lock_acct_lines(
1068: p_api_version IN NUMBER,
1069: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1070: x_return_status OUT NOCOPY VARCHAR2,
1071: x_msg_count OUT NOCOPY NUMBER,
1072: x_msg_data OUT NOCOPY VARCHAR2,
1073: p_aelv_rec IN aelv_rec_type) IS

Line 1086: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1082: END lock_acct_lines;
1083:
1084: PROCEDURE lock_acct_lines(
1085: p_api_version IN NUMBER,
1086: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1087: x_return_status OUT NOCOPY VARCHAR2,
1088: x_msg_count OUT NOCOPY NUMBER,
1089: x_msg_data OUT NOCOPY VARCHAR2,
1090: p_aelv_tbl IN aelv_tbl_type) IS

Line 1093: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1089: x_msg_data OUT NOCOPY VARCHAR2,
1090: p_aelv_tbl IN aelv_tbl_type) IS
1091:
1092: i NUMBER := 0;
1093: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1094:
1095: BEGIN
1096: Okc_Api.init_msg_list(p_init_msg_list);
1097: -- Make sure PL/SQL table has records in it before passing

Line 1096: Okc_Api.init_msg_list(p_init_msg_list);

1092: i NUMBER := 0;
1093: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1094:
1095: BEGIN
1096: Okc_Api.init_msg_list(p_init_msg_list);
1097: -- Make sure PL/SQL table has records in it before passing
1098: IF (p_aelv_tbl.COUNT > 0) THEN
1099: i := p_aelv_tbl.FIRST;
1100: LOOP

Line 1103: p_init_msg_list => Okc_Api.G_FALSE,

1099: i := p_aelv_tbl.FIRST;
1100: LOOP
1101: lock_acct_lines(
1102: p_api_version => p_api_version,
1103: p_init_msg_list => Okc_Api.G_FALSE,
1104: x_return_status => x_return_status,
1105: x_msg_count => x_msg_count,
1106: x_msg_data => x_msg_data,
1107: p_aelv_rec => p_aelv_tbl(i));

Line 1110: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1106: x_msg_data => x_msg_data,
1107: p_aelv_rec => p_aelv_tbl(i));
1108:
1109: -- store the highest degree of error
1110: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1111: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1112: l_overall_status := x_return_status;
1113: END IF;
1114: END IF;

Line 1111: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1107: p_aelv_rec => p_aelv_tbl(i));
1108:
1109: -- store the highest degree of error
1110: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1111: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1112: l_overall_status := x_return_status;
1113: END IF;
1114: END IF;
1115:

Line 1128: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1124: END lock_acct_lines;
1125:
1126: PROCEDURE update_acct_lines(
1127: p_api_version IN NUMBER,
1128: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1129: x_return_status OUT NOCOPY VARCHAR2,
1130: x_msg_count OUT NOCOPY NUMBER,
1131: x_msg_data OUT NOCOPY VARCHAR2,
1132: p_aelv_rec IN aelv_rec_type,

Line 1144: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

1140: x_msg_data,
1141: p_aelv_rec,
1142: x_aelv_rec);
1143:
1144: IF (x_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1145: NULL;
1146: -- Custom code by developer Update_Minor_Version(p_aelv_rec.dnz_chr_id);
1147: END IF;
1148: END update_acct_lines;

Line 1152: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1148: END update_acct_lines;
1149:
1150: PROCEDURE update_acct_lines(
1151: p_api_version IN NUMBER,
1152: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1153: x_return_status OUT NOCOPY VARCHAR2,
1154: x_msg_count OUT NOCOPY NUMBER,
1155: x_msg_data OUT NOCOPY VARCHAR2,
1156: p_aelv_tbl IN aelv_tbl_type,

Line 1160: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1156: p_aelv_tbl IN aelv_tbl_type,
1157: x_aelv_tbl OUT NOCOPY aelv_tbl_type) IS
1158:
1159: i NUMBER := 0;
1160: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1161:
1162: BEGIN
1163: Okc_Api.init_msg_list(p_init_msg_list);
1164: -- Make sure PL/SQL table has records in it before passing

Line 1163: Okc_Api.init_msg_list(p_init_msg_list);

1159: i NUMBER := 0;
1160: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1161:
1162: BEGIN
1163: Okc_Api.init_msg_list(p_init_msg_list);
1164: -- Make sure PL/SQL table has records in it before passing
1165: IF (p_aelv_tbl.COUNT > 0) THEN
1166: i := p_aelv_tbl.FIRST;
1167: LOOP

Line 1170: p_init_msg_list => Okc_Api.G_FALSE,

1166: i := p_aelv_tbl.FIRST;
1167: LOOP
1168: update_Acct_lines(
1169: p_api_version => p_api_version,
1170: p_init_msg_list => Okc_Api.G_FALSE,
1171: x_return_status => x_return_status,
1172: x_msg_count => x_msg_count,
1173: x_msg_data => x_msg_data,
1174: p_aelv_rec => p_aelv_tbl(i),

Line 1178: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1174: p_aelv_rec => p_aelv_tbl(i),
1175: x_aelv_rec => x_aelv_tbl(i));
1176:
1177: -- store the highest degree of error
1178: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1179: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1180: l_overall_status := x_return_status;
1181: END IF;
1182: END IF;

Line 1179: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1175: x_aelv_rec => x_aelv_tbl(i));
1176:
1177: -- store the highest degree of error
1178: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1179: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1180: l_overall_status := x_return_status;
1181: END IF;
1182: END IF;
1183:

Line 1197: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1193:
1194: --Put custom code for cascade delete by developer
1195: PROCEDURE delete_acct_lines(
1196: p_api_version IN NUMBER,
1197: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1198: x_return_status OUT NOCOPY VARCHAR2,
1199: x_msg_count OUT NOCOPY NUMBER,
1200: x_msg_data OUT NOCOPY VARCHAR2,
1201: p_aelv_rec IN aelv_rec_type) IS

Line 1203: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1199: x_msg_count OUT NOCOPY NUMBER,
1200: x_msg_data OUT NOCOPY VARCHAR2,
1201: p_aelv_rec IN aelv_rec_type) IS
1202: i NUMBER :=0;
1203: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1204: BEGIN
1205: --Delete the Master
1206: okl_ael_pvt.delete_row(
1207: p_api_version,

Line 1219: OKC_API.set_message(p_app_name => g_app_name,

1215: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1216: NULL;
1217:
1218: WHEN OTHERS THEN
1219: OKC_API.set_message(p_app_name => g_app_name,
1220: p_msg_name => g_unexpected_error,
1221: p_token1 => g_sqlcode_token,
1222: p_token1_value => SQLCODE,
1223: p_token2 => g_sqlerrm_token,

Line 1225: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1221: p_token1 => g_sqlcode_token,
1222: p_token1_value => SQLCODE,
1223: p_token2 => g_sqlerrm_token,
1224: p_token2_value => SQLERRM);
1225: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1226: END delete_acct_lines;
1227:
1228: PROCEDURE delete_acct_lines(
1229: p_api_version IN NUMBER,

Line 1230: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1226: END delete_acct_lines;
1227:
1228: PROCEDURE delete_acct_lines(
1229: p_api_version IN NUMBER,
1230: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1231: x_return_status OUT NOCOPY VARCHAR2,
1232: x_msg_count OUT NOCOPY NUMBER,
1233: x_msg_data OUT NOCOPY VARCHAR2,
1234: p_aelv_tbl IN aelv_tbl_type) IS

Line 1237: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1233: x_msg_data OUT NOCOPY VARCHAR2,
1234: p_aelv_tbl IN aelv_tbl_type) IS
1235:
1236: i NUMBER := 0;
1237: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1238:
1239: BEGIN
1240: Okc_Api.init_msg_list(p_init_msg_list);
1241: -- Make sure PL/SQL table has records in it before passing

Line 1240: Okc_Api.init_msg_list(p_init_msg_list);

1236: i NUMBER := 0;
1237: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1238:
1239: BEGIN
1240: Okc_Api.init_msg_list(p_init_msg_list);
1241: -- Make sure PL/SQL table has records in it before passing
1242: IF (p_aelv_tbl.COUNT > 0) THEN
1243: i := p_aelv_tbl.FIRST;
1244: LOOP

Line 1247: p_init_msg_list => Okc_Api.G_FALSE,

1243: i := p_aelv_tbl.FIRST;
1244: LOOP
1245: delete_Acct_lines(
1246: p_api_version => p_api_version,
1247: p_init_msg_list => Okc_Api.G_FALSE,
1248: x_return_status => x_return_status,
1249: x_msg_count => x_msg_count,
1250: x_msg_data => x_msg_data,
1251: p_aelv_rec => p_aelv_tbl(i));

Line 1255: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1251: p_aelv_rec => p_aelv_tbl(i));
1252:
1253: -- store the highest degree of error
1254:
1255: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1256: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1257: l_overall_status := x_return_status;
1258: END IF;
1259: END IF;

Line 1256: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1252:
1253: -- store the highest degree of error
1254:
1255: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1256: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1257: l_overall_status := x_return_status;
1258: END IF;
1259: END IF;
1260:

Line 1274: OKC_API.set_message(p_app_name => g_app_name,

1270: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1271: NULL;
1272:
1273: WHEN OTHERS THEN
1274: OKC_API.set_message(p_app_name => g_app_name,
1275: p_msg_name => g_unexpected_error,
1276: p_token1 => g_sqlcode_token,
1277: p_token1_value => SQLCODE,
1278: p_token2 => g_sqlerrm_token,

Line 1280: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1276: p_token1 => g_sqlcode_token,
1277: p_token1_value => SQLCODE,
1278: p_token2 => g_sqlerrm_token,
1279: p_token2_value => SQLERRM);
1280: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1281: END delete_acct_lines;
1282:
1283: PROCEDURE validate_acct_lines(
1284: p_api_version IN NUMBER,

Line 1285: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1281: END delete_acct_lines;
1282:
1283: PROCEDURE validate_acct_lines(
1284: p_api_version IN NUMBER,
1285: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1286: x_return_status OUT NOCOPY VARCHAR2,
1287: x_msg_count OUT NOCOPY NUMBER,
1288: x_msg_data OUT NOCOPY VARCHAR2,
1289: p_aelv_rec IN aelv_rec_type) IS

Line 1302: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1298: END validate_acct_lines;
1299:
1300: PROCEDURE validate_acct_lines(
1301: p_api_version IN NUMBER,
1302: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1303: x_return_status OUT NOCOPY VARCHAR2,
1304: x_msg_count OUT NOCOPY NUMBER,
1305: x_msg_data OUT NOCOPY VARCHAR2,
1306: p_aelv_tbl IN aelv_tbl_type) IS

Line 1309: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1305: x_msg_data OUT NOCOPY VARCHAR2,
1306: p_aelv_tbl IN aelv_tbl_type) IS
1307:
1308: i NUMBER := 0;
1309: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1310:
1311: BEGIN
1312: Okc_Api.init_msg_list(p_init_msg_list);
1313: -- Make sure PL/SQL table has records in it before passing

Line 1312: Okc_Api.init_msg_list(p_init_msg_list);

1308: i NUMBER := 0;
1309: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1310:
1311: BEGIN
1312: Okc_Api.init_msg_list(p_init_msg_list);
1313: -- Make sure PL/SQL table has records in it before passing
1314: IF (p_aelv_tbl.COUNT > 0) THEN
1315: i := p_aelv_tbl.FIRST;
1316: LOOP

Line 1319: p_init_msg_list => Okc_Api.G_FALSE,

1315: i := p_aelv_tbl.FIRST;
1316: LOOP
1317: validate_acct_lines(
1318: p_api_version => p_api_version,
1319: p_init_msg_list => Okc_Api.G_FALSE,
1320: x_return_status => x_return_status,
1321: x_msg_count => x_msg_count,
1322: x_msg_data => x_msg_data,
1323: p_aelv_rec => p_aelv_tbl(i));

Line 1326: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1322: x_msg_data => x_msg_data,
1323: p_aelv_rec => p_aelv_tbl(i));
1324:
1325: -- store the highest degree of error
1326: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1327: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1328: l_overall_status := x_return_status;
1329: END IF;
1330: END IF;

Line 1327: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1323: p_aelv_rec => p_aelv_tbl(i));
1324:
1325: -- store the highest degree of error
1326: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1327: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1328: l_overall_status := x_return_status;
1329: END IF;
1330: END IF;
1331: