DBA Data[Home] [Help]

APPS.OKL_CONTRACT_TOP_LINE_PVT dependencies on OKC_API

Line 48: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

44: -- End of comments
45:
46: PROCEDURE create_contract_link_serv (
47: p_api_version IN NUMBER,
48: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
49: x_return_status OUT NOCOPY VARCHAR2,
50: x_msg_count OUT NOCOPY NUMBER,
51: x_msg_data OUT NOCOPY VARCHAR2,
52: p_chr_id IN NUMBER,

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

115: l_ste_code OKC_STATUSES_B.STE_CODE%type:= null;
116:
117: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_link_serv';
118: l_api_version CONSTANT NUMBER := 1.0;
119: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
120: l_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
121:
122: l_auth number := null;
123: l_inv number := null;

Line 136: l_return_status := OKC_API.START_ACTIVITY(

132: End If;
133:
134: -- call START_ACTIVITY to create savepoint, check compatibility
135: -- and initialize message list
136: l_return_status := OKC_API.START_ACTIVITY(
137: p_api_name => l_api_name,
138: p_pkg_name => g_pkg_name,
139: p_init_msg_list => p_init_msg_list,
140: l_api_version => l_api_version,

Line 146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

142: p_api_type => g_api_type,
143: x_return_status => x_return_status);
144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;

Line 147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

143: x_return_status => x_return_status);
144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:

Line 148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then

Line 149: raise OKC_API.G_EXCEPTION_ERROR;

145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;

Line 153: x_return_status := OKC_API.g_ret_sts_error;

149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;
154: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
155: OKC_API.SET_MESSAGE( p_app_name => g_app_name
156: , p_msg_name => 'OKL_REQUIRED_VALUE'
157: , p_token1 => 'COL_NAME'

Line 155: OKC_API.SET_MESSAGE( p_app_name => g_app_name

151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;
154: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
155: OKC_API.SET_MESSAGE( p_app_name => g_app_name
156: , p_msg_name => 'OKL_REQUIRED_VALUE'
157: , p_token1 => 'COL_NAME'
158: , p_token1_value => l_ak_prompt
159: -- , p_token1_value => 'a'||l_chr_id

Line 161: raise OKC_API.G_EXCEPTION_ERROR;

157: , p_token1 => 'COL_NAME'
158: , p_token1_value => l_ak_prompt
159: -- , p_token1_value => 'a'||l_chr_id
160: );
161: raise OKC_API.G_EXCEPTION_ERROR;
162: End If;
163:
164: l_rel_vers_id := null;
165: open l_rel_vers_csr;

Line 184: x_return_status := OKC_API.g_ret_sts_error;

180:
181: End If;
182:
183: If l_s_chr_id is null Then
184: x_return_status := OKC_API.g_ret_sts_error;
185: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
186: OKC_API.SET_MESSAGE( p_app_name => g_app_name
187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'

Line 186: OKC_API.SET_MESSAGE( p_app_name => g_app_name

182:
183: If l_s_chr_id is null Then
184: x_return_status := OKC_API.g_ret_sts_error;
185: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
186: OKC_API.SET_MESSAGE( p_app_name => g_app_name
187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'
189: , p_token1_value => l_ak_prompt
190: );

Line 191: raise OKC_API.G_EXCEPTION_ERROR;

187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'
189: , p_token1_value => l_ak_prompt
190: );
191: raise OKC_API.G_EXCEPTION_ERROR;
192: End If;
193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;

Line 195: x_return_status := OKC_API.g_ret_sts_error;

191: raise OKC_API.G_EXCEPTION_ERROR;
192: End If;
193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;
196: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
197: OKC_API.SET_MESSAGE( p_app_name => g_app_name
198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'

Line 197: OKC_API.SET_MESSAGE( p_app_name => g_app_name

193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;
196: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
197: OKC_API.SET_MESSAGE( p_app_name => g_app_name
198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'
200: , p_token1_value => l_ak_prompt
201: );

Line 202: raise OKC_API.G_EXCEPTION_ERROR;

198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'
200: , p_token1_value => l_ak_prompt
201: );
202: raise OKC_API.G_EXCEPTION_ERROR;
203: End If;
204:
205: -- If(NOT(p_item_name is not null and p_item_name = 'RELINK_SERV_INTGR')) Then
206:

Line 213: x_return_status := OKC_API.g_ret_sts_error;

209: fetch l_strmtyp_id_csr into l_strmtyp_id;
210: close l_strmtyp_id_csr;
211:
212: If(l_strmtyp_id is null) Then
213: x_return_status := OKC_API.g_ret_sts_error;
214: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_PAYMENT_TYPE');
215: If(l_ak_prompt is null) Then
216: l_ak_prompt := 'Payment Type';
217: End If;

Line 218: OKC_API.SET_MESSAGE( p_app_name => g_app_name

214: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_PAYMENT_TYPE');
215: If(l_ak_prompt is null) Then
216: l_ak_prompt := 'Payment Type';
217: End If;
218: OKC_API.SET_MESSAGE( p_app_name => g_app_name
219: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
220: , p_token1 => 'COL_NAME'
221: , p_token1_value => l_ak_prompt
222: );

Line 223: raise OKC_API.G_EXCEPTION_ERROR;

219: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
220: , p_token1 => 'COL_NAME'
221: , p_token1_value => l_ak_prompt
222: );
223: raise OKC_API.G_EXCEPTION_ERROR;
224: End If;
225:
226: -- End If;
227:

Line 229: x_return_status := OKC_API.g_ret_sts_error;

225:
226: -- End If;
227:
228: If(p_supplier_name is null) Then
229: x_return_status := OKC_API.g_ret_sts_error;
230: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
231: OKC_API.SET_MESSAGE( p_app_name => g_app_name
232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'

Line 231: OKC_API.SET_MESSAGE( p_app_name => g_app_name

227:
228: If(p_supplier_name is null) Then
229: x_return_status := OKC_API.g_ret_sts_error;
230: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
231: OKC_API.SET_MESSAGE( p_app_name => g_app_name
232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'
234: , p_token1_value => l_ak_prompt
235: );

Line 236: raise OKC_API.G_EXCEPTION_ERROR;

232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'
234: , p_token1_value => l_ak_prompt
235: );
236: raise OKC_API.G_EXCEPTION_ERROR;
237: End If;
238:
239: open l_supp_name_csr;
240: fetch l_supp_name_csr into l_supp_id;

Line 244: x_return_status := OKC_API.g_ret_sts_error;

240: fetch l_supp_name_csr into l_supp_id;
241: close l_supp_name_csr;
242:
243: If(l_supp_id is null) Then
244: x_return_status := OKC_API.g_ret_sts_error;
245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'

Line 246: OKC_API.SET_MESSAGE( p_app_name => g_app_name

242:
243: If(l_supp_id is null) Then
244: x_return_status := OKC_API.g_ret_sts_error;
245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'
249: , p_token1_value => l_ak_prompt
250: );

Line 251: raise OKC_API.G_EXCEPTION_ERROR;

247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'
249: , p_token1_value => l_ak_prompt
250: );
251: raise OKC_API.G_EXCEPTION_ERROR;
252: End If;
253:
254: l_sts_code := null;
255: l_ste_code := null;

Line 276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

272: p_sty_id => l_strmtyp_id, -- payment type
273: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;

Line 277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

273: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:

Line 278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:
282: Else

Line 279: raise OKC_API.G_EXCEPTION_ERROR;

275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:
282: Else
283:

Line 297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

293: p_sty_id => l_strmtyp_id, -- payment type
294: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;

Line 298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

294: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:

Line 299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:
303: End If;

Line 300: raise OKC_API.G_EXCEPTION_ERROR;

296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:
303: End If;
304:

Line 307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

303: End If;
304:
305: x_cle_id := x_okl_cle_id;
306:
307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 310: when OKC_API.G_EXCEPTION_ERROR then

306:
307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
315: x_msg_count => x_msg_count,

Line 314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
315: x_msg_count => x_msg_count,
316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:

Line 319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

315: x_msg_count => x_msg_count,
316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:
319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:
319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
324: x_msg_count => x_msg_count,

Line 323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
324: x_msg_count => x_msg_count,
325: x_msg_data => x_msg_data,
326: p_api_type => g_api_type);
327:

Line 329: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

325: x_msg_data => x_msg_data,
326: p_api_type => g_api_type);
327:
328: when OTHERS then
329: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
330: p_api_name => l_api_name,
331: p_pkg_name => g_pkg_name,
332: p_exc_name => 'OTHERS',
333: x_msg_count => x_msg_count,

Line 349: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

345: -- End of comments
346:
347: PROCEDURE update_contract_link_serv (
348: p_api_version IN NUMBER,
349: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
350: x_return_status OUT NOCOPY VARCHAR2,
351: x_msg_count OUT NOCOPY NUMBER,
352: x_msg_data OUT NOCOPY VARCHAR2,
353: p_chr_id IN NUMBER,

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

398:
399:
400: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_link_serv';
401: l_api_version CONSTANT NUMBER := 1.0;
402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
403: l_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
404:
405: BEGIN
406:

Line 414: l_return_status := OKC_API.START_ACTIVITY(

410: End If;
411:
412: -- call START_ACTIVITY to create savepoint, check compatibility
413: -- and initialize message list
414: l_return_status := OKC_API.START_ACTIVITY(
415: p_api_name => l_api_name,
416: p_pkg_name => g_pkg_name,
417: p_init_msg_list => p_init_msg_list,
418: l_api_version => l_api_version,

Line 424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

420: p_api_type => g_api_type,
421: x_return_status => x_return_status);
422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;

Line 425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

421: x_return_status => x_return_status);
422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:

Line 426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then

Line 427: raise OKC_API.G_EXCEPTION_ERROR;

423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;

Line 431: x_return_status := OKC_API.g_ret_sts_error;

427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;
432: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
433: OKC_API.SET_MESSAGE( p_app_name => g_app_name
434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'

Line 433: OKC_API.SET_MESSAGE( p_app_name => g_app_name

429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;
432: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
433: OKC_API.SET_MESSAGE( p_app_name => g_app_name
434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'
436: , p_token1_value => l_ak_prompt
437: );

Line 438: raise OKC_API.G_EXCEPTION_ERROR;

434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'
436: , p_token1_value => l_ak_prompt
437: );
438: raise OKC_API.G_EXCEPTION_ERROR;
439: End If;
440:
441: l_rel_vers_id := null;
442: open l_rel_vers_csr;

Line 461: x_return_status := OKC_API.g_ret_sts_error;

457:
458: End If;
459:
460: If l_s_chr_id is null Then
461: x_return_status := OKC_API.g_ret_sts_error;
462: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
463: OKC_API.SET_MESSAGE( p_app_name => g_app_name
464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'

Line 463: OKC_API.SET_MESSAGE( p_app_name => g_app_name

459:
460: If l_s_chr_id is null Then
461: x_return_status := OKC_API.g_ret_sts_error;
462: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
463: OKC_API.SET_MESSAGE( p_app_name => g_app_name
464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'
466: , p_token1_value => l_ak_prompt
467: );

Line 468: raise OKC_API.G_EXCEPTION_ERROR;

464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'
466: , p_token1_value => l_ak_prompt
467: );
468: raise OKC_API.G_EXCEPTION_ERROR;
469: End If;
470:
471: /*
472: If(p_item_name is null) Then

Line 473: x_return_status := OKC_API.g_ret_sts_error;

469: End If;
470:
471: /*
472: If(p_item_name is null) Then
473: x_return_status := OKC_API.g_ret_sts_error;
474: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
475: OKC_API.SET_MESSAGE( p_app_name => g_app_name
476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'

Line 475: OKC_API.SET_MESSAGE( p_app_name => g_app_name

471: /*
472: If(p_item_name is null) Then
473: x_return_status := OKC_API.g_ret_sts_error;
474: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
475: OKC_API.SET_MESSAGE( p_app_name => g_app_name
476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'
478: , p_token1_value => l_ak_prompt
479: );

Line 480: raise OKC_API.G_EXCEPTION_ERROR;

476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'
478: , p_token1_value => l_ak_prompt
479: );
480: raise OKC_API.G_EXCEPTION_ERROR;
481: End If;
482:
483:
484: open l_serv_line_csr;

Line 489: x_return_status := OKC_API.g_ret_sts_error;

485: fetch l_serv_line_csr into l_s_cle_id;
486: close l_serv_line_csr;
487:
488: If l_s_cle_id is null Then
489: x_return_status := OKC_API.g_ret_sts_error;
490: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
491: OKC_API.SET_MESSAGE( p_app_name => g_app_name
492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'

Line 491: OKC_API.SET_MESSAGE( p_app_name => g_app_name

487:
488: If l_s_cle_id is null Then
489: x_return_status := OKC_API.g_ret_sts_error;
490: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
491: OKC_API.SET_MESSAGE( p_app_name => g_app_name
492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'
494: , p_token1_value => l_ak_prompt
495: );

Line 496: raise OKC_API.G_EXCEPTION_ERROR;

492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'
494: , p_token1_value => l_ak_prompt
495: );
496: raise OKC_API.G_EXCEPTION_ERROR;
497: End If;
498: */
499:
500: If(p_supplier_name is null) Then

Line 501: x_return_status := OKC_API.g_ret_sts_error;

497: End If;
498: */
499:
500: If(p_supplier_name is null) Then
501: x_return_status := OKC_API.g_ret_sts_error;
502: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
503: OKC_API.SET_MESSAGE( p_app_name => g_app_name
504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'

Line 503: OKC_API.SET_MESSAGE( p_app_name => g_app_name

499:
500: If(p_supplier_name is null) Then
501: x_return_status := OKC_API.g_ret_sts_error;
502: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
503: OKC_API.SET_MESSAGE( p_app_name => g_app_name
504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'
506: , p_token1_value => l_ak_prompt
507: );

Line 508: raise OKC_API.G_EXCEPTION_ERROR;

504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'
506: , p_token1_value => l_ak_prompt
507: );
508: raise OKC_API.G_EXCEPTION_ERROR;
509: End If;
510:
511: open l_supp_name_csr;
512: fetch l_supp_name_csr into l_supp_id;

Line 516: x_return_status := OKC_API.g_ret_sts_error;

512: fetch l_supp_name_csr into l_supp_id;
513: close l_supp_name_csr;
514:
515: If(l_supp_id is null) Then
516: x_return_status := OKC_API.g_ret_sts_error;
517: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
518: OKC_API.SET_MESSAGE( p_app_name => g_app_name
519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'

Line 518: OKC_API.SET_MESSAGE( p_app_name => g_app_name

514:
515: If(l_supp_id is null) Then
516: x_return_status := OKC_API.g_ret_sts_error;
517: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
518: OKC_API.SET_MESSAGE( p_app_name => g_app_name
519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'
521: , p_token1_value => l_ak_prompt
522: );

Line 523: raise OKC_API.G_EXCEPTION_ERROR;

519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'
521: , p_token1_value => l_ak_prompt
522: );
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
525:
526: lp_clev_rec.dnz_chr_id := l_chr_id;
527: lp_clev_rec.id := p_cle_id;

Line 546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

542: p_klev_rec => lp_klev_rec,
543: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;

Line 547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

543: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:

Line 548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:
552: x_cle_id := x_okl_cle_id;

Line 549: raise OKC_API.G_EXCEPTION_ERROR;

545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:
552: x_cle_id := x_okl_cle_id;
553:

Line 554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

550: End If;
551:
552: x_cle_id := x_okl_cle_id;
553:
554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 557: when OKC_API.G_EXCEPTION_ERROR then

553:
554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
562: x_msg_count => x_msg_count,

Line 561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
562: x_msg_count => x_msg_count,
563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:

Line 566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

562: x_msg_count => x_msg_count,
563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:
566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:
566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count => x_msg_count,

Line 570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count => x_msg_count,
572: x_msg_data => x_msg_data,
573: p_api_type => g_api_type);
574:

Line 576: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

572: x_msg_data => x_msg_data,
573: p_api_type => g_api_type);
574:
575: when OTHERS then
576: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
577: p_api_name => l_api_name,
578: p_pkg_name => g_pkg_name,
579: p_exc_name => 'OTHERS',
580: x_msg_count => x_msg_count,

Line 588: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

584:
585:
586: PROCEDURE create_contract_top_line(
587: p_api_version IN NUMBER,
588: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
589: x_return_status OUT NOCOPY VARCHAR2,
590: x_msg_count OUT NOCOPY NUMBER,
591: x_msg_data OUT NOCOPY VARCHAR2,
592: p_clev_rec IN clev_rec_type,

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

606: l_chr_id l_clev_rec.dnz_chr_id%type;
607:
608: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_top_line';
609: l_api_version CONSTANT NUMBER := 1.0;
610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
611:
612: CURSOR get_k_dates_csr(l_id NUMBER) IS
613: select chr.start_date, chr.end_date
614: from okc_k_headers_b chr

Line 644: x_return_status := OKC_API.START_ACTIVITY(

640: End If;
641:
642: -- call START_ACTIVITY to create savepoint, check compatibility
643: -- and initialize message list
644: x_return_status := OKC_API.START_ACTIVITY(
645: p_api_name => l_api_name,
646: p_pkg_name => g_pkg_name,
647: p_init_msg_list => p_init_msg_list,
648: l_api_version => l_api_version,

Line 654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

650: p_api_type => g_api_type,
651: x_return_status => x_return_status);
652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;

Line 655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

651: x_return_status => x_return_status);
652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:

Line 656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:
660: l_clev_rec.name := l_clev_rec.item_description;

Line 657: raise OKC_API.G_EXCEPTION_ERROR;

653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:
660: l_clev_rec.name := l_clev_rec.item_description;
661:

Line 680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)

676:
677: End If;
678:
679:
680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)
681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
682:
683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;

Line 681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then

677: End If;
678:
679:
680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)
681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
682:
683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;
685: close get_k_dates_csr;

Line 687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then

683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;
685: close get_k_dates_csr;
686:
687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
688: l_clev_rec.start_date := l_start_date;
689: End If;
690:
691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

Line 691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
688: l_clev_rec.start_date := l_start_date;
689: End If;
690:
691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then
692: l_clev_rec.end_date := l_end_date;
693: End If;
694:
695: End If;

Line 712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

708: p_klev_rec => l_klev_rec,
709: x_clev_rec => x_clev_rec,
710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;

Line 713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

709: x_clev_rec => x_clev_rec,
710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:

Line 714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:
718: l_cimv_rec.cle_id := x_clev_rec.id;

Line 715: raise OKC_API.G_EXCEPTION_ERROR;

711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:
718: l_cimv_rec.cle_id := x_clev_rec.id;
719:

Line 730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

726: p_cimv_rec => l_cimv_rec,
727: x_cimv_rec => x_cimv_rec);
728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;

Line 731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

727: x_cimv_rec => x_cimv_rec);
728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:

Line 732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:
736:

Line 733: raise OKC_API.G_EXCEPTION_ERROR;

729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:
736:
737: l_cplv_rec.cle_id := x_clev_rec.id;

Line 752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

748: p_cplv_rec => l_cplv_rec,
749: x_cplv_rec => x_cplv_rec);
750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;

Line 753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

749: x_cplv_rec => x_cplv_rec);
750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:

Line 754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:
758: end if;*/

Line 755: raise OKC_API.G_EXCEPTION_ERROR;

751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:
758: end if;*/
759:

Line 760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

756: End If;
757:
758: end if;*/
759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,

Line 762: when OKC_API.G_EXCEPTION_ERROR then

758: end if;*/
759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
767: x_msg_count => x_msg_count,

Line 766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
767: x_msg_count => x_msg_count,
768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:

Line 771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

767: x_msg_count => x_msg_count,
768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:
771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:
771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
776: x_msg_count => x_msg_count,

Line 775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
776: x_msg_count => x_msg_count,
777: x_msg_data => x_msg_data,
778: p_api_type => g_api_type);
779:

Line 781: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

777: x_msg_data => x_msg_data,
778: p_api_type => g_api_type);
779:
780: when OTHERS then
781: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
782: p_api_name => l_api_name,
783: p_pkg_name => g_pkg_name,
784: p_exc_name => 'OTHERS',
785: x_msg_count => x_msg_count,

Line 800: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

796: -- Version : 1.0
797: -- End of comments
798: PROCEDURE create_contract_top_line(
799: p_api_version IN NUMBER,
800: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
801: x_return_status OUT NOCOPY VARCHAR2,
802: x_msg_count OUT NOCOPY NUMBER,
803: x_msg_data OUT NOCOPY VARCHAR2,
804: p_clev_tbl IN clev_tbl_type,

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

811: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
812:
813: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_contract_top_line';
814: l_api_version CONSTANT NUMBER := 1.0;
815: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
816: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
817: i NUMBER;
818: l_klev_tbl klev_tbl_type := p_klev_tbl;
819: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

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

812:
813: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_contract_top_line';
814: l_api_version CONSTANT NUMBER := 1.0;
815: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
816: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
817: i NUMBER;
818: l_klev_tbl klev_tbl_type := p_klev_tbl;
819: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
820: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 826: l_return_status := OKC_API.START_ACTIVITY(

822:
823: /*
824: -- call START_ACTIVITY to create savepoint, check compatibility
825: -- and initialize message list
826: l_return_status := OKC_API.START_ACTIVITY(
827: p_api_name => l_api_name,
828: p_pkg_name => g_pkg_name,
829: p_init_msg_list => p_init_msg_list,
830: l_api_version => l_api_version,

Line 836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

832: p_api_type => g_api_type,
833: x_return_status => x_return_status);
834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;

Line 837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

833: x_return_status => x_return_status);
834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */

Line 838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */
842:

Line 839: raise OKC_API.G_EXCEPTION_ERROR;

835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */
842:
843: If (p_clev_tbl.COUNT > 0) Then

Line 862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

858: x_klev_rec => x_klev_tbl(i),
859: x_cimv_rec => x_cimv_tbl(i),
860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;

Line 863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

859: x_cimv_rec => x_cimv_tbl(i),
860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:

Line 864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:
868: EXIT WHEN (i = p_clev_tbl.LAST);

Line 865: raise OKC_API.G_EXCEPTION_ERROR;

861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:
868: EXIT WHEN (i = p_clev_tbl.LAST);
869: i := p_clev_tbl.NEXT(i);

Line 874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

870: END LOOP;
871:
872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;

Line 875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

871:
872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*

Line 876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 877: raise OKC_API.G_EXCEPTION_ERROR;

873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);

Line 880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then

Line 884: when OKC_API.G_EXCEPTION_ERROR then

880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
889: x_msg_count => x_msg_count,

Line 888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
889: x_msg_count => x_msg_count,
890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:

Line 893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

889: x_msg_count => x_msg_count,
890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:
893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:
893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
898: x_msg_count => x_msg_count,

Line 897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
898: x_msg_count => x_msg_count,
899: x_msg_data => x_msg_data,
900: p_api_type => g_api_type);
901:

Line 903: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

899: x_msg_data => x_msg_data,
900: p_api_type => g_api_type);
901:
902: when OTHERS then
903: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
904: p_api_name => l_api_name,
905: p_pkg_name => g_pkg_name,
906: p_exc_name => 'OTHERS',
907: x_msg_count => x_msg_count,

Line 924: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

920: -- Version : 1.0
921: -- End of comments
922: PROCEDURE update_contract_top_line(
923: p_api_version IN NUMBER,
924: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
925: x_return_status OUT NOCOPY VARCHAR2,
926: x_msg_count OUT NOCOPY NUMBER,
927: x_msg_data OUT NOCOPY VARCHAR2,
928: p_clev_rec IN clev_rec_type,

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

942: l_chr_id l_clev_rec.dnz_chr_id%type;
943:
944: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
945: l_api_version CONSTANT NUMBER := 1.0;
946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
947:
948: CURSOR get_k_dates_csr(l_id number) IS
949: select chr.start_date, chr.end_date
950: from okc_k_headers_b chr

Line 987: x_return_status := OKC_API.START_ACTIVITY(

983: End If;
984:
985: -- call START_ACTIVITY to create savepoint, check compatibility
986: -- and initialize message list
987: x_return_status := OKC_API.START_ACTIVITY(
988: p_api_name => l_api_name,
989: p_pkg_name => g_pkg_name,
990: p_init_msg_list => p_init_msg_list,
991: l_api_version => l_api_version,

Line 997: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

993: p_api_type => g_api_type,
994: x_return_status => x_return_status);
995:
996: -- check if activity started successfully
997: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
998: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
999: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1000: raise OKC_API.G_EXCEPTION_ERROR;
1001: End If;

Line 998: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

994: x_return_status => x_return_status);
995:
996: -- check if activity started successfully
997: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
998: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
999: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1000: raise OKC_API.G_EXCEPTION_ERROR;
1001: End If;
1002:

Line 999: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

995:
996: -- check if activity started successfully
997: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
998: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
999: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1000: raise OKC_API.G_EXCEPTION_ERROR;
1001: End If;
1002:
1003: l_clev_rec.name := l_clev_rec.item_description;

Line 1000: raise OKC_API.G_EXCEPTION_ERROR;

996: -- check if activity started successfully
997: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
998: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
999: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1000: raise OKC_API.G_EXCEPTION_ERROR;
1001: End If;
1002:
1003: l_clev_rec.name := l_clev_rec.item_description;
1004:

Line 1023: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )

1019:
1020: End If;
1021:
1022:
1023: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )
1024: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
1025:
1026: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1027: fetch get_k_dates_csr into l_start_date, l_end_date;

Line 1024: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then

1020: End If;
1021:
1022:
1023: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )
1024: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
1025:
1026: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1027: fetch get_k_dates_csr into l_start_date, l_end_date;
1028: close get_k_dates_csr;

Line 1030: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then

1026: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1027: fetch get_k_dates_csr into l_start_date, l_end_date;
1028: close get_k_dates_csr;
1029:
1030: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
1031: l_clev_rec.start_date := l_start_date;
1032: End If;
1033:
1034: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

Line 1034: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

1030: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
1031: l_clev_rec.start_date := l_start_date;
1032: End If;
1033:
1034: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then
1035: l_clev_rec.end_date := l_end_date;
1036: End If;
1037:
1038: End If;

Line 1063: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1059: x_clev_rec => x_clev_rec,
1060: x_klev_rec => x_klev_rec
1061: );
1062:
1063: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1065: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1066: raise OKC_API.G_EXCEPTION_ERROR;
1067: END IF;

Line 1064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1060: x_klev_rec => x_klev_rec
1061: );
1062:
1063: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1065: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1066: raise OKC_API.G_EXCEPTION_ERROR;
1067: END IF;
1068:

Line 1065: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1061: );
1062:
1063: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1065: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1066: raise OKC_API.G_EXCEPTION_ERROR;
1067: END IF;
1068:
1069: --

Line 1066: raise OKC_API.G_EXCEPTION_ERROR;

1062:
1063: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1064: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1065: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1066: raise OKC_API.G_EXCEPTION_ERROR;
1067: END IF;
1068:
1069: --
1070: -- call procedure in complex API

Line 1082: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1078: p_cimv_rec => l_cimv_rec,
1079: x_cimv_rec => x_cimv_rec);
1080:
1081: -- check return status
1082: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1083: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1084: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1085: raise OKC_API.G_EXCEPTION_ERROR;
1086: End If;

Line 1083: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1079: x_cimv_rec => x_cimv_rec);
1080:
1081: -- check return status
1082: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1083: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1084: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1085: raise OKC_API.G_EXCEPTION_ERROR;
1086: End If;
1087:

Line 1084: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1080:
1081: -- check return status
1082: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1083: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1084: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1085: raise OKC_API.G_EXCEPTION_ERROR;
1086: End If;
1087:
1088: -- Bug# 6438785

Line 1085: raise OKC_API.G_EXCEPTION_ERROR;

1081: -- check return status
1082: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1083: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1084: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1085: raise OKC_API.G_EXCEPTION_ERROR;
1086: End If;
1087:
1088: -- Bug# 6438785
1089: -- When the service line start date is changed, update the

Line 1127: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1123: p_cplv_rec => l_cplv_rec,
1124: x_cplv_rec => x_cplv_rec);
1125:
1126: -- check return status
1127: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1128: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1129: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1130: raise OKC_API.G_EXCEPTION_ERROR;
1131: End If;

Line 1128: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1124: x_cplv_rec => x_cplv_rec);
1125:
1126: -- check return status
1127: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1128: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1129: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1130: raise OKC_API.G_EXCEPTION_ERROR;
1131: End If;
1132:

Line 1129: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1125:
1126: -- check return status
1127: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1128: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1129: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1130: raise OKC_API.G_EXCEPTION_ERROR;
1131: End If;
1132:
1133: else

Line 1130: raise OKC_API.G_EXCEPTION_ERROR;

1126: -- check return status
1127: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1128: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1129: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1130: raise OKC_API.G_EXCEPTION_ERROR;
1131: End If;
1132:
1133: else
1134:

Line 1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1141: p_cplv_rec => l_cplv_rec,
1142: x_cplv_rec => x_cplv_rec);
1143:
1144: -- check return status
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;

Line 1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1142: x_cplv_rec => x_cplv_rec);
1143:
1144: -- check return status
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:

Line 1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1143:
1144: -- check return status
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1151: end if;

Line 1148: raise OKC_API.G_EXCEPTION_ERROR;

1144: -- check return status
1145: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1146: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1147: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1148: raise OKC_API.G_EXCEPTION_ERROR;
1149: End If;
1150:
1151: end if;
1152:

Line 1165: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1161: x_msg_data => x_msg_data,
1162: p_cplv_rec => l_cplv_rec);
1163:
1164: -- check return status
1165: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1166: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1167: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1168: raise OKC_API.G_EXCEPTION_ERROR;
1169: End If;

Line 1166: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1162: p_cplv_rec => l_cplv_rec);
1163:
1164: -- check return status
1165: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1166: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1167: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1168: raise OKC_API.G_EXCEPTION_ERROR;
1169: End If;
1170: end if;*/

Line 1167: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1163:
1164: -- check return status
1165: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1166: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1167: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1168: raise OKC_API.G_EXCEPTION_ERROR;
1169: End If;
1170: end if;*/
1171:

Line 1168: raise OKC_API.G_EXCEPTION_ERROR;

1164: -- check return status
1165: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1166: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1167: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1168: raise OKC_API.G_EXCEPTION_ERROR;
1169: End If;
1170: end if;*/
1171:
1172: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

Line 1172: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

1168: raise OKC_API.G_EXCEPTION_ERROR;
1169: End If;
1170: end if;*/
1171:
1172: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1173: x_msg_data => x_msg_data);
1174:
1175: EXCEPTION
1176: when OKC_API.G_EXCEPTION_ERROR then

Line 1176: when OKC_API.G_EXCEPTION_ERROR then

1172: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1173: x_msg_data => x_msg_data);
1174:
1175: EXCEPTION
1176: when OKC_API.G_EXCEPTION_ERROR then
1177: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1178: p_api_name => l_api_name,
1179: p_pkg_name => g_pkg_name,
1180: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1177: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1173: x_msg_data => x_msg_data);
1174:
1175: EXCEPTION
1176: when OKC_API.G_EXCEPTION_ERROR then
1177: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1178: p_api_name => l_api_name,
1179: p_pkg_name => g_pkg_name,
1180: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1181: x_msg_count => x_msg_count,

Line 1180: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1176: when OKC_API.G_EXCEPTION_ERROR then
1177: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1178: p_api_name => l_api_name,
1179: p_pkg_name => g_pkg_name,
1180: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1181: x_msg_count => x_msg_count,
1182: x_msg_data => x_msg_data,
1183: p_api_type => g_api_type);
1184:

Line 1185: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1181: x_msg_count => x_msg_count,
1182: x_msg_data => x_msg_data,
1183: p_api_type => g_api_type);
1184:
1185: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1186: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1187: p_api_name => l_api_name,
1188: p_pkg_name => g_pkg_name,
1189: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1186: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1182: x_msg_data => x_msg_data,
1183: p_api_type => g_api_type);
1184:
1185: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1186: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1187: p_api_name => l_api_name,
1188: p_pkg_name => g_pkg_name,
1189: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1190: x_msg_count => x_msg_count,

Line 1189: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1185: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1186: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1187: p_api_name => l_api_name,
1188: p_pkg_name => g_pkg_name,
1189: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1190: x_msg_count => x_msg_count,
1191: x_msg_data => x_msg_data,
1192: p_api_type => g_api_type);
1193:

Line 1195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1191: x_msg_data => x_msg_data,
1192: p_api_type => g_api_type);
1193:
1194: when OTHERS then
1195: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1196: p_api_name => l_api_name,
1197: p_pkg_name => g_pkg_name,
1198: p_exc_name => 'OTHERS',
1199: x_msg_count => x_msg_count,

Line 1215: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1211: -- Version : 1.0
1212: -- End of comments
1213: PROCEDURE update_contract_top_line(
1214: p_api_version IN NUMBER,
1215: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1216: x_return_status OUT NOCOPY VARCHAR2,
1217: x_msg_count OUT NOCOPY NUMBER,
1218: x_msg_data OUT NOCOPY VARCHAR2,
1219: p_clev_tbl IN clev_tbl_type,

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

1226: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
1227:
1228: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
1229: l_api_version CONSTANT NUMBER := 1.0;
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1232: i NUMBER;
1233: l_klev_tbl klev_tbl_type := p_klev_tbl;
1234: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

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

1227:
1228: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
1229: l_api_version CONSTANT NUMBER := 1.0;
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1232: i NUMBER;
1233: l_klev_tbl klev_tbl_type := p_klev_tbl;
1234: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
1235: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 1240: l_return_status := OKC_API.START_ACTIVITY(

1236: BEGIN
1237: /*
1238: -- call START_ACTIVITY to create savepoint, check compatibility
1239: -- and initialize message list
1240: l_return_status := OKC_API.START_ACTIVITY(
1241: p_api_name => l_api_name,
1242: p_pkg_name => g_pkg_name,
1243: p_init_msg_list => p_init_msg_list,
1244: l_api_version => l_api_version,

Line 1250: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1246: p_api_type => g_api_type,
1247: x_return_status => x_return_status);
1248:
1249: -- check if activity started successfully
1250: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1251: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1252: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1253: raise OKC_API.G_EXCEPTION_ERROR;
1254: End If;

Line 1251: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1247: x_return_status => x_return_status);
1248:
1249: -- check if activity started successfully
1250: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1251: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1252: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1253: raise OKC_API.G_EXCEPTION_ERROR;
1254: End If;
1255: */

Line 1252: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1248:
1249: -- check if activity started successfully
1250: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1251: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1252: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1253: raise OKC_API.G_EXCEPTION_ERROR;
1254: End If;
1255: */
1256:

Line 1253: raise OKC_API.G_EXCEPTION_ERROR;

1249: -- check if activity started successfully
1250: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1251: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1252: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1253: raise OKC_API.G_EXCEPTION_ERROR;
1254: End If;
1255: */
1256:
1257: If (p_clev_tbl.COUNT > 0) Then

Line 1276: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1272: x_klev_rec => x_klev_tbl(i),
1273: x_cimv_rec => x_cimv_tbl(i),
1274: x_cplv_rec => x_cplv_tbl(i));
1275:
1276: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1278: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1279: raise OKC_API.G_EXCEPTION_ERROR;
1280: End If;

Line 1277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1273: x_cimv_rec => x_cimv_tbl(i),
1274: x_cplv_rec => x_cplv_tbl(i));
1275:
1276: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1278: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1279: raise OKC_API.G_EXCEPTION_ERROR;
1280: End If;
1281:

Line 1278: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1274: x_cplv_rec => x_cplv_tbl(i));
1275:
1276: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1278: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1279: raise OKC_API.G_EXCEPTION_ERROR;
1280: End If;
1281:
1282: EXIT WHEN (i = p_clev_tbl.LAST);

Line 1279: raise OKC_API.G_EXCEPTION_ERROR;

1275:
1276: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1278: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1279: raise OKC_API.G_EXCEPTION_ERROR;
1280: End If;
1281:
1282: EXIT WHEN (i = p_clev_tbl.LAST);
1283: i := p_clev_tbl.NEXT(i);

Line 1288: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1284: END LOOP;
1285:
1286: End If;
1287:
1288: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1289: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1291: raise OKC_API.G_EXCEPTION_ERROR;
1292: End If;

Line 1289: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1285:
1286: End If;
1287:
1288: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1289: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1291: raise OKC_API.G_EXCEPTION_ERROR;
1292: End If;
1293: /*

Line 1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1286: End If;
1287:
1288: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1289: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1291: raise OKC_API.G_EXCEPTION_ERROR;
1292: End If;
1293: /*
1294: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 1291: raise OKC_API.G_EXCEPTION_ERROR;

1287:
1288: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1289: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1291: raise OKC_API.G_EXCEPTION_ERROR;
1292: End If;
1293: /*
1294: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1295: x_msg_data => x_msg_data);

Line 1294: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

1290: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1291: raise OKC_API.G_EXCEPTION_ERROR;
1292: End If;
1293: /*
1294: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1295: x_msg_data => x_msg_data);
1296: */
1297: EXCEPTION
1298: when OKC_API.G_EXCEPTION_ERROR then

Line 1298: when OKC_API.G_EXCEPTION_ERROR then

1294: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1295: x_msg_data => x_msg_data);
1296: */
1297: EXCEPTION
1298: when OKC_API.G_EXCEPTION_ERROR then
1299: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1300: p_api_name => l_api_name,
1301: p_pkg_name => g_pkg_name,
1302: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1299: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1295: x_msg_data => x_msg_data);
1296: */
1297: EXCEPTION
1298: when OKC_API.G_EXCEPTION_ERROR then
1299: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1300: p_api_name => l_api_name,
1301: p_pkg_name => g_pkg_name,
1302: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1303: x_msg_count => x_msg_count,

Line 1302: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1298: when OKC_API.G_EXCEPTION_ERROR then
1299: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1300: p_api_name => l_api_name,
1301: p_pkg_name => g_pkg_name,
1302: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1303: x_msg_count => x_msg_count,
1304: x_msg_data => x_msg_data,
1305: p_api_type => g_api_type);
1306:

Line 1307: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1303: x_msg_count => x_msg_count,
1304: x_msg_data => x_msg_data,
1305: p_api_type => g_api_type);
1306:
1307: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1308: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1309: p_api_name => l_api_name,
1310: p_pkg_name => g_pkg_name,
1311: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1308: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1304: x_msg_data => x_msg_data,
1305: p_api_type => g_api_type);
1306:
1307: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1308: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1309: p_api_name => l_api_name,
1310: p_pkg_name => g_pkg_name,
1311: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1312: x_msg_count => x_msg_count,

Line 1311: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1307: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1308: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1309: p_api_name => l_api_name,
1310: p_pkg_name => g_pkg_name,
1311: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1312: x_msg_count => x_msg_count,
1313: x_msg_data => x_msg_data,
1314: p_api_type => g_api_type);
1315:

Line 1317: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1313: x_msg_data => x_msg_data,
1314: p_api_type => g_api_type);
1315:
1316: when OTHERS then
1317: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1318: p_api_name => l_api_name,
1319: p_pkg_name => g_pkg_name,
1320: p_exc_name => 'OTHERS',
1321: x_msg_count => x_msg_count,

Line 1330: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1326:
1327:
1328: PROCEDURE delete_contract_line(
1329: p_api_version IN NUMBER,
1330: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1331: x_return_status OUT NOCOPY VARCHAR2,
1332: x_msg_count OUT NOCOPY NUMBER,
1333: x_msg_data OUT NOCOPY VARCHAR2,
1334: p_chr_id IN number,

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

1338: lp_klev_rec OKL_SERVICE_INTEGRATION_PUB.klev_rec_type;
1339:
1340: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line';
1341: l_api_version CONSTANT NUMBER := 1.0;
1342: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1343:
1344: l_chr_id number := null;
1345:
1346: BEGIN

Line 1355: l_return_status := OKC_API.START_ACTIVITY(

1351: End If;
1352:
1353: -- call START_ACTIVITY to create savepoint, check compatibility
1354: -- and initialize message list
1355: l_return_status := OKC_API.START_ACTIVITY(
1356: p_api_name => l_api_name,
1357: p_pkg_name => g_pkg_name,
1358: p_init_msg_list => p_init_msg_list,
1359: l_api_version => l_api_version,

Line 1365: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1361: p_api_type => g_api_type,
1362: x_return_status => x_return_status);
1363:
1364: -- check if activity started successfully
1365: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1366: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1367: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1368: raise OKC_API.G_EXCEPTION_ERROR;
1369: End If;

Line 1366: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1362: x_return_status => x_return_status);
1363:
1364: -- check if activity started successfully
1365: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1366: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1367: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1368: raise OKC_API.G_EXCEPTION_ERROR;
1369: End If;
1370:

Line 1367: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1363:
1364: -- check if activity started successfully
1365: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1366: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1367: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1368: raise OKC_API.G_EXCEPTION_ERROR;
1369: End If;
1370:
1371: lp_clev_rec.dnz_chr_id := l_chr_id;

Line 1368: raise OKC_API.G_EXCEPTION_ERROR;

1364: -- check if activity started successfully
1365: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1366: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1367: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1368: raise OKC_API.G_EXCEPTION_ERROR;
1369: End If;
1370:
1371: lp_clev_rec.dnz_chr_id := l_chr_id;
1372: lp_clev_rec.id := p_cle_id;

Line 1385: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1381: p_clev_rec => lp_clev_rec,
1382: p_klev_rec => lp_klev_rec
1383: );
1384:
1385: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: raise OKC_API.G_EXCEPTION_ERROR;
1389: END IF;

Line 1386: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1382: p_klev_rec => lp_klev_rec
1383: );
1384:
1385: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: raise OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390:

Line 1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1383: );
1384:
1385: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: raise OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390:
1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

Line 1388: raise OKC_API.G_EXCEPTION_ERROR;

1384:
1385: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1386: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: raise OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390:
1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1392:

Line 1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1387: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1388: raise OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390:
1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1392:
1393: EXCEPTION
1394: when OKC_API.G_EXCEPTION_ERROR then
1395: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1394: when OKC_API.G_EXCEPTION_ERROR then

1390:
1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1392:
1393: EXCEPTION
1394: when OKC_API.G_EXCEPTION_ERROR then
1395: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1396: p_api_name => l_api_name,
1397: p_pkg_name => g_pkg_name,
1398: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1395: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1391: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1392:
1393: EXCEPTION
1394: when OKC_API.G_EXCEPTION_ERROR then
1395: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1396: p_api_name => l_api_name,
1397: p_pkg_name => g_pkg_name,
1398: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1399: x_msg_count => x_msg_count,

Line 1398: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1394: when OKC_API.G_EXCEPTION_ERROR then
1395: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1396: p_api_name => l_api_name,
1397: p_pkg_name => g_pkg_name,
1398: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1399: x_msg_count => x_msg_count,
1400: x_msg_data => x_msg_data,
1401: p_api_type => g_api_type);
1402:

Line 1403: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1399: x_msg_count => x_msg_count,
1400: x_msg_data => x_msg_data,
1401: p_api_type => g_api_type);
1402:
1403: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1404: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1405: p_api_name => l_api_name,
1406: p_pkg_name => g_pkg_name,
1407: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1404: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1400: x_msg_data => x_msg_data,
1401: p_api_type => g_api_type);
1402:
1403: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1404: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1405: p_api_name => l_api_name,
1406: p_pkg_name => g_pkg_name,
1407: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1408: x_msg_count => x_msg_count,

Line 1407: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1403: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1404: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1405: p_api_name => l_api_name,
1406: p_pkg_name => g_pkg_name,
1407: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1408: x_msg_count => x_msg_count,
1409: x_msg_data => x_msg_data,
1410: p_api_type => g_api_type);
1411:

Line 1413: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1409: x_msg_data => x_msg_data,
1410: p_api_type => g_api_type);
1411:
1412: when OTHERS then
1413: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1414: p_api_name => l_api_name,
1415: p_pkg_name => g_pkg_name,
1416: p_exc_name => 'OTHERS',
1417: x_msg_count => x_msg_count,

Line 1425: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1421:
1422:
1423: PROCEDURE delete_contract_top_line(
1424: p_api_version IN NUMBER,
1425: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1426: x_return_status OUT NOCOPY VARCHAR2,
1427: x_msg_count OUT NOCOPY NUMBER,
1428: x_msg_data OUT NOCOPY VARCHAR2,
1429: p_clev_rec IN clev_rec_type,

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

1437: l_cplv_rec cplv_rec_type := p_cplv_rec;
1438:
1439: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1440: l_api_version CONSTANT NUMBER := 1.0;
1441: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1442:
1443: --Bug# 4558486
1444: l_kplv_rec okl_k_party_roles_pvt.kplv_rec_type;
1445:

Line 1450: l_return_status := OKC_API.START_ACTIVITY(

1446: BEGIN
1447:
1448: -- call START_ACTIVITY to create savepoint, check compatibility
1449: -- and initialize message list
1450: l_return_status := OKC_API.START_ACTIVITY(
1451: p_api_name => l_api_name,
1452: p_pkg_name => g_pkg_name,
1453: p_init_msg_list => p_init_msg_list,
1454: l_api_version => l_api_version,

Line 1460: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1456: p_api_type => g_api_type,
1457: x_return_status => x_return_status);
1458:
1459: -- check if activity started successfully
1460: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1461: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1462: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1463: raise OKC_API.G_EXCEPTION_ERROR;
1464: End If;

Line 1461: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1457: x_return_status => x_return_status);
1458:
1459: -- check if activity started successfully
1460: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1461: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1462: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1463: raise OKC_API.G_EXCEPTION_ERROR;
1464: End If;
1465:

Line 1462: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1458:
1459: -- check if activity started successfully
1460: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1461: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1462: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1463: raise OKC_API.G_EXCEPTION_ERROR;
1464: End If;
1465:
1466: okl_contract_pvt.delete_contract_line(

Line 1463: raise OKC_API.G_EXCEPTION_ERROR;

1459: -- check if activity started successfully
1460: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1461: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1462: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1463: raise OKC_API.G_EXCEPTION_ERROR;
1464: End If;
1465:
1466: okl_contract_pvt.delete_contract_line(
1467: p_api_version => p_api_version,

Line 1476: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1472: p_clev_rec => l_clev_rec,
1473: p_klev_rec => l_klev_rec
1474: );
1475:
1476: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: raise OKC_API.G_EXCEPTION_ERROR;
1480: END IF;

Line 1477: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1473: p_klev_rec => l_klev_rec
1474: );
1475:
1476: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: raise OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481:

Line 1478: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1474: );
1475:
1476: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: raise OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481:
1482: --

Line 1479: raise OKC_API.G_EXCEPTION_ERROR;

1475:
1476: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: raise OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481:
1482: --
1483: -- call procedure in complex API

Line 1494: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1490: x_msg_data => x_msg_data,
1491: p_cimv_rec => l_cimv_rec);
1492:
1493: -- check return status
1494: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1495: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1496: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1497: raise OKC_API.G_EXCEPTION_ERROR;
1498: End If;

Line 1495: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1491: p_cimv_rec => l_cimv_rec);
1492:
1493: -- check return status
1494: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1495: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1496: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1497: raise OKC_API.G_EXCEPTION_ERROR;
1498: End If;
1499:

Line 1496: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1492:
1493: -- check return status
1494: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1495: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1496: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1497: raise OKC_API.G_EXCEPTION_ERROR;
1498: End If;
1499:
1500: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api

Line 1497: raise OKC_API.G_EXCEPTION_ERROR;

1493: -- check return status
1494: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1495: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1496: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1497: raise OKC_API.G_EXCEPTION_ERROR;
1498: End If;
1499:
1500: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api
1501: -- to delete records in tables

Line 1524: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1520: p_cplv_rec => l_cplv_rec,
1521: p_kplv_rec => l_kplv_rec);
1522:
1523: -- check return status
1524: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1525: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1527: raise OKC_API.G_EXCEPTION_ERROR;
1528: End If;

Line 1525: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1521: p_kplv_rec => l_kplv_rec);
1522:
1523: -- check return status
1524: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1525: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1527: raise OKC_API.G_EXCEPTION_ERROR;
1528: End If;
1529:

Line 1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1522:
1523: -- check return status
1524: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1525: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1527: raise OKC_API.G_EXCEPTION_ERROR;
1528: End If;
1529:
1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

Line 1527: raise OKC_API.G_EXCEPTION_ERROR;

1523: -- check return status
1524: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1525: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1527: raise OKC_API.G_EXCEPTION_ERROR;
1528: End If;
1529:
1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1531: x_msg_data => x_msg_data);

Line 1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

1526: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1527: raise OKC_API.G_EXCEPTION_ERROR;
1528: End If;
1529:
1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1531: x_msg_data => x_msg_data);
1532: EXCEPTION
1533: when OKC_API.G_EXCEPTION_ERROR then
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1533: when OKC_API.G_EXCEPTION_ERROR then

1529:
1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1531: x_msg_data => x_msg_data);
1532: EXCEPTION
1533: when OKC_API.G_EXCEPTION_ERROR then
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => g_pkg_name,
1537: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1530: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1531: x_msg_data => x_msg_data);
1532: EXCEPTION
1533: when OKC_API.G_EXCEPTION_ERROR then
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => g_pkg_name,
1537: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1538: x_msg_count => x_msg_count,

Line 1537: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1533: when OKC_API.G_EXCEPTION_ERROR then
1534: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1535: p_api_name => l_api_name,
1536: p_pkg_name => g_pkg_name,
1537: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1538: x_msg_count => x_msg_count,
1539: x_msg_data => x_msg_data,
1540: p_api_type => g_api_type);
1541:

Line 1542: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1538: x_msg_count => x_msg_count,
1539: x_msg_data => x_msg_data,
1540: p_api_type => g_api_type);
1541:
1542: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1543: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1544: p_api_name => l_api_name,
1545: p_pkg_name => g_pkg_name,
1546: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1543: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1539: x_msg_data => x_msg_data,
1540: p_api_type => g_api_type);
1541:
1542: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1543: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1544: p_api_name => l_api_name,
1545: p_pkg_name => g_pkg_name,
1546: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1547: x_msg_count => x_msg_count,

Line 1546: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1542: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1543: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1544: p_api_name => l_api_name,
1545: p_pkg_name => g_pkg_name,
1546: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1547: x_msg_count => x_msg_count,
1548: x_msg_data => x_msg_data,
1549: p_api_type => g_api_type);
1550:

Line 1552: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1548: x_msg_data => x_msg_data,
1549: p_api_type => g_api_type);
1550:
1551: when OTHERS then
1552: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1553: p_api_name => l_api_name,
1554: p_pkg_name => g_pkg_name,
1555: p_exc_name => 'OTHERS',
1556: x_msg_count => x_msg_count,

Line 1571: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1567: -- Version : 1.0
1568: -- End of comments
1569: PROCEDURE delete_contract_top_line(
1570: p_api_version IN NUMBER,
1571: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1572: x_return_status OUT NOCOPY VARCHAR2,
1573: x_msg_count OUT NOCOPY NUMBER,
1574: x_msg_data OUT NOCOPY VARCHAR2,
1575: p_clev_tbl IN clev_tbl_type,

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

1579: ) IS
1580:
1581: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1582: l_api_version CONSTANT NUMBER := 1.0;
1583: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1584: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1585: i NUMBER;
1586: l_klev_tbl klev_tbl_type := p_klev_tbl;
1587: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

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

1580:
1581: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1582: l_api_version CONSTANT NUMBER := 1.0;
1583: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1584: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1585: i NUMBER;
1586: l_klev_tbl klev_tbl_type := p_klev_tbl;
1587: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
1588: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 1593: l_return_status := OKC_API.START_ACTIVITY(

1589: BEGIN
1590: /*
1591: -- call START_ACTIVITY to create savepoint, check compatibility
1592: -- and initialize message list
1593: l_return_status := OKC_API.START_ACTIVITY(
1594: p_api_name => l_api_name,
1595: p_pkg_name => g_pkg_name,
1596: p_init_msg_list => p_init_msg_list,
1597: l_api_version => l_api_version,

Line 1603: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1599: p_api_type => g_api_type,
1600: x_return_status => x_return_status);
1601:
1602: -- check if activity started successfully
1603: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1604: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1605: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1606: raise OKC_API.G_EXCEPTION_ERROR;
1607: End If;

Line 1604: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1600: x_return_status => x_return_status);
1601:
1602: -- check if activity started successfully
1603: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1604: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1605: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1606: raise OKC_API.G_EXCEPTION_ERROR;
1607: End If;
1608: */

Line 1605: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1601:
1602: -- check if activity started successfully
1603: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1604: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1605: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1606: raise OKC_API.G_EXCEPTION_ERROR;
1607: End If;
1608: */
1609: If (p_clev_tbl.COUNT > 0) Then

Line 1606: raise OKC_API.G_EXCEPTION_ERROR;

1602: -- check if activity started successfully
1603: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1604: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1605: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1606: raise OKC_API.G_EXCEPTION_ERROR;
1607: End If;
1608: */
1609: If (p_clev_tbl.COUNT > 0) Then
1610: i := p_clev_tbl.FIRST;

Line 1625: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1621: p_cimv_rec => l_cimv_tbl(i),
1622: p_cplv_rec => l_cplv_tbl(i)
1623: );
1624:
1625: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1626: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1628: raise OKC_API.G_EXCEPTION_ERROR;
1629: End If;

Line 1626: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1622: p_cplv_rec => l_cplv_tbl(i)
1623: );
1624:
1625: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1626: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1628: raise OKC_API.G_EXCEPTION_ERROR;
1629: End If;
1630:

Line 1627: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1623: );
1624:
1625: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1626: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1628: raise OKC_API.G_EXCEPTION_ERROR;
1629: End If;
1630:
1631: EXIT WHEN (i = p_clev_tbl.LAST);

Line 1628: raise OKC_API.G_EXCEPTION_ERROR;

1624:
1625: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1626: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1627: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1628: raise OKC_API.G_EXCEPTION_ERROR;
1629: End If;
1630:
1631: EXIT WHEN (i = p_clev_tbl.LAST);
1632: i := p_clev_tbl.NEXT(i);

Line 1637: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1633: END LOOP;
1634:
1635: End If;
1636:
1637: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;

Line 1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1634:
1635: End If;
1636:
1637: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642: /*

Line 1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1635: End If;
1636:
1637: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642: /*
1643: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 1640: raise OKC_API.G_EXCEPTION_ERROR;

1636:
1637: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1638: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642: /*
1643: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1644: x_msg_data => x_msg_data);

Line 1643: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

1639: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1640: raise OKC_API.G_EXCEPTION_ERROR;
1641: End If;
1642: /*
1643: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1644: x_msg_data => x_msg_data);
1645: */
1646: EXCEPTION
1647: when OKC_API.G_EXCEPTION_ERROR then

Line 1647: when OKC_API.G_EXCEPTION_ERROR then

1643: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1644: x_msg_data => x_msg_data);
1645: */
1646: EXCEPTION
1647: when OKC_API.G_EXCEPTION_ERROR then
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1649: p_api_name => l_api_name,
1650: p_pkg_name => g_pkg_name,
1651: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1644: x_msg_data => x_msg_data);
1645: */
1646: EXCEPTION
1647: when OKC_API.G_EXCEPTION_ERROR then
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1649: p_api_name => l_api_name,
1650: p_pkg_name => g_pkg_name,
1651: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1652: x_msg_count => x_msg_count,

Line 1651: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1647: when OKC_API.G_EXCEPTION_ERROR then
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1649: p_api_name => l_api_name,
1650: p_pkg_name => g_pkg_name,
1651: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1652: x_msg_count => x_msg_count,
1653: x_msg_data => x_msg_data,
1654: p_api_type => g_api_type);
1655:

Line 1656: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1652: x_msg_count => x_msg_count,
1653: x_msg_data => x_msg_data,
1654: p_api_type => g_api_type);
1655:
1656: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1657: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1658: p_api_name => l_api_name,
1659: p_pkg_name => g_pkg_name,
1660: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1657: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1653: x_msg_data => x_msg_data,
1654: p_api_type => g_api_type);
1655:
1656: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1657: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1658: p_api_name => l_api_name,
1659: p_pkg_name => g_pkg_name,
1660: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1661: x_msg_count => x_msg_count,

Line 1660: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1656: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1657: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1658: p_api_name => l_api_name,
1659: p_pkg_name => g_pkg_name,
1660: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1661: x_msg_count => x_msg_count,
1662: x_msg_data => x_msg_data,
1663: p_api_type => g_api_type);
1664:

Line 1666: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1662: x_msg_data => x_msg_data,
1663: p_api_type => g_api_type);
1664:
1665: when OTHERS then
1666: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1667: p_api_name => l_api_name,
1668: p_pkg_name => g_pkg_name,
1669: p_exc_name => 'OTHERS',
1670: x_msg_count => x_msg_count,