20: x_return_status OUT NOCOPY VARCHAR2,
21: x_msg_count OUT NOCOPY NUMBER,
22: x_msg_data OUT NOCOPY VARCHAR2) AS
23:
24: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
25: l_api_version CONSTANT NUMBER := 1;
26: l_api_name CONSTANT VARCHAR2(30) := 'create_repossess_request';
27:
28: G_REPOS_REQUEST_EXCEPTION EXCEPTION;
66: and irp.repossession_id = cp_repossession_id
67: and alv.dnz_chr_id = irp.contract_id;
68:
69: BEGIN
70: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
71: G_PKG_NAME,
72: p_init_msg_list,
73: l_api_version,
74: p_api_version,
74: p_api_version,
75: '_PVT',
76: l_return_status);
77:
78: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
79: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
80: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
81: RAISE OKL_API.G_EXCEPTION_ERROR;
82: END IF;
75: '_PVT',
76: l_return_status);
77:
78: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
79: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
80: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
81: RAISE OKL_API.G_EXCEPTION_ERROR;
82: END IF;
83:
76: l_return_status);
77:
78: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
79: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
80: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
81: RAISE OKL_API.G_EXCEPTION_ERROR;
82: END IF;
83:
84: -- Processing starts
77:
78: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
79: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
80: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
81: RAISE OKL_API.G_EXCEPTION_ERROR;
82: END IF;
83:
84: -- Processing starts
85: lp_repv_rec := p_repv_rec;
107: x_msg_data => x_msg_data,
108: p_artv_rec => lp_artv_rec,
109: x_artv_rec => lx_artv_rec);
110: /*
111: IF (l_return_status <> okl_api.G_RET_STS_SUCCESS) THEN
112: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
113: p_msg_name => G_RET_REQ_ERROR);
114: RAISE G_REPOS_REQUEST_EXCEPTION;
115: END IF;
108: p_artv_rec => lp_artv_rec,
109: x_artv_rec => lx_artv_rec);
110: /*
111: IF (l_return_status <> okl_api.G_RET_STS_SUCCESS) THEN
112: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
113: p_msg_name => G_RET_REQ_ERROR);
114: RAISE G_REPOS_REQUEST_EXCEPTION;
115: END IF;
116: */
132: ,x_repv_rec => lx_repv_rec);
133:
134: x_repv_rec := lx_repv_rec;
135:
136: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
137: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
139: RAISE okl_api.G_EXCEPTION_ERROR;
140: END IF;
133:
134: x_repv_rec := lx_repv_rec;
135:
136: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
137: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
139: RAISE okl_api.G_EXCEPTION_ERROR;
140: END IF;
141:
134: x_repv_rec := lx_repv_rec;
135:
136: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
137: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
139: RAISE okl_api.G_EXCEPTION_ERROR;
140: END IF;
141:
142: -- Processing ends
135:
136: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
137: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
138: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
139: RAISE okl_api.G_EXCEPTION_ERROR;
140: END IF;
141:
142: -- Processing ends
143:
141:
142: -- Processing ends
143:
144: x_return_status := l_return_status;
145: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
146: EXCEPTION
147: WHEN OKL_API.G_EXCEPTION_ERROR THEN
148: x_return_status := OKL_API.HANDLE_EXCEPTIONS
149: (
143:
144: x_return_status := l_return_status;
145: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
146: EXCEPTION
147: WHEN OKL_API.G_EXCEPTION_ERROR THEN
148: x_return_status := OKL_API.HANDLE_EXCEPTIONS
149: (
150: l_api_name,
151: G_PKG_NAME,
144: x_return_status := l_return_status;
145: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
146: EXCEPTION
147: WHEN OKL_API.G_EXCEPTION_ERROR THEN
148: x_return_status := OKL_API.HANDLE_EXCEPTIONS
149: (
150: l_api_name,
151: G_PKG_NAME,
152: 'OKL_API.G_RET_STS_ERROR',
148: x_return_status := OKL_API.HANDLE_EXCEPTIONS
149: (
150: l_api_name,
151: G_PKG_NAME,
152: 'OKL_API.G_RET_STS_ERROR',
153: x_msg_count,
154: x_msg_data,
155: '_PVT'
156: );
153: x_msg_count,
154: x_msg_data,
155: '_PVT'
156: );
157: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
158: x_return_status := OKL_API.HANDLE_EXCEPTIONS
159: (
160: l_api_name,
161: G_PKG_NAME,
154: x_msg_data,
155: '_PVT'
156: );
157: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
158: x_return_status := OKL_API.HANDLE_EXCEPTIONS
159: (
160: l_api_name,
161: G_PKG_NAME,
162: 'OKL_API.G_RET_STS_UNEXP_ERROR',
158: x_return_status := OKL_API.HANDLE_EXCEPTIONS
159: (
160: l_api_name,
161: G_PKG_NAME,
162: 'OKL_API.G_RET_STS_UNEXP_ERROR',
163: x_msg_count,
164: x_msg_data,
165: '_PVT'
166: );
164: x_msg_data,
165: '_PVT'
166: );
167: WHEN OTHERS THEN
168: x_return_status := OKL_API.HANDLE_EXCEPTIONS
169: (
170: l_api_name,
171: G_PKG_NAME,
172: 'OTHERS',
190: x_return_status OUT NOCOPY VARCHAR2,
191: x_msg_count OUT NOCOPY NUMBER,
192: x_msg_data OUT NOCOPY VARCHAR2) IS
193:
194: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
195: l_api_version CONSTANT NUMBER := 1;
196: l_api_name CONSTANT VARCHAR2(30) := 'create_repossess_request';
197:
198: lp_repv_tbl repv_tbl_type;
202: lx_repv_rec repv_rec_type;
203:
204: i NUMBER := 0;
205: BEGIN
206: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
207: G_PKG_NAME,
208: p_init_msg_list,
209: l_api_version,
210: p_api_version,
210: p_api_version,
211: '_PVT',
212: l_return_status);
213:
214: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
215: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
216: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
217: RAISE OKL_API.G_EXCEPTION_ERROR;
218: END IF;
211: '_PVT',
212: l_return_status);
213:
214: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
215: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
216: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
217: RAISE OKL_API.G_EXCEPTION_ERROR;
218: END IF;
219:
212: l_return_status);
213:
214: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
215: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
216: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
217: RAISE OKL_API.G_EXCEPTION_ERROR;
218: END IF;
219:
220: -- Processing starts
213:
214: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
215: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
216: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
217: RAISE OKL_API.G_EXCEPTION_ERROR;
218: END IF;
219:
220: -- Processing starts
221: lp_repv_tbl := p_repv_tbl;
236: x_return_status => l_return_status,
237: x_msg_count => x_msg_count,
238: x_msg_data => x_msg_data);
239:
240: IF (l_return_status <> okl_api.G_RET_STS_SUCCESS) THEN
241: exit;
242: END IF;
243:
244: i := lp_repv_tbl.next(i);
244: i := lp_repv_tbl.next(i);
245: exit when i IS NULL;
246: end loop;
247:
248: IF (l_return_status = okl_api.G_RET_STS_SUCCESS) THEN
249: commit;
250: END IF;
251: END IF;
252:
252:
253: -- Processing ends
254:
255: x_return_status := l_return_status;
256: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
257: EXCEPTION
258: WHEN OKL_API.G_EXCEPTION_ERROR THEN
259: x_return_status := OKL_API.HANDLE_EXCEPTIONS
260: (
254:
255: x_return_status := l_return_status;
256: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
257: EXCEPTION
258: WHEN OKL_API.G_EXCEPTION_ERROR THEN
259: x_return_status := OKL_API.HANDLE_EXCEPTIONS
260: (
261: l_api_name,
262: G_PKG_NAME,
255: x_return_status := l_return_status;
256: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
257: EXCEPTION
258: WHEN OKL_API.G_EXCEPTION_ERROR THEN
259: x_return_status := OKL_API.HANDLE_EXCEPTIONS
260: (
261: l_api_name,
262: G_PKG_NAME,
263: 'OKL_API.G_RET_STS_ERROR',
259: x_return_status := OKL_API.HANDLE_EXCEPTIONS
260: (
261: l_api_name,
262: G_PKG_NAME,
263: 'OKL_API.G_RET_STS_ERROR',
264: x_msg_count,
265: x_msg_data,
266: '_PVT'
267: );
264: x_msg_count,
265: x_msg_data,
266: '_PVT'
267: );
268: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
269: x_return_status := OKL_API.HANDLE_EXCEPTIONS
270: (
271: l_api_name,
272: G_PKG_NAME,
265: x_msg_data,
266: '_PVT'
267: );
268: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
269: x_return_status := OKL_API.HANDLE_EXCEPTIONS
270: (
271: l_api_name,
272: G_PKG_NAME,
273: 'OKL_API.G_RET_STS_UNEXP_ERROR',
269: x_return_status := OKL_API.HANDLE_EXCEPTIONS
270: (
271: l_api_name,
272: G_PKG_NAME,
273: 'OKL_API.G_RET_STS_UNEXP_ERROR',
274: x_msg_count,
275: x_msg_data,
276: '_PVT'
277: );
275: x_msg_data,
276: '_PVT'
277: );
278: WHEN OTHERS THEN
279: x_return_status := OKL_API.HANDLE_EXCEPTIONS
280: (
281: l_api_name,
282: G_PKG_NAME,
283: 'OTHERS',