DBA Data[Home] [Help]

APPS.IEX_OPI_PVT dependencies on OKC_API

Line 41: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

37: PROCEDURE report_all_credit_bureau(
38: errbuf OUT NOCOPY VARCHAR2,
39: retcode OUT NOCOPY NUMBER) AS
40:
41: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
42: lx_msg_count NUMBER ;
43: lx_msg_data VARCHAR2(2000);
44: lx_message VARCHAR2(2000);
45: l_api_version CONSTANT NUMBER := 1;

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

42: lx_msg_count NUMBER ;
43: lx_msg_data VARCHAR2(2000);
44: lx_message VARCHAR2(2000);
45: l_api_version CONSTANT NUMBER := 1;
46: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
47: l_api_name CONSTANT VARCHAR2(30) := 'report_all_credit_bureau';
48:
49: l_oinv_rec oinv_rec_type;
50: l_iohv_rec iohv_rec_type;

Line 100: p_comments => OKC_API.G_MISS_CHAR,

96: p_object1_id2 => '#',
97: p_jtot_object1_code => 'OKX_LEASE',
98: p_action => IEX_OPI_PVT.ACTION_REPORT_CB,
99: p_status => IEX_OPI_PVT.STATUS_PENDING_ALL,
100: p_comments => OKC_API.G_MISS_CHAR,
101: p_ext_agncy_id => NULL,
102: p_review_date => NULL,
103: p_recall_date => NULL,
104: p_automatic_recall_flag => NULL,

Line 110: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

106: x_return_status => l_return_status,
107: x_msg_count => lx_msg_count,
108: x_msg_data => lx_msg_data);
109:
110: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
111: l_rows_failed := l_rows_failed + 1;
112: ELSE
113: l_rows_processed := l_rows_processed + 1;
114: END IF;

Line 145: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

141: retcode := 1;
142: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
143: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
144: ROLLBACK;
145: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
146: END report_all_credit_bureau;
147:
148: ---------------------------------------------------------------------------
149: -- PROCEDURE insert_pending_hst

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

156: x_return_status OUT NOCOPY VARCHAR2,
157: x_msg_count OUT NOCOPY NUMBER,
158: x_msg_data OUT NOCOPY VARCHAR2) AS
159:
160: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
161: l_api_version CONSTANT NUMBER := 1;
162: l_api_name CONSTANT VARCHAR2(30) := 'insert_pending_hst';
163:
164: l_iohv_rec iohv_rec_type;

Line 181: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

177: AND object1_id2 = cp_object1_id2
178: AND action = cp_action
179: AND status = cp_status;
180: BEGIN
181: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
182: G_PKG_NAME,
183: p_init_msg_list,
184: l_api_version,
185: p_api_version,

Line 189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

185: p_api_version,
186: '_PVT',
187: l_return_status);
188:
189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
192: RAISE OKC_API.G_EXCEPTION_ERROR;
193: END IF;

Line 190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

186: '_PVT',
187: l_return_status);
188:
189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
192: RAISE OKC_API.G_EXCEPTION_ERROR;
193: END IF;
194:

Line 191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

187: l_return_status);
188:
189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
192: RAISE OKC_API.G_EXCEPTION_ERROR;
193: END IF;
194:
195: -- Processing starts

Line 192: RAISE OKC_API.G_EXCEPTION_ERROR;

188:
189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
192: RAISE OKC_API.G_EXCEPTION_ERROR;
193: END IF;
194:
195: -- Processing starts
196: /*

Line 208: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

204: */
205: l_iohv_rec := p_iohv_rec;
206: l_iohv_rec.request_date := sysdate;
207:
208: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
209: l_iohv_rec.comments := NULL;
210: END IF;
211:
212:

Line 260: WHEN OKC_API.G_EXCEPTION_ERROR THEN

256:
257: x_return_status := l_return_status;
258: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (
263: l_api_name,
264: G_PKG_NAME,

Line 261: x_return_status := OKC_API.HANDLE_EXCEPTIONS

257: x_return_status := l_return_status;
258: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
259: EXCEPTION
260: WHEN OKC_API.G_EXCEPTION_ERROR THEN
261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (
263: l_api_name,
264: G_PKG_NAME,
265: 'OKC_API.G_RET_STS_ERROR',

Line 265: 'OKC_API.G_RET_STS_ERROR',

261: x_return_status := OKC_API.HANDLE_EXCEPTIONS
262: (
263: l_api_name,
264: G_PKG_NAME,
265: 'OKC_API.G_RET_STS_ERROR',
266: x_msg_count,
267: x_msg_data,
268: '_PVT'
269: );

Line 270: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

266: x_msg_count,
267: x_msg_data,
268: '_PVT'
269: );
270: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
271: x_return_status := OKC_API.HANDLE_EXCEPTIONS
272: (
273: l_api_name,
274: G_PKG_NAME,

Line 271: x_return_status := OKC_API.HANDLE_EXCEPTIONS

267: x_msg_data,
268: '_PVT'
269: );
270: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
271: x_return_status := OKC_API.HANDLE_EXCEPTIONS
272: (
273: l_api_name,
274: G_PKG_NAME,
275: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 275: 'OKC_API.G_RET_STS_UNEXP_ERROR',

271: x_return_status := OKC_API.HANDLE_EXCEPTIONS
272: (
273: l_api_name,
274: G_PKG_NAME,
275: 'OKC_API.G_RET_STS_UNEXP_ERROR',
276: x_msg_count,
277: x_msg_data,
278: '_PVT'
279: );

Line 281: x_return_status := OKC_API.HANDLE_EXCEPTIONS

277: x_msg_data,
278: '_PVT'
279: );
280: WHEN OTHERS THEN
281: x_return_status := OKC_API.HANDLE_EXCEPTIONS
282: (
283: l_api_name,
284: G_PKG_NAME,
285: 'OTHERS',

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

303: x_msg_data OUT NOCOPY VARCHAR2)AS
304:
305: lx_msg_count NUMBER ;
306: lx_msg_data VARCHAR2(2000);
307: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
308: l_api_version CONSTANT NUMBER := 1;
309: l_api_name CONSTANT VARCHAR2(30) := 'process_pending_hst';
310:
311: l_oinv_rec oinv_rec_type;

Line 316: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

312: l_iohv_rec iohv_rec_type;
313: lp_iohv_rec iohv_rec_type;
314: lx_iohv_rec iohv_rec_type;
315: BEGIN
316: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
317: G_PKG_NAME,
318: p_init_msg_list,
319: l_api_version,
320: p_api_version,

Line 324: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

320: p_api_version,
321: '_PVT',
322: l_return_status);
323:
324: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
327: RAISE OKC_API.G_EXCEPTION_ERROR;
328: END IF;

Line 325: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

321: '_PVT',
322: l_return_status);
323:
324: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
327: RAISE OKC_API.G_EXCEPTION_ERROR;
328: END IF;
329:

Line 326: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

322: l_return_status);
323:
324: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
327: RAISE OKC_API.G_EXCEPTION_ERROR;
328: END IF;
329:
330: -- Processing starts

Line 327: RAISE OKC_API.G_EXCEPTION_ERROR;

323:
324: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
325: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
326: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
327: RAISE OKC_API.G_EXCEPTION_ERROR;
328: END IF;
329:
330: -- Processing starts
331: l_oinv_rec := p_oinv_rec;

Line 400: WHEN OKC_API.G_EXCEPTION_ERROR THEN

396: -- Processing ends
397: x_return_status := l_return_status;
398: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
399: EXCEPTION
400: WHEN OKC_API.G_EXCEPTION_ERROR THEN
401: x_return_status := OKC_API.HANDLE_EXCEPTIONS
402: (
403: l_api_name,
404: G_PKG_NAME,

Line 401: x_return_status := OKC_API.HANDLE_EXCEPTIONS

397: x_return_status := l_return_status;
398: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
399: EXCEPTION
400: WHEN OKC_API.G_EXCEPTION_ERROR THEN
401: x_return_status := OKC_API.HANDLE_EXCEPTIONS
402: (
403: l_api_name,
404: G_PKG_NAME,
405: 'OKC_API.G_RET_STS_ERROR',

Line 405: 'OKC_API.G_RET_STS_ERROR',

401: x_return_status := OKC_API.HANDLE_EXCEPTIONS
402: (
403: l_api_name,
404: G_PKG_NAME,
405: 'OKC_API.G_RET_STS_ERROR',
406: x_msg_count,
407: x_msg_data,
408: '_PVT'
409: );

Line 410: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

406: x_msg_count,
407: x_msg_data,
408: '_PVT'
409: );
410: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (
413: l_api_name,
414: G_PKG_NAME,

Line 411: x_return_status := OKC_API.HANDLE_EXCEPTIONS

407: x_msg_data,
408: '_PVT'
409: );
410: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (
413: l_api_name,
414: G_PKG_NAME,
415: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 415: 'OKC_API.G_RET_STS_UNEXP_ERROR',

411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
412: (
413: l_api_name,
414: G_PKG_NAME,
415: 'OKC_API.G_RET_STS_UNEXP_ERROR',
416: x_msg_count,
417: x_msg_data,
418: '_PVT'
419: );

Line 421: x_return_status := OKC_API.HANDLE_EXCEPTIONS

417: x_msg_data,
418: '_PVT'
419: );
420: WHEN OTHERS THEN
421: x_return_status := OKC_API.HANDLE_EXCEPTIONS
422: (
423: l_api_name,
424: G_PKG_NAME,
425: 'OTHERS',

Line 440: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

436: errbuf OUT NOCOPY VARCHAR2,
437: retcode OUT NOCOPY NUMBER,
438: p_case_number IN VARCHAR2) AS
439:
440: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
441: lx_msg_count NUMBER ;
442: lx_msg_data VARCHAR2(2000);
443: lx_message VARCHAR2(2000);
444: l_api_version CONSTANT NUMBER := 1;

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

441: lx_msg_count NUMBER ;
442: lx_msg_data VARCHAR2(2000);
443: lx_message VARCHAR2(2000);
444: l_api_version CONSTANT NUMBER := 1;
445: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
446: l_api_name CONSTANT VARCHAR2(30) := 'process_pending';
447: l_oinv_rec oinv_rec_type;
448: lx_oinv_rec oinv_rec_type;
449: l_iohv_rec iohv_rec_type;

Line 455: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;

451:
452: l_rows_processed NUMBER := 0;
453: l_rows_failed NUMBER := 0;
454:
455: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
456: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
457:
458: CURSOR l_oin_pend_csr(cp_case_number IN VARCHAR2
459: ,cp_organization_id IN NUMBER) IS

Line 555: AND ((l_case_passed = Okc_Api.G_FALSE) OR

551: FROM Okl_Open_Int OIN
552: ,Iex_Open_Int_Hst IOH
553: WHERE OIN.khr_id = TO_NUMBER(IOH.OBJECT1_ID1)
554: AND IOH.JTOT_OBJECT1_CODE = 'OKX_LEASE'
555: AND ((l_case_passed = Okc_Api.G_FALSE) OR
556: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
557: AND OIN.org_id = cp_organization_id
558: AND ((IOH.STATUS = STATUS_PENDING_AUTO) OR
559: (IOH.STATUS = STATUS_PENDING_MANUAL) OR

Line 556: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))

552: ,Iex_Open_Int_Hst IOH
553: WHERE OIN.khr_id = TO_NUMBER(IOH.OBJECT1_ID1)
554: AND IOH.JTOT_OBJECT1_CODE = 'OKX_LEASE'
555: AND ((l_case_passed = Okc_Api.G_FALSE) OR
556: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
557: AND OIN.org_id = cp_organization_id
558: AND ((IOH.STATUS = STATUS_PENDING_AUTO) OR
559: (IOH.STATUS = STATUS_PENDING_MANUAL) OR
560: (IOH.STATUS = STATUS_PENDING_ALL));

Line 563: IF (p_case_number = OKC_API.G_MISS_CHAR OR

559: (IOH.STATUS = STATUS_PENDING_MANUAL) OR
560: (IOH.STATUS = STATUS_PENDING_ALL));
561: BEGIN
562: --check if case number is passed
563: IF (p_case_number = OKC_API.G_MISS_CHAR OR
564: p_case_number IS NULL) THEN
565: l_case_passed := Okc_Api.G_FALSE;
566: --dbms_output.put_line('case is not passed');
567: END IF;

Line 565: l_case_passed := Okc_Api.G_FALSE;

561: BEGIN
562: --check if case number is passed
563: IF (p_case_number = OKC_API.G_MISS_CHAR OR
564: p_case_number IS NULL) THEN
565: l_case_passed := Okc_Api.G_FALSE;
566: --dbms_output.put_line('case is not passed');
567: END IF;
568:
569: --get organization id

Line 691: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

687: ,x_return_status => l_return_status
688: ,x_msg_count => lx_msg_count
689: ,x_msg_data => lx_msg_data);
690:
691: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
692: l_rows_failed := l_rows_failed + 1;
693: ELSE
694: l_rows_processed := l_rows_processed + 1;
695: END IF;

Line 713: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

709: retcode := 1;
710: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
711: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
712: ROLLBACK;
713: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
714: END process_pending;
715:
716: ---------------------------------------------------------------------------
717: -- PROCEDURE complete_report_cb

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

725: x_return_status OUT NOCOPY VARCHAR2,
726: x_msg_count OUT NOCOPY NUMBER,
727: x_msg_data OUT NOCOPY VARCHAR2) AS
728:
729: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
730: l_api_version CONSTANT NUMBER := 1;
731: l_api_name CONSTANT VARCHAR2(30) := 'complete_report_cb';
732:
733: l_oinv_rec oinv_rec_type;

Line 759: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

755: AND ioh.jtot_object1_code = 'OKX_LEASE'
756: AND ioh.action = ACTION_REPORT_CB
757: AND ioh.status = STATUS_PROCESSED;
758: BEGIN
759: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
760: G_PKG_NAME,
761: p_init_msg_list,
762: l_api_version,
763: p_api_version,

Line 767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

763: p_api_version,
764: '_PVT',
765: l_return_status);
766:
767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
768: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
770: RAISE OKC_API.G_EXCEPTION_ERROR;
771: END IF;

Line 768: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

764: '_PVT',
765: l_return_status);
766:
767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
768: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
770: RAISE OKC_API.G_EXCEPTION_ERROR;
771: END IF;
772:

Line 769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

765: l_return_status);
766:
767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
768: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
770: RAISE OKC_API.G_EXCEPTION_ERROR;
771: END IF;
772:
773: -- Processing starts

Line 770: RAISE OKC_API.G_EXCEPTION_ERROR;

766:
767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
768: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
770: RAISE OKC_API.G_EXCEPTION_ERROR;
771: END IF;
772:
773: -- Processing starts
774: l_oinv_rec.id := p_interface_id;

Line 794: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

790: l_iohv_rec.request_date := p_report_date;
791: l_iohv_rec.process_date := p_report_date;
792: l_iohv_rec.comments := p_comments;
793:
794: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
795: l_iohv_rec.comments := NULL;
796: END IF;
797:
798: l_iohv_rec.action := ACTION_REPORT_CB;

Line 827: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

823: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
824: RAISE okl_api.G_EXCEPTION_ERROR;
825: END IF;
826: ELSE
827: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
828: ,p_msg_name => G_INVALID_ACTION_STATUS);
829: l_return_status := okl_api.G_RET_STS_ERROR;
830: END IF;
831: -- Processing ends

Line 836: WHEN OKC_API.G_EXCEPTION_ERROR THEN

832:
833: x_return_status := l_return_status;
834: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
835: EXCEPTION
836: WHEN OKC_API.G_EXCEPTION_ERROR THEN
837: x_return_status := OKC_API.HANDLE_EXCEPTIONS
838: (
839: l_api_name,
840: G_PKG_NAME,

Line 837: x_return_status := OKC_API.HANDLE_EXCEPTIONS

833: x_return_status := l_return_status;
834: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
835: EXCEPTION
836: WHEN OKC_API.G_EXCEPTION_ERROR THEN
837: x_return_status := OKC_API.HANDLE_EXCEPTIONS
838: (
839: l_api_name,
840: G_PKG_NAME,
841: 'OKC_API.G_RET_STS_ERROR',

Line 841: 'OKC_API.G_RET_STS_ERROR',

837: x_return_status := OKC_API.HANDLE_EXCEPTIONS
838: (
839: l_api_name,
840: G_PKG_NAME,
841: 'OKC_API.G_RET_STS_ERROR',
842: x_msg_count,
843: x_msg_data,
844: '_PVT'
845: );

Line 846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

842: x_msg_count,
843: x_msg_data,
844: '_PVT'
845: );
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
847: x_return_status := OKC_API.HANDLE_EXCEPTIONS
848: (
849: l_api_name,
850: G_PKG_NAME,

Line 847: x_return_status := OKC_API.HANDLE_EXCEPTIONS

843: x_msg_data,
844: '_PVT'
845: );
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
847: x_return_status := OKC_API.HANDLE_EXCEPTIONS
848: (
849: l_api_name,
850: G_PKG_NAME,
851: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 851: 'OKC_API.G_RET_STS_UNEXP_ERROR',

847: x_return_status := OKC_API.HANDLE_EXCEPTIONS
848: (
849: l_api_name,
850: G_PKG_NAME,
851: 'OKC_API.G_RET_STS_UNEXP_ERROR',
852: x_msg_count,
853: x_msg_data,
854: '_PVT'
855: );

Line 857: x_return_status := OKC_API.HANDLE_EXCEPTIONS

853: x_msg_data,
854: '_PVT'
855: );
856: WHEN OTHERS THEN
857: x_return_status := OKC_API.HANDLE_EXCEPTIONS
858: (
859: l_api_name,
860: G_PKG_NAME,
861: 'OTHERS',

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

878: x_return_status OUT NOCOPY VARCHAR2,
879: x_msg_count OUT NOCOPY NUMBER,
880: x_msg_data OUT NOCOPY VARCHAR2) AS
881:
882: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
883: l_api_version CONSTANT NUMBER := 1;
884: l_api_name CONSTANT VARCHAR2(30) := 'complete_notify';
885:
886: l_oinv_rec oinv_rec_type;

Line 895: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

891:
892: l_action IEX_OPEN_INT_HST.ACTION%TYPE;
893: l_status IEX_OPEN_INT_HST.STATUS%TYPE;
894: BEGIN
895: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
896: G_PKG_NAME,
897: p_init_msg_list,
898: l_api_version,
899: p_api_version,

Line 903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

899: p_api_version,
900: '_PVT',
901: l_return_status);
902:
903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
906: RAISE OKC_API.G_EXCEPTION_ERROR;
907: END IF;

Line 904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

900: '_PVT',
901: l_return_status);
902:
903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
906: RAISE OKC_API.G_EXCEPTION_ERROR;
907: END IF;
908:

Line 905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

901: l_return_status);
902:
903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
906: RAISE OKC_API.G_EXCEPTION_ERROR;
907: END IF;
908:
909: -- Processing starts

Line 906: RAISE OKC_API.G_EXCEPTION_ERROR;

902:
903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
906: RAISE OKC_API.G_EXCEPTION_ERROR;
907: END IF;
908:
909: -- Processing starts
910: get_hst_info(p_hst_id => p_hst_id

Line 915: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

911: ,x_action => l_action
912: ,x_status => l_status
913: ,x_return_status => l_return_status);
914:
915: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
916: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
917: ,p_msg_name => G_INVALID_ACTION_STATUS);
918: END IF;
919:

Line 916: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

912: ,x_status => l_status
913: ,x_return_status => l_return_status);
914:
915: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
916: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
917: ,p_msg_name => G_INVALID_ACTION_STATUS);
918: END IF;
919:
920: IF ((l_action = ACTION_NOTIFY_CUST) AND

Line 928: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

924:
925: l_iohv_rec.id := p_hst_id;
926: l_iohv_rec.comments := p_comments;
927:
928: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
929: l_iohv_rec.comments := NULL;
930: END IF;
931:
932: l_iohv_rec.status := STATUS_COMPLETE;

Line 961: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

957: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
958: RAISE okl_api.G_EXCEPTION_ERROR;
959: END IF;
960: ELSE
961: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
962: ,p_msg_name => G_INVALID_ACTION_STATUS);
963: l_return_status := okl_api.G_RET_STS_ERROR;
964: END IF;
965: -- Processing ends

Line 970: WHEN OKC_API.G_EXCEPTION_ERROR THEN

966:
967: x_return_status := l_return_status;
968: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
969: EXCEPTION
970: WHEN OKC_API.G_EXCEPTION_ERROR THEN
971: x_return_status := OKC_API.HANDLE_EXCEPTIONS
972: (
973: l_api_name,
974: G_PKG_NAME,

Line 971: x_return_status := OKC_API.HANDLE_EXCEPTIONS

967: x_return_status := l_return_status;
968: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
969: EXCEPTION
970: WHEN OKC_API.G_EXCEPTION_ERROR THEN
971: x_return_status := OKC_API.HANDLE_EXCEPTIONS
972: (
973: l_api_name,
974: G_PKG_NAME,
975: 'OKC_API.G_RET_STS_ERROR',

Line 975: 'OKC_API.G_RET_STS_ERROR',

971: x_return_status := OKC_API.HANDLE_EXCEPTIONS
972: (
973: l_api_name,
974: G_PKG_NAME,
975: 'OKC_API.G_RET_STS_ERROR',
976: x_msg_count,
977: x_msg_data,
978: '_PVT'
979: );

Line 980: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

976: x_msg_count,
977: x_msg_data,
978: '_PVT'
979: );
980: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
981: x_return_status := OKC_API.HANDLE_EXCEPTIONS
982: (
983: l_api_name,
984: G_PKG_NAME,

Line 981: x_return_status := OKC_API.HANDLE_EXCEPTIONS

977: x_msg_data,
978: '_PVT'
979: );
980: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
981: x_return_status := OKC_API.HANDLE_EXCEPTIONS
982: (
983: l_api_name,
984: G_PKG_NAME,
985: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 985: 'OKC_API.G_RET_STS_UNEXP_ERROR',

981: x_return_status := OKC_API.HANDLE_EXCEPTIONS
982: (
983: l_api_name,
984: G_PKG_NAME,
985: 'OKC_API.G_RET_STS_UNEXP_ERROR',
986: x_msg_count,
987: x_msg_data,
988: '_PVT'
989: );

Line 991: x_return_status := OKC_API.HANDLE_EXCEPTIONS

987: x_msg_data,
988: '_PVT'
989: );
990: WHEN OTHERS THEN
991: x_return_status := OKC_API.HANDLE_EXCEPTIONS
992: (
993: l_api_name,
994: G_PKG_NAME,
995: 'OTHERS',

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

1011: x_return_status OUT NOCOPY VARCHAR2,
1012: x_msg_count OUT NOCOPY NUMBER,
1013: x_msg_data OUT NOCOPY VARCHAR2) AS
1014:
1015: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1016: l_api_version CONSTANT NUMBER := 1;
1017: l_api_name CONSTANT VARCHAR2(30) := 'complete_transfer';
1018:
1019: l_oinv_rec oinv_rec_type;

Line 1045: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1041: AND ioh.jtot_object1_code = 'OKX_LEASE'
1042: AND ioh.action = ACTION_TRANSFER_EXT_AGNCY
1043: AND ioh.status = STATUS_PROCESSED;
1044: BEGIN
1045: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1046: G_PKG_NAME,
1047: p_init_msg_list,
1048: l_api_version,
1049: p_api_version,

Line 1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1049: p_api_version,
1050: '_PVT',
1051: l_return_status);
1052:
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;

Line 1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1050: '_PVT',
1051: l_return_status);
1052:
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058:

Line 1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1051: l_return_status);
1052:
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058:
1059: -- Processing starts

Line 1056: RAISE OKC_API.G_EXCEPTION_ERROR;

1052:
1053: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1055: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1056: RAISE OKC_API.G_EXCEPTION_ERROR;
1057: END IF;
1058:
1059: -- Processing starts
1060: l_oinv_rec.id := p_interface_id;

Line 1080: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

1076: l_iohv_rec.request_date := p_transfer_date;
1077: l_iohv_rec.process_date := p_transfer_date;
1078: l_iohv_rec.comments := p_comments;
1079:
1080: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
1081: l_iohv_rec.comments := NULL;
1082: END IF;
1083:
1084: l_iohv_rec.action := ACTION_TRANSFER_EXT_AGNCY;

Line 1116: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1112: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1113: RAISE okl_api.G_EXCEPTION_ERROR;
1114: END IF;
1115: ELSE
1116: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1117: ,p_msg_name => G_INVALID_ACTION_STATUS);
1118: l_return_status := okl_api.G_RET_STS_ERROR;
1119: END IF;
1120:

Line 1126: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1122:
1123: x_return_status := l_return_status;
1124: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1125: EXCEPTION
1126: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1127: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1128: (
1129: l_api_name,
1130: G_PKG_NAME,

Line 1127: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1123: x_return_status := l_return_status;
1124: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1125: EXCEPTION
1126: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1127: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1128: (
1129: l_api_name,
1130: G_PKG_NAME,
1131: 'OKC_API.G_RET_STS_ERROR',

Line 1131: 'OKC_API.G_RET_STS_ERROR',

1127: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1128: (
1129: l_api_name,
1130: G_PKG_NAME,
1131: 'OKC_API.G_RET_STS_ERROR',
1132: x_msg_count,
1133: x_msg_data,
1134: '_PVT'
1135: );

Line 1136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1132: x_msg_count,
1133: x_msg_data,
1134: '_PVT'
1135: );
1136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1137: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1138: (
1139: l_api_name,
1140: G_PKG_NAME,

Line 1137: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1133: x_msg_data,
1134: '_PVT'
1135: );
1136: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1137: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1138: (
1139: l_api_name,
1140: G_PKG_NAME,
1141: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1141: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1137: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1138: (
1139: l_api_name,
1140: G_PKG_NAME,
1141: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1142: x_msg_count,
1143: x_msg_data,
1144: '_PVT'
1145: );

Line 1147: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1143: x_msg_data,
1144: '_PVT'
1145: );
1146: WHEN OTHERS THEN
1147: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1148: (
1149: l_api_name,
1150: G_PKG_NAME,
1151: 'OTHERS',

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

1168: x_return_status OUT NOCOPY VARCHAR2,
1169: x_msg_count OUT NOCOPY NUMBER,
1170: x_msg_data OUT NOCOPY VARCHAR2) AS
1171:
1172: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1173: l_api_version CONSTANT NUMBER := 1;
1174: l_api_name CONSTANT VARCHAR2(30) := 'complete_notify_ext_agncy';
1175:
1176: l_oinv_rec oinv_rec_type;

Line 1185: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1181:
1182: l_action IEX_OPEN_INT_HST.ACTION%TYPE;
1183: l_status IEX_OPEN_INT_HST.STATUS%TYPE;
1184: BEGIN
1185: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1186: G_PKG_NAME,
1187: p_init_msg_list,
1188: l_api_version,
1189: p_api_version,

Line 1193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1189: p_api_version,
1190: '_PVT',
1191: l_return_status);
1192:
1193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1196: RAISE OKC_API.G_EXCEPTION_ERROR;
1197: END IF;

Line 1194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1190: '_PVT',
1191: l_return_status);
1192:
1193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1196: RAISE OKC_API.G_EXCEPTION_ERROR;
1197: END IF;
1198:

Line 1195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1191: l_return_status);
1192:
1193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1196: RAISE OKC_API.G_EXCEPTION_ERROR;
1197: END IF;
1198:
1199: -- Processing starts

Line 1196: RAISE OKC_API.G_EXCEPTION_ERROR;

1192:
1193: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1194: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1195: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1196: RAISE OKC_API.G_EXCEPTION_ERROR;
1197: END IF;
1198:
1199: -- Processing starts
1200: get_hst_info(p_hst_id => p_hst_id

Line 1205: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1201: ,x_action => l_action
1202: ,x_status => l_status
1203: ,x_return_status => l_return_status);
1204:
1205: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1206: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1207: ,p_msg_name => G_INVALID_ACTION_STATUS);
1208: END IF;
1209:

Line 1206: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1202: ,x_status => l_status
1203: ,x_return_status => l_return_status);
1204:
1205: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1206: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1207: ,p_msg_name => G_INVALID_ACTION_STATUS);
1208: END IF;
1209:
1210: IF ((l_action = ACTION_NOTIFY_EXT_AGNCY) AND

Line 1220: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

1216:
1217: l_iohv_rec.id := p_hst_id;
1218: l_iohv_rec.comments := p_comments;
1219:
1220: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
1221: l_iohv_rec.comments := NULL;
1222: END IF;
1223:
1224: l_iohv_rec.status := STATUS_COMPLETE;

Line 1255: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1251: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1252: RAISE okl_api.G_EXCEPTION_ERROR;
1253: END IF;
1254: ELSE
1255: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1256: ,p_msg_name => G_INVALID_ACTION_STATUS);
1257: l_return_status := okl_api.G_RET_STS_ERROR;
1258: END IF;
1259: -- Processing ends

Line 1264: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1260:
1261: x_return_status := l_return_status;
1262: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1263: EXCEPTION
1264: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1265: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1266: (
1267: l_api_name,
1268: G_PKG_NAME,

Line 1265: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1261: x_return_status := l_return_status;
1262: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1263: EXCEPTION
1264: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1265: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1266: (
1267: l_api_name,
1268: G_PKG_NAME,
1269: 'OKC_API.G_RET_STS_ERROR',

Line 1269: 'OKC_API.G_RET_STS_ERROR',

1265: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1266: (
1267: l_api_name,
1268: G_PKG_NAME,
1269: 'OKC_API.G_RET_STS_ERROR',
1270: x_msg_count,
1271: x_msg_data,
1272: '_PVT'
1273: );

Line 1274: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1270: x_msg_count,
1271: x_msg_data,
1272: '_PVT'
1273: );
1274: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1275: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1276: (
1277: l_api_name,
1278: G_PKG_NAME,

Line 1275: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1271: x_msg_data,
1272: '_PVT'
1273: );
1274: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1275: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1276: (
1277: l_api_name,
1278: G_PKG_NAME,
1279: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1279: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1275: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1276: (
1277: l_api_name,
1278: G_PKG_NAME,
1279: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1280: x_msg_count,
1281: x_msg_data,
1282: '_PVT'
1283: );

Line 1285: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1281: x_msg_data,
1282: '_PVT'
1283: );
1284: WHEN OTHERS THEN
1285: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1286: (
1287: l_api_name,
1288: G_PKG_NAME,
1289: 'OTHERS',

Line 1310: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

1306: x_return_status OUT NOCOPY VARCHAR2,
1307: x_msg_count OUT NOCOPY NUMBER,
1308: x_msg_data OUT NOCOPY VARCHAR2) AS
1309:
1310: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
1311: lx_msg_count NUMBER ;
1312: lx_msg_data VARCHAR2(2000);
1313: lx_message VARCHAR2(2000);
1314:

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

1311: lx_msg_count NUMBER ;
1312: lx_msg_data VARCHAR2(2000);
1313: lx_message VARCHAR2(2000);
1314:
1315: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1316: l_api_version CONSTANT NUMBER := 1;
1317: l_api_name CONSTANT VARCHAR2(30) := 'recall_transfer';
1318:
1319: l_oinv_rec oinv_rec_type;

Line 1348: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1344: AND ioh.action = ACTION_TRANSFER_EXT_AGNCY
1345: AND (ioh.status = STATUS_PROCESSED
1346: OR ioh.status = STATUS_NOTIFIED);
1347: BEGIN
1348: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1349: G_PKG_NAME,
1350: p_init_msg_list,
1351: l_api_version,
1352: p_api_version,

Line 1356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1352: p_api_version,
1353: '_PVT',
1354: l_return_status);
1355:
1356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1359: RAISE OKC_API.G_EXCEPTION_ERROR;
1360: END IF;

Line 1357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1353: '_PVT',
1354: l_return_status);
1355:
1356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1359: RAISE OKC_API.G_EXCEPTION_ERROR;
1360: END IF;
1361:

Line 1358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1354: l_return_status);
1355:
1356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1359: RAISE OKC_API.G_EXCEPTION_ERROR;
1360: END IF;
1361:
1362: -- Processing starts

Line 1359: RAISE OKC_API.G_EXCEPTION_ERROR;

1355:
1356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1359: RAISE OKC_API.G_EXCEPTION_ERROR;
1360: END IF;
1361:
1362: -- Processing starts
1363: l_oinv_rec.id := p_interface_id;

Line 1376: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN

1372: EXIT;
1373: END LOOP;
1374: l_iohv_rec.comments := p_comments;
1375:
1376: IF l_iohv_rec.comments = OKC_API.G_MISS_CHAR THEN
1377: l_iohv_rec.comments := NULL;
1378: END IF;
1379:
1380: l_iohv_rec.status := STATUS_RECALLED;

Line 1397: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM) THEN

1393: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1394: RAISE okl_api.G_EXCEPTION_ERROR;
1395: END IF;
1396:
1397: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM) THEN
1398: l_ext_agncy_id := NULL;
1399: ELSE
1400: l_ext_agncy_id := p_ext_agncy_id;
1401: END IF;

Line 1475: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1471:
1472: x_return_status := l_return_status;
1473: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1474: EXCEPTION
1475: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1476: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1477: (
1478: l_api_name,
1479: G_PKG_NAME,

Line 1476: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1472: x_return_status := l_return_status;
1473: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1474: EXCEPTION
1475: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1476: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1477: (
1478: l_api_name,
1479: G_PKG_NAME,
1480: 'OKC_API.G_RET_STS_ERROR',

Line 1480: 'OKC_API.G_RET_STS_ERROR',

1476: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1477: (
1478: l_api_name,
1479: G_PKG_NAME,
1480: 'OKC_API.G_RET_STS_ERROR',
1481: x_msg_count,
1482: x_msg_data,
1483: '_PVT'
1484: );

Line 1485: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1481: x_msg_count,
1482: x_msg_data,
1483: '_PVT'
1484: );
1485: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1486: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1487: (
1488: l_api_name,
1489: G_PKG_NAME,

Line 1486: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1482: x_msg_data,
1483: '_PVT'
1484: );
1485: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1486: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1487: (
1488: l_api_name,
1489: G_PKG_NAME,
1490: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1490: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1486: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1487: (
1488: l_api_name,
1489: G_PKG_NAME,
1490: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1491: x_msg_count,
1492: x_msg_data,
1493: '_PVT'
1494: );

Line 1496: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1492: x_msg_data,
1493: '_PVT'
1494: );
1495: WHEN OTHERS THEN
1496: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1497: (
1498: l_api_name,
1499: G_PKG_NAME,
1500: 'OTHERS',

Line 1521: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

1517: x_return_status OUT NOCOPY VARCHAR2,
1518: x_msg_count OUT NOCOPY NUMBER,
1519: x_msg_data OUT NOCOPY VARCHAR2) AS
1520:
1521: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
1522: lx_msg_count NUMBER ;
1523: lx_msg_data VARCHAR2(2000);
1524: lx_message VARCHAR2(2000);
1525:

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

1522: lx_msg_count NUMBER ;
1523: lx_msg_data VARCHAR2(2000);
1524: lx_message VARCHAR2(2000);
1525:
1526: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1527: l_api_version CONSTANT NUMBER := 1;
1528: l_api_name CONSTANT VARCHAR2(30) := 'review_transfer';
1529:
1530: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;

Line 1530: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;

1526: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1527: l_api_version CONSTANT NUMBER := 1;
1528: l_api_name CONSTANT VARCHAR2(30) := 'review_transfer';
1529:
1530: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;
1531: l_oinv_rec oinv_rec_type;
1532: lx_oinv_rec oinv_rec_type;
1533: l_iohv_rec iohv_rec_type;
1534: lp_iohv_rec iohv_rec_type;

Line 1539: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1535: lx_iohv_rec iohv_rec_type;
1536: l_task_name JTF_TASKS_VL.TASK_NAME%TYPE;
1537: l_description JTF_TASKS_VL.DESCRIPTION%TYPE;
1538: BEGIN
1539: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1540: G_PKG_NAME,
1541: p_init_msg_list,
1542: l_api_version,
1543: p_api_version,

Line 1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1543: p_api_version,
1544: '_PVT',
1545: l_return_status);
1546:
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;

Line 1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1544: '_PVT',
1545: l_return_status);
1546:
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552:

Line 1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1545: l_return_status);
1546:
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552:
1553: -- Processing starts

Line 1550: RAISE OKC_API.G_EXCEPTION_ERROR;

1546:
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552:
1553: -- Processing starts
1554: l_recall := OKC_API.G_FALSE;

Line 1554: l_recall := OKC_API.G_FALSE;

1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552:
1553: -- Processing starts
1554: l_recall := OKC_API.G_FALSE;
1555:
1556: l_oinv_rec := p_oinv_rec;
1557: l_iohv_rec := p_iohv_rec;
1558: --check whether contract is to be recalled

Line 1564: IF (l_recall = OKC_API.G_TRUE) THEN

1560: p_iohv_rec => l_iohv_rec,
1561: x_recall => l_recall,
1562: x_return_status => l_return_status);
1563:
1564: IF (l_recall = OKC_API.G_TRUE) THEN
1565: l_iohv_rec.status := STATUS_NOTIFIED;
1566: l_iohv_rec.process_date := SYSDATE;
1567: --l_iohv_rec.comments := p_comments;
1568:

Line 1619: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1615:
1616: x_return_status := l_return_status;
1617: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1618: EXCEPTION
1619: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1621: (
1622: l_api_name,
1623: G_PKG_NAME,

Line 1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1616: x_return_status := l_return_status;
1617: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1618: EXCEPTION
1619: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1621: (
1622: l_api_name,
1623: G_PKG_NAME,
1624: 'OKC_API.G_RET_STS_ERROR',

Line 1624: 'OKC_API.G_RET_STS_ERROR',

1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1621: (
1622: l_api_name,
1623: G_PKG_NAME,
1624: 'OKC_API.G_RET_STS_ERROR',
1625: x_msg_count,
1626: x_msg_data,
1627: '_PVT'
1628: );

Line 1629: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1625: x_msg_count,
1626: x_msg_data,
1627: '_PVT'
1628: );
1629: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1630: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1631: (
1632: l_api_name,
1633: G_PKG_NAME,

Line 1630: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1626: x_msg_data,
1627: '_PVT'
1628: );
1629: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1630: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1631: (
1632: l_api_name,
1633: G_PKG_NAME,
1634: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1634: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1630: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1631: (
1632: l_api_name,
1633: G_PKG_NAME,
1634: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1635: x_msg_count,
1636: x_msg_data,
1637: '_PVT'
1638: );

Line 1640: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1636: x_msg_data,
1637: '_PVT'
1638: );
1639: WHEN OTHERS THEN
1640: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1641: (
1642: l_api_name,
1643: G_PKG_NAME,
1644: 'OTHERS',

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

1662: x_return_status OUT NOCOPY VARCHAR2,
1663: x_msg_count OUT NOCOPY NUMBER,
1664: x_msg_data OUT NOCOPY VARCHAR2) AS
1665:
1666: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1667: l_api_version CONSTANT NUMBER := 1;
1668: l_api_name CONSTANT VARCHAR2(30) := 'create_followup';
1669:
1670: l_msg_count NUMBER;

Line 1736: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1732: AND TRUNC(NVL(end_date_active, SYSDATE))
1733: AND name = 'High';
1734:
1735: BEGIN
1736: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1737: G_PKG_NAME,
1738: p_init_msg_list,
1739: l_api_version,
1740: p_api_version,

Line 1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1740: p_api_version,
1741: '_PVT',
1742: l_return_status);
1743:
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;

Line 1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1741: '_PVT',
1742: l_return_status);
1743:
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749:

Line 1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1742: l_return_status);
1743:
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749:
1750: -- Processing starts

Line 1747: RAISE OKC_API.G_EXCEPTION_ERROR;

1743:
1744: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1745: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1746: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1747: RAISE OKC_API.G_EXCEPTION_ERROR;
1748: END IF;
1749:
1750: -- Processing starts
1751:

Line 1794: P_INIT_MSG_LIST => Okc_Api.g_true,

1790: --l_owner_id := 100000803;
1791:
1792: Jtf_Tasks_Pub.CREATE_TASK(
1793: P_API_VERSION => p_api_version,
1794: P_INIT_MSG_LIST => Okc_Api.g_true,
1795: P_COMMIT => Okc_Api.g_true,
1796: P_TASK_ID => NULL,
1797: P_TASK_NAME => l_task_name,
1798: P_TASK_TYPE_NAME => l_task_type,

Line 1795: P_COMMIT => Okc_Api.g_true,

1791:
1792: Jtf_Tasks_Pub.CREATE_TASK(
1793: P_API_VERSION => p_api_version,
1794: P_INIT_MSG_LIST => Okc_Api.g_true,
1795: P_COMMIT => Okc_Api.g_true,
1796: P_TASK_ID => NULL,
1797: P_TASK_NAME => l_task_name,
1798: P_TASK_TYPE_NAME => l_task_type,
1799: P_TASK_TYPE_ID => l_task_type_id,

Line 1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1916:
1917: x_return_status := l_return_status;
1918: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1919: EXCEPTION
1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,

Line 1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1917: x_return_status := l_return_status;
1918: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1919: EXCEPTION
1920: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,
1925: 'OKC_API.G_RET_STS_ERROR',

Line 1925: 'OKC_API.G_RET_STS_ERROR',

1921: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1922: (
1923: l_api_name,
1924: G_PKG_NAME,
1925: 'OKC_API.G_RET_STS_ERROR',
1926: x_msg_count,
1927: x_msg_data,
1928: '_PVT'
1929: );

Line 1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1926: x_msg_count,
1927: x_msg_data,
1928: '_PVT'
1929: );
1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1931: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,

Line 1931: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1927: x_msg_data,
1928: '_PVT'
1929: );
1930: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1931: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,
1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1931: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1932: (
1933: l_api_name,
1934: G_PKG_NAME,
1935: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1936: x_msg_count,
1937: x_msg_data,
1938: '_PVT'
1939: );

Line 1941: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1937: x_msg_data,
1938: '_PVT'
1939: );
1940: WHEN OTHERS THEN
1941: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1942: (
1943: l_api_name,
1944: G_PKG_NAME,
1945: 'OTHERS',

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

1966: lx_msg_count NUMBER ;
1967: lx_msg_data VARCHAR2(2000);
1968: lx_message VARCHAR2(2000);
1969: l_api_version CONSTANT NUMBER := 1;
1970: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1971: l_api_name CONSTANT VARCHAR2(30) := 'notify_customer';
1972: l_rows_processed NUMBER := 0;
1973: l_rows_failed NUMBER := 0;
1974: l_cust_notified NUMBER := 0;

Line 2002: l_party_passed VARCHAR2(1) := Okc_Api.G_TRUE;

1998: l_description JTF_TASKS_VL.DESCRIPTION%TYPE;
1999: l_start_date Date;
2000:
2001: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2002: l_party_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2003: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2004:
2005: CURSOR l_notify_csr(cp_case_number IN VARCHAR2
2006: ,cp_party_id IN NUMBER

Line 2003: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;

1999: l_start_date Date;
2000:
2001: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2002: l_party_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2003: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2004:
2005: CURSOR l_notify_csr(cp_case_number IN VARCHAR2
2006: ,cp_party_id IN NUMBER
2007: ,cp_organization_id IN NUMBER) IS

Line 2020: AND ((l_case_passed = Okc_Api.G_FALSE) OR

2016: WHERE OIN.khr_id = TO_NUMBER(IOH.object1_id1)
2017: AND IOH.jtot_object1_code = 'OKX_LEASE'
2018: AND (IOH.ACTION = ACTION_NOTIFY_CUST)
2019: AND (IOH.STATUS = STATUS_PROCESSED)
2020: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2021: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2022: AND ((l_party_passed = Okc_Api.G_FALSE) OR
2023: (l_party_passed = Okc_Api.G_TRUE AND OIN.party_id = cp_party_id))
2024: AND (OIN.org_id = cp_organization_id);

Line 2021: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))

2017: AND IOH.jtot_object1_code = 'OKX_LEASE'
2018: AND (IOH.ACTION = ACTION_NOTIFY_CUST)
2019: AND (IOH.STATUS = STATUS_PROCESSED)
2020: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2021: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2022: AND ((l_party_passed = Okc_Api.G_FALSE) OR
2023: (l_party_passed = Okc_Api.G_TRUE AND OIN.party_id = cp_party_id))
2024: AND (OIN.org_id = cp_organization_id);
2025: l_contact_destination varchar2(240); -- bug 3955222

Line 2022: AND ((l_party_passed = Okc_Api.G_FALSE) OR

2018: AND (IOH.ACTION = ACTION_NOTIFY_CUST)
2019: AND (IOH.STATUS = STATUS_PROCESSED)
2020: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2021: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2022: AND ((l_party_passed = Okc_Api.G_FALSE) OR
2023: (l_party_passed = Okc_Api.G_TRUE AND OIN.party_id = cp_party_id))
2024: AND (OIN.org_id = cp_organization_id);
2025: l_contact_destination varchar2(240); -- bug 3955222
2026: l_contact_party_id number; -- bug 3955222

Line 2023: (l_party_passed = Okc_Api.G_TRUE AND OIN.party_id = cp_party_id))

2019: AND (IOH.STATUS = STATUS_PROCESSED)
2020: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2021: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2022: AND ((l_party_passed = Okc_Api.G_FALSE) OR
2023: (l_party_passed = Okc_Api.G_TRUE AND OIN.party_id = cp_party_id))
2024: AND (OIN.org_id = cp_organization_id);
2025: l_contact_destination varchar2(240); -- bug 3955222
2026: l_contact_party_id number; -- bug 3955222
2027: BEGIN

Line 2029: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN

2025: l_contact_destination varchar2(240); -- bug 3955222
2026: l_contact_party_id number; -- bug 3955222
2027: BEGIN
2028: --check to see that contract id is passed when email is passed
2029: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN
2030: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN
2031: RAISE G_INVALID_PARAMETERS;
2032: END IF;
2033: END IF;

Line 2030: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN

2026: l_contact_party_id number; -- bug 3955222
2027: BEGIN
2028: --check to see that contract id is passed when email is passed
2029: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN
2030: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN
2031: RAISE G_INVALID_PARAMETERS;
2032: END IF;
2033: END IF;
2034:

Line 2056: IF (p_case_number = OKC_API.G_MISS_CHAR OR

2052: END IF;
2053: */
2054:
2055: --check if case nbr is passed
2056: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2057: p_case_number IS NULL) THEN
2058: l_case_passed := Okc_Api.G_FALSE;
2059: END IF;
2060:

Line 2058: l_case_passed := Okc_Api.G_FALSE;

2054:
2055: --check if case nbr is passed
2056: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2057: p_case_number IS NULL) THEN
2058: l_case_passed := Okc_Api.G_FALSE;
2059: END IF;
2060:
2061: --check if party_id is passed
2062: IF (p_party_id = OKC_API.G_MISS_NUM OR

Line 2062: IF (p_party_id = OKC_API.G_MISS_NUM OR

2058: l_case_passed := Okc_Api.G_FALSE;
2059: END IF;
2060:
2061: --check if party_id is passed
2062: IF (p_party_id = OKC_API.G_MISS_NUM OR
2063: p_party_id IS NULL) THEN
2064: l_party_passed := Okc_Api.G_FALSE;
2065: END IF;
2066:

Line 2064: l_party_passed := Okc_Api.G_FALSE;

2060:
2061: --check if party_id is passed
2062: IF (p_party_id = OKC_API.G_MISS_NUM OR
2063: p_party_id IS NULL) THEN
2064: l_party_passed := Okc_Api.G_FALSE;
2065: END IF;
2066:
2067: l_subject := p_subject;
2068: l_content_id := p_content_id;

Line 2073: IF (l_subject = OKC_API.G_MISS_CHAR OR

2069: l_agent_id := NVL(p_agent_id, FND_GLOBAL.USER_ID);
2070: l_from := p_from;
2071:
2072: --if suject is null get subject
2073: IF (l_subject = OKC_API.G_MISS_CHAR OR
2074: l_subject IS NULL) THEN
2075: l_subject := fnd_profile.value('IEX_CB_NOTIFY_CUST_EMAIL_SUBJECT');
2076: END IF;
2077: --dbms_output.put_line('l_subject : ' || l_subject);

Line 2080: IF (l_content_id = OKC_API.G_MISS_NUM OR

2076: END IF;
2077: --dbms_output.put_line('l_subject : ' || l_subject);
2078:
2079: --if content_id is null get content_id
2080: IF (l_content_id = OKC_API.G_MISS_NUM OR
2081: l_content_id IS NULL) THEN
2082: l_content_id := to_number(fnd_profile.value('IEX_CB_NOTIFY_CUST_TEMPLATE'));
2083: END IF;
2084: --dbms_output.put_line('l_content_id : ' || l_content_id);

Line 2087: IF (l_from = OKC_API.G_MISS_CHAR OR

2083: END IF;
2084: --dbms_output.put_line('l_content_id : ' || l_content_id);
2085:
2086: --if from is null get subject
2087: IF (l_from = OKC_API.G_MISS_CHAR OR
2088: l_from IS NULL) THEN
2089: l_from := fnd_profile.value('IEX_CB_NOTIFY_CUST_EMAIL_FROM');
2090: END IF;
2091: --dbms_output.put_line('l_from : ' || l_from);

Line 2111: IF ((l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN

2107: l_party_id := l_oinv_rec.party_id;
2108: l_contract_id := l_oinv_rec.khr_id;
2109: l_email := p_email;
2110:
2111: IF ((l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN
2112: get_party_email(p_party_id => l_oinv_rec.party_id
2113: ,x_email => l_email
2114: ,x_return_status => l_return_status);
2115: END IF;

Line 2119: (l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN

2115: END IF;
2116:
2117: IF NOT ((l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) OR
2118: (l_return_status = okl_api.G_RET_STS_ERROR) OR
2119: (l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN
2120: l_cust_notified := l_cust_notified + 1;
2121:
2122: /*
2123: l_bind_var(1) := 'p_contract_id';

Line 2180: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

2176: --dbms_output.put_line(' party name => ' || l_oinv_rec.party_name ||
2177: ' x_return_status => ' || l_return_status);
2178: */
2179:
2180: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
2181: complete_notify(
2182: p_api_version => l_api_version,
2183: p_init_msg_list => okl_api.G_TRUE,
2184: p_interface_id => l_oinv_rec.id,

Line 2187: p_comments => OKC_API.G_MISS_CHAR,

2183: p_init_msg_list => okl_api.G_TRUE,
2184: p_interface_id => l_oinv_rec.id,
2185: p_hst_id => l_iohv_rec.id,
2186: p_notification_date => SYSDATE,
2187: p_comments => OKC_API.G_MISS_CHAR,
2188: x_return_status => l_return_status,
2189: x_msg_count => lx_msg_count,
2190: x_msg_data => lx_msg_data);
2191: l_rows_processed := l_rows_processed + 1;

Line 2235: l_return_status := OKC_API.G_RET_STS_ERROR;

2231: FND_MESSAGE.SET_NAME('IEX', 'IEX_MISSING_EMAIL_CASE');
2232: --dbms_output.put_line(FND_MESSAGE.GET);
2233: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, FND_MESSAGE.GET );
2234: ROLLBACK;
2235: l_return_status := OKC_API.G_RET_STS_ERROR;
2236: WHEN OTHERS THEN
2237: IF l_notify_csr%ISOPEN THEN
2238: CLOSE l_notify_csr;
2239: END IF;

Line 2245: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2241: retcode := 1;
2242: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
2243: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
2244: ROLLBACK;
2245: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2246: END notify_customer;
2247:
2248: ---------------------------------------------------------------------------
2249: -- PROCEDURE notify_recall_external_agency

Line 2258: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

2254: p_case_number IN VARCHAR2,
2255: p_ext_agncy_id IN NUMBER,
2256: p_comments IN VARCHAR2) AS
2257:
2258: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
2259: lx_msg_count NUMBER ;
2260: lx_msg_data VARCHAR2(2000);
2261: lx_message VARCHAR2(2000);
2262: l_api_version CONSTANT NUMBER := 1;

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

2259: lx_msg_count NUMBER ;
2260: lx_msg_data VARCHAR2(2000);
2261: lx_message VARCHAR2(2000);
2262: l_api_version CONSTANT NUMBER := 1;
2263: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2264: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;
2265: l_delinquency_status IEX_DEL_STATUSES.DEL_STATUS%TYPE;
2266:
2267: l_api_name CONSTANT VARCHAR2(30) := 'notify_recall_external_agency';

Line 2264: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;

2260: lx_msg_data VARCHAR2(2000);
2261: lx_message VARCHAR2(2000);
2262: l_api_version CONSTANT NUMBER := 1;
2263: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2264: l_recall VARCHAR2(1) := Okc_Api.G_FALSE;
2265: l_delinquency_status IEX_DEL_STATUSES.DEL_STATUS%TYPE;
2266:
2267: l_api_name CONSTANT VARCHAR2(30) := 'notify_recall_external_agency';
2268: l_ext_agncy_contracts_notified NUMBER := 0;

Line 2283: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2279: l_task_name JTF_TASKS_VL.TASK_NAME%TYPE;
2280: l_description JTF_TASKS_VL.DESCRIPTION%TYPE;
2281:
2282: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2283: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2284: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2285:
2286: CURSOR l_recall_csr(cp_case_number IN VARCHAR2
2287: ,cp_ext_agncy_id IN NUMBER

Line 2284: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2280: l_description JTF_TASKS_VL.DESCRIPTION%TYPE;
2281:
2282: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2283: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2284: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2285:
2286: CURSOR l_recall_csr(cp_case_number IN VARCHAR2
2287: ,cp_ext_agncy_id IN NUMBER
2288: ,cp_organization_id IN NUMBER) IS

Line 2309: AND ((l_case_passed = Okc_Api.G_FALSE) OR

2305: AND IOH.jtot_object1_code = 'OKX_LEASE'
2306: AND (IOH.ACTION = ACTION_TRANSFER_EXT_AGNCY)
2307: AND (IOH.STATUS = STATUS_PROCESSED)
2308: AND (TRUNC(IOH.REVIEW_DATE) = TRUNC(SYSDATE))
2309: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2310: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2311: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2312: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2313: AND (OIN.org_id = cp_organization_id);

Line 2310: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))

2306: AND (IOH.ACTION = ACTION_TRANSFER_EXT_AGNCY)
2307: AND (IOH.STATUS = STATUS_PROCESSED)
2308: AND (TRUNC(IOH.REVIEW_DATE) = TRUNC(SYSDATE))
2309: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2310: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2311: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2312: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2313: AND (OIN.org_id = cp_organization_id);
2314: BEGIN

Line 2311: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR

2307: AND (IOH.STATUS = STATUS_PROCESSED)
2308: AND (TRUNC(IOH.REVIEW_DATE) = TRUNC(SYSDATE))
2309: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2310: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2311: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2312: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2313: AND (OIN.org_id = cp_organization_id);
2314: BEGIN
2315: --get organization id

Line 2312: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))

2308: AND (TRUNC(IOH.REVIEW_DATE) = TRUNC(SYSDATE))
2309: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2310: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2311: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2312: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2313: AND (OIN.org_id = cp_organization_id);
2314: BEGIN
2315: --get organization id
2316: --Begin Bug#5373556 schekuri 12-Jul-2006

Line 2322: IF (p_case_number = OKC_API.G_MISS_CHAR OR

2318: --l_organization_id := fnd_profile.value('ORG_ID');
2319: --End Bug#5373556 schekuri 12-Jul-2006
2320:
2321: --check if case number is passed
2322: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2323: p_case_number IS NULL) THEN
2324: l_case_passed := Okc_Api.G_FALSE;
2325: --dbms_output.put_line('contract is not passed');
2326: END IF;

Line 2324: l_case_passed := Okc_Api.G_FALSE;

2320:
2321: --check if case number is passed
2322: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2323: p_case_number IS NULL) THEN
2324: l_case_passed := Okc_Api.G_FALSE;
2325: --dbms_output.put_line('contract is not passed');
2326: END IF;
2327:
2328: --check if ext_agncy_id is passed

Line 2329: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR

2325: --dbms_output.put_line('contract is not passed');
2326: END IF;
2327:
2328: --check if ext_agncy_id is passed
2329: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2330: p_ext_agncy_id IS NULL) THEN
2331: l_ext_agncy_passed := Okc_Api.G_FALSE;
2332: --dbms_output.put_line('ext_agncy is not passed');
2333: END IF;

Line 2331: l_ext_agncy_passed := Okc_Api.G_FALSE;

2327:
2328: --check if ext_agncy_id is passed
2329: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2330: p_ext_agncy_id IS NULL) THEN
2331: l_ext_agncy_passed := Okc_Api.G_FALSE;
2332: --dbms_output.put_line('ext_agncy is not passed');
2333: END IF;
2334:
2335: --l_extend_days := fnd_profile.value('IEX_EA_RECALL_GRACE_DAYS');

Line 2375: l_recall := OKC_API.G_FALSE;

2371: l_ext_agncy_contracts_notified := l_ext_agncy_contracts_notified + 1;
2372: END IF;
2373:
2374: /*
2375: l_recall := OKC_API.G_FALSE;
2376:
2377: --check whether contract is to be recalled
2378: get_contract_recall(p_oinv_rec => l_oinv_rec,
2379: p_iohv_rec => l_iohv_rec,

Line 2383: IF (l_recall = OKC_API.G_TRUE) THEN

2379: p_iohv_rec => l_iohv_rec,
2380: x_recall => l_recall,
2381: x_return_status => l_return_status);
2382:
2383: IF (l_recall = OKC_API.G_TRUE) THEN
2384: l_iohv_rec.status := STATUS_NOTIFIED;
2385: l_iohv_rec.process_date := SYSDATE;
2386: l_iohv_rec.comments := p_comments;
2387:

Line 2452: IF (l_recall = OKC_API.G_TRUE) THEN

2448: p_iohv_rec => l_iohv_rec,
2449: x_recall => l_recall,
2450: x_return_status => l_return_status);
2451:
2452: IF (l_recall = OKC_API.G_TRUE) THEN
2453: l_iohv_rec.status := STATUS_NOTIFIED;
2454: l_iohv_rec.process_date := SYSDATE;
2455: l_iohv_rec.comments := p_comments;
2456:

Line 2548: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2544: retcode := 1;
2545: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
2546: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
2547: ROLLBACK;
2548: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2549: END notify_recall_external_agency;
2550:
2551: ---------------------------------------------------------------------------
2552: -- PROCEDURE notify_external_agency

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

2565: lx_msg_count NUMBER ;
2566: lx_msg_data VARCHAR2(2000);
2567: lx_message VARCHAR2(2000);
2568: l_api_version CONSTANT NUMBER := 1;
2569: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2570: l_api_name CONSTANT VARCHAR2(30) := 'notify_external_agency';
2571: l_rows_processed NUMBER := 0;
2572: l_rows_failed NUMBER := 0;
2573: l_ext_agncy_notified NUMBER := 0;

Line 2594: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2590: l_agent_id NUMBER;
2591: l_request_id NUMBER;
2592:
2593: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2594: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2595: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2596:
2597: CURSOR l_notify_csr(cp_case_number IN VARCHAR2
2598: ,cp_ext_agncy_id IN NUMBER

Line 2595: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2591: l_request_id NUMBER;
2592:
2593: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2594: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2595: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2596:
2597: CURSOR l_notify_csr(cp_case_number IN VARCHAR2
2598: ,cp_ext_agncy_id IN NUMBER
2599: ,cp_organization_id IN NUMBER) IS

Line 2610: AND ((l_case_passed = Okc_Api.G_FALSE) OR

2606: WHERE OIN.khr_id = TO_NUMBER(IOH.object1_id1)
2607: AND IOH.jtot_object1_code = 'OKX_LEASE'
2608: AND (IOH.ACTION = ACTION_NOTIFY_EXT_AGNCY)
2609: AND (IOH.STATUS = STATUS_PROCESSED)
2610: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2611: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2612: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2614: AND (OIN.org_id = cp_organization_id);

Line 2611: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))

2607: AND IOH.jtot_object1_code = 'OKX_LEASE'
2608: AND (IOH.ACTION = ACTION_NOTIFY_EXT_AGNCY)
2609: AND (IOH.STATUS = STATUS_PROCESSED)
2610: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2611: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2612: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2614: AND (OIN.org_id = cp_organization_id);
2615: BEGIN

Line 2612: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR

2608: AND (IOH.ACTION = ACTION_NOTIFY_EXT_AGNCY)
2609: AND (IOH.STATUS = STATUS_PROCESSED)
2610: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2611: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2612: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2614: AND (OIN.org_id = cp_organization_id);
2615: BEGIN
2616: --check to see that case number is passed when email is passed

Line 2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))

2609: AND (IOH.STATUS = STATUS_PROCESSED)
2610: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2611: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2612: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2614: AND (OIN.org_id = cp_organization_id);
2615: BEGIN
2616: --check to see that case number is passed when email is passed
2617: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN

Line 2617: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN

2613: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2614: AND (OIN.org_id = cp_organization_id);
2615: BEGIN
2616: --check to see that case number is passed when email is passed
2617: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN
2618: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN
2619: RAISE G_INVALID_PARAMETERS;
2620: END IF;
2621: END IF;

Line 2618: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN

2614: AND (OIN.org_id = cp_organization_id);
2615: BEGIN
2616: --check to see that case number is passed when email is passed
2617: IF NOT (p_email = OKC_API.G_MISS_CHAR OR p_email IS NULL) THEN
2618: IF (p_case_number = OKC_API.G_MISS_CHAR OR p_case_number IS NULL) THEN
2619: RAISE G_INVALID_PARAMETERS;
2620: END IF;
2621: END IF;
2622:

Line 2644: IF (p_case_number = OKC_API.G_MISS_CHAR OR

2640: END IF;
2641: */
2642:
2643: --check if contract_id is passed
2644: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2645: p_case_number IS NULL) THEN
2646: l_case_passed := Okc_Api.G_FALSE;
2647: --dbms_output.put_line('contract is not passed');
2648: END IF;

Line 2646: l_case_passed := Okc_Api.G_FALSE;

2642:
2643: --check if contract_id is passed
2644: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2645: p_case_number IS NULL) THEN
2646: l_case_passed := Okc_Api.G_FALSE;
2647: --dbms_output.put_line('contract is not passed');
2648: END IF;
2649:
2650: --check if p_ext_agncy_id is passed

Line 2651: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR

2647: --dbms_output.put_line('contract is not passed');
2648: END IF;
2649:
2650: --check if p_ext_agncy_id is passed
2651: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2652: p_ext_agncy_id IS NULL) THEN
2653: l_ext_agncy_passed := Okc_Api.G_FALSE;
2654: --dbms_output.put_line('ext_agncy is not passed');
2655: END IF;

Line 2653: l_ext_agncy_passed := Okc_Api.G_FALSE;

2649:
2650: --check if p_ext_agncy_id is passed
2651: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2652: p_ext_agncy_id IS NULL) THEN
2653: l_ext_agncy_passed := Okc_Api.G_FALSE;
2654: --dbms_output.put_line('ext_agncy is not passed');
2655: END IF;
2656:
2657: l_subject := p_subject;

Line 2664: IF (l_subject = OKC_API.G_MISS_CHAR OR

2660: l_from := p_from;
2661:
2662:
2663: --if suject is null get subject
2664: IF (l_subject = OKC_API.G_MISS_CHAR OR
2665: l_subject IS NULL) THEN
2666: l_subject := fnd_profile.value('IEX_EA_NOTIFY_VENDOR_EMAIL_SUBJECT');
2667: END IF;
2668: --dbms_output.put_line('l_subject : ' || l_subject);

Line 2671: IF (l_content_id = OKC_API.G_MISS_NUM OR

2667: END IF;
2668: --dbms_output.put_line('l_subject : ' || l_subject);
2669:
2670: --if content_id is null get content_id
2671: IF (l_content_id = OKC_API.G_MISS_NUM OR
2672: l_content_id IS NULL) THEN
2673: l_content_id := to_number(fnd_profile.value('IEX_EA_NOTIFY_VENDOR_TEMPLATE'));
2674: END IF;
2675: --dbms_output.put_line('l_content_id : ' || l_content_id);

Line 2678: IF (l_from = OKC_API.G_MISS_CHAR OR

2674: END IF;
2675: --dbms_output.put_line('l_content_id : ' || l_content_id);
2676:
2677: --if from is null get subject
2678: IF (l_from = OKC_API.G_MISS_CHAR OR
2679: l_from IS NULL) THEN
2680: l_from := fnd_profile.value('IEX_EA_NOTIFY_VENDOR_EMAIL_FROM');
2681: END IF;
2682: --dbms_output.put_line('l_from : ' || l_from);

Line 2700: IF ((l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN

2696: l_ext_agncy_id := l_iohv_rec.ext_agncy_id;
2697: l_contract_id := l_oinv_rec.khr_id;
2698: l_email := p_email;
2699:
2700: IF ((l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN
2701: get_ext_agncy_email(p_ext_agncy_id => l_iohv_rec.ext_agncy_id
2702: ,x_email => l_email
2703: ,x_return_status => l_return_status);
2704: END IF;

Line 2708: (l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN

2704: END IF;
2705:
2706: IF NOT ((l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) OR
2707: (l_return_status = okl_api.G_RET_STS_ERROR) OR
2708: (l_email = OKC_API.G_MISS_CHAR) OR (l_email IS NULL)) THEN
2709: l_ext_agncy_notified := l_ext_agncy_notified + 1;
2710:
2711: /*
2712: l_bind_var(1) := 'p_contract_id';

Line 2748: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

2744: --dbms_output.put_line(' party name => ' || l_oinv_rec.party_name ||
2745: ' x_return_status => ' || l_return_status);
2746: */
2747:
2748: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
2749: complete_notify_ext_agncy(
2750: p_api_version => l_api_version,
2751: p_init_msg_list => okl_api.G_TRUE,
2752: p_interface_id => l_oinv_rec.id,

Line 2792: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2788: retcode := 1;
2789: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
2790: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
2791: ROLLBACK;
2792: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2793: END notify_external_agency;
2794:
2795: ---------------------------------------------------------------------------
2796: -- PROCEDURE recall_from_external_agency

Line 2807: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;

2803: p_comments IN VARCHAR2) AS
2804:
2805: l_api_name CONSTANT VARCHAR2(30) := 'recall_from_external_agency';
2806: l_api_version CONSTANT NUMBER := 1;
2807: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
2808: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2809: lx_msg_count NUMBER ;
2810: lx_msg_data VARCHAR2(2000);
2811:

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

2804:
2805: l_api_name CONSTANT VARCHAR2(30) := 'recall_from_external_agency';
2806: l_api_version CONSTANT NUMBER := 1;
2807: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
2808: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2809: lx_msg_count NUMBER ;
2810: lx_msg_data VARCHAR2(2000);
2811:
2812: l_case_number OKL_OPEN_INT.CASE_NUMBER%TYPE;

Line 2826: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2822: lp_iohv_rec iohv_rec_type;
2823: lx_iohv_rec iohv_rec_type;
2824:
2825: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2826: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2827: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2828:
2829: CURSOR l_recall_csr(cp_case_number IN VARCHAR2
2830: ,cp_ext_agncy_id IN NUMBER

Line 2827: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;

2823: lx_iohv_rec iohv_rec_type;
2824:
2825: l_organization_id HR_OPERATING_UNITS.ORGANIZATION_ID%TYPE;
2826: l_case_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2827: l_ext_agncy_passed VARCHAR2(1) := Okc_Api.G_TRUE;
2828:
2829: CURSOR l_recall_csr(cp_case_number IN VARCHAR2
2830: ,cp_ext_agncy_id IN NUMBER
2831: ,cp_organization_id IN NUMBER) IS

Line 2847: AND ((l_case_passed = Okc_Api.G_FALSE) OR

2843: AND (IOH.ACTION = ACTION_TRANSFER_EXT_AGNCY)
2844: AND (IOH.STATUS = STATUS_NOTIFIED OR IOH.STATUS = STATUS_PROCESSED)
2845: AND (TRUNC(IOH.RECALL_DATE) = TRUNC(SYSDATE))
2846: AND (NVL(IOH.AUTOMATIC_RECALL_FLAG,'N') = 'Y')
2847: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2848: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2849: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2850: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2851: AND (OIN.org_id = cp_organization_id);

Line 2848: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))

2844: AND (IOH.STATUS = STATUS_NOTIFIED OR IOH.STATUS = STATUS_PROCESSED)
2845: AND (TRUNC(IOH.RECALL_DATE) = TRUNC(SYSDATE))
2846: AND (NVL(IOH.AUTOMATIC_RECALL_FLAG,'N') = 'Y')
2847: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2848: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2849: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2850: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2851: AND (OIN.org_id = cp_organization_id);
2852: BEGIN

Line 2849: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR

2845: AND (TRUNC(IOH.RECALL_DATE) = TRUNC(SYSDATE))
2846: AND (NVL(IOH.AUTOMATIC_RECALL_FLAG,'N') = 'Y')
2847: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2848: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2849: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2850: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2851: AND (OIN.org_id = cp_organization_id);
2852: BEGIN
2853: --get organization id

Line 2850: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))

2846: AND (NVL(IOH.AUTOMATIC_RECALL_FLAG,'N') = 'Y')
2847: AND ((l_case_passed = Okc_Api.G_FALSE) OR
2848: (l_case_passed = Okc_Api.G_TRUE AND OIN.case_number = cp_case_number))
2849: AND ((l_ext_agncy_passed = Okc_Api.G_FALSE) OR
2850: (l_ext_agncy_passed = Okc_Api.G_TRUE AND IOH.ext_agncy_id = cp_ext_agncy_id))
2851: AND (OIN.org_id = cp_organization_id);
2852: BEGIN
2853: --get organization id
2854: --Begin Bug#5373556 schekuri 12-Jul-2006

Line 2860: IF (p_case_number = OKC_API.G_MISS_CHAR OR

2856: --l_organization_id := fnd_profile.value('ORG_ID');
2857: --End Bug#5373556 schekuri 12-Jul-2006
2858:
2859: --check if case number is passed
2860: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2861: p_case_number IS NULL) THEN
2862: l_case_passed := Okc_Api.G_FALSE;
2863: --dbms_output.put_line('contract is not passed');
2864: END IF;

Line 2862: l_case_passed := Okc_Api.G_FALSE;

2858:
2859: --check if case number is passed
2860: IF (p_case_number = OKC_API.G_MISS_CHAR OR
2861: p_case_number IS NULL) THEN
2862: l_case_passed := Okc_Api.G_FALSE;
2863: --dbms_output.put_line('contract is not passed');
2864: END IF;
2865:
2866: --check if party_id is passed

Line 2867: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR

2863: --dbms_output.put_line('contract is not passed');
2864: END IF;
2865:
2866: --check if party_id is passed
2867: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2868: p_ext_agncy_id IS NULL) THEN
2869: l_ext_agncy_passed := Okc_Api.G_FALSE;
2870: --dbms_output.put_line('ext_agncy is not passed');
2871: END IF;

Line 2869: l_ext_agncy_passed := Okc_Api.G_FALSE;

2865:
2866: --check if party_id is passed
2867: IF (p_ext_agncy_id = OKC_API.G_MISS_NUM OR
2868: p_ext_agncy_id IS NULL) THEN
2869: l_ext_agncy_passed := Okc_Api.G_FALSE;
2870: --dbms_output.put_line('ext_agncy is not passed');
2871: END IF;
2872:
2873: OPEN l_recall_csr(p_case_number

Line 2896: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2892: ,x_return_status => l_return_status
2893: ,x_msg_count => lx_msg_count
2894: ,x_msg_data => lx_msg_data);
2895:
2896: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2897: l_rows_failed := l_rows_failed + 1;
2898: ELSE
2899: l_contracts_recalled := l_contracts_recalled + 1;
2900: END IF;

Line 2916: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2912: retcode := 1;
2913: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
2914: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
2915: ROLLBACK;
2916: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2917: END recall_from_external_agency;
2918: ---------------------------------------------------------------------------
2919: -- PROCEDURE get_hst_info
2920: ---------------------------------------------------------------------------

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

2923: x_action OUT NOCOPY VARCHAR2,
2924: x_status OUT NOCOPY VARCHAR2,
2925: x_return_status OUT NOCOPY VARCHAR2) AS
2926:
2927: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2928: l_action IEX_OPEN_INT_HST.ACTION%TYPE;
2929: l_status IEX_OPEN_INT_HST.STATUS%TYPE;
2930:
2931: CURSOR l_hst_csr(cp_hst_id IN NUMBER) IS

Line 2947: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

2943: x_status := l_status;
2944: x_return_status := l_return_status;
2945: EXCEPTION
2946: WHEN OTHERS THEN
2947: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2948: ,p_msg_name => G_UNEXPECTED_ERROR
2949: ,p_token1 => G_SQLCODE_TOKEN
2950: ,p_token1_value => SQLCODE
2951: ,p_token2 => G_SQLERRM_TOKEN

Line 2953: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2949: ,p_token1 => G_SQLCODE_TOKEN
2950: ,p_token1_value => SQLCODE
2951: ,p_token2 => G_SQLERRM_TOKEN
2952: ,p_token2_value => SQLERRM);
2953: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2954: END get_hst_info;
2955:
2956: ---------------------------------------------------------------------------
2957: -- PROCEDURE get_party_email

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

2969: AND contact_point_type = 'EMAIL'
2970: AND primary_flag = 'Y'
2971: AND status = 'A';
2972:
2973: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2974: l_email HZ_CONTACT_POINTS.EMAIL_ADDRESS%TYPE;
2975: BEGIN
2976: OPEN l_prty_email_csr(p_party_id);
2977: FETCH l_prty_email_csr INTO

Line 2985: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

2981: x_email := l_email;
2982: x_return_status := l_return_status;
2983: EXCEPTION
2984: WHEN OTHERS THEN
2985: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
2986: ,p_msg_name => G_UNEXPECTED_ERROR
2987: ,p_token1 => G_SQLCODE_TOKEN
2988: ,p_token1_value => SQLCODE
2989: ,p_token2 => G_SQLERRM_TOKEN

Line 2991: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2987: ,p_token1 => G_SQLCODE_TOKEN
2988: ,p_token1_value => SQLCODE
2989: ,p_token2 => G_SQLERRM_TOKEN
2990: ,p_token2_value => SQLERRM);
2991: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2992: END get_party_email;
2993:
2994: ---------------------------------------------------------------------------
2995: -- PROCEDURE get_ext_agncy_email

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

2998: p_ext_agncy_id IN NUMBER,
2999: x_email OUT NOCOPY VARCHAR2,
3000: x_return_status OUT NOCOPY VARCHAR2) AS
3001:
3002: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3003: l_email PO_VENDOR_SITES_ALL.EMAIL_ADDRESS%TYPE;
3004:
3005: CURSOR l_ext_agncy_email_csr(cp_ext_agncy_id IN NUMBER) IS
3006: SELECT pvs.email_address

Line 3021: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

3017: x_email := l_email;
3018: x_return_status := l_return_status;
3019: EXCEPTION
3020: WHEN OTHERS THEN
3021: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
3022: ,p_msg_name => G_UNEXPECTED_ERROR
3023: ,p_token1 => G_SQLCODE_TOKEN
3024: ,p_token1_value => SQLCODE
3025: ,p_token2 => G_SQLERRM_TOKEN

Line 3027: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3023: ,p_token1 => G_SQLCODE_TOKEN
3024: ,p_token1_value => SQLCODE
3025: ,p_token2 => G_SQLERRM_TOKEN
3026: ,p_token2_value => SQLERRM);
3027: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3028: END get_ext_agncy_email;
3029:
3030: ---------------------------------------------------------------------------
3031: -- PROCEDURE get_external_agency

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

3038:
3039: l_oinv_rec oinv_rec_type;
3040: l_iohv_rec iohv_rec_type;
3041: l_ext_agncy_id IEX_OPEN_INT_HST.EXT_AGNCY_ID%TYPE;
3042: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3043: l_score_id IEX_SCORES.SCORE_ID%TYPE;
3044: l_score_value IEX_SCORE_HISTORIES.SCORE_VALUE%TYPE;
3045: l_score_found BOOLEAN := FALSE;
3046:

Line 3155: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

3151: x_ext_agncy_id := l_ext_agncy_id;
3152: x_return_status := l_return_status;
3153: EXCEPTION
3154: WHEN OTHERS THEN
3155: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
3156: ,p_msg_name => G_UNEXPECTED_ERROR
3157: ,p_token1 => G_SQLCODE_TOKEN
3158: ,p_token1_value => SQLCODE
3159: ,p_token2 => G_SQLERRM_TOKEN

Line 3161: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3157: ,p_token1 => G_SQLCODE_TOKEN
3158: ,p_token1_value => SQLCODE
3159: ,p_token2 => G_SQLERRM_TOKEN
3160: ,p_token2_value => SQLERRM);
3161: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3162: END get_external_agency;
3163:
3164: ---------------------------------------------------------------------------
3165: -- PROCEDURE get_contract_recall

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

3169: p_iohv_rec IN iohv_rec_type,
3170: x_recall OUT NOCOPY VARCHAR2,
3171: x_return_status OUT NOCOPY VARCHAR2) AS
3172:
3173: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3174: l_recall VARCHAR2(1) := Okc_Api.G_TRUE;
3175:
3176: l_oinv_rec oinv_rec_type;
3177: l_iohv_rec iohv_rec_type;

Line 3174: l_recall VARCHAR2(1) := Okc_Api.G_TRUE;

3170: x_recall OUT NOCOPY VARCHAR2,
3171: x_return_status OUT NOCOPY VARCHAR2) AS
3172:
3173: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3174: l_recall VARCHAR2(1) := Okc_Api.G_TRUE;
3175:
3176: l_oinv_rec oinv_rec_type;
3177: l_iohv_rec iohv_rec_type;
3178: l_score_id IEX_SCORES.SCORE_ID%TYPE;

Line 3214: l_recall := Okc_Api.G_FALSE;

3210: P_OBJECT_TYPE => 'IEX_CASES',
3211: P_SCORE_ID => l_score_id);
3212:
3213: IF ((nvl(l_score_value,0) - nvl(l_score_value_previous,0)) >= to_number(fnd_profile.value('IEX_EA_SCORE_DIFF_FOR_RECALL'))) THEN
3214: l_recall := Okc_Api.G_FALSE;
3215: END IF;
3216:
3217: x_recall := l_recall;
3218: x_return_status := l_return_status;

Line 3221: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

3217: x_recall := l_recall;
3218: x_return_status := l_return_status;
3219: EXCEPTION
3220: WHEN OTHERS THEN
3221: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
3222: ,p_msg_name => G_UNEXPECTED_ERROR
3223: ,p_token1 => G_SQLCODE_TOKEN
3224: ,p_token1_value => SQLCODE
3225: ,p_token2 => G_SQLERRM_TOKEN

Line 3227: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3223: ,p_token1 => G_SQLCODE_TOKEN
3224: ,p_token1_value => SQLCODE
3225: ,p_token2 => G_SQLERRM_TOKEN
3226: ,p_token2_value => SQLERRM);
3227: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3228: END get_contract_recall;
3229:
3230: ---------------------------------------------------------------------------
3231: -- PROCEDURE get_contract_delinquency_stat

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

3235: p_iohv_rec IN iohv_rec_type,
3236: x_delinquency_status OUT NOCOPY VARCHAR2,
3237: x_return_status OUT NOCOPY VARCHAR2) AS
3238:
3239: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3240: l_delinquency_status IEX_DEL_STATUSES.DEL_STATUS%TYPE;
3241:
3242: l_oinv_rec oinv_rec_type;
3243: l_iohv_rec iohv_rec_type;

Line 3300: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

3296: x_delinquency_status := l_delinquency_status;
3297: x_return_status := l_return_status;
3298: EXCEPTION
3299: WHEN OTHERS THEN
3300: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
3301: ,p_msg_name => G_UNEXPECTED_ERROR
3302: ,p_token1 => G_SQLCODE_TOKEN
3303: ,p_token1_value => SQLCODE
3304: ,p_token2 => G_SQLERRM_TOKEN

Line 3306: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3302: ,p_token1 => G_SQLCODE_TOKEN
3303: ,p_token1_value => SQLCODE
3304: ,p_token2 => G_SQLERRM_TOKEN
3305: ,p_token2_value => SQLERRM);
3306: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3307: END get_contract_delinquency_stat;
3308: END IEX_OPI_PVT;