eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_EXTEND_PVT dependencies on OKC_API

Line 47: IF (l_mod is not null) and (l_mod <> OKC_API.G_MISS_CHAR) then

43: OPEN c_chr;
44: FETCH c_chr INTO l_code,l_template_yn,l_end_date,l_app_id,l_scs_code,l_k,l_mod;
45: CLOSE c_chr;
46:
47: IF (l_mod is not null) and (l_mod <> OKC_API.G_MISS_CHAR) then
48: l_k := l_k ||'-'||l_mod;
49: END IF;
50:
51:

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

49: END IF;
50:
51:
52: IF l_template_yn = 'Y' then
53: OKC_API.set_message(p_app_name => g_app_name,
54: p_msg_name => 'OKC_K_TEMPLATE',
55: p_token1 => 'NUMBER',
56: p_token1_value => l_k);
57:

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

59: END IF;
60:
61: -- A perpetual cannot be extended further !!
62: IF l_end_date Is Null then
63: OKC_API.set_message(p_app_name => g_app_name,
64: p_msg_name => 'OKC_NO_PERPETUAL',
65: p_token1 => 'component',
66: p_token1_value => l_k);
67: RETURN(FALSE);

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

70: -- If there is Update access, do not allow extend
71: If Okc_Util.Get_All_K_Access_Level(p_application_id => l_app_id,
72: p_chr_id => p_chr_id,
73: p_scs_code => l_scs_code) <> 'U' Then
74: OKC_API.set_message(p_app_name => g_app_name,
75: p_msg_name => 'OKC_NO_UPDATE',
76: p_token1 => 'CHR',
77: p_token1_value => l_k);
78: RETURN(FALSE);

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

82: FETCH c_sts INTO l_sts_code;
83: CLOSE c_sts;
84:
85: IF l_sts_code NOT IN ('ACTIVE','EXPIRED','SIGNED') THEN
86: OKC_API.set_message(p_app_name => g_app_name,
87: p_msg_name => 'OKC_INVALID_STS',
88: p_token1 => 'component',
89: p_token1_value => l_k);
90: RETURN(FALSE);

Line 109: l_chr_id number:=OKC_API.G_MISS_NUM;

105: l_sts_code VARCHAR2(100);
106: l_cls_code VARCHAR2(100);
107: l_template_yn VARCHAR2(10);
108: l_code VARCHAR2(100);
109: l_chr_id number:=OKC_API.G_MISS_NUM;
110: l_app_id okc_k_headers_b.application_id%TYPE;
111: l_scs_code okc_k_headers_b.scs_code%TYPE;
112: l_k VARCHAR2(255);
113: l_mod okc_k_headers_b.contract_number_modifier%TYPE ;

Line 140: If l_chr_id=OKC_API.G_MISS_NUM then

136: OPEN c_cle;
137: FETCH c_cle INTO l_code,l_chr_id,l_no,l_end_date;
138: CLOSE c_cle;
139:
140: If l_chr_id=OKC_API.G_MISS_NUM then
141: OKC_API.set_message(p_app_name => g_app_name,
142: p_msg_name => 'OKC_NO_CHR',
143: p_token1 => 'LINE',
144: p_token1_value => l_no);

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

137: FETCH c_cle INTO l_code,l_chr_id,l_no,l_end_date;
138: CLOSE c_cle;
139:
140: If l_chr_id=OKC_API.G_MISS_NUM then
141: OKC_API.set_message(p_app_name => g_app_name,
142: p_msg_name => 'OKC_NO_CHR',
143: p_token1 => 'LINE',
144: p_token1_value => l_no);
145: RETURN (FALSE);

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

146: END IF;
147:
148: -- A perpetual cannot be extended further !!
149: IF l_end_date Is Null then
150: OKC_API.set_message(p_app_name => g_app_name,
151: p_msg_name => 'OKC_NO_PERPETUAL',
152: p_token1 => 'component',
153: p_token1_value => l_no);
154: RETURN(FALSE);

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

158: FETCH c_chr INTO l_template_yn, l_app_id, l_scs_code,l_k,l_mod;
159: CLOSE c_chr;
160:
161: IF l_template_yn = 'Y' then
162: OKC_API.set_message(p_app_name => g_app_name,
163: p_msg_name => 'OKC_K_TEMPLATE',
164: p_token1 => 'number',
165: p_token1_value => l_k);
166: RETURN(FALSE);

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

168:
169: If Okc_Util.Get_All_K_Access_Level(p_application_id => l_app_id,
170: p_chr_id => l_chr_id,
171: p_scs_code => l_scs_code) <> 'U' Then
172: OKC_API.set_message(p_app_name => g_app_name,
173: p_msg_name => 'OKC_NO_UPDATE',
174: p_token1 => 'CHR',
175: p_token1_value => l_k);
176: RETURN(FALSE);

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

180: FETCH c_sts INTO l_sts_code;
181: CLOSE c_sts;
182:
183: IF l_sts_code NOT IN ('ACTIVE','EXPIRED','ENTERED','SIGNED') THEN
184: OKC_API.set_message(p_app_name => g_app_name,
185: p_msg_name => 'OKC_INVALID_STS',
186: p_token1 => 'component',
187: p_token1_value => l_no);
188: RETURN(FALSE);

Line 263: l_return_status varchar2(1) := OKC_API.g_ret_sts_success;

259:
260: l_chg_request_in_process varchar2(1);
261: l_status varchar2(30);
262: l_status_meaning okc_statuses_v.meaning%type;
263: l_return_status varchar2(1) := OKC_API.g_ret_sts_success;
264: l_chr_rec cur_k_header%rowtype;
265:
266: BEGIN
267:

Line 268: x_return_status := okc_api.g_ret_sts_success;

264: l_chr_rec cur_k_header%rowtype;
265:
266: BEGIN
267:
268: x_return_status := okc_api.g_ret_sts_success;
269:
270: OKC_API.init_msg_list(p_init_msg_list);
271:
272: OPEN cur_k_header;

Line 270: OKC_API.init_msg_list(p_init_msg_list);

266: BEGIN
267:
268: x_return_status := okc_api.g_ret_sts_success;
269:
270: OKC_API.init_msg_list(p_init_msg_list);
271:
272: OPEN cur_k_header;
273: FETCH cur_k_header into l_chr_rec;
274: CLOSE cur_k_header;

Line 276: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

272: OPEN cur_k_header;
273: FETCH cur_k_header into l_chr_rec;
274: CLOSE cur_k_header;
275:
276: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
277: IF l_chr_rec.end_date >= p_extend_in_parameters_rec.p_end_date then
278:
279: OKC_API.set_message( p_app_name => g_app_name,
280: p_msg_name => 'OKC_INVALID_EXTEND_DATE');

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

275:
276: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
277: IF l_chr_rec.end_date >= p_extend_in_parameters_rec.p_end_date then
278:
279: OKC_API.set_message( p_app_name => g_app_name,
280: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
281:
282: x_return_status := okc_api.g_ret_sts_error;
283: RAISE g_exception_halt_validation;

Line 282: x_return_status := okc_api.g_ret_sts_error;

278:
279: OKC_API.set_message( p_app_name => g_app_name,
280: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
281:
282: x_return_status := okc_api.g_ret_sts_error;
283: RAISE g_exception_halt_validation;
284:
285: END IF;
286: END IF;

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

287:
288: /* Templates can not be extended */
289: IF l_chr_rec.template_Yn = 'Y' THEN
290:
291: OKC_API.set_message( p_app_name => g_app_name,
292: p_msg_name => 'OKC_K_TEMPLATE',
293: p_token1 => 'NUMBER',
294: p_token1_value => l_chr_rec.contract_number );
295:

Line 296: x_return_status := okc_api.g_ret_sts_error;

292: p_msg_name => 'OKC_K_TEMPLATE',
293: p_token1 => 'NUMBER',
294: p_token1_value => l_chr_rec.contract_number );
295:
296: x_return_status := okc_api.g_ret_sts_error;
297: RAISE g_exception_halt_validation;
298: end IF;
299:
300: OPEN is_k_locked;

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

301: FETCH is_k_locked into l_chg_request_in_process;
302:
303: IF is_k_locked%found THEN
304:
305: OKC_API.set_message(p_app_name => g_app_name,
306: p_msg_name => 'OKC_K_LOCKED',
307: p_token1 => 'NUMBER',
308: p_token1_value => l_chr_rec.contract_number);
309:

Line 310: x_return_status := okc_api.g_ret_sts_error;

306: p_msg_name => 'OKC_K_LOCKED',
307: p_token1 => 'NUMBER',
308: p_token1_value => l_chr_rec.contract_number);
309:
310: x_return_status := okc_api.g_ret_sts_error;
311: CLOSE is_k_locked;
312: RAISE g_exception_halt_validation;
313:
314: end IF;

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

319: OPEN cur_status(l_chr_rec.sts_code);
320: FETCH cur_status into l_status;
321: CLOSE cur_status;
322: IF l_status='1' then
323: OKC_API.set_message(p_app_name => g_app_name,
324: p_msg_name => 'OKC_INVALID_K_STATUS',
325: p_token1 => 'NUMBER',
326: p_token1_value => l_chr_rec.contract_number,
327: p_token2 => 'MODIFIER',

Line 341: x_return_status := OKC_API.G_RET_STS_ERROR;

337: CLOSE cur_mean;
338:
339: IF l_status NOT IN ('ACTIVE','EXPIRED','SIGNED') THEN
340:
341: x_return_status := OKC_API.G_RET_STS_ERROR;
342:
343: OKC_API.set_message(p_app_name => g_app_name,
344: p_msg_name => 'OKC_INVALID_K_STATUS',
345: p_token1 => 'NUMBER',

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

339: IF l_status NOT IN ('ACTIVE','EXPIRED','SIGNED') THEN
340:
341: x_return_status := OKC_API.G_RET_STS_ERROR;
342:
343: OKC_API.set_message(p_app_name => g_app_name,
344: p_msg_name => 'OKC_INVALID_K_STATUS',
345: p_token1 => 'NUMBER',
346: p_token1_value => l_chr_rec.contract_number,
347: p_token2 => 'MODIFIER',

Line 355: x_return_status := OKC_API.G_RET_STS_ERROR;

351:
352: RAISE g_exception_halt_validation;
353: ELSIF l_chr_rec.date_terminated is not null THEN
354:
355: x_return_status := OKC_API.G_RET_STS_ERROR;
356:
357: OKC_API.set_message(p_app_name => g_app_name,
358: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
359: p_token1 => 'NUMBER',

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

353: ELSIF l_chr_rec.date_terminated is not null THEN
354:
355: x_return_status := OKC_API.G_RET_STS_ERROR;
356:
357: OKC_API.set_message(p_app_name => g_app_name,
358: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
359: p_token1 => 'NUMBER',
360: p_token1_value => l_chr_rec.contract_number );
361:

Line 365: x_return_status := OKC_API.G_RET_STS_ERROR;

361:
362: RAISE g_exception_halt_validation;
363: ELSIF l_chr_rec.date_renewed is not null THEN -- as per connie 11-22-1999
364:
365: x_return_status := OKC_API.G_RET_STS_ERROR;
366:
367: OKC_API.set_message( p_app_name => g_app_name,
368: p_msg_name =>'OKC_RENEWED_CONTRACT',
369: p_token1 =>'NUMBER',

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

363: ELSIF l_chr_rec.date_renewed is not null THEN -- as per connie 11-22-1999
364:
365: x_return_status := OKC_API.G_RET_STS_ERROR;
366:
367: OKC_API.set_message( p_app_name => g_app_name,
368: p_msg_name =>'OKC_RENEWED_CONTRACT',
369: p_token1 =>'NUMBER',
370: p_token1_value => l_chr_rec.contract_number );
371:

Line 375: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

371:
372: RAISE g_exception_halt_validation;
373: END IF;
374:
375: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
376: IF ( p_extend_in_parameters_rec.p_end_date is null )
377: AND
378: ( (p_extend_in_parameters_rec.p_uom_code is null)
379: OR

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

380: (p_extend_in_parameters_rec.p_duration is null)
381: )
382: THEN
383:
384: OKC_API.set_message(p_app_name => g_app_name,
385: p_msg_name => 'OKC_INVALID_PARAMETERS');
386:
387: x_return_status := OKC_API.g_ret_sts_error;
388: RAISE g_exception_halt_validation;

Line 387: x_return_status := OKC_API.g_ret_sts_error;

383:
384: OKC_API.set_message(p_app_name => g_app_name,
385: p_msg_name => 'OKC_INVALID_PARAMETERS');
386:
387: x_return_status := OKC_API.g_ret_sts_error;
388: RAISE g_exception_halt_validation;
389: END IF;
390: END IF;
391:

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

392: EXCEPTION
393: WHEN G_EXCEPTION_HALT_VALIDATION THEN
394: NULL;
395: WHEN OTHERS THEN
396: OKC_API.set_message(p_app_name => g_app_name,
397: p_msg_name => g_unexpected_error,
398: p_token1 => g_sqlcode_token,
399: p_token1_value => sqlcode,
400: p_token2 => g_sqlerrm_token,

Line 402: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

398: p_token1 => g_sqlcode_token,
399: p_token1_value => sqlcode,
400: p_token2 => g_sqlerrm_token,
401: p_token2_value => sqlerrm);
402: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
403: end validate_chr;
404:
405: PROCEDURE validate_cle( p_api_version IN NUMBER,
406: p_init_msg_list IN VARCHAR2 ,

Line 433: l_return_status varchar2(1) := OKC_API.g_ret_sts_success;

429: WHERE id=p_id;
430:
431: k_lines_rec cur_k_lines%rowtype;
432:
433: l_return_status varchar2(1) := OKC_API.g_ret_sts_success;
434:
435: l_status_meaning okc_statuses_v.meaning%type;
436: l_extend_in_parameters_rec extend_in_parameters_rec;
437:

Line 440: x_return_status := okc_api.g_ret_sts_success;

436: l_extend_in_parameters_rec extend_in_parameters_rec;
437:
438: BEGIN
439: --dbms_output.put_line('validate cle (+) ');
440: x_return_status := okc_api.g_ret_sts_success;
441:
442: OKC_API.init_msg_list(p_init_msg_list);
443:
444: OPEN cur_k_lines;

Line 442: OKC_API.init_msg_list(p_init_msg_list);

438: BEGIN
439: --dbms_output.put_line('validate cle (+) ');
440: x_return_status := okc_api.g_ret_sts_success;
441:
442: OKC_API.init_msg_list(p_init_msg_list);
443:
444: OPEN cur_k_lines;
445: FETCH cur_k_lines into k_lines_rec;
446:

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

445: FETCH cur_k_lines into k_lines_rec;
446:
447: IF cur_k_lines%notfound THEN -- contract header_id is wrong
448:
449: OKC_API.set_message(p_app_name => g_app_name,
450: p_msg_name => 'OKC_LINE_ID_MISSING',
451: p_token1 => 'LINE_NUMBER',
452: p_token1_value => k_lines_rec.line_number,
453: p_token2 => 'DESCRIPTION',

Line 457: x_return_status := okc_api.g_ret_sts_error;

453: p_token2 => 'DESCRIPTION',
454: p_token2_value => k_lines_rec.item_description);
455:
456: CLOSE cur_k_lines;
457: x_return_status := okc_api.g_ret_sts_error;
458: RAISE g_exception_halt_validation;
459: end IF;
460:
461: CLOSE cur_k_lines;

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

463: -- Commenting out the following since this check is also performed
464: -- at the end of this procedure.
465: /* IF k_lines_rec.end_date >= p_extend_in_parameters_rec.p_end_date then
466:
467: OKC_API.set_message( p_app_name => g_app_name,
468: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
469:
470: x_return_status := okc_api.g_ret_sts_error;
471: RAISE g_exception_halt_validation;

Line 470: x_return_status := okc_api.g_ret_sts_error;

466:
467: OKC_API.set_message( p_app_name => g_app_name,
468: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
469:
470: x_return_status := okc_api.g_ret_sts_error;
471: RAISE g_exception_halt_validation;
472:
473: END IF; */
474:

Line 498: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_TRUE;

494:
495: l_extend_in_parameters_rec.p_contract_id := k_lines_rec.dnz_chr_id;
496:
497: If l_extend_in_parameters_rec.p_end_date Is Null Then
498: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_TRUE;
499: Else
500: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_FALSE;
501: End If;
502:

Line 500: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_FALSE;

496:
497: If l_extend_in_parameters_rec.p_end_date Is Null Then
498: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_TRUE;
499: Else
500: l_extend_in_parameters_rec.p_perpetual_flag := OKC_API.G_FALSE;
501: End If;
502:
503: --san its wrong to populate the new_end_date of line in new end_date of contract
504: --as these are two differnet dates and may or maynot be same

Line 514: p_init_msg_list => OKC_API.G_FALSE,

510:
511: --dbms_output.put_line('validate chr (+) ');
512:
513: OKC_EXTEND_PVT.validate_chr(p_api_version => 1,
514: p_init_msg_list => OKC_API.G_FALSE,
515: x_return_status => l_return_status,
516: x_msg_count => x_msg_count,
517: x_msg_data => x_msg_data,
518: p_extend_in_parameters_rec => l_extend_in_parameters_rec );

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

517: x_msg_data => x_msg_data,
518: p_extend_in_parameters_rec => l_extend_in_parameters_rec );
519:
520: --dbms_output.put_line('validate chr (-) ');
521: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
522: x_return_status := l_return_status;
523: RAISE G_EXCEPTION_HALT_VALIDATION;
524: END IF;
525:

Line 531: x_return_status := OKC_API.G_RET_STS_ERROR;

527:
528:
529: IF k_lines_rec.ste_code NOT IN ('ACTIVE','EXPIRED','ENTERED','SIGNED') THEN
530:
531: x_return_status := OKC_API.G_RET_STS_ERROR;
532:
533: open cur_mean(k_lines_rec.ste_code);
534: fetch cur_mean into l_status_meaning;
535: close cur_mean;

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

533: open cur_mean(k_lines_rec.ste_code);
534: fetch cur_mean into l_status_meaning;
535: close cur_mean;
536:
537: OKC_API.set_message(p_app_name => g_app_name,
538: p_msg_name => 'OKC_INVALID_K_STATUS',
539: p_token1 => 'NUMBER',
540: p_token1_value => k_lines_rec.line_number||' - '||k_lines_rec.item_description,
541: p_token3 => 'STATUS',

Line 547: x_return_status := OKC_API.G_RET_STS_ERROR;

543:
544: RAISE G_EXCEPTION_HALT_VALIDATION;
545: ELSIF k_lines_rec.date_terminated is not null THEN
546:
547: x_return_status := OKC_API.G_RET_STS_ERROR;
548:
549: OKC_API.set_message(p_app_name => g_app_name,
550: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
551: p_token1 => 'NUMBER',

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

545: ELSIF k_lines_rec.date_terminated is not null THEN
546:
547: x_return_status := OKC_API.G_RET_STS_ERROR;
548:
549: OKC_API.set_message(p_app_name => g_app_name,
550: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
551: p_token1 => 'NUMBER',
552: p_token1_value => k_lines_rec.line_number||' - '|| k_lines_rec.item_description );
553:

Line 557: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

553:
554: RAISE G_EXCEPTION_HALT_VALIDATION;
555: END IF;
556:
557: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
558: If (p_extend_in_parameters_rec.p_end_date is null) And
559: ((p_extend_in_parameters_rec.p_uom_code is null) Or
560: (p_extend_in_parameters_rec.p_duration is null)) Then
561:

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

558: If (p_extend_in_parameters_rec.p_end_date is null) And
559: ((p_extend_in_parameters_rec.p_uom_code is null) Or
560: (p_extend_in_parameters_rec.p_duration is null)) Then
561:
562: OKC_API.set_message(p_app_name => g_app_name,
563: p_msg_name => 'OKC_INVALID_PARAMETERS');
564:
565: x_return_status := OKC_API.g_ret_sts_error;
566: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 565: x_return_status := OKC_API.g_ret_sts_error;

561:
562: OKC_API.set_message(p_app_name => g_app_name,
563: p_msg_name => 'OKC_INVALID_PARAMETERS');
564:
565: x_return_status := OKC_API.g_ret_sts_error;
566: RAISE G_EXCEPTION_HALT_VALIDATION;
567: End If;
568: End If;
569:

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

569:
570: IF (p_extend_in_parameters_rec.p_end_date is not null) THEN
571: IF p_extend_in_parameters_rec.p_end_date < k_lines_rec.end_date THEN
572:
573: OKC_API.set_message(p_app_name => g_app_name,
574: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
575:
576: x_return_status := OKC_API.g_ret_sts_error;
577: end IF;

Line 576: x_return_status := OKC_API.g_ret_sts_error;

572:
573: OKC_API.set_message(p_app_name => g_app_name,
574: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
575:
576: x_return_status := OKC_API.g_ret_sts_error;
577: end IF;
578: end IF;
579:
580: EXCEPTION

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

580: EXCEPTION
581: WHEN G_EXCEPTION_HALT_VALIDATION THEN
582: null;
583: WHEN OTHERS THEN
584: OKC_API.set_message(p_app_name => g_app_name,
585: p_msg_name => g_unexpected_error,
586: p_token1 => g_sqlcode_token,
587: p_token1_value => sqlcode,
588: p_token2 => g_sqlerrm_token,

Line 591: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

587: p_token1_value => sqlcode,
588: p_token2 => g_sqlerrm_token,
589: p_token2_value => sqlerrm);
590:
591: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
592:
593: end validate_cle;
594:
595: PROCEDURE update_enddate( p_api_version IN NUMBER,

Line 631: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

627:
628: l_cle_rec okc_contract_pub.clev_rec_type;
629: i_cle_rec okc_contract_pub.clev_rec_type;
630:
631: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
632: l_api_name constant varchar2(30) := 'update_enddate';
633: l_status_code okc_statuses_v.ste_code%type;
634:
635: BEGIN

Line 637: x_return_status := OKC_API.G_RET_STS_SUCCESS;

633: l_status_code okc_statuses_v.ste_code%type;
634:
635: BEGIN
636:
637: x_return_status := OKC_API.G_RET_STS_SUCCESS;
638:
639: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
640: p_init_msg_list,
641: '_PROCESS',

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

635: BEGIN
636:
637: x_return_status := OKC_API.G_RET_STS_SUCCESS;
638:
639: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
640: p_init_msg_list,
641: '_PROCESS',
642: x_return_status);
643:

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

640: p_init_msg_list,
641: '_PROCESS',
642: x_return_status);
643:
644: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;

Line 645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

641: '_PROCESS',
642: x_return_status);
643:
644: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:

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

642: x_return_status);
643:
644: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:
650:

Line 647: RAISE OKC_API.G_EXCEPTION_ERROR;

643:
644: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
645: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
646: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
647: RAISE OKC_API.G_EXCEPTION_ERROR;
648: END IF;
649:
650:
651: -- The following check is required because this PROCEDURE will be called when a line or a contract

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

667: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
668: p_status_type => 'ACTIVE',
669: x_status_code => l_status_code );
670:
671: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: raise OKC_API.G_EXCEPTION_ERROR;
675: END IF;

Line 672: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

668: p_status_type => 'ACTIVE',
669: x_status_code => l_status_code );
670:
671: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: raise OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:

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

669: x_status_code => l_status_code );
670:
671: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: raise OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:
677: l_chr_rec.sts_code := l_status_code;

Line 674: raise OKC_API.G_EXCEPTION_ERROR;

670:
671: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
672: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
673: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
674: raise OKC_API.G_EXCEPTION_ERROR;
675: END IF;
676:
677: l_chr_rec.sts_code := l_status_code;
678: --

Line 691: p_init_msg_list => OKC_API.G_FALSE,

687:
688: END IF;
689: END IF;
690: OKC_CONTRACT_PUB.update_contract_header ( p_api_version => 1,
691: p_init_msg_list => OKC_API.G_FALSE,
692: x_return_status => l_return_status,
693: x_msg_count => x_msg_count,
694: x_msg_data => x_msg_data,
695: p_restricted_update => okc_api.g_true,

Line 695: p_restricted_update => okc_api.g_true,

691: p_init_msg_list => OKC_API.G_FALSE,
692: x_return_status => l_return_status,
693: x_msg_count => x_msg_count,
694: x_msg_data => x_msg_data,
695: p_restricted_update => okc_api.g_true,
696: p_chrv_rec => l_chr_rec,
697: x_chrv_rec => i_chr_rec );
698:
699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

Line 699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

695: p_restricted_update => okc_api.g_true,
696: p_chrv_rec => l_chr_rec,
697: x_chrv_rec => i_chr_rec );
698:
699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;

Line 700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

696: p_chrv_rec => l_chr_rec,
697: x_chrv_rec => i_chr_rec );
698:
699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:

Line 701: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

697: x_chrv_rec => i_chr_rec );
698:
699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:
705:

Line 702: RAISE OKC_API.G_EXCEPTION_ERROR;

698:
699: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
700: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
701: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
702: RAISE OKC_API.G_EXCEPTION_ERROR;
703: END IF;
704:
705:
706: FOR k_main_rec in cur_k_lines

Line 710: l_status_code:=OKC_API.G_MISS_CHAR;

706: FOR k_main_rec in cur_k_lines
707: LOOP
708: FOR k_lines_rec in cur_k_sublines(k_main_rec.id)
709: LOOP
710: l_status_code:=OKC_API.G_MISS_CHAR;
711: OPEN cur_status(k_lines_rec.sts_code);
712: FETCH cur_status into l_status_code;
713: CLOSE cur_status;
714:

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

733: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
734: p_status_type => 'ACTIVE',
735: x_status_code => l_status_code );
736:
737: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: raise OKC_API.G_EXCEPTION_ERROR;
741: END IF;

Line 738: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

734: p_status_type => 'ACTIVE',
735: x_status_code => l_status_code );
736:
737: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: raise OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:

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

735: x_status_code => l_status_code );
736:
737: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: raise OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:
743: l_cle_rec.sts_code := l_status_code;

Line 740: raise OKC_API.G_EXCEPTION_ERROR;

736:
737: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
738: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
739: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
740: raise OKC_API.G_EXCEPTION_ERROR;
741: END IF;
742:
743: l_cle_rec.sts_code := l_status_code;
744:

Line 753: p_init_msg_list => OKC_API.G_FALSE,

749: --
750: l_cle_rec.call_action_asmblr := 'N';
751:
752: OKC_CONTRACT_PUB.update_contract_line ( p_api_version => 1,
753: p_init_msg_list => OKC_API.G_FALSE,
754: x_return_status => l_return_status,
755: x_msg_count => x_msg_count,
756: x_msg_data => x_msg_data,
757: p_restricted_update => okc_api.g_true,

Line 757: p_restricted_update => okc_api.g_true,

753: p_init_msg_list => OKC_API.G_FALSE,
754: x_return_status => l_return_status,
755: x_msg_count => x_msg_count,
756: x_msg_data => x_msg_data,
757: p_restricted_update => okc_api.g_true,
758: p_clev_rec => l_cle_rec,
759: x_clev_rec => i_cle_rec );
760:
761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

Line 761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

757: p_restricted_update => okc_api.g_true,
758: p_clev_rec => l_cle_rec,
759: x_clev_rec => i_cle_rec );
760:
761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
763: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
764: RAISE OKC_API.G_EXCEPTION_ERROR;
765: END IF;

Line 762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

758: p_clev_rec => l_cle_rec,
759: x_clev_rec => i_cle_rec );
760:
761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
763: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
764: RAISE OKC_API.G_EXCEPTION_ERROR;
765: END IF;
766: END IF;

Line 763: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

759: x_clev_rec => i_cle_rec );
760:
761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
763: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
764: RAISE OKC_API.G_EXCEPTION_ERROR;
765: END IF;
766: END IF;
767:

Line 764: RAISE OKC_API.G_EXCEPTION_ERROR;

760:
761: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
763: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
764: RAISE OKC_API.G_EXCEPTION_ERROR;
765: END IF;
766: END IF;
767:
768: END LOOP;

Line 771: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

767:
768: END LOOP;
769: END LOOP;
770:
771: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
772:
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 774: WHEN OKC_API.G_EXCEPTION_ERROR THEN

770:
771: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
772:
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (l_api_name,
777: G_PKG_NAME,
778: 'OKC_API.G_RET_STS_ERROR',

Line 775: x_return_status := OKC_API.HANDLE_EXCEPTIONS

771: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
772:
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (l_api_name,
777: G_PKG_NAME,
778: 'OKC_API.G_RET_STS_ERROR',
779: x_msg_count,

Line 778: 'OKC_API.G_RET_STS_ERROR',

774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (l_api_name,
777: G_PKG_NAME,
778: 'OKC_API.G_RET_STS_ERROR',
779: x_msg_count,
780: x_msg_data,
781: '_PROCESS');
782: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 782: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

778: 'OKC_API.G_RET_STS_ERROR',
779: x_msg_count,
780: x_msg_data,
781: '_PROCESS');
782: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
783: x_return_status := OKC_API.HANDLE_EXCEPTIONS
784: (l_api_name,
785: G_PKG_NAME,
786: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 783: x_return_status := OKC_API.HANDLE_EXCEPTIONS

779: x_msg_count,
780: x_msg_data,
781: '_PROCESS');
782: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
783: x_return_status := OKC_API.HANDLE_EXCEPTIONS
784: (l_api_name,
785: G_PKG_NAME,
786: 'OKC_API.G_RET_STS_UNEXP_ERROR',
787: x_msg_count,

Line 786: 'OKC_API.G_RET_STS_UNEXP_ERROR',

782: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
783: x_return_status := OKC_API.HANDLE_EXCEPTIONS
784: (l_api_name,
785: G_PKG_NAME,
786: 'OKC_API.G_RET_STS_UNEXP_ERROR',
787: x_msg_count,
788: x_msg_data,
789: '_PROCESS');
790: WHEN OTHERS THEN

Line 791: x_return_status := OKC_API.HANDLE_EXCEPTIONS

787: x_msg_count,
788: x_msg_data,
789: '_PROCESS');
790: WHEN OTHERS THEN
791: x_return_status := OKC_API.HANDLE_EXCEPTIONS
792: (l_api_name,
793: G_PKG_NAME,
794: 'OTHERS',
795: x_msg_count,

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

818:
819: E_Resource_Busy EXCEPTION;
820: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
821:
822: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
823: l_api_name constant varchar2(30) := 'update_conditions';
824:
825: BEGIN
826: x_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 826: x_return_status := OKC_API.G_RET_STS_SUCCESS;

822: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
823: l_api_name constant varchar2(30) := 'update_conditions';
824:
825: BEGIN
826: x_return_status := OKC_API.G_RET_STS_SUCCESS;
827:
828: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
829: p_init_msg_list,
830: '_PROCESS',

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

824:
825: BEGIN
826: x_return_status := OKC_API.G_RET_STS_SUCCESS;
827:
828: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
829: p_init_msg_list,
830: '_PROCESS',
831: x_return_status);
832:

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

829: p_init_msg_list,
830: '_PROCESS',
831: x_return_status);
832:
833: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
834: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
835: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
836: RAISE OKC_API.G_EXCEPTION_ERROR;
837: END IF;

Line 834: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

830: '_PROCESS',
831: x_return_status);
832:
833: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
834: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
835: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
836: RAISE OKC_API.G_EXCEPTION_ERROR;
837: END IF;
838:

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

831: x_return_status);
832:
833: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
834: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
835: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
836: RAISE OKC_API.G_EXCEPTION_ERROR;
837: END IF;
838:
839:

Line 836: RAISE OKC_API.G_EXCEPTION_ERROR;

832:
833: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
834: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
835: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
836: RAISE OKC_API.G_EXCEPTION_ERROR;
837: END IF;
838:
839:
840: FOR conditions_rec in cur_condition_headers LOOP

Line 851: p_init_msg_list => OKC_API.G_FALSE,

847:
848: l_cnh_rec.date_inactive := p_new_end_date;
849:
850: okc_conditions_pub.update_cond_hdrs( p_api_version => 1,
851: p_init_msg_list => OKC_API.G_FALSE,
852: x_return_status => l_return_status,
853: x_msg_count => x_msg_count,
854: x_msg_data => x_msg_data,
855: p_cnhv_rec => l_cnh_rec,

Line 860: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

856: x_cnhv_rec => i_cnh_rec);
857: IF (l_debug = 'Y') THEN
858: okc_debug.set_trace_off;
859: END IF;
860: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;

Line 861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

857: IF (l_debug = 'Y') THEN
858: okc_debug.set_trace_off;
859: END IF;
860: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865:

Line 862: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

858: okc_debug.set_trace_off;
859: END IF;
860: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865:
866: end LOOP;

Line 863: RAISE OKC_API.G_EXCEPTION_ERROR;

859: END IF;
860: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865:
866: end LOOP;
867: IF (l_debug = 'Y') THEN

Line 870: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

866: end LOOP;
867: IF (l_debug = 'Y') THEN
868: okc_debug.set_trace_on;
869: END IF;
870: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
871:
872: EXCEPTION
873: WHEN E_Resource_Busy THEN
874: IF (l_debug = 'Y') THEN

Line 877: x_return_status := okc_api.g_ret_sts_error;

873: WHEN E_Resource_Busy THEN
874: IF (l_debug = 'Y') THEN
875: okc_debug.set_trace_on;
876: END IF;
877: x_return_status := okc_api.g_ret_sts_error;
878:
879: OKC_API.set_message(G_FND_APP,
880: G_FORM_UNABLE_TO_RESERVE_REC);
881: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;

Line 879: OKC_API.set_message(G_FND_APP,

875: okc_debug.set_trace_on;
876: END IF;
877: x_return_status := okc_api.g_ret_sts_error;
878:
879: OKC_API.set_message(G_FND_APP,
880: G_FORM_UNABLE_TO_RESERVE_REC);
881: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
882:
883: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 883: WHEN OKC_API.G_EXCEPTION_ERROR THEN

879: OKC_API.set_message(G_FND_APP,
880: G_FORM_UNABLE_TO_RESERVE_REC);
881: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
882:
883: WHEN OKC_API.G_EXCEPTION_ERROR THEN
884: IF (l_debug = 'Y') THEN
885: okc_debug.set_trace_on;
886: END IF;
887: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 887: x_return_status := OKC_API.HANDLE_EXCEPTIONS

883: WHEN OKC_API.G_EXCEPTION_ERROR THEN
884: IF (l_debug = 'Y') THEN
885: okc_debug.set_trace_on;
886: END IF;
887: x_return_status := OKC_API.HANDLE_EXCEPTIONS
888: (l_api_name,
889: G_PKG_NAME,
890: 'OKC_API.G_RET_STS_ERROR',
891: x_msg_count,

Line 890: 'OKC_API.G_RET_STS_ERROR',

886: END IF;
887: x_return_status := OKC_API.HANDLE_EXCEPTIONS
888: (l_api_name,
889: G_PKG_NAME,
890: 'OKC_API.G_RET_STS_ERROR',
891: x_msg_count,
892: x_msg_data,
893: '_PROCESS');
894:

Line 895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

891: x_msg_count,
892: x_msg_data,
893: '_PROCESS');
894:
895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
896: IF (l_debug = 'Y') THEN
897: okc_debug.set_trace_on;
898: END IF;
899: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 899: x_return_status := OKC_API.HANDLE_EXCEPTIONS

895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
896: IF (l_debug = 'Y') THEN
897: okc_debug.set_trace_on;
898: END IF;
899: x_return_status := OKC_API.HANDLE_EXCEPTIONS
900: (l_api_name,
901: G_PKG_NAME,
902: 'OKC_API.G_RET_STS_UNEXP_ERROR',
903: x_msg_count,

Line 902: 'OKC_API.G_RET_STS_UNEXP_ERROR',

898: END IF;
899: x_return_status := OKC_API.HANDLE_EXCEPTIONS
900: (l_api_name,
901: G_PKG_NAME,
902: 'OKC_API.G_RET_STS_UNEXP_ERROR',
903: x_msg_count,
904: x_msg_data,
905: '_PROCESS');
906: WHEN OTHERS THEN

Line 910: x_return_status := OKC_API.HANDLE_EXCEPTIONS

906: WHEN OTHERS THEN
907: IF (l_debug = 'Y') THEN
908: okc_debug.set_trace_on;
909: END IF;
910: x_return_status := OKC_API.HANDLE_EXCEPTIONS
911: (l_api_name,
912: G_PKG_NAME,
913: 'OTHERS',
914: x_msg_count,

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

926: p_tve_id_limited IN NUMBER,
927: p_tve_type IN VARCHAR2,
928: p_new_end_date IN DATE ) is
929:
930: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
931:
932: l_tavv_ext_rec OKC_TIME_PUB.tavv_rec_type;
933: i_tavv_ext_rec OKC_TIME_PUB.tavv_rec_type;
934:

Line 956: OKC_API.init_msg_list(p_init_msg_list);

952:
953: BEGIN
954: --dbms_output.put_line('update time (+)');
955: --dbms_output.put_line('p_new_end_date'||p_new_end_date);
956: OKC_API.init_msg_list(p_init_msg_list);
957:
958: x_return_status := OKC_API.G_RET_STS_SUCCESS;
959:
960: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 958: x_return_status := OKC_API.G_RET_STS_SUCCESS;

954: --dbms_output.put_line('update time (+)');
955: --dbms_output.put_line('p_new_end_date'||p_new_end_date);
956: OKC_API.init_msg_list(p_init_msg_list);
957:
958: x_return_status := OKC_API.G_RET_STS_SUCCESS;
959:
960: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
961: p_init_msg_list,
962: '_PROCESS',

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

956: OKC_API.init_msg_list(p_init_msg_list);
957:
958: x_return_status := OKC_API.G_RET_STS_SUCCESS;
959:
960: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
961: p_init_msg_list,
962: '_PROCESS',
963: x_return_status);
964:

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

961: p_init_msg_list,
962: '_PROCESS',
963: x_return_status);
964:
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;

Line 966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

962: '_PROCESS',
963: x_return_status);
964:
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:

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

963: x_return_status);
964:
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:
971: IF p_tve_type = 'ISE' THEN

Line 968: RAISE OKC_API.G_EXCEPTION_ERROR;

964:
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970:
971: IF p_tve_type = 'ISE' THEN
972: --dbms_output.put_line('ISE');

Line 988: p_init_msg_list => OKC_API.G_FALSE,

984: l_isev_rec.object_version_number := l_object_version_number;
985: l_isev_rec.end_date := p_new_end_date;
986:
987: OKC_TIME_PUB.lock_ia_startend(p_api_version => 1,
988: p_init_msg_list => OKC_API.G_FALSE,
989: x_return_status => l_return_status,
990: x_msg_count => x_msg_count,
991: x_msg_data => x_msg_data,
992: p_isev_ext_rec => l_isev_rec );

Line 995: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

991: x_msg_data => x_msg_data,
992: p_isev_ext_rec => l_isev_rec );
993:
994:
995: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
997: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
998: RAISE OKC_API.G_EXCEPTION_ERROR;
999: END IF;

Line 996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

992: p_isev_ext_rec => l_isev_rec );
993:
994:
995: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
997: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
998: RAISE OKC_API.G_EXCEPTION_ERROR;
999: END IF;
1000:

Line 997: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

993:
994:
995: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
997: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
998: RAISE OKC_API.G_EXCEPTION_ERROR;
999: END IF;
1000:
1001: OKC_TIME_PUB.update_ia_startend(p_api_version => 1,

Line 998: RAISE OKC_API.G_EXCEPTION_ERROR;

994:
995: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
997: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
998: RAISE OKC_API.G_EXCEPTION_ERROR;
999: END IF;
1000:
1001: OKC_TIME_PUB.update_ia_startend(p_api_version => 1,
1002: p_init_msg_list => OKC_API.G_FALSE,

Line 1002: p_init_msg_list => OKC_API.G_FALSE,

998: RAISE OKC_API.G_EXCEPTION_ERROR;
999: END IF;
1000:
1001: OKC_TIME_PUB.update_ia_startend(p_api_version => 1,
1002: p_init_msg_list => OKC_API.G_FALSE,
1003: x_return_status => l_return_status,
1004: x_msg_count => x_msg_count,
1005: x_msg_data => x_msg_data,
1006: p_isev_ext_rec => l_isev_rec,

Line 1009: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1005: x_msg_data => x_msg_data,
1006: p_isev_ext_rec => l_isev_rec,
1007: x_isev_ext_rec => i_isev_rec );
1008:
1009: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1011: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1012: RAISE OKC_API.G_EXCEPTION_ERROR;
1013: END IF;

Line 1010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1006: p_isev_ext_rec => l_isev_rec,
1007: x_isev_ext_rec => i_isev_rec );
1008:
1009: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1011: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1012: RAISE OKC_API.G_EXCEPTION_ERROR;
1013: END IF;
1014:

Line 1011: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1007: x_isev_ext_rec => i_isev_rec );
1008:
1009: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1011: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1012: RAISE OKC_API.G_EXCEPTION_ERROR;
1013: END IF;
1014:
1015: end IF; -- cur_is_ise

Line 1012: RAISE OKC_API.G_EXCEPTION_ERROR;

1008:
1009: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1011: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1012: RAISE OKC_API.G_EXCEPTION_ERROR;
1013: END IF;
1014:
1015: end IF; -- cur_is_ise
1016:

Line 1036: p_init_msg_list => okc_api.g_false,

1032: l_tavv_ext_rec.datetime := p_new_end_date;
1033:
1034:
1035: OKC_TIME_PUB.lock_tpa_value( p_api_version => 1,
1036: p_init_msg_list => okc_api.g_false,
1037: x_return_status => l_return_status,
1038: x_msg_count => x_msg_count,
1039: x_msg_data => x_msg_data,
1040: p_tavv_rec => l_tavv_ext_rec );

Line 1043: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1039: x_msg_data => x_msg_data,
1040: p_tavv_rec => l_tavv_ext_rec );
1041:
1042:
1043: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1044: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1045: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1046: RAISE OKC_API.G_EXCEPTION_ERROR;
1047: END IF;

Line 1044: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1040: p_tavv_rec => l_tavv_ext_rec );
1041:
1042:
1043: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1044: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1045: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1046: RAISE OKC_API.G_EXCEPTION_ERROR;
1047: END IF;
1048:

Line 1045: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1041:
1042:
1043: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1044: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1045: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1046: RAISE OKC_API.G_EXCEPTION_ERROR;
1047: END IF;
1048:
1049:

Line 1046: RAISE OKC_API.G_EXCEPTION_ERROR;

1042:
1043: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1044: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1045: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1046: RAISE OKC_API.G_EXCEPTION_ERROR;
1047: END IF;
1048:
1049:
1050: OKC_TIME_PUB.update_tpa_value(p_api_version => 1,

Line 1051: p_init_msg_list => okc_api.g_false,

1047: END IF;
1048:
1049:
1050: OKC_TIME_PUB.update_tpa_value(p_api_version => 1,
1051: p_init_msg_list => okc_api.g_false,
1052: x_return_status => l_return_status,
1053: x_msg_count => x_msg_count,
1054: x_msg_data => x_msg_data,
1055: p_tavv_rec => l_tavv_ext_rec,

Line 1059: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1055: p_tavv_rec => l_tavv_ext_rec,
1056: x_tavv_rec => i_tavv_ext_rec );
1057:
1058:
1059: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1061: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1062: RAISE OKC_API.G_EXCEPTION_ERROR;
1063: END IF;

Line 1060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1056: x_tavv_rec => i_tavv_ext_rec );
1057:
1058:
1059: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1061: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1062: RAISE OKC_API.G_EXCEPTION_ERROR;
1063: END IF;
1064: END IF;

Line 1061: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1057:
1058:
1059: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1061: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1062: RAISE OKC_API.G_EXCEPTION_ERROR;
1063: END IF;
1064: END IF;
1065:

Line 1062: RAISE OKC_API.G_EXCEPTION_ERROR;

1058:
1059: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1060: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1061: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1062: RAISE OKC_API.G_EXCEPTION_ERROR;
1063: END IF;
1064: END IF;
1065:
1066: CLOSE cur_time_values;

Line 1081: p_init_msg_list => OKC_API.G_FALSE,

1077: l_isev_rec.object_version_number := l_object_version_number;
1078: l_isev_rec.end_date := p_new_end_date;
1079:
1080: OKC_TIME_PUB.lock_ia_startend(p_api_version => 1,
1081: p_init_msg_list => OKC_API.G_FALSE,
1082: x_return_status => l_return_status,
1083: x_msg_count => x_msg_count,
1084: x_msg_data => x_msg_data,
1085: p_isev_ext_rec => l_isev_rec );

Line 1088: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1084: x_msg_data => x_msg_data,
1085: p_isev_ext_rec => l_isev_rec );
1086:
1087:
1088: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;

Line 1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1085: p_isev_ext_rec => l_isev_rec );
1086:
1087:
1088: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093:

Line 1090: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1086:
1087:
1088: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093:
1094:

Line 1091: RAISE OKC_API.G_EXCEPTION_ERROR;

1087:
1088: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1089: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1090: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1091: RAISE OKC_API.G_EXCEPTION_ERROR;
1092: END IF;
1093:
1094:
1095: OKC_TIME_PUB.update_ia_startend(p_api_version => 1,

Line 1096: p_init_msg_list => OKC_API.G_FALSE,

1092: END IF;
1093:
1094:
1095: OKC_TIME_PUB.update_ia_startend(p_api_version => 1,
1096: p_init_msg_list => OKC_API.G_FALSE,
1097: x_return_status => l_return_status,
1098: x_msg_count => x_msg_count,
1099: x_msg_data => x_msg_data,
1100: p_isev_ext_rec => l_isev_rec,

Line 1103: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1099: x_msg_data => x_msg_data,
1100: p_isev_ext_rec => l_isev_rec,
1101: x_isev_ext_rec => i_isev_rec );
1102:
1103: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1104: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1105: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1106: RAISE OKC_API.G_EXCEPTION_ERROR;
1107: END IF;

Line 1104: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1100: p_isev_ext_rec => l_isev_rec,
1101: x_isev_ext_rec => i_isev_rec );
1102:
1103: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1104: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1105: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1106: RAISE OKC_API.G_EXCEPTION_ERROR;
1107: END IF;
1108:

Line 1105: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1101: x_isev_ext_rec => i_isev_rec );
1102:
1103: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1104: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1105: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1106: RAISE OKC_API.G_EXCEPTION_ERROR;
1107: END IF;
1108:
1109: END IF;

Line 1106: RAISE OKC_API.G_EXCEPTION_ERROR;

1102:
1103: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1104: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1105: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1106: RAISE OKC_API.G_EXCEPTION_ERROR;
1107: END IF;
1108:
1109: END IF;
1110:

Line 1115: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1111: CLOSE cur_time_values;
1112:
1113: END IF;
1114:
1115: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1116: --dbms_output.put_line('update time (-) ');
1117: EXCEPTION
1118: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1119: IF cur_time_values%isOPEN THEN

Line 1118: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1114:
1115: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1116: --dbms_output.put_line('update time (-) ');
1117: EXCEPTION
1118: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1119: IF cur_time_values%isOPEN THEN
1120: CLOSE cur_time_values;
1121: end IF;
1122: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1122: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1118: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1119: IF cur_time_values%isOPEN THEN
1120: CLOSE cur_time_values;
1121: end IF;
1122: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1123: (l_api_name,
1124: G_PKG_NAME,
1125: 'OKC_API.G_RET_STS_ERROR',
1126: x_msg_count,

Line 1125: 'OKC_API.G_RET_STS_ERROR',

1121: end IF;
1122: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1123: (l_api_name,
1124: G_PKG_NAME,
1125: 'OKC_API.G_RET_STS_ERROR',
1126: x_msg_count,
1127: x_msg_data,
1128: '_PROCESS');
1129: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1129: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1125: 'OKC_API.G_RET_STS_ERROR',
1126: x_msg_count,
1127: x_msg_data,
1128: '_PROCESS');
1129: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1130:
1131: IF cur_time_values%isOPEN THEN
1132: CLOSE cur_time_values;
1133: end IF;

Line 1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1130:
1131: IF cur_time_values%isOPEN THEN
1132: CLOSE cur_time_values;
1133: end IF;
1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1135: (l_api_name,
1136: G_PKG_NAME,
1137: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1138: x_msg_count,

Line 1137: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1133: end IF;
1134: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1135: (l_api_name,
1136: G_PKG_NAME,
1137: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1138: x_msg_count,
1139: x_msg_data,
1140: '_PROCESS');
1141: WHEN OTHERS THEN

Line 1145: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1141: WHEN OTHERS THEN
1142: IF cur_time_values%isOPEN THEN
1143: CLOSE cur_time_values;
1144: end IF;
1145: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1146: (l_api_name,
1147: G_PKG_NAME,
1148: 'OTHERS',
1149: x_msg_count,

Line 1216: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

1212: and sts.ste_code in ('ACTIVE','EXPIRED','ENTERED','SIGNED')
1213: and date_terminated is null;
1214:
1215: l_extend_in_parameters_rec extend_in_parameters_rec := p_extend_in_parameters_rec;
1216: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
1217:
1218: l_api_name constant varchar2(30) := 'extend_chr';
1219: l_new_end_date date;
1220:

Line 1252: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1248: -- Cursor created to get the PDF_ID for Class 'SERVICE'
1249:
1250: BEGIN
1251:
1252: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1253:
1254: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1255: p_init_msg_list,
1256: '_PROCESS',

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

1250: BEGIN
1251:
1252: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1253:
1254: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1255: p_init_msg_list,
1256: '_PROCESS',
1257: x_return_status);
1258:

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

1255: p_init_msg_list,
1256: '_PROCESS',
1257: x_return_status);
1258:
1259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1262: RAISE OKC_API.G_EXCEPTION_ERROR;
1263: END IF;

Line 1260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1256: '_PROCESS',
1257: x_return_status);
1258:
1259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1262: RAISE OKC_API.G_EXCEPTION_ERROR;
1263: END IF;
1264:

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

1257: x_return_status);
1258:
1259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1262: RAISE OKC_API.G_EXCEPTION_ERROR;
1263: END IF;
1264:
1265:

Line 1262: RAISE OKC_API.G_EXCEPTION_ERROR;

1258:
1259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1262: RAISE OKC_API.G_EXCEPTION_ERROR;
1263: END IF;
1264:
1265:
1266:

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

1281: okc_debug.set_trace_off;
1282: END IF;
1283: IF cur_k_header%notfound THEN
1284:
1285: OKC_API.set_message(p_app_name => g_app_name,
1286: p_msg_name => 'OKC_K_CHANGED',
1287: p_token1 => 'CONTRACT_NUMBER',
1288: p_token1_value => p_extend_in_parameters_rec.p_contract_number,
1289: p_token2 => 'MODIFIER',

Line 1296: RAISE okc_api.g_exception_error;

1292: CLOSE cur_k_header;
1293: IF (l_debug = 'Y') THEN
1294: okc_debug.set_trace_on;
1295: END IF;
1296: RAISE okc_api.g_exception_error;
1297:
1298: END IF;
1299:
1300: CLOSE cur_k_header;

Line 1309: p_init_msg_list => OKC_API.G_FALSE,

1305:
1306: --dbms_output.put_line(' VALIDATE_CHR + ');
1307:
1308: OKC_EXTEND_PVT.validate_chr(p_api_version => 1,
1309: p_init_msg_list => OKC_API.G_FALSE,
1310: x_return_status => l_return_status,
1311: x_msg_count => x_msg_count,
1312: x_msg_data => x_msg_data,
1313: p_extend_in_parameters_rec => l_extend_in_parameters_rec);

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

1312: x_msg_data => x_msg_data,
1313: p_extend_in_parameters_rec => l_extend_in_parameters_rec);
1314: --dbms_output.put_line(' VALIDATE_CHR - ');
1315:
1316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;

Line 1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1313: p_extend_in_parameters_rec => l_extend_in_parameters_rec);
1314: --dbms_output.put_line(' VALIDATE_CHR - ');
1315:
1316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321:

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

1314: --dbms_output.put_line(' VALIDATE_CHR - ');
1315:
1316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321:
1322: -- The following commented out since this check is already done in validate_chr

Line 1319: RAISE OKC_API.G_EXCEPTION_ERROR;

1315:
1316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1319: RAISE OKC_API.G_EXCEPTION_ERROR;
1320: END IF;
1321:
1322: -- The following commented out since this check is already done in validate_chr
1323: /* IF p_extend_in_parameters_rec.p_end_date is not null THEN

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

1322: -- The following commented out since this check is already done in validate_chr
1323: /* IF p_extend_in_parameters_rec.p_end_date is not null THEN
1324: IF p_extend_in_parameters_rec.p_end_date < rec_k_header.end_date THEN
1325:
1326: OKC_API.set_message(p_app_name => g_app_name,
1327: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
1328:
1329: RAISE OKC_API.G_EXCEPTION_ERROR;
1330: END IF;

Line 1329: RAISE OKC_API.G_EXCEPTION_ERROR;

1325:
1326: OKC_API.set_message(p_app_name => g_app_name,
1327: p_msg_name => 'OKC_INVALID_EXTEND_DATE');
1328:
1329: RAISE OKC_API.G_EXCEPTION_ERROR;
1330: END IF;
1331: END IF; */
1332:
1333: -- Set the new end date. At this point since validation is done

Line 1336: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

1332:
1333: -- Set the new end date. At this point since validation is done
1334: -- assume either end_date or UOM and Duration exists
1335:
1336: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
1337: IF p_extend_in_parameters_rec.p_end_date is not null THEN
1338: l_new_end_date := p_extend_in_parameters_rec.p_end_date;
1339: else
1340: l_new_end_date := okc_time_util_pub.get_enddate(rec_k_header.end_date + 1,

Line 1355: p_init_msg_list => OKC_API.G_FALSE,

1351:
1352: --dbms_output.put_line('update_dnz_startend + ');
1353:
1354: update_enddate( p_api_version => 1,
1355: p_init_msg_list => OKC_API.G_FALSE,
1356: x_return_status => l_return_status,
1357: x_msg_count => x_msg_count,
1358: x_msg_data => x_msg_data,
1359: p_chr_rec => rec_k_header,

Line 1364: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1360: p_new_end_date => l_new_end_date );
1361:
1362: --dbms_output.put_line('update_dnz_startend - ');
1363:
1364: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1365: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1367: RAISE OKC_API.G_EXCEPTION_ERROR;
1368: END IF;

Line 1365: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1361:
1362: --dbms_output.put_line('update_dnz_startend - ');
1363:
1364: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1365: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1367: RAISE OKC_API.G_EXCEPTION_ERROR;
1368: END IF;
1369:

Line 1366: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1362: --dbms_output.put_line('update_dnz_startend - ');
1363:
1364: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1365: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1367: RAISE OKC_API.G_EXCEPTION_ERROR;
1368: END IF;
1369:
1370: end IF; ---Header

Line 1367: RAISE OKC_API.G_EXCEPTION_ERROR;

1363:
1364: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1365: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1366: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1367: RAISE OKC_API.G_EXCEPTION_ERROR;
1368: END IF;
1369:
1370: end IF; ---Header
1371:

Line 1375: p_init_msg_list => OKC_API.G_FALSE,

1371:
1372: --dbms_output.put_line(' update_condition_headers + ');
1373:
1374: update_condition_headers( p_api_version => 1,
1375: p_init_msg_list => OKC_API.G_FALSE,
1376: x_return_status => l_return_status,
1377: x_msg_count => x_msg_count,
1378: x_msg_data => x_msg_data,
1379: p_chr_id => p_extend_in_parameters_rec.p_contract_id,

Line 1385: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1381: p_new_end_date => l_new_end_date );
1382:
1383: --dbms_output.put_line(' update_condition_headers - ');
1384:
1385: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF l_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:
1383: --dbms_output.put_line(' update_condition_headers - ');
1384:
1385: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: /* Commenting out as Time Values is obsoleted*/

Line 1387: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1383: --dbms_output.put_line(' update_condition_headers - ');
1384:
1385: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: /* Commenting out as Time Values is obsoleted*/
1391: --dbms_output.put_line('RES_TIME_EXTND_K + ');

Line 1388: RAISE OKC_API.G_EXCEPTION_ERROR;

1384:
1385: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1387: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1388: RAISE OKC_API.G_EXCEPTION_ERROR;
1389: END IF;
1390: /* Commenting out as Time Values is obsoleted*/
1391: --dbms_output.put_line('RES_TIME_EXTND_K + ');
1392: /*

Line 1394: p_init_msg_list => OKC_API.G_FALSE,

1390: /* Commenting out as Time Values is obsoleted*/
1391: --dbms_output.put_line('RES_TIME_EXTND_K + ');
1392: /*
1393: OKC_TIME_RES_PUB.res_time_extnd_k( p_api_version => 1,
1394: p_init_msg_list => OKC_API.G_FALSE,
1395: x_return_status => l_return_status,
1396: p_chr_id => rec_k_header.id,
1397: p_cle_id => null,
1398: p_start_date => p_extend_in_parameters_rec.p_orig_end_date,

Line 1402: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1398: p_start_date => p_extend_in_parameters_rec.p_orig_end_date,
1399: p_end_date => l_new_end_date);
1400: --dbms_output.put_line('RES_TIME_EXTND_K - ');
1401: */
1402: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1404: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1405: RAISE OKC_API.G_EXCEPTION_ERROR;
1406: END IF;

Line 1403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1399: p_end_date => l_new_end_date);
1400: --dbms_output.put_line('RES_TIME_EXTND_K - ');
1401: */
1402: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1404: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1405: RAISE OKC_API.G_EXCEPTION_ERROR;
1406: END IF;
1407:

Line 1404: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1400: --dbms_output.put_line('RES_TIME_EXTND_K - ');
1401: */
1402: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1404: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1405: RAISE OKC_API.G_EXCEPTION_ERROR;
1406: END IF;
1407:
1408: -- ACTION ASSEMBLER

Line 1405: RAISE OKC_API.G_EXCEPTION_ERROR;

1401: */
1402: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1403: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1404: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1405: RAISE OKC_API.G_EXCEPTION_ERROR;
1406: END IF;
1407:
1408: -- ACTION ASSEMBLER
1409: open cur_header_aa;

Line 1414: p_init_msg_list => OKC_API.G_FALSE,

1410: fetch cur_header_aa into l_estimated_amount,l_scs_code,l_cls_code,l_k_status_code;
1411: close cur_header_aa;
1412:
1413: OKC_K_EXTD_ASMBLR_PVT.acn_assemble( p_api_version => 1,
1414: p_init_msg_list => OKC_API.G_FALSE,
1415: x_return_status => l_return_status,
1416: x_msg_count => x_msg_count,
1417: x_msg_data => x_msg_data,
1418: p_k_id => p_extend_in_parameters_rec.p_contract_id,

Line 1428: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1424: p_k_status_code => l_k_status_code,
1425: p_estimated_amount => l_estimated_amount,
1426: p_new_k_end_date => l_new_end_date );
1427:
1428: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1429: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1430: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1431: RAISE OKC_API.G_EXCEPTION_ERROR;
1432: END IF;

Line 1429: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1425: p_estimated_amount => l_estimated_amount,
1426: p_new_k_end_date => l_new_end_date );
1427:
1428: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1429: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1430: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1431: RAISE OKC_API.G_EXCEPTION_ERROR;
1432: END IF;
1433:

Line 1430: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1426: p_new_k_end_date => l_new_end_date );
1427:
1428: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1429: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1430: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1431: RAISE OKC_API.G_EXCEPTION_ERROR;
1432: END IF;
1433:
1434: -- Call out for External procedure provided by different classes

Line 1431: RAISE OKC_API.G_EXCEPTION_ERROR;

1427:
1428: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1429: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1430: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1431: RAISE OKC_API.G_EXCEPTION_ERROR;
1432: END IF;
1433:
1434: -- Call out for External procedure provided by different classes
1435:

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

1444: l_chr_id := p_extend_in_parameters_rec.p_contract_id;
1445: l_cle_id := NULL;
1446: proc_string := 'begin '||l_string || ' (:b1,:b2,:b3); end ;';
1447: EXECUTE IMMEDIATE proc_string using l_chr_id,l_cle_id, out l_return_status;
1448: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1449: x_return_status := l_return_status;
1450: RAISE G_EXCEPTION_HALT_VALIDATION;
1451: ELSE
1452: x_return_status := l_return_status;

Line 1460: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1456: -- End - Changes done for Bug 2648677/2346862
1457:
1458:
1459:
1460: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1461:
1462: EXCEPTION
1463:
1464: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1464: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1460: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1461:
1462: EXCEPTION
1463:
1464: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1465: IF (l_debug = 'Y') THEN
1466: okc_debug.set_trace_on;
1467: END IF;
1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1464: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1465: IF (l_debug = 'Y') THEN
1466: okc_debug.set_trace_on;
1467: END IF;
1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1469: (l_api_name,
1470: G_PKG_NAME,
1471: 'OKC_API.G_RET_STS_ERROR',
1472: x_msg_count,

Line 1471: 'OKC_API.G_RET_STS_ERROR',

1467: END IF;
1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1469: (l_api_name,
1470: G_PKG_NAME,
1471: 'OKC_API.G_RET_STS_ERROR',
1472: x_msg_count,
1473: x_msg_data,
1474: '_PROCESS');
1475:

Line 1476: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1472: x_msg_count,
1473: x_msg_data,
1474: '_PROCESS');
1475:
1476: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1477: IF (l_debug = 'Y') THEN
1478: okc_debug.set_trace_on;
1479: END IF;
1480: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1480: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1476: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1477: IF (l_debug = 'Y') THEN
1478: okc_debug.set_trace_on;
1479: END IF;
1480: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1481: (l_api_name,
1482: G_PKG_NAME,
1483: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1484: x_msg_count,

Line 1483: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1479: END IF;
1480: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1481: (l_api_name,
1482: G_PKG_NAME,
1483: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1484: x_msg_count,
1485: x_msg_data,
1486: '_PROCESS');
1487: WHEN OTHERS THEN

Line 1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1487: WHEN OTHERS THEN
1488: IF (l_debug = 'Y') THEN
1489: okc_debug.set_trace_on;
1490: END IF;
1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1492: (l_api_name,
1493: G_PKG_NAME,
1494: 'OTHERS',
1495: x_msg_count,

Line 1508: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

1504: x_msg_count OUT NOCOPY NUMBER,
1505: x_msg_data OUT NOCOPY VARCHAR2,
1506: p_extend_in_parameters_rec IN extend_in_cle_rec ) is
1507:
1508: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
1509: l_api_name constant varchar2(30) := 'extend_cle';
1510:
1511: l_new_end_date date;
1512:

Line 1580: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1576: Where cle_id = p_cle_id
1577: and lse_id in (2,13,15,20);
1578: BEGIN
1579:
1580: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1581:
1582: l_return_status := OKC_API.START_ACTIVITY( l_api_name,
1583: p_init_msg_list,
1584: '_PROCESS',

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

1578: BEGIN
1579:
1580: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1581:
1582: l_return_status := OKC_API.START_ACTIVITY( l_api_name,
1583: p_init_msg_list,
1584: '_PROCESS',
1585: x_return_status );
1586:

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

1583: p_init_msg_list,
1584: '_PROCESS',
1585: x_return_status );
1586:
1587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1590: RAISE OKC_API.G_EXCEPTION_ERROR;
1591: END IF;

Line 1588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1584: '_PROCESS',
1585: x_return_status );
1586:
1587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1590: RAISE OKC_API.G_EXCEPTION_ERROR;
1591: END IF;
1592:

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

1585: x_return_status );
1586:
1587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1590: RAISE OKC_API.G_EXCEPTION_ERROR;
1591: END IF;
1592:
1593: --dbms_output.put_line('validate cle (+) ');

Line 1590: RAISE OKC_API.G_EXCEPTION_ERROR;

1586:
1587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1590: RAISE OKC_API.G_EXCEPTION_ERROR;
1591: END IF;
1592:
1593: --dbms_output.put_line('validate cle (+) ');
1594:

Line 1596: p_init_msg_list => OKC_API.G_FALSE,

1592:
1593: --dbms_output.put_line('validate cle (+) ');
1594:
1595: OKC_EXTEND_PUB.validate_cle( p_api_version => 1,
1596: p_init_msg_list => OKC_API.G_FALSE,
1597: x_return_status => l_return_status,
1598: x_msg_count => x_msg_count,
1599: x_msg_data => x_msg_data,
1600: p_extend_in_parameters_rec => p_extend_in_parameters_rec );

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

1599: x_msg_data => x_msg_data,
1600: p_extend_in_parameters_rec => p_extend_in_parameters_rec );
1601: --dbms_output.put_line('validate cle (-) ');
1602:
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: p_extend_in_parameters_rec => p_extend_in_parameters_rec );
1601: --dbms_output.put_line('validate cle (-) ');
1602:
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: --dbms_output.put_line('validate cle (-) ');
1602:
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_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

Line 1606: RAISE OKC_API.G_EXCEPTION_ERROR;

1602:
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_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
1610: IF p_extend_in_parameters_rec.p_end_date is not null and

Line 1609: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then

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_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
1610: IF p_extend_in_parameters_rec.p_end_date is not null and
1611: p_extend_in_parameters_rec.p_end_date <> okc_api.g_miss_date THEN
1612: l_new_end_date := p_extend_in_parameters_rec.p_end_date;
1613: else

Line 1611: p_extend_in_parameters_rec.p_end_date <> okc_api.g_miss_date THEN

1607: END IF;
1608:
1609: If p_extend_in_parameters_rec.p_perpetual_flag = OKC_API.G_FALSE Then
1610: IF p_extend_in_parameters_rec.p_end_date is not null and
1611: p_extend_in_parameters_rec.p_end_date <> okc_api.g_miss_date THEN
1612: l_new_end_date := p_extend_in_parameters_rec.p_end_date;
1613: else
1614: l_new_end_date := okc_time_util_pub.get_enddate(p_extend_in_parameters_rec.p_orig_end_date + 1,
1615: p_extend_in_parameters_rec.p_uom_code,

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

1653: x_status_code => l_status_code );
1654: IF (l_debug = 'Y') THEN
1655: okc_debug.set_trace_off;
1656: END IF;
1657: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1658: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1659: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1660: raise OKC_API.G_EXCEPTION_ERROR;
1661: END IF;

Line 1658: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1654: IF (l_debug = 'Y') THEN
1655: okc_debug.set_trace_off;
1656: END IF;
1657: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1658: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1659: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1660: raise OKC_API.G_EXCEPTION_ERROR;
1661: END IF;
1662:

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

1655: okc_debug.set_trace_off;
1656: END IF;
1657: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1658: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1659: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1660: raise OKC_API.G_EXCEPTION_ERROR;
1661: END IF;
1662:
1663: l_cle_rec.sts_code := l_status_code;

Line 1660: raise OKC_API.G_EXCEPTION_ERROR;

1656: END IF;
1657: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1658: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1659: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1660: raise OKC_API.G_EXCEPTION_ERROR;
1661: END IF;
1662:
1663: l_cle_rec.sts_code := l_status_code;
1664:

Line 1674: p_init_msg_list => OKC_API.G_FALSE,

1670: l_cle_rec.call_action_asmblr := 'N';
1671:
1672:
1673: OKC_CONTRACT_PUB.update_contract_line ( p_api_version => 1,
1674: p_init_msg_list => OKC_API.G_FALSE,
1675: x_return_status => l_return_status,
1676: x_msg_count => x_msg_count,
1677: x_msg_data => x_msg_data,
1678: p_restricted_update => okc_api.g_true,

Line 1678: p_restricted_update => okc_api.g_true,

1674: p_init_msg_list => OKC_API.G_FALSE,
1675: x_return_status => l_return_status,
1676: x_msg_count => x_msg_count,
1677: x_msg_data => x_msg_data,
1678: p_restricted_update => okc_api.g_true,
1679: p_clev_rec => l_cle_rec,
1680: x_clev_rec => i_cle_rec );
1681: IF (l_debug = 'Y') THEN
1682: okc_debug.set_trace_off;

Line 1684: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1680: x_clev_rec => i_cle_rec );
1681: IF (l_debug = 'Y') THEN
1682: okc_debug.set_trace_off;
1683: END IF;
1684: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1685: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1686: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1687: RAISE OKC_API.G_EXCEPTION_ERROR;
1688: END IF;

Line 1685: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1681: IF (l_debug = 'Y') THEN
1682: okc_debug.set_trace_off;
1683: END IF;
1684: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1685: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1686: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1687: RAISE OKC_API.G_EXCEPTION_ERROR;
1688: END IF;
1689:

Line 1686: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1682: okc_debug.set_trace_off;
1683: END IF;
1684: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1685: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1686: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1687: RAISE OKC_API.G_EXCEPTION_ERROR;
1688: END IF;
1689:
1690: END IF; -- l_status

Line 1687: RAISE OKC_API.G_EXCEPTION_ERROR;

1683: END IF;
1684: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1685: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1686: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1687: RAISE OKC_API.G_EXCEPTION_ERROR;
1688: END IF;
1689:
1690: END IF; -- l_status
1691:

Line 1702: p_init_msg_list => OKC_API.G_FALSE,

1698: l_price_negotiated,l_kl_sts_code;
1699: CLOSE cur_header;
1700:
1701: OKC_KL_EXTD_ASMBLR_PVT.acn_assemble(p_api_version => 1,
1702: p_init_msg_list => OKC_API.G_FALSE,
1703: x_return_status => l_return_status,
1704: x_msg_count => x_msg_count,
1705: x_msg_data => x_msg_data,
1706: p_k_id => p_extend_in_parameters_rec.p_dnz_chr_id,

Line 1717: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1713: p_estimated_amount => l_price_negotiated,
1714: p_k_number => l_contract_number,
1715: p_k_nbr_mod => l_contract_modifier );
1716:
1717: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1719: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1720: RAISE OKC_API.G_EXCEPTION_ERROR;
1721: END IF;

Line 1718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1714: p_k_number => l_contract_number,
1715: p_k_nbr_mod => l_contract_modifier );
1716:
1717: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1719: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1720: RAISE OKC_API.G_EXCEPTION_ERROR;
1721: END IF;
1722:

Line 1719: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1715: p_k_nbr_mod => l_contract_modifier );
1716:
1717: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1719: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1720: RAISE OKC_API.G_EXCEPTION_ERROR;
1721: END IF;
1722:
1723: -- Call out for External procedure provided by different classes

Line 1720: RAISE OKC_API.G_EXCEPTION_ERROR;

1716:
1717: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1718: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1719: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1720: RAISE OKC_API.G_EXCEPTION_ERROR;
1721: END IF;
1722:
1723: -- Call out for External procedure provided by different classes
1724:

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

1733: l_chr_id := p_extend_in_parameters_rec.p_dnz_chr_id;
1734: l_cle_id := p_extend_in_parameters_rec.p_cle_id;
1735: proc_string := 'begin '||l_string || ' (:b1,:b2,:b3); end ;';
1736: EXECUTE IMMEDIATE proc_string using l_chr_id,l_cle_id, out l_return_status;
1737: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1738: x_return_status := l_return_status;
1739: RAISE G_EXCEPTION_HALT_VALIDATION;
1740: ELSE
1741: x_return_status := l_return_status;

Line 1747: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1743: END IF;
1744:
1745: -- End - Changes done for Bug 2648677/2346862
1746:
1747: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1748:
1749: EXCEPTION
1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1751: IF (l_debug = 'Y') THEN

Line 1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1746:
1747: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1748:
1749: EXCEPTION
1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1751: IF (l_debug = 'Y') THEN
1752: okc_debug.set_trace_on;
1753: END IF;
1754: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1754: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1751: IF (l_debug = 'Y') THEN
1752: okc_debug.set_trace_on;
1753: END IF;
1754: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1755: (l_api_name,
1756: G_PKG_NAME,
1757: 'OKC_API.G_RET_STS_ERROR',
1758: x_msg_count,

Line 1757: 'OKC_API.G_RET_STS_ERROR',

1753: END IF;
1754: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1755: (l_api_name,
1756: G_PKG_NAME,
1757: 'OKC_API.G_RET_STS_ERROR',
1758: x_msg_count,
1759: x_msg_data,
1760: '_PROCESS');
1761: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1761: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1757: 'OKC_API.G_RET_STS_ERROR',
1758: x_msg_count,
1759: x_msg_data,
1760: '_PROCESS');
1761: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1762: IF (l_debug = 'Y') THEN
1763: okc_debug.set_trace_on;
1764: END IF;
1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1761: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1762: IF (l_debug = 'Y') THEN
1763: okc_debug.set_trace_on;
1764: END IF;
1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1766: (l_api_name,
1767: G_PKG_NAME,
1768: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1769: x_msg_count,

Line 1768: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1764: END IF;
1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1766: (l_api_name,
1767: G_PKG_NAME,
1768: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1769: x_msg_count,
1770: x_msg_data,
1771: '_PROCESS');
1772: WHEN OTHERS THEN

Line 1776: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1772: WHEN OTHERS THEN
1773: IF (l_debug = 'Y') THEN
1774: okc_debug.set_trace_on;
1775: END IF;
1776: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1777: (l_api_name,
1778: G_PKG_NAME,
1779: 'OTHERS',
1780: x_msg_count,