DBA Data[Home] [Help]

APPS.OKL_OPI_PVT dependencies on OKC_API

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

40: x_return_status OUT NOCOPY VARCHAR2,
41: x_msg_count OUT NOCOPY NUMBER,
42: x_msg_data OUT NOCOPY VARCHAR2) AS
43:
44: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
45: l_api_version CONSTANT NUMBER := 1;
46: l_api_name CONSTANT VARCHAR2(30) := 'insert_pending_int';
47:
48: l_oinv_rec oinv_rec_type;

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

55: SELECT id
56: FROM okl_open_int
57: WHERE khr_id = cp_contract_id;
58: BEGIN
59: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
60: G_PKG_NAME,
61: p_init_msg_list,
62: l_api_version,
63: p_api_version,

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

63: p_api_version,
64: '_PVT',
65: l_return_status);
66:
67: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
69: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
70: RAISE OKC_API.G_EXCEPTION_ERROR;
71: END IF;

Line 68: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

64: '_PVT',
65: l_return_status);
66:
67: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
69: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
70: RAISE OKC_API.G_EXCEPTION_ERROR;
71: END IF;
72:

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

65: l_return_status);
66:
67: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
69: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
70: RAISE OKC_API.G_EXCEPTION_ERROR;
71: END IF;
72:
73: -- Processing starts

Line 70: RAISE OKC_API.G_EXCEPTION_ERROR;

66:
67: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
68: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
69: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
70: RAISE OKC_API.G_EXCEPTION_ERROR;
71: END IF;
72:
73: -- Processing starts
74: l_oinv_rec.khr_id := p_contract_id;

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

79: ,x_return_status => l_return_status);
80:
81: --dbms_output.put_line('contract # - ' || l_contract_rec.contract_number);
82:
83: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
84: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
85: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
86: RAISE OKC_API.G_EXCEPTION_ERROR;
87: END IF;

Line 84: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

80:
81: --dbms_output.put_line('contract # - ' || l_contract_rec.contract_number);
82:
83: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
84: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
85: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
86: RAISE OKC_API.G_EXCEPTION_ERROR;
87: END IF;
88:

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

81: --dbms_output.put_line('contract # - ' || l_contract_rec.contract_number);
82:
83: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
84: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
85: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
86: RAISE OKC_API.G_EXCEPTION_ERROR;
87: END IF;
88:
89: l_oinv_rec.contract_number := l_contract_rec.contract_number;

Line 86: RAISE OKC_API.G_EXCEPTION_ERROR;

82:
83: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
84: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
85: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
86: RAISE OKC_API.G_EXCEPTION_ERROR;
87: END IF;
88:
89: l_oinv_rec.contract_number := l_contract_rec.contract_number;
90: l_oinv_rec.contract_type := l_contract_rec.contract_type;

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

98: ,x_return_status => l_return_status);
99:
100: --dbms_output.put_line('party name - ' || l_party_rec.party_name);
101:
102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_ERROR;
106: END IF;

Line 103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

99:
100: --dbms_output.put_line('party name - ' || l_party_rec.party_name);
101:
102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_ERROR;
106: END IF;
107:

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

100: --dbms_output.put_line('party name - ' || l_party_rec.party_name);
101:
102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_ERROR;
106: END IF;
107:
108: l_oinv_rec.party_id := l_party_rec.party_id;

Line 105: RAISE OKC_API.G_EXCEPTION_ERROR;

101:
102: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
103: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
104: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
105: RAISE OKC_API.G_EXCEPTION_ERROR;
106: END IF;
107:
108: l_oinv_rec.party_id := l_party_rec.party_id;
109: l_oinv_rec.party_name := l_party_rec.party_name;

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

146: ,x_msg_data => x_msg_data
147: ,p_oinv_rec => l_oinv_rec
148: ,x_oinv_rec => lx_oinv_rec);
149:
150: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
151: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
152: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_ERROR;
154: END IF;

Line 151: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

147: ,p_oinv_rec => l_oinv_rec
148: ,x_oinv_rec => lx_oinv_rec);
149:
150: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
151: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
152: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_ERROR;
154: END IF;
155: END IF;

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

148: ,x_oinv_rec => lx_oinv_rec);
149:
150: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
151: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
152: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_ERROR;
154: END IF;
155: END IF;
156:

Line 153: RAISE OKC_API.G_EXCEPTION_ERROR;

149:
150: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
151: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
152: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
153: RAISE OKC_API.G_EXCEPTION_ERROR;
154: END IF;
155: END IF;
156:
157: x_oinv_rec := lx_oinv_rec;

Line 176: WHEN OKC_API.G_EXCEPTION_ERROR THEN

172:
173: x_return_status := l_return_status;
174: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
175: EXCEPTION
176: WHEN OKC_API.G_EXCEPTION_ERROR THEN
177: x_return_status := OKC_API.HANDLE_EXCEPTIONS
178: (
179: l_api_name,
180: G_PKG_NAME,

Line 177: x_return_status := OKC_API.HANDLE_EXCEPTIONS

173: x_return_status := l_return_status;
174: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
175: EXCEPTION
176: WHEN OKC_API.G_EXCEPTION_ERROR THEN
177: x_return_status := OKC_API.HANDLE_EXCEPTIONS
178: (
179: l_api_name,
180: G_PKG_NAME,
181: 'OKC_API.G_RET_STS_ERROR',

Line 181: 'OKC_API.G_RET_STS_ERROR',

177: x_return_status := OKC_API.HANDLE_EXCEPTIONS
178: (
179: l_api_name,
180: G_PKG_NAME,
181: 'OKC_API.G_RET_STS_ERROR',
182: x_msg_count,
183: x_msg_data,
184: '_PVT'
185: );

Line 186: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

182: x_msg_count,
183: x_msg_data,
184: '_PVT'
185: );
186: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
188: (
189: l_api_name,
190: G_PKG_NAME,

Line 187: x_return_status := OKC_API.HANDLE_EXCEPTIONS

183: x_msg_data,
184: '_PVT'
185: );
186: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
188: (
189: l_api_name,
190: G_PKG_NAME,
191: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 191: 'OKC_API.G_RET_STS_UNEXP_ERROR',

187: x_return_status := OKC_API.HANDLE_EXCEPTIONS
188: (
189: l_api_name,
190: G_PKG_NAME,
191: 'OKC_API.G_RET_STS_UNEXP_ERROR',
192: x_msg_count,
193: x_msg_data,
194: '_PVT'
195: );

Line 197: x_return_status := OKC_API.HANDLE_EXCEPTIONS

193: x_msg_data,
194: '_PVT'
195: );
196: WHEN OTHERS THEN
197: x_return_status := OKC_API.HANDLE_EXCEPTIONS
198: (
199: l_api_name,
200: G_PKG_NAME,
201: 'OTHERS',

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

217: x_return_status OUT NOCOPY VARCHAR2,
218: x_msg_count OUT NOCOPY NUMBER,
219: x_msg_data OUT NOCOPY VARCHAR2)AS
220:
221: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
222: l_api_version CONSTANT NUMBER := 1;
223: l_api_name CONSTANT VARCHAR2(30) := 'process_pending_int';
224:
225: l_oinv_rec oinv_rec_type;

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

243: FROM okl_open_int_prty
244: WHERE khr_id = cp_khr_id
245: AND party_id = cp_party_id;
246: BEGIN
247: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
248: G_PKG_NAME,
249: p_init_msg_list,
250: l_api_version,
251: p_api_version,

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

251: p_api_version,
252: '_PVT',
253: l_return_status);
254:
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;

Line 256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

252: '_PVT',
253: l_return_status);
254:
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:

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

253: l_return_status);
254:
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:
261: -- Processing starts

Line 258: RAISE OKC_API.G_EXCEPTION_ERROR;

254:
255: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
256: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
258: RAISE OKC_API.G_EXCEPTION_ERROR;
259: END IF;
260:
261: -- Processing starts
262: l_oinv_rec := p_oinv_rec;

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

337: ,p_oinv_rec => l_oinv_rec
338: ,x_oinv_rec => lx_oinv_rec);
339:
340: --dbms_output.put_line('khr_id: ' || lx_oinv_rec.khr_id);
341: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_ERROR;
345: END IF;

Line 342: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

338: ,x_oinv_rec => lx_oinv_rec);
339:
340: --dbms_output.put_line('khr_id: ' || lx_oinv_rec.khr_id);
341: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_ERROR;
345: END IF;
346:

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

339:
340: --dbms_output.put_line('khr_id: ' || lx_oinv_rec.khr_id);
341: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_ERROR;
345: END IF;
346:
347: x_oinv_rec := lx_oinv_rec;

Line 344: RAISE OKC_API.G_EXCEPTION_ERROR;

340: --dbms_output.put_line('khr_id: ' || lx_oinv_rec.khr_id);
341: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
342: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
343: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
344: RAISE OKC_API.G_EXCEPTION_ERROR;
345: END IF;
346:
347: x_oinv_rec := lx_oinv_rec;
348:

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

402: ,x_msg_data => x_msg_data
403: ,p_oipv_rec => l_oipv_rec
404: ,x_oipv_rec => lx_oipv_rec);
405: /*
406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
409: RAISE OKC_API.G_EXCEPTION_ERROR;
410: END IF;

Line 407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

403: ,p_oipv_rec => l_oipv_rec
404: ,x_oipv_rec => lx_oipv_rec);
405: /*
406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
409: RAISE OKC_API.G_EXCEPTION_ERROR;
410: END IF;
411: */

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

404: ,x_oipv_rec => lx_oipv_rec);
405: /*
406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
409: RAISE OKC_API.G_EXCEPTION_ERROR;
410: END IF;
411: */
412: ELSE

Line 409: RAISE OKC_API.G_EXCEPTION_ERROR;

405: /*
406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
409: RAISE OKC_API.G_EXCEPTION_ERROR;
410: END IF;
411: */
412: ELSE
413: --dbms_output.put_line('khr_id : ' || l_oipv_rec.khr_id);

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

421: ,x_msg_data => x_msg_data
422: ,p_oipv_rec => l_oipv_rec
423: ,x_oipv_rec => lx_oipv_rec);
424: /*
425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
428: RAISE OKC_API.G_EXCEPTION_ERROR;
429: END IF;

Line 426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

422: ,p_oipv_rec => l_oipv_rec
423: ,x_oipv_rec => lx_oipv_rec);
424: /*
425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
428: RAISE OKC_API.G_EXCEPTION_ERROR;
429: END IF;
430: */

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

423: ,x_oipv_rec => lx_oipv_rec);
424: /*
425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
428: RAISE OKC_API.G_EXCEPTION_ERROR;
429: END IF;
430: */
431: END IF;

Line 428: RAISE OKC_API.G_EXCEPTION_ERROR;

424: /*
425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
427: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
428: RAISE OKC_API.G_EXCEPTION_ERROR;
429: END IF;
430: */
431: END IF;
432: END LOOP;

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

441: ,x_return_status => l_return_status
442: ,x_msg_count => x_msg_count
443: ,x_msg_data => x_msg_data);
444:
445: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
446: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
447: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
448: RAISE OKC_API.G_EXCEPTION_ERROR;
449: END IF;

Line 446: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

442: ,x_msg_count => x_msg_count
443: ,x_msg_data => x_msg_data);
444:
445: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
446: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
447: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
448: RAISE OKC_API.G_EXCEPTION_ERROR;
449: END IF;
450: END IF;

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

443: ,x_msg_data => x_msg_data);
444:
445: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
446: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
447: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
448: RAISE OKC_API.G_EXCEPTION_ERROR;
449: END IF;
450: END IF;
451:

Line 448: RAISE OKC_API.G_EXCEPTION_ERROR;

444:
445: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
446: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
447: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
448: RAISE OKC_API.G_EXCEPTION_ERROR;
449: END IF;
450: END IF;
451:
452: -- Processing ends

Line 456: WHEN OKC_API.G_EXCEPTION_ERROR THEN

452: -- Processing ends
453: x_return_status := l_return_status;
454: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
455: EXCEPTION
456: WHEN OKC_API.G_EXCEPTION_ERROR THEN
457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
458: (
459: l_api_name,
460: G_PKG_NAME,

Line 457: x_return_status := OKC_API.HANDLE_EXCEPTIONS

453: x_return_status := l_return_status;
454: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
455: EXCEPTION
456: WHEN OKC_API.G_EXCEPTION_ERROR THEN
457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
458: (
459: l_api_name,
460: G_PKG_NAME,
461: 'OKC_API.G_RET_STS_ERROR',

Line 461: 'OKC_API.G_RET_STS_ERROR',

457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
458: (
459: l_api_name,
460: G_PKG_NAME,
461: 'OKC_API.G_RET_STS_ERROR',
462: x_msg_count,
463: x_msg_data,
464: '_PVT'
465: );

Line 466: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

462: x_msg_count,
463: x_msg_data,
464: '_PVT'
465: );
466: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (
469: l_api_name,
470: G_PKG_NAME,

Line 467: x_return_status := OKC_API.HANDLE_EXCEPTIONS

463: x_msg_data,
464: '_PVT'
465: );
466: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (
469: l_api_name,
470: G_PKG_NAME,
471: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 471: 'OKC_API.G_RET_STS_UNEXP_ERROR',

467: x_return_status := OKC_API.HANDLE_EXCEPTIONS
468: (
469: l_api_name,
470: G_PKG_NAME,
471: 'OKC_API.G_RET_STS_UNEXP_ERROR',
472: x_msg_count,
473: x_msg_data,
474: '_PVT'
475: );

Line 477: x_return_status := OKC_API.HANDLE_EXCEPTIONS

473: x_msg_data,
474: '_PVT'
475: );
476: WHEN OTHERS THEN
477: x_return_status := OKC_API.HANDLE_EXCEPTIONS
478: (
479: l_api_name,
480: G_PKG_NAME,
481: 'OTHERS',

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

495: x_return_status OUT NOCOPY VARCHAR2,
496: x_msg_count OUT NOCOPY NUMBER,
497: x_msg_data OUT NOCOPY VARCHAR2) AS
498:
499: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
500: l_api_version CONSTANT NUMBER := 1;
501: l_api_name CONSTANT VARCHAR2(30) := 'process_pending_asset';
502: lx_oiav_tbl oiav_tbl_type;
503: l_oiav_rec oiav_rec_type;

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

512: FROM okl_open_int_asst
513: WHERE khr_id = cp_khr_id
514: AND instance_number = cp_instance_number;
515: BEGIN
516: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
517: G_PKG_NAME,
518: p_init_msg_list,
519: l_api_version,
520: p_api_version,

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

520: p_api_version,
521: '_PVT',
522: l_return_status);
523:
524: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
525: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
526: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
527: RAISE OKC_API.G_EXCEPTION_ERROR;
528: END IF;

Line 525: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

521: '_PVT',
522: l_return_status);
523:
524: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
525: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
526: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
527: RAISE OKC_API.G_EXCEPTION_ERROR;
528: END IF;
529:

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

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

Line 527: RAISE OKC_API.G_EXCEPTION_ERROR;

523:
524: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
525: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
526: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
527: RAISE OKC_API.G_EXCEPTION_ERROR;
528: END IF;
529:
530: -- Processing starts
531:

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

535: x_oiav_tbl => lx_oiav_tbl,
536: x_return_status => l_return_status);
537:
538: --dbms_OUTPUT.PUT_LINE('assets found : ' || lx_oiav_tbl.count);
539: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
540: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
541: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
542: RAISE OKC_API.G_EXCEPTION_ERROR;
543: END IF;

Line 540: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

536: x_return_status => l_return_status);
537:
538: --dbms_OUTPUT.PUT_LINE('assets found : ' || lx_oiav_tbl.count);
539: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
540: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
541: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
542: RAISE OKC_API.G_EXCEPTION_ERROR;
543: END IF;
544:

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

537:
538: --dbms_OUTPUT.PUT_LINE('assets found : ' || lx_oiav_tbl.count);
539: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
540: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
541: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
542: RAISE OKC_API.G_EXCEPTION_ERROR;
543: END IF;
544:
545: --insert/update assets in open interface assets

Line 542: RAISE OKC_API.G_EXCEPTION_ERROR;

538: --dbms_OUTPUT.PUT_LINE('assets found : ' || lx_oiav_tbl.count);
539: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
540: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
541: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
542: RAISE OKC_API.G_EXCEPTION_ERROR;
543: END IF;
544:
545: --insert/update assets in open interface assets
546: FOR i IN 1..lx_oiav_tbl.count LOOP

Line 564: p_init_msg_list => OKC_API.G_FALSE,

560: IF (l_asset_found) THEN
561: --dbms_OUTPUT.PUT_LINE('updating asset');
562: okl_open_int_asst_pub.update_open_int_asst (
563: p_api_version => p_api_version,
564: p_init_msg_list => OKC_API.G_FALSE,
565: x_return_status => l_return_status,
566: x_msg_count => x_msg_count,
567: x_msg_data => x_msg_data,
568: p_oiav_rec => l_oiav_rec,

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

567: x_msg_data => x_msg_data,
568: p_oiav_rec => l_oiav_rec,
569: x_oiav_rec => lx_oiav_rec);
570:
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
574: RAISE OKC_API.G_EXCEPTION_ERROR;
575: END IF;

Line 572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

568: p_oiav_rec => l_oiav_rec,
569: x_oiav_rec => lx_oiav_rec);
570:
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
574: RAISE OKC_API.G_EXCEPTION_ERROR;
575: END IF;
576: ELSE

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

569: x_oiav_rec => lx_oiav_rec);
570:
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
574: RAISE OKC_API.G_EXCEPTION_ERROR;
575: END IF;
576: ELSE
577: --dbms_OUTPUT.PUT_LINE('inserting asset');

Line 574: RAISE OKC_API.G_EXCEPTION_ERROR;

570:
571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
574: RAISE OKC_API.G_EXCEPTION_ERROR;
575: END IF;
576: ELSE
577: --dbms_OUTPUT.PUT_LINE('inserting asset');
578: l_oiav_rec.org_id := p_iohv_rec.org_id;

Line 581: p_init_msg_list => OKC_API.G_FALSE,

577: --dbms_OUTPUT.PUT_LINE('inserting asset');
578: l_oiav_rec.org_id := p_iohv_rec.org_id;
579: okl_open_int_asst_pub.insert_open_int_asst (
580: p_api_version => p_api_version,
581: p_init_msg_list => OKC_API.G_FALSE,
582: x_return_status => l_return_status,
583: x_msg_count => x_msg_count,
584: x_msg_data => x_msg_data,
585: p_oiav_rec => l_oiav_rec,

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

585: p_oiav_rec => l_oiav_rec,
586: x_oiav_rec => lx_oiav_rec);
587: /*
588: --dbms_OUTPUT.PUT_LINE('x_return_status : ' || l_return_status);
589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
590: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
592: RAISE OKC_API.G_EXCEPTION_ERROR;
593: END IF;

Line 590: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

586: x_oiav_rec => lx_oiav_rec);
587: /*
588: --dbms_OUTPUT.PUT_LINE('x_return_status : ' || l_return_status);
589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
590: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
592: RAISE OKC_API.G_EXCEPTION_ERROR;
593: END IF;
594: --dbms_OUTPUT.PUT_LINE('inserted asset');

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

587: /*
588: --dbms_OUTPUT.PUT_LINE('x_return_status : ' || l_return_status);
589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
590: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
592: RAISE OKC_API.G_EXCEPTION_ERROR;
593: END IF;
594: --dbms_OUTPUT.PUT_LINE('inserted asset');
595: */

Line 592: RAISE OKC_API.G_EXCEPTION_ERROR;

588: --dbms_OUTPUT.PUT_LINE('x_return_status : ' || l_return_status);
589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
590: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
592: RAISE OKC_API.G_EXCEPTION_ERROR;
593: END IF;
594: --dbms_OUTPUT.PUT_LINE('inserted asset');
595: */
596: END IF;

Line 601: l_return_status := Okc_Api.G_RET_STS_SUCCESS;

597:
598: END LOOP;
599:
600: -- Processing ends
601: l_return_status := Okc_Api.G_RET_STS_SUCCESS;
602: x_return_status := l_return_status;
603: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
604: EXCEPTION
605: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 605: WHEN OKC_API.G_EXCEPTION_ERROR THEN

601: l_return_status := Okc_Api.G_RET_STS_SUCCESS;
602: x_return_status := l_return_status;
603: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
604: EXCEPTION
605: WHEN OKC_API.G_EXCEPTION_ERROR THEN
606: x_return_status := OKC_API.HANDLE_EXCEPTIONS
607: (
608: l_api_name,
609: G_PKG_NAME,

Line 606: x_return_status := OKC_API.HANDLE_EXCEPTIONS

602: x_return_status := l_return_status;
603: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
604: EXCEPTION
605: WHEN OKC_API.G_EXCEPTION_ERROR THEN
606: x_return_status := OKC_API.HANDLE_EXCEPTIONS
607: (
608: l_api_name,
609: G_PKG_NAME,
610: 'OKC_API.G_RET_STS_ERROR',

Line 610: 'OKC_API.G_RET_STS_ERROR',

606: x_return_status := OKC_API.HANDLE_EXCEPTIONS
607: (
608: l_api_name,
609: G_PKG_NAME,
610: 'OKC_API.G_RET_STS_ERROR',
611: x_msg_count,
612: x_msg_data,
613: '_PVT'
614: );

Line 615: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

611: x_msg_count,
612: x_msg_data,
613: '_PVT'
614: );
615: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
617: (
618: l_api_name,
619: G_PKG_NAME,

Line 616: x_return_status := OKC_API.HANDLE_EXCEPTIONS

612: x_msg_data,
613: '_PVT'
614: );
615: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
617: (
618: l_api_name,
619: G_PKG_NAME,
620: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 620: 'OKC_API.G_RET_STS_UNEXP_ERROR',

616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
617: (
618: l_api_name,
619: G_PKG_NAME,
620: 'OKC_API.G_RET_STS_UNEXP_ERROR',
621: x_msg_count,
622: x_msg_data,
623: '_PVT'
624: );

Line 626: x_return_status := OKC_API.HANDLE_EXCEPTIONS

622: x_msg_data,
623: '_PVT'
624: );
625: WHEN OTHERS THEN
626: x_return_status := OKC_API.HANDLE_EXCEPTIONS
627: (
628: l_api_name,
629: G_PKG_NAME,
630: 'OTHERS',

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

641: PROCEDURE report_all_credit_bureau(
642: errbuf OUT NOCOPY VARCHAR2,
643: retcode OUT NOCOPY NUMBER) AS
644:
645: l_init_msg_list VARCHAR2(1) := Okc_Api.G_FALSE ;
646: lx_msg_count NUMBER ;
647: lx_msg_data VARCHAR2(2000);
648: lx_message VARCHAR2(2000);
649: l_api_version CONSTANT NUMBER := 1;

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

646: lx_msg_count NUMBER ;
647: lx_msg_data VARCHAR2(2000);
648: lx_message VARCHAR2(2000);
649: l_api_version CONSTANT NUMBER := 1;
650: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
651: l_api_name CONSTANT VARCHAR2(30) := 'report_all_credit_bureau';
652:
653: l_oinv_rec oinv_rec_type;
654: l_iohv_rec iohv_rec_type;

Line 710: p_comments => OKC_API.G_MISS_CHAR,

706: p_object1_id2 => '#',
707: p_jtot_object1_code => 'OKX_LEASE',
708: p_action => IEX_OPI_PVT.ACTION_REPORT_CB,
709: p_status => IEX_OPI_PVT.STATUS_PENDING_ALL,
710: p_comments => OKC_API.G_MISS_CHAR,
711: p_ext_agncy_id => NULL,
712: p_transfer_days => NULL,
713: p_extend_days => NULL,
714: x_return_status => l_return_status,

Line 718: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

714: x_return_status => l_return_status,
715: x_msg_count => lx_msg_count,
716: x_msg_data => lx_msg_data);
717:
718: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
719: l_rows_failed := l_rows_failed + 1;
720: ELSE
721: l_rows_processed := l_rows_processed + 1;
722: END IF;

Line 753: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

749: retcode := 1;
750: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, 'SQL ERROR : SQLCODE = ' || SQLCODE);
751: Fnd_File.PUT_LINE(Fnd_File.OUTPUT, ' MESSAGE = ' || SQLERRM);
752: ROLLBACK;
753: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
754: END report_all_credit_bureau;
755: */
756:
757: ---------------------------------------------------------------------------

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

761: p_contract_id IN NUMBER,
762: x_party_rec OUT NOCOPY party_rec_type,
763: x_return_status OUT NOCOPY VARCHAR2) AS
764:
765: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
766: l_bill_to_add_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
767: l_party_rec party_rec_type;
768: l_bill_to_address_id HZ_LOCATIONS.LOCATION_ID%TYPE;
769:

Line 766: l_bill_to_add_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

762: x_party_rec OUT NOCOPY party_rec_type,
763: x_return_status OUT NOCOPY VARCHAR2) AS
764:
765: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
766: l_bill_to_add_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
767: l_party_rec party_rec_type;
768: l_bill_to_address_id HZ_LOCATIONS.LOCATION_ID%TYPE;
769:
770: CURSOR l_party_csr(cp_party_id IN NUMBER) IS

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

807: FROM hz_locations hzl
808: WHERE hzl.location_id = cp_bill_to_address_id;
809: BEGIN
810: l_return_status := OKL_CONTRACT_INFO.get_customer(p_contract_id, l_party_rec.party_id);
811: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
812: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
813: ,p_msg_name => G_INVALID_PARTY);
814: END IF;
815:

Line 812: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

808: WHERE hzl.location_id = cp_bill_to_address_id;
809: BEGIN
810: l_return_status := OKL_CONTRACT_INFO.get_customer(p_contract_id, l_party_rec.party_id);
811: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
812: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
813: ,p_msg_name => G_INVALID_PARTY);
814: END IF;
815:
816: OPEN l_party_csr(l_party_rec.party_id);

Line 864: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

860: x_party_rec := l_party_rec;
861: x_return_status := l_return_status;
862: EXCEPTION
863: WHEN OTHERS THEN
864: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
865: ,p_msg_name => G_UNEXPECTED_ERROR
866: ,p_token1 => G_SQLCODE_TOKEN
867: ,p_token1_value => SQLCODE
868: ,p_token2 => G_SQLERRM_TOKEN

Line 870: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

866: ,p_token1 => G_SQLCODE_TOKEN
867: ,p_token1_value => SQLCODE
868: ,p_token2 => G_SQLERRM_TOKEN
869: ,p_token2_value => SQLERRM);
870: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
871: END get_party;
872:
873: ---------------------------------------------------------------------------
874: -- PROCEDURE get_guarantor

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

877: p_contract_id IN NUMBER,
878: x_party_tbl OUT NOCOPY party_tbl_type,
879: x_return_status OUT NOCOPY VARCHAR2) AS
880:
881: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
882: l_guarantor_tbl party_tbl_type;
883: l_guarantor_rec party_rec_type;
884: i NUMBER := 0;
885:

Line 1016: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1012: WHEN OTHERS THEN
1013: IF l_guarantor_csr%ISOPEN THEN
1014: CLOSE l_guarantor_csr;
1015: END IF;
1016: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1017: ,p_msg_name => G_UNEXPECTED_ERROR
1018: ,p_token1 => G_SQLCODE_TOKEN
1019: ,p_token1_value => SQLCODE
1020: ,p_token2 => G_SQLERRM_TOKEN

Line 1022: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1018: ,p_token1 => G_SQLCODE_TOKEN
1019: ,p_token1_value => SQLCODE
1020: ,p_token2 => G_SQLERRM_TOKEN
1021: ,p_token2_value => SQLERRM);
1022: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1023: END get_guarantor;
1024:
1025: ---------------------------------------------------------------------------
1026: -- PROCEDURE get_case

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

1030: x_cas_id OUT NOCOPY NUMBER,
1031: x_case_number OUT NOCOPY VARCHAR2,
1032: x_return_status OUT NOCOPY VARCHAR2) AS
1033:
1034: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1035: l_cas_id IEX_CASE_OBJECTS.CAS_ID%TYPE;
1036: l_case_number IEX_CASES_ALL_B.CASE_NUMBER%TYPE;
1037:
1038: CURSOR l_case_csr(cp_contract_id IN NUMBER) IS

Line 1052: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1048: FETCH l_case_csr INTO
1049: l_cas_id
1050: ,l_case_number;
1051: IF l_case_csr%NOTFOUND THEN
1052: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1053: ,p_msg_name => G_INVALID_CASE);
1054: l_return_status := OKC_API.G_RET_STS_ERROR;
1055: CLOSE l_case_csr;
1056: ELSE

Line 1054: l_return_status := OKC_API.G_RET_STS_ERROR;

1050: ,l_case_number;
1051: IF l_case_csr%NOTFOUND THEN
1052: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1053: ,p_msg_name => G_INVALID_CASE);
1054: l_return_status := OKC_API.G_RET_STS_ERROR;
1055: CLOSE l_case_csr;
1056: ELSE
1057: CLOSE l_case_csr;
1058: END IF;

Line 1064: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1060: x_case_number := l_case_number;
1061: x_return_status := l_return_status;
1062: EXCEPTION
1063: WHEN OTHERS THEN
1064: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1065: ,p_msg_name => G_UNEXPECTED_ERROR
1066: ,p_token1 => G_SQLCODE_TOKEN
1067: ,p_token1_value => SQLCODE
1068: ,p_token2 => G_SQLERRM_TOKEN

Line 1070: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1066: ,p_token1 => G_SQLCODE_TOKEN
1067: ,p_token1_value => SQLCODE
1068: ,p_token2 => G_SQLERRM_TOKEN
1069: ,p_token2_value => SQLERRM);
1070: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1071: END get_case;
1072:
1073: ---------------------------------------------------------------------------
1074: -- PROCEDURE get_contract

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

1077: p_contract_id IN NUMBER,
1078: x_contract_rec OUT NOCOPY contract_rec_type,
1079: x_return_status OUT NOCOPY VARCHAR2) AS
1080:
1081: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1082: l_contract_rec contract_rec_type;
1083:
1084: CURSOR l_khr_csr(cp_contract_id IN NUMBER) IS
1085: SELECT okhv.contract_number

Line 1109: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1105: ,l_contract_rec.close_date
1106: ,l_contract_rec.term_duration
1107: ,l_contract_rec.org_id;
1108: IF l_khr_csr%NOTFOUND THEN
1109: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1110: ,p_msg_name => G_INVALID_CONTRACT);
1111: CLOSE l_khr_csr;
1112: l_return_status := OKC_API.G_RET_STS_ERROR;
1113: ELSE

Line 1112: l_return_status := OKC_API.G_RET_STS_ERROR;

1108: IF l_khr_csr%NOTFOUND THEN
1109: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1110: ,p_msg_name => G_INVALID_CONTRACT);
1111: CLOSE l_khr_csr;
1112: l_return_status := OKC_API.G_RET_STS_ERROR;
1113: ELSE
1114: CLOSE l_khr_csr;
1115: END IF;
1116: x_contract_rec := l_contract_rec;

Line 1120: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1116: x_contract_rec := l_contract_rec;
1117: x_return_status := l_return_status;
1118: EXCEPTION
1119: WHEN OTHERS THEN
1120: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1121: ,p_msg_name => G_UNEXPECTED_ERROR
1122: ,p_token1 => G_SQLCODE_TOKEN
1123: ,p_token1_value => SQLCODE
1124: ,p_token2 => G_SQLERRM_TOKEN

Line 1126: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1122: ,p_token1 => G_SQLCODE_TOKEN
1123: ,p_token1_value => SQLCODE
1124: ,p_token2 => G_SQLERRM_TOKEN
1125: ,p_token2_value => SQLERRM);
1126: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1127: END get_contract;
1128:
1129: ---------------------------------------------------------------------------
1130: -- PROCEDURE get_contract_payment_info

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

1133: p_contract_rec IN contract_rec_type,
1134: x_contract_rec OUT NOCOPY contract_rec_type,
1135: x_return_status OUT NOCOPY VARCHAR2) AS
1136:
1137: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1138: l_contract_rec contract_rec_type;
1139: l_security_deposit NUMBER;
1140: l_interest_type NUMBER;
1141:

Line 1228: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1224: x_contract_rec := l_contract_rec;
1225: x_return_status := l_return_status;
1226: EXCEPTION
1227: WHEN OTHERS THEN
1228: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1229: ,p_msg_name => G_UNEXPECTED_ERROR
1230: ,p_token1 => G_SQLCODE_TOKEN
1231: ,p_token1_value => SQLCODE
1232: ,p_token2 => G_SQLERRM_TOKEN

Line 1234: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1230: ,p_token1 => G_SQLCODE_TOKEN
1231: ,p_token1_value => SQLCODE
1232: ,p_token2 => G_SQLERRM_TOKEN
1233: ,p_token2_value => SQLERRM);
1234: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1235: END get_contract_payment_info;
1236:
1237: ---------------------------------------------------------------------------
1238: -- PROCEDURE get_case_owner

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

1244: x_resource_phone OUT NOCOPY VARCHAR2,
1245: x_resource_email OUT NOCOPY VARCHAR2,
1246: x_return_status OUT NOCOPY VARCHAR2) AS
1247:
1248: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1249:
1250: CURSOR l_resource_csr(cp_cas_id IN NUMBER) IS
1251: SELECT ica.owner_resource_id
1252: ,jre.source_name

Line 1270: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1266: END LOOP;
1267: x_return_status := l_return_status;
1268: EXCEPTION
1269: WHEN OTHERS THEN
1270: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1271: ,p_msg_name => G_UNEXPECTED_ERROR
1272: ,p_token1 => G_SQLCODE_TOKEN
1273: ,p_token1_value => SQLCODE
1274: ,p_token2 => G_SQLERRM_TOKEN

Line 1276: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1272: ,p_token1 => G_SQLCODE_TOKEN
1273: ,p_token1_value => SQLCODE
1274: ,p_token2 => G_SQLERRM_TOKEN
1275: ,p_token2_value => SQLERRM);
1276: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1277: END get_case_owner;
1278:
1279: ---------------------------------------------------------------------------
1280: -- PROCEDURE get_assets

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

1283: p_contract_id IN NUMBER,
1284: x_oiav_tbl OUT NOCOPY oiav_tbl_type,
1285: x_return_status OUT NOCOPY VARCHAR2) AS
1286:
1287: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1288: l_oiav_rec oiav_rec_type;
1289: l_oiav_tbl oiav_tbl_type;
1290: i NUMBER := 0;
1291:

Line 1431: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

1427:
1428: x_return_status := l_return_status;
1429: EXCEPTION
1430: WHEN OTHERS THEN
1431: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
1432: ,p_msg_name => G_UNEXPECTED_ERROR
1433: ,p_token1 => G_SQLCODE_TOKEN
1434: ,p_token1_value => SQLCODE
1435: ,p_token2 => G_SQLERRM_TOKEN

Line 1437: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1433: ,p_token1 => G_SQLCODE_TOKEN
1434: ,p_token1_value => SQLCODE
1435: ,p_token2 => G_SQLERRM_TOKEN
1436: ,p_token2_value => SQLERRM);
1437: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1438: END get_assets;
1439:
1440:
1441: