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_TERMINATE_PVT dependencies on OKC_API

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

57: RETURN(TRUE);
58: End If;
59: End If;
60:
61: IF (l_mod is not null) and (l_mod <> OKC_API.G_MISS_CHAR) then
62: l_k := l_k ||'-'||l_mod;
63: END IF;
64:
65: IF l_template_yn = 'Y' then

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

62: l_k := l_k ||'-'||l_mod;
63: END IF;
64:
65: IF l_template_yn = 'Y' then
66: OKC_API.set_message(p_app_name => g_app_name,
67: p_msg_name => 'OKC_K_TEMPLATE',
68: p_token1 => 'NUMBER',
69: p_token1_value => l_k);
70: RETURN(FALSE);

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

70: RETURN(FALSE);
71: END IF;
72:
73: IF l_code = 'QA_HOLD' then
74: OKC_API.set_message(p_app_name => g_app_name,
75: p_msg_name => 'OKC_INVALID_STS',
76: p_token1 => 'component',
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','HOLD','SIGNED','EXPIRED') 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 94: OKC_API.set_message(p_app_name => g_app_name,

90: RETURN(FALSE);
91: END IF;
92: -- Added by MSENGUPT on 12/09/2001 for Bug#2143096
93: IF l_date_term IS NOT NULL Then
94: OKC_API.set_message(p_app_name => g_app_name,
95: p_msg_name => 'OKC_ALREADY_TERM');
96: RETURN(FALSE);
97: end if;
98:

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

100:
101: If okc_util.Get_All_K_Access_Level(p_application_id => l_app_id,
102: p_chr_id => p_chr_id,
103: p_scs_code => l_scs_code) <> 'U' Then
104: OKC_API.set_message(p_app_name => g_app_name,
105: p_msg_name => 'OKC_NO_UPDATE',
106: p_token1 => 'CHR',
107: p_token1_value => l_k);
108: Return(FALSE);

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

114: FETCH c_invoice into l_allow;
115: CLOSE c_invoice;
116:
117: IF l_allow <> 'Y' then
118: OKC_API.set_message(p_app_name => g_app_name,
119: p_msg_name => 'OKC_INVOICE_TERM',
120: p_token1 => 'component',
121: p_token1_value => l_k);
122: RETURN(FALSE);--------------

Line 144: l_chr_id number:=OKC_API.G_MISS_NUM;

140: l_cls_code VARCHAR2(100);
141: l_template_yn VARCHAR2(10);
142: l_code VARCHAR2(100);
143: l_hdr_code VARCHAR2(100);
144: l_chr_id number:=OKC_API.G_MISS_NUM;
145: l_app_id okc_k_headers_b.application_id%TYPE;
146: l_scs_code okc_k_headers_b.scs_code%TYPE;
147: l_k VARCHAR2(255);
148: l_mod okc_k_headers_b.contract_number_modifier%TYPE ;

Line 182: If l_chr_id=OKC_API.G_MISS_NUM then

178: OPEN c_cle;
179: FETCH c_cle INTO l_code,l_chr_id,l_no, l_date_term_cle;
180: CLOSE c_cle;
181:
182: If l_chr_id=OKC_API.G_MISS_NUM then
183: OKC_API.set_message(p_app_name => g_app_name,
184: p_msg_name => 'OKC_NO_CHR',
185: p_token1 => 'component',
186: p_token1_value => l_no);

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

179: FETCH c_cle INTO l_code,l_chr_id,l_no, l_date_term_cle;
180: CLOSE c_cle;
181:
182: If l_chr_id=OKC_API.G_MISS_NUM then
183: OKC_API.set_message(p_app_name => g_app_name,
184: p_msg_name => 'OKC_NO_CHR',
185: p_token1 => 'component',
186: p_token1_value => l_no);
187: RETURN (FALSE);

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

201: End If;
202: End If;
203:
204:
205: IF (l_mod is not null) and (l_mod <> OKC_API.G_MISS_CHAR) then
206: l_k := l_k ||'-'||l_mod;
207: END IF;
208:
209: IF l_template_yn = 'Y' then

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

206: l_k := l_k ||'-'||l_mod;
207: END IF;
208:
209: IF l_template_yn = 'Y' then
210: OKC_API.set_message(p_app_name => g_app_name,
211: p_msg_name => 'OKC_K_TEMPLATE',
212: p_token1 => 'NUMBER',
213: p_token1_value => l_k);
214: RETURN(FALSE);

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

214: RETURN(FALSE);
215: END IF;
216:
217: IF l_hdr_code = 'QA_HOLD' then
218: OKC_API.set_message(p_app_name => g_app_name,
219: p_msg_name => 'OKC_INVALID_STS',
220: p_token1 => 'component',
221: p_token1_value => l_k);
222: RETURN(FALSE);

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

226: FETCH c_sts INTO l_sts_code;
227: CLOSE c_sts;
228:
229: IF l_sts_code NOT IN ('ACTIVE','HOLD','SIGNED','EXPIRED') THEN
230: OKC_API.set_message(p_app_name => g_app_name,
231: p_msg_name => 'OKC_INVALID_STS',
232: p_token1 => 'component',
233: p_token1_value => l_no);
234: RETURN(FALSE);

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

237: -- Added by MSENGUPT on 12/09/2001 for Bug#2143096
238:
239: IF l_date_term_chr IS NOT NULL OR
240: l_date_term_cle IS NOT NULL Then
241: OKC_API.set_message(p_app_name => g_app_name,
242: p_msg_name => 'OKC_ALREADY_TERM');
243: RETURN(FALSE);
244: end if;
245: -- end of bug#2143096 -------------

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

246:
247: If okc_util.Get_All_K_Access_Level(p_application_id => l_app_id,
248: p_chr_id => l_chr_id,
249: p_scs_code => l_scs_code) <> 'U' Then
250: OKC_API.set_message(p_app_name => g_app_name,
251: p_msg_name => 'OKC_NO_UPDATE',
252: p_token1 => 'CHR',
253: p_token1_value => l_k);
254: Return(FALSE);

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

260: FETCH c_invoice into l_allow;
261: CLOSE c_invoice;
262:
263: IF l_allow <> 'Y' then
264: OKC_API.set_message(p_app_name => g_app_name,
265: p_msg_name => 'OKC_INVOICE_TERM',
266: p_token1 => 'component',
267: p_token1_value => l_no);
268: RETURN(FALSE);

Line 351: l_return_status varchar2(1) := okc_api.g_ret_sts_success;

347:
348: l_status varchar2(30); -- Impact on status
349: l_meaning okc_statuses_v.meaning%type;
350:
351: l_return_status varchar2(1) := okc_api.g_ret_sts_success;
352:
353: BEGIN
354:
355: --dbms_output.put_line(' validate_chr (+) ');

Line 357: x_return_status := okc_api.g_ret_sts_success;

353: BEGIN
354:
355: --dbms_output.put_line(' validate_chr (+) ');
356:
357: x_return_status := okc_api.g_ret_sts_success;
358:
359: okc_api.init_msg_list(p_init_msg_list);
360:
361: OPEN cur_k_header;

Line 359: okc_api.init_msg_list(p_init_msg_list);

355: --dbms_output.put_line(' validate_chr (+) ');
356:
357: x_return_status := okc_api.g_ret_sts_success;
358:
359: okc_api.init_msg_list(p_init_msg_list);
360:
361: OPEN cur_k_header;
362: FETCH cur_k_header into l_chrv_rec;
363: CLOSE cur_k_header;

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

363: CLOSE cur_k_header;
364:
365: IF l_chrv_rec.template_Yn = 'Y' THEN
366:
367: OKC_API.set_message(p_app_name => g_app_name,
368: p_msg_name => 'OKC_K_TEMPLATE',
369: p_token1 => 'NUMBER',
370: p_token1_value => l_chrv_rec.contract_number);
371:

Line 372: x_return_status := okc_api.g_ret_sts_error;

368: p_msg_name => 'OKC_K_TEMPLATE',
369: p_token1 => 'NUMBER',
370: p_token1_value => l_chrv_rec.contract_number);
371:
372: x_return_status := okc_api.g_ret_sts_error;
373: RAISE g_exception_halt_validation;
374: END if;
375:
376: OPEN is_k_locked;

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

377: FETCH is_k_locked into l_chg_request_in_process;
378:
379: IF is_k_locked%FOUND THEN
380:
381: OKC_API.set_message(p_app_name => g_app_name,
382: p_msg_name => 'OKC_K_LOCKED',
383: p_token1 => 'NUMBER',
384: p_token1_value => l_chrv_rec.contract_number);
385:

Line 386: x_return_status := okc_api.g_ret_sts_error;

382: p_msg_name => 'OKC_K_LOCKED',
383: p_token1 => 'NUMBER',
384: p_token1_value => l_chrv_rec.contract_number);
385:
386: x_return_status := okc_api.g_ret_sts_error;
387: CLOSE is_k_locked;
388: RAISE g_exception_halt_validation;
389:
390: END IF;

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

398: FETCH cur_service_requests into l_status;
399:
400: if cur_service_requests%FOUND THEN
401:
402: OKC_API.set_message(p_app_name => g_app_name,
403: p_msg_name => 'OKC_SR_PENDING',
404: p_token1 => 'NUMBER',
405: p_token1_value => l_chrv_rec.contract_number);
406:

Line 407: x_return_status := okc_api.g_ret_sts_error;

403: p_msg_name => 'OKC_SR_PENDING',
404: p_token1 => 'NUMBER',
405: p_token1_value => l_chrv_rec.contract_number);
406:
407: x_return_status := okc_api.g_ret_sts_error;
408:
409: CLOSE cur_service_requests;
410: RAISE g_exception_halt_validation;
411:

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

422: CLOSE cur_sts_code;
423:
424: IF l_status='1' then
425: --
426: OKC_API.set_message(p_app_name => g_app_name,
427: p_msg_name => 'OKC_INVALID_K_STATUS',
428: p_token1 => 'NUMBER',
429: p_token1_value => l_chrv_rec.contract_number,
430: p_token2 => 'MODIFIER',

Line 441: x_return_status := OKC_API.G_RET_STS_ERROR;

437: END IF;
438:
439: IF (l_status NOT IN ('ACTIVE','HOLD','SIGNED','EXPIRED')) OR (l_status='HOLD' and l_chrv_rec.sts_code='QA_HOLD') THEN
440:
441: x_return_status := OKC_API.G_RET_STS_ERROR;
442:
443: OKC_API.set_message(p_app_name => g_app_name,
444: p_msg_name => 'OKC_INVALID_K_STATUS',
445: p_token1 => 'NUMBER',

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

439: IF (l_status NOT IN ('ACTIVE','HOLD','SIGNED','EXPIRED')) OR (l_status='HOLD' and l_chrv_rec.sts_code='QA_HOLD') THEN
440:
441: x_return_status := OKC_API.G_RET_STS_ERROR;
442:
443: OKC_API.set_message(p_app_name => g_app_name,
444: p_msg_name => 'OKC_INVALID_K_STATUS',
445: p_token1 => 'NUMBER',
446: p_token1_value => l_chrv_rec.contract_number,
447: p_token2 => 'MODIFIER',

Line 456: x_return_status := OKC_API.G_RET_STS_ERROR;

452: RAISE g_exception_halt_validation;
453:
454: ELSIF l_chrv_rec.date_terminated is not null THEN
455:
456: x_return_status := OKC_API.G_RET_STS_ERROR;
457:
458: OKC_API.set_message(p_app_name => g_app_name,
459: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
460: p_token1 => 'NUMBER',

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

454: ELSIF l_chrv_rec.date_terminated is not null THEN
455:
456: x_return_status := OKC_API.G_RET_STS_ERROR;
457:
458: OKC_API.set_message(p_app_name => g_app_name,
459: p_msg_name => 'OKC_FUTURE_TERMINATED_K',
460: p_token1 => 'NUMBER',
461: p_token1_value => l_chrv_rec.contract_number );
462:

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

469: close cur_old_contract;
470:
471: x_return_status := 'W';
472:
473: OKC_API.set_message( p_app_name => g_app_name,
474: p_msg_name =>'OKC_RENEWED_CONTRACT_TERM',
475: -- nechatur 21-Jun-2006 Bug#5122905 Not display the original Contract and its Modifier, Only display the number and modifier of the renewed contract
476: /* p_token1 =>'NUMBER',
477: p_token1_value => l_chrv_rec.contract_number,

Line 493: x_return_status := OKC_API.G_RET_STS_ERROR;

489: IF Nvl(p_terminate_in_parameters_rec.p_orig_end_date,
490: p_terminate_in_parameters_rec.p_termination_date + 1) <
491: p_terminate_in_parameters_rec.p_termination_date then
492:
493: x_return_status := OKC_API.G_RET_STS_ERROR;
494:
495: OKC_API.set_message( p_app_name => g_app_name,
496: p_msg_name =>'OKC_TRMDATE_MORE_END'
497: );

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

491: p_terminate_in_parameters_rec.p_termination_date then
492:
493: x_return_status := OKC_API.G_RET_STS_ERROR;
494:
495: OKC_API.set_message( p_app_name => g_app_name,
496: p_msg_name =>'OKC_TRMDATE_MORE_END'
497: );
498:
499:

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

503: EXCEPTION
504: WHEN G_EXCEPTION_HALT_VALIDATION THEN
505: NULL;
506: WHEN OTHERS THEN
507: OKC_API.set_message(p_app_name => g_app_name,
508: p_msg_name => g_unexpected_error,
509: p_token1 => g_sqlcode_token,
510: p_token1_value => sqlcode,
511: p_token2 => g_sqlerrm_token,

Line 514: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

510: p_token1_value => sqlcode,
511: p_token2 => g_sqlerrm_token,
512: p_token2_value => sqlerrm);
513:
514: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
515:
516: END;
517:
518: PROCEDURE terminate_chr( p_api_version IN NUMBER,

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

638: l_scs_code okc_subclasses_v.code%type;
639: l_cls_code okc_subclasses_v.cls_code%type;
640: l_k_status_code okc_k_headers_v.sts_code%type;
641: l_estimated_amount number;
642: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
643:
644: l_api_name constant varchar2(30) := 'terminate_chr';
645:
646: l_chrv_rec okc_contract_pub.chrv_rec_type ;

Line 665: x_return_status := OKC_API.G_RET_STS_SUCCESS;

661:
662: BEGIN
663:
664: --dbms_output.put_line(' terminate_chr (+) ');
665: x_return_status := OKC_API.G_RET_STS_SUCCESS;
666:
667: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
668: p_init_msg_list,
669: '_PROCESS',

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

663:
664: --dbms_output.put_line(' terminate_chr (+) ');
665: x_return_status := OKC_API.G_RET_STS_SUCCESS;
666:
667: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
668: p_init_msg_list,
669: '_PROCESS',
670: x_return_status);
671:

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

668: p_init_msg_list,
669: '_PROCESS',
670: x_return_status);
671:
672: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
673: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
674: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
675: raise OKC_API.G_EXCEPTION_ERROR;
676: END IF;

Line 673: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

669: '_PROCESS',
670: x_return_status);
671:
672: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
673: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
674: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
675: raise OKC_API.G_EXCEPTION_ERROR;
676: END IF;
677:

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

670: x_return_status);
671:
672: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
673: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
674: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
675: raise OKC_API.G_EXCEPTION_ERROR;
676: END IF;
677:
678: OPEN cur_k_header;

Line 675: raise OKC_API.G_EXCEPTION_ERROR;

671:
672: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
673: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
674: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
675: raise OKC_API.G_EXCEPTION_ERROR;
676: END IF;
677:
678: OPEN cur_k_header;
679: FETCH cur_k_header into

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

682: rec_k_header.STS_CODE;
683:
684: if cur_k_header%NOTFOUND THEN
685:
686: OKC_API.set_message(p_app_name => g_app_name,
687: p_msg_name => 'OKC_K_CHANGED',
688: p_token1 => 'NUMBER',
689: --p_token1_value => rec_k_header.contract_number);
690: p_token1_value => p_terminate_in_parameters_rec.p_contract_number,

Line 694: x_return_status := OKC_API.G_RET_STS_ERROR;

690: p_token1_value => p_terminate_in_parameters_rec.p_contract_number,
691: p_token2 => 'MODIFIER',
692: p_token2_value => p_terminate_in_parameters_rec.p_contract_modifier);
693:
694: x_return_status := OKC_API.G_RET_STS_ERROR;
695:
696: CLOSE cur_k_header;
697:
698: raise OKC_API.G_EXCEPTION_ERROR;

Line 698: raise OKC_API.G_EXCEPTION_ERROR;

694: x_return_status := OKC_API.G_RET_STS_ERROR;
695:
696: CLOSE cur_k_header;
697:
698: raise OKC_API.G_EXCEPTION_ERROR;
699:
700: END if;
701:
702: CLOSE cur_k_header;

Line 707: p_init_msg_list => OKC_API.G_FALSE,

703:
704: --dbms_output.put_line(' validate_chr (+) ');
705:
706: OKC_TERMINATE_PVT.validate_chr(p_api_version => 1,
707: p_init_msg_list => OKC_API.G_FALSE,
708: x_return_status => l_return_status,
709: x_msg_count => x_msg_count,
710: x_msg_data => x_msg_data,
711: p_terminate_in_parameters_rec => p_terminate_in_parameters_rec);

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

713: --dbms_output.put_line(' validate_chr (-) ');
714: IF l_return_status = 'W' then
715: x_return_status := 'W';
716: end if;
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;

Line 718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

714: IF l_return_status = 'W' then
715: x_return_status := 'W';
716: end if;
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722:

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

715: x_return_status := 'W';
716: end if;
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722:
723: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,

Line 720: raise OKC_API.G_EXCEPTION_ERROR;

716: end if;
717: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
718: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
719: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
720: raise OKC_API.G_EXCEPTION_ERROR;
721: END IF;
722:
723: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
724: p_status_type => 'TERMINATED',

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

725: x_status_code => l_ter_status_code);
726: IF (l_debug = 'Y') THEN
727: okc_debug.set_trace_off;
728: END IF;
729: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
730: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
732: raise OKC_API.G_EXCEPTION_ERROR;
733: END IF;

Line 730: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

726: IF (l_debug = 'Y') THEN
727: okc_debug.set_trace_off;
728: END IF;
729: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
730: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
732: raise OKC_API.G_EXCEPTION_ERROR;
733: END IF;
734: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,

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

727: okc_debug.set_trace_off;
728: END IF;
729: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
730: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
732: raise OKC_API.G_EXCEPTION_ERROR;
733: END IF;
734: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
735: p_status_type => 'CANCELLED',

Line 732: raise OKC_API.G_EXCEPTION_ERROR;

728: END IF;
729: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
730: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
732: raise OKC_API.G_EXCEPTION_ERROR;
733: END IF;
734: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
735: p_status_type => 'CANCELLED',
736: x_status_code => l_can_status_code);

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

736: x_status_code => l_can_status_code);
737: IF (l_debug = 'Y') THEN
738: okc_debug.set_trace_off;
739: END IF;
740: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
741: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
743: raise OKC_API.G_EXCEPTION_ERROR;
744: END IF;

Line 741: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

737: IF (l_debug = 'Y') THEN
738: okc_debug.set_trace_off;
739: END IF;
740: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
741: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
743: raise OKC_API.G_EXCEPTION_ERROR;
744: END IF;
745: l_chrv_rec := rec_k_header;

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

738: okc_debug.set_trace_off;
739: END IF;
740: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
741: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
743: raise OKC_API.G_EXCEPTION_ERROR;
744: END IF;
745: l_chrv_rec := rec_k_header;
746:

Line 743: raise OKC_API.G_EXCEPTION_ERROR;

739: END IF;
740: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
741: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
742: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
743: raise OKC_API.G_EXCEPTION_ERROR;
744: END IF;
745: l_chrv_rec := rec_k_header;
746:
747: l_chrv_rec.trn_code := p_terminate_in_parameters_rec.p_termination_reason;

Line 770: p_init_msg_list => OKC_API.G_FALSE,

766: --
767: END if;
768:
769: okc_contract_pub.update_contract_header ( p_api_version => 1,
770: p_init_msg_list => OKC_API.G_FALSE,
771: x_return_status => l_return_status,
772: x_msg_count => x_msg_count,
773: x_msg_data => x_msg_data,
774: p_restricted_update => okc_api.g_true,

Line 774: p_restricted_update => okc_api.g_true,

770: p_init_msg_list => OKC_API.G_FALSE,
771: x_return_status => l_return_status,
772: x_msg_count => x_msg_count,
773: x_msg_data => x_msg_data,
774: p_restricted_update => okc_api.g_true,
775: p_chrv_rec => l_chrv_rec,
776: x_chrv_rec => i_chrv_rec );
777:
778: --dbms_output.put_line(' update_contract_header (-) ');

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

776: x_chrv_rec => i_chrv_rec );
777:
778: --dbms_output.put_line(' update_contract_header (-) ');
779:
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
782: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
783: raise OKC_API.G_EXCEPTION_ERROR;
784: END IF;

Line 781: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

777:
778: --dbms_output.put_line(' update_contract_header (-) ');
779:
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
782: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
783: raise OKC_API.G_EXCEPTION_ERROR;
784: END IF;
785:

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

778: --dbms_output.put_line(' update_contract_header (-) ');
779:
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
782: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
783: raise OKC_API.G_EXCEPTION_ERROR;
784: END IF;
785:
786: -- Bug 1473143: The loop below was after the loop to update contract

Line 783: raise OKC_API.G_EXCEPTION_ERROR;

779:
780: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
781: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
782: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
783: raise OKC_API.G_EXCEPTION_ERROR;
784: END IF;
785:
786: -- Bug 1473143: The loop below was after the loop to update contract
787: -- lines. The cursor was not working because at that point the lines

Line 812: p_init_msg_list => OKC_API.G_FALSE,

808:
809: --dbms_output.put_line(' PRE_TERMINATE_SERVICE (+) ');
810:
811: OKS_BILL_REC_PUB.pre_terminate_service ( p_api_version => 1,
812: p_init_msg_list => OKC_API.G_FALSE,
813: x_return_status => l_return_status,
814: p_calledfrom => NULL,
815: x_msg_count => x_msg_count,
816: x_msg_data => x_msg_data,

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

820: x_amount => l_amount );
821:
822: --dbms_output.put_line(' PRE_TERMINATE_SERVICE (-) ');
823:
824: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
825: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
826: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
827: raise OKC_API.G_EXCEPTION_ERROR;
828: END IF;

Line 825: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

821:
822: --dbms_output.put_line(' PRE_TERMINATE_SERVICE (-) ');
823:
824: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
825: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
826: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
827: raise OKC_API.G_EXCEPTION_ERROR;
828: END IF;
829: END LOOP;

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

822: --dbms_output.put_line(' PRE_TERMINATE_SERVICE (-) ');
823:
824: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
825: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
826: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
827: raise OKC_API.G_EXCEPTION_ERROR;
828: END IF;
829: END LOOP;
830: */

Line 827: raise OKC_API.G_EXCEPTION_ERROR;

823:
824: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
825: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
826: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
827: raise OKC_API.G_EXCEPTION_ERROR;
828: END IF;
829: END LOOP;
830: */
831: -- END if;

Line 900: p_init_msg_list => OKC_API.G_FALSE,

896:
897: --dbms_output.put_line(' update_contract_line (+) ');
898:
899: OKC_CONTRACT_PUB.update_contract_line ( p_api_version => 1,
900: p_init_msg_list => OKC_API.G_FALSE,
901: x_return_status => l_return_status,
902: x_msg_count => x_msg_count,
903: x_msg_data => x_msg_data,
904: p_restricted_update => okc_api.g_true,

Line 904: p_restricted_update => okc_api.g_true,

900: p_init_msg_list => OKC_API.G_FALSE,
901: x_return_status => l_return_status,
902: x_msg_count => x_msg_count,
903: x_msg_data => x_msg_data,
904: p_restricted_update => okc_api.g_true,
905: p_clev_rec => l_clev_rec,
906: x_clev_rec => i_clev_rec );
907: IF (l_debug = 'Y') THEN
908: okc_debug.set_trace_off;

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

908: okc_debug.set_trace_off;
909: END IF;
910: --dbms_output.put_line(' update_contract_line (-) ');
911:
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: raise OKC_API.G_EXCEPTION_ERROR;
916: END IF;

Line 913: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

909: END IF;
910: --dbms_output.put_line(' update_contract_line (-) ');
911:
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: raise OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917:

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

910: --dbms_output.put_line(' update_contract_line (-) ');
911:
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: raise OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917:
918:

Line 915: raise OKC_API.G_EXCEPTION_ERROR;

911:
912: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
913: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
914: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
915: raise OKC_API.G_EXCEPTION_ERROR;
916: END IF;
917:
918:
919: If l_lse_id = 61 Then

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

929: p_termination_date => l_clev_rec.date_terminated,
930: p_operation_code => 'TERMINATE');
931: End If;
932:
933: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
934: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
935: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
936: raise OKC_API.G_EXCEPTION_ERROR;
937: END IF;

Line 934: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

930: p_operation_code => 'TERMINATE');
931: End If;
932:
933: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
934: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
935: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
936: raise OKC_API.G_EXCEPTION_ERROR;
937: END IF;
938:

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

931: End If;
932:
933: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
934: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
935: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
936: raise OKC_API.G_EXCEPTION_ERROR;
937: END IF;
938:
939:

Line 936: raise OKC_API.G_EXCEPTION_ERROR;

932:
933: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
934: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
935: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
936: raise OKC_API.G_EXCEPTION_ERROR;
937: END IF;
938:
939:
940:

Line 972: p_init_msg_list => OKC_API.G_FALSE,

968:
969: --dbms_output.put_line(' update_cond_hdrs (+) ');
970:
971: OKC_CONDITIONS_PUB.update_cond_hdrs( p_api_version => 1,
972: p_init_msg_list => OKC_API.G_FALSE,
973: x_return_status => l_return_status,
974: x_msg_count => x_msg_count,
975: x_msg_data => x_msg_data,
976: p_cnhv_rec => l_cnh_rec,

Line 983: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

979: okc_debug.set_trace_off;
980: END IF;
981: --dbms_output.put_line(' update_cond_hdrs (-) ');
982:
983: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
984: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
986: RAISE OKC_API.G_EXCEPTION_ERROR;
987: END IF;

Line 984: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

980: END IF;
981: --dbms_output.put_line(' update_cond_hdrs (-) ');
982:
983: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
984: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
986: RAISE OKC_API.G_EXCEPTION_ERROR;
987: END IF;
988:

Line 985: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

981: --dbms_output.put_line(' update_cond_hdrs (-) ');
982:
983: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
984: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
986: RAISE OKC_API.G_EXCEPTION_ERROR;
987: END IF;
988:
989: END LOOP;

Line 986: RAISE OKC_API.G_EXCEPTION_ERROR;

982:
983: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
984: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
986: RAISE OKC_API.G_EXCEPTION_ERROR;
987: END IF;
988:
989: END LOOP;
990: IF (l_debug = 'Y') THEN

Line 1006: p_init_msg_list => OKC_API.G_FALSE,

1002:
1003: --dbms_output.put_line(' update_change_request (+) ');
1004:
1005: OKC_CHANGE_REQUEST_PUB.update_change_request( p_api_version => 1,
1006: p_init_msg_list => OKC_API.G_FALSE,
1007: x_return_status => l_return_status,
1008: x_msg_count => x_msg_count,
1009: x_msg_data => x_msg_data,
1010: p_crtv_rec => l_crtv_rec,

Line 1017: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1013: okc_debug.set_trace_off;
1014: END IF;
1015: --dbms_output.put_line(' update_change_request (-) ');
1016:
1017: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1018: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1019: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1020: RAISE OKC_API.G_EXCEPTION_ERROR;
1021: END IF;

Line 1018: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1014: END IF;
1015: --dbms_output.put_line(' update_change_request (-) ');
1016:
1017: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1018: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1019: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1020: RAISE OKC_API.G_EXCEPTION_ERROR;
1021: END IF;
1022:

Line 1019: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1015: --dbms_output.put_line(' update_change_request (-) ');
1016:
1017: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1018: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1019: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1020: RAISE OKC_API.G_EXCEPTION_ERROR;
1021: END IF;
1022:
1023: END LOOP;

Line 1020: RAISE OKC_API.G_EXCEPTION_ERROR;

1016:
1017: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1018: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1019: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1020: RAISE OKC_API.G_EXCEPTION_ERROR;
1021: END IF;
1022:
1023: END LOOP;
1024: IF (l_debug = 'Y') THEN

Line 1039: p_init_msg_list => OKC_API.G_FALSE,

1035: fetch cur_header_aa into l_estimated_amount,l_scs_code,l_cls_code,l_k_status_code;
1036: close cur_header_aa;
1037:
1038: OKC_K_TERM_ASMBLR_PVT.acn_assemble(p_api_version => 1,
1039: p_init_msg_list => OKC_API.G_FALSE,
1040: x_return_status => l_return_status,
1041: x_msg_count => x_msg_count,
1042: x_msg_data => x_msg_data,
1043: p_k_id => p_terminate_in_parameters_rec.p_contract_id,

Line 1054: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1050: p_k_status_code => l_k_status_code,
1051: p_estimated_amount => l_estimated_amount);
1052:
1053: --dbms_output.put_line(' acn_assemble (-) ');
1054: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1056: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1057: RAISE OKC_API.G_EXCEPTION_ERROR;
1058: END IF;

Line 1055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1051: p_estimated_amount => l_estimated_amount);
1052:
1053: --dbms_output.put_line(' acn_assemble (-) ');
1054: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1056: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1057: RAISE OKC_API.G_EXCEPTION_ERROR;
1058: END IF;
1059:

Line 1056: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1052:
1053: --dbms_output.put_line(' acn_assemble (-) ');
1054: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1056: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1057: RAISE OKC_API.G_EXCEPTION_ERROR;
1058: END IF;
1059:
1060: END IF;

Line 1057: RAISE OKC_API.G_EXCEPTION_ERROR;

1053: --dbms_output.put_line(' acn_assemble (-) ');
1054: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1056: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1057: RAISE OKC_API.G_EXCEPTION_ERROR;
1058: END IF;
1059:
1060: END IF;
1061:

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

1058: END IF;
1059:
1060: END IF;
1061:
1062: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1063: --dbms_output.put_line(' terminate_chr (-) ');
1064: EXCEPTION
1065: WHEN E_Resource_Busy THEN
1066: IF (l_debug = 'Y') THEN

Line 1069: x_return_status := okc_api.g_ret_sts_error;

1065: WHEN E_Resource_Busy THEN
1066: IF (l_debug = 'Y') THEN
1067: okc_debug.set_trace_on;
1068: END IF;
1069: x_return_status := okc_api.g_ret_sts_error;
1070:
1071: OKC_API.set_message(G_FND_APP,
1072: G_FORM_UNABLE_TO_RESERVE_REC);
1073: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;

Line 1071: OKC_API.set_message(G_FND_APP,

1067: okc_debug.set_trace_on;
1068: END IF;
1069: x_return_status := okc_api.g_ret_sts_error;
1070:
1071: OKC_API.set_message(G_FND_APP,
1072: G_FORM_UNABLE_TO_RESERVE_REC);
1073: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1074:
1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1071: OKC_API.set_message(G_FND_APP,
1072: G_FORM_UNABLE_TO_RESERVE_REC);
1073: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1074:
1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1076: IF (l_debug = 'Y') THEN
1077: okc_debug.set_trace_on;
1078: END IF;
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1075: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1076: IF (l_debug = 'Y') THEN
1077: okc_debug.set_trace_on;
1078: END IF;
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (l_api_name,
1081: G_PKG_NAME,
1082: 'OKC_API.G_RET_STS_ERROR',
1083: x_msg_count,

Line 1082: 'OKC_API.G_RET_STS_ERROR',

1078: END IF;
1079: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1080: (l_api_name,
1081: G_PKG_NAME,
1082: 'OKC_API.G_RET_STS_ERROR',
1083: x_msg_count,
1084: x_msg_data,
1085: '_PROCESS');
1086: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1086: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1082: 'OKC_API.G_RET_STS_ERROR',
1083: x_msg_count,
1084: x_msg_data,
1085: '_PROCESS');
1086: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1087: IF (l_debug = 'Y') THEN
1088: okc_debug.set_trace_on;
1089: END IF;
1090: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1090: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1086: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1087: IF (l_debug = 'Y') THEN
1088: okc_debug.set_trace_on;
1089: END IF;
1090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1091: (l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1094: x_msg_count,

Line 1093: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1089: END IF;
1090: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1091: (l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1094: x_msg_count,
1095: x_msg_data,
1096: '_PROCESS');
1097: WHEN OTHERS THEN

Line 1101: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1097: WHEN OTHERS THEN
1098: IF (l_debug = 'Y') THEN
1099: okc_debug.set_trace_on;
1100: END IF;
1101: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1102: (l_api_name,
1103: G_PKG_NAME,
1104: 'OTHERS',
1105: x_msg_count,

Line 1171: l_return_status varchar2(1) := okc_api.g_ret_sts_success;

1167:
1168: l_status varchar2(30) ; -- Impact on status
1169: l_meaning okc_statuses_v.meaning%type;
1170:
1171: l_return_status varchar2(1) := okc_api.g_ret_sts_success;
1172: l_dummy varchar2(1);
1173:
1174: --CURSOR cur_old_contract is
1175: --SELECT contract_number,contract_number_modifier

Line 1193: x_return_status := okc_api.g_ret_sts_success;

1189: l_k_num okc_k_headers_v.contract_number%type;
1190: l_k_mod okc_k_headers_v.contract_number_modifier%type;
1191: BEGIN
1192:
1193: x_return_status := okc_api.g_ret_sts_success;
1194:
1195: okc_api.init_msg_list(p_init_msg_list);
1196:
1197: --dbms_output.put_line('is top line (+)');

Line 1195: okc_api.init_msg_list(p_init_msg_list);

1191: BEGIN
1192:
1193: x_return_status := okc_api.g_ret_sts_success;
1194:
1195: okc_api.init_msg_list(p_init_msg_list);
1196:
1197: --dbms_output.put_line('is top line (+)');
1198:
1199:

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

1201: FETCH is_line_a_top_line into l_dummy;
1202:
1203: IF is_line_a_top_line%NOTFOUND THEN
1204:
1205: OKC_API.set_message(p_app_name => g_app_name,
1206: p_msg_name => 'OKC_CLE_NOT_TOP_LINE' ,
1207: p_token1 => 'NUMBER',
1208: p_token1_value => p_terminate_in_parameters_rec.p_line_number);
1209:

Line 1210: x_return_status := okc_api.g_ret_sts_error;

1206: p_msg_name => 'OKC_CLE_NOT_TOP_LINE' ,
1207: p_token1 => 'NUMBER',
1208: p_token1_value => p_terminate_in_parameters_rec.p_line_number);
1209:
1210: x_return_status := okc_api.g_ret_sts_error;
1211: CLOSE is_line_a_top_line;
1212: raise G_EXCEPTION_HALT_VALIDATION;
1213: END if;
1214:

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

1224: FETCH is_k_locked into l_dummy;
1225:
1226: IF is_k_locked%FOUND THEN
1227:
1228: OKC_API.set_message(p_app_name => g_app_name,
1229: p_msg_name => 'OKC_K_LOCKED',
1230: p_token1 => 'NUMBER',
1231: p_token1_value => l_chrv_rec.contract_number);
1232:

Line 1233: x_return_status := okc_api.g_ret_sts_error;

1229: p_msg_name => 'OKC_K_LOCKED',
1230: p_token1 => 'NUMBER',
1231: p_token1_value => l_chrv_rec.contract_number);
1232:
1233: x_return_status := okc_api.g_ret_sts_error;
1234: CLOSE is_k_locked;
1235: raise G_EXCEPTION_HALT_VALIDATION;
1236: END if;
1237: CLOSE is_k_locked;

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

1239: --dbms_output.put_line('is k locked (-)');
1240:
1241: If l_chrv_rec.template_Yn = 'Y' THEN
1242:
1243: OKC_API.set_message(p_app_name => g_app_name,
1244: p_msg_name => 'OKC_K_TEMPLATE',
1245: p_token1 => 'NUMBER',
1246: p_token1_value => l_chrv_rec.contract_number);
1247:

Line 1248: x_return_status := okc_api.g_ret_sts_error;

1244: p_msg_name => 'OKC_K_TEMPLATE',
1245: p_token1 => 'NUMBER',
1246: p_token1_value => l_chrv_rec.contract_number);
1247:
1248: x_return_status := okc_api.g_ret_sts_error;
1249: raise G_EXCEPTION_HALT_VALIDATION;
1250: END if;
1251:
1252: IF l_chrv_rec.sts_code='QA_HOLD' then

Line 1257: x_return_status := OKC_API.G_RET_STS_ERROR;

1253: OPEN cur_sts_code(l_chrv_rec.sts_code);
1254: FETCH cur_sts_code into l_status,l_meaning;
1255: CLOSE cur_sts_code;
1256:
1257: x_return_status := OKC_API.G_RET_STS_ERROR;
1258:
1259: OKC_API.set_message(p_app_name => g_app_name,
1260: p_msg_name => 'OKC_INVALID_K_STATUS',
1261: p_token1 => 'NUMBER',

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

1255: CLOSE cur_sts_code;
1256:
1257: x_return_status := OKC_API.G_RET_STS_ERROR;
1258:
1259: OKC_API.set_message(p_app_name => g_app_name,
1260: p_msg_name => 'OKC_INVALID_K_STATUS',
1261: p_token1 => 'NUMBER',
1262: p_token1_value => l_chrv_rec.contract_number,
1263: p_token2 => 'MODIFIER',

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

1283: FETCH cur_service_requests into l_status;
1284:
1285: IF cur_service_requests%FOUND THEN
1286:
1287: OKC_API.set_message(p_app_name => g_app_name,
1288: p_msg_name => 'OKC_SR_PENDING',
1289: p_token1 => 'NUMBER',
1290: p_token1_value => l_chrv_rec.contract_number);
1291:

Line 1292: x_return_status := okc_api.g_ret_sts_error;

1288: p_msg_name => 'OKC_SR_PENDING',
1289: p_token1 => 'NUMBER',
1290: p_token1_value => l_chrv_rec.contract_number);
1291:
1292: x_return_status := okc_api.g_ret_sts_error;
1293: CLOSE cur_service_requests;
1294: raise G_EXCEPTION_HALT_VALIDATION;
1295: END if;
1296:

Line 1313: x_return_status := OKC_API.G_RET_STS_ERROR;

1309: CLOSE cur_sts_code;
1310:
1311: IF l_status NOT IN ('ACTIVE','HOLD','SIGNED','EXPIRED') THEN
1312:
1313: x_return_status := OKC_API.G_RET_STS_ERROR;
1314:
1315: OKC_API.set_message(p_app_name => g_app_name,
1316: p_msg_name => 'OKC_INVALID_K_STATUS',
1317: p_token1 => 'NUMBER',

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

1311: IF l_status NOT IN ('ACTIVE','HOLD','SIGNED','EXPIRED') THEN
1312:
1313: x_return_status := OKC_API.G_RET_STS_ERROR;
1314:
1315: OKC_API.set_message(p_app_name => g_app_name,
1316: p_msg_name => 'OKC_INVALID_K_STATUS',
1317: p_token1 => 'NUMBER',
1318: p_token1_value => p_terminate_in_parameters_rec.p_line_number,
1319: p_token2 => 'STATUS',

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

1330: close cur_old_contract;
1331:
1332: x_return_status := 'W';
1333:
1334: OKC_API.set_message( p_app_name => g_app_name,
1335: p_msg_name =>'OKC_RENEWED_CONTRACT_TERM',
1336: -- nechatur 21-Jun-2006 Bug#5122905 Not display the original Contract and its Modifier, Only display the number and modifier of the renewed contract
1337: /* p_token1 =>'NUMBER',
1338: p_token1_value => l_chrv_rec.contract_number,

Line 1355: x_return_status := OKC_API.G_RET_STS_ERROR;

1351: IF Nvl(p_terminate_in_parameters_rec.p_orig_end_date,
1352: p_terminate_in_parameters_rec.p_termination_date + 1) <
1353: p_terminate_in_parameters_rec.p_termination_date then
1354:
1355: x_return_status := OKC_API.G_RET_STS_ERROR;
1356:
1357: OKC_API.set_message( p_app_name => g_app_name,
1358: p_msg_name =>'OKC_TRMDATE_MORE_END');
1359:

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

1353: p_terminate_in_parameters_rec.p_termination_date then
1354:
1355: x_return_status := OKC_API.G_RET_STS_ERROR;
1356:
1357: OKC_API.set_message( p_app_name => g_app_name,
1358: p_msg_name =>'OKC_TRMDATE_MORE_END');
1359:
1360:
1361: RAISE g_exception_halt_validation;

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

1363: EXCEPTION
1364: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1365: NULL;
1366: WHEN OTHERS THEN
1367: OKC_API.set_message(p_app_name => g_app_name,
1368: p_msg_name => g_unexpected_error,
1369: p_token1 => g_sqlcode_token,
1370: p_token1_value => sqlcode,
1371: p_token2 => g_sqlerrm_token,

Line 1374: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1370: p_token1_value => sqlcode,
1371: p_token2 => g_sqlerrm_token,
1372: p_token2_value => sqlerrm);
1373:
1374: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1375: END;
1376:
1377: PROCEDURE terminate_cle( p_api_version IN NUMBER,
1378: p_init_msg_list IN VARCHAR2 ,

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

1381: x_msg_data OUT NOCOPY VARCHAR2,
1382: p_terminate_in_parameters_rec IN terminate_in_cle_rec
1383: )is
1384:
1385: l_return_status varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
1386: l_api_name constant varchar2(30) := 'terminate_cle';
1387: l_dummy varchar2(1);
1388:
1389: CURSOR cur_header is

Line 1451: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1447:
1448: BEGIN
1449: --dbms_output.put_line(' terminate_cle (+) ');
1450:
1451: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1452:
1453: l_return_status := OKC_API.START_ACTIVITY( l_api_name,
1454: p_init_msg_list,
1455: '_PROCESS',

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

1449: --dbms_output.put_line(' terminate_cle (+) ');
1450:
1451: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1452:
1453: l_return_status := OKC_API.START_ACTIVITY( l_api_name,
1454: p_init_msg_list,
1455: '_PROCESS',
1456: x_return_status );
1457:

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

1454: p_init_msg_list,
1455: '_PROCESS',
1456: x_return_status );
1457:
1458: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1459: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1460: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1461: raise OKC_API.G_EXCEPTION_ERROR;
1462: END IF;

Line 1459: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1455: '_PROCESS',
1456: x_return_status );
1457:
1458: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1459: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1460: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1461: raise OKC_API.G_EXCEPTION_ERROR;
1462: END IF;
1463:

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

1456: x_return_status );
1457:
1458: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1459: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1460: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1461: raise OKC_API.G_EXCEPTION_ERROR;
1462: END IF;
1463:
1464: --dbms_output.put_line(' VALIDATE_CLE (+) ');

Line 1461: raise OKC_API.G_EXCEPTION_ERROR;

1457:
1458: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1459: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1460: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1461: raise OKC_API.G_EXCEPTION_ERROR;
1462: END IF;
1463:
1464: --dbms_output.put_line(' VALIDATE_CLE (+) ');
1465:

Line 1467: p_init_msg_list => OKC_API.G_FALSE,

1463:
1464: --dbms_output.put_line(' VALIDATE_CLE (+) ');
1465:
1466: OKC_TERMINATE_PUB.validate_cle(p_api_version => 1,
1467: p_init_msg_list => OKC_API.G_FALSE,
1468: x_return_status => l_return_status,
1469: x_msg_count => x_msg_count,
1470: x_msg_data => x_msg_data,
1471: p_terminate_in_parameters_rec => p_terminate_in_parameters_rec);

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

1476: IF l_return_status = 'W' then
1477: x_return_status := 'W';
1478: END IF;
1479:
1480: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: END IF;

Line 1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1477: x_return_status := 'W';
1478: END IF;
1479:
1480: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: END IF;
1485:

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

1478: END IF;
1479:
1480: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: END IF;
1485:
1486: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,

Line 1483: raise OKC_API.G_EXCEPTION_ERROR;

1479:
1480: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1481: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1482: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1483: raise OKC_API.G_EXCEPTION_ERROR;
1484: END IF;
1485:
1486: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
1487: p_status_type => 'TERMINATED',

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

1488: x_status_code => l_ter_status_code );
1489: IF (l_debug = 'Y') THEN
1490: okc_debug.set_trace_off;
1491: END IF;
1492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1493: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1495: raise OKC_API.G_EXCEPTION_ERROR;
1496: END IF;

Line 1493: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1489: IF (l_debug = 'Y') THEN
1490: okc_debug.set_trace_off;
1491: END IF;
1492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1493: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1495: raise OKC_API.G_EXCEPTION_ERROR;
1496: END IF;
1497: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,

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

1490: okc_debug.set_trace_off;
1491: END IF;
1492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1493: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1495: raise OKC_API.G_EXCEPTION_ERROR;
1496: END IF;
1497: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
1498: p_status_type => 'CANCELLED',

Line 1495: raise OKC_API.G_EXCEPTION_ERROR;

1491: END IF;
1492: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1493: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1494: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1495: raise OKC_API.G_EXCEPTION_ERROR;
1496: END IF;
1497: OKC_ASSENT_PUB.get_default_status( x_return_status => l_return_status,
1498: p_status_type => 'CANCELLED',
1499: x_status_code => l_can_status_code);

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

1499: x_status_code => l_can_status_code);
1500: IF (l_debug = 'Y') THEN
1501: okc_debug.set_trace_off;
1502: END IF;
1503: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1504: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1505: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1506: raise OKC_API.G_EXCEPTION_ERROR;
1507: END IF;

Line 1504: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1500: IF (l_debug = 'Y') THEN
1501: okc_debug.set_trace_off;
1502: END IF;
1503: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1504: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1505: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1506: raise OKC_API.G_EXCEPTION_ERROR;
1507: END IF;
1508: IF (l_debug = 'Y') THEN

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

1501: okc_debug.set_trace_off;
1502: END IF;
1503: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1504: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1505: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1506: raise OKC_API.G_EXCEPTION_ERROR;
1507: END IF;
1508: IF (l_debug = 'Y') THEN
1509: OKC_DEBUG.SET_TRACE_OFF;

Line 1506: raise OKC_API.G_EXCEPTION_ERROR;

1502: END IF;
1503: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1504: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1505: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1506: raise OKC_API.G_EXCEPTION_ERROR;
1507: END IF;
1508: IF (l_debug = 'Y') THEN
1509: OKC_DEBUG.SET_TRACE_OFF;
1510: END IF;

Line 1582: p_init_msg_list => OKC_API.G_FALSE,

1578: --
1579: --dbms_output.put_line('update_contract_line (+) ');
1580: /*
1581: OKC_CONTRACT_PUB.update_contract_line( p_api_version => 1,
1582: p_init_msg_list => OKC_API.G_FALSE,
1583: x_return_status => l_return_status,
1584: x_msg_count => x_msg_count,
1585: x_msg_data => x_msg_data,
1586: p_restricted_update => okc_api.g_true,

Line 1586: p_restricted_update => okc_api.g_true,

1582: p_init_msg_list => OKC_API.G_FALSE,
1583: x_return_status => l_return_status,
1584: x_msg_count => x_msg_count,
1585: x_msg_data => x_msg_data,
1586: p_restricted_update => okc_api.g_true,
1587: p_clev_rec => l_clev_rec,
1588: x_clev_rec => i_clev_rec );
1589: IF (l_debug = 'Y') THEN
1590: okc_debug.set_trace_off;

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

1589: IF (l_debug = 'Y') THEN
1590: okc_debug.set_trace_off;
1591: END IF;
1592: --dbms_output.put_line('update_contract_line (-) ');
1593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1594: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1596: raise OKC_API.G_EXCEPTION_ERROR;
1597: END IF;

Line 1594: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1590: okc_debug.set_trace_off;
1591: END IF;
1592: --dbms_output.put_line('update_contract_line (-) ');
1593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1594: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1596: raise OKC_API.G_EXCEPTION_ERROR;
1597: END IF;
1598: */

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

1591: END IF;
1592: --dbms_output.put_line('update_contract_line (-) ');
1593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1594: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1596: raise OKC_API.G_EXCEPTION_ERROR;
1597: END IF;
1598: */
1599: If l_lse_id = 61 Then

Line 1596: raise OKC_API.G_EXCEPTION_ERROR;

1592: --dbms_output.put_line('update_contract_line (-) ');
1593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1594: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1596: raise OKC_API.G_EXCEPTION_ERROR;
1597: END IF;
1598: */
1599: If l_lse_id = 61 Then
1600: --if the contract line being terminated is a Price Hold line, we need to delete the entry in QP

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

1609: p_termination_date => l_clev_tbl(l_loop_counter).date_terminated,
1610: p_operation_code => 'TERMINATE');
1611: End If;
1612:
1613: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1614: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1615: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1616: raise OKC_API.G_EXCEPTION_ERROR;
1617: END IF;

Line 1614: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1610: p_operation_code => 'TERMINATE');
1611: End If;
1612:
1613: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1614: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1615: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1616: raise OKC_API.G_EXCEPTION_ERROR;
1617: END IF;
1618:

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

1611: End If;
1612:
1613: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1614: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1615: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1616: raise OKC_API.G_EXCEPTION_ERROR;
1617: END IF;
1618:
1619: END IF; -- effectivity

Line 1616: raise OKC_API.G_EXCEPTION_ERROR;

1612:
1613: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1614: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1615: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1616: raise OKC_API.G_EXCEPTION_ERROR;
1617: END IF;
1618:
1619: END IF; -- effectivity
1620: END IF; -- l_status

Line 1626: p_init_msg_list => OKC_API.G_FALSE,

1622: IF (l_debug = 'Y') THEN
1623: OKC_DEBUG.set_trace_off;
1624: END IF;
1625: OKC_CONTRACT_PUB.update_contract_line( p_api_version => 1,
1626: p_init_msg_list => OKC_API.G_FALSE,
1627: x_return_status => l_return_status,
1628: x_msg_count => x_msg_count,
1629: x_msg_data => x_msg_data,
1630: p_restricted_update => OKC_API.g_true,

Line 1630: p_restricted_update => OKC_API.g_true,

1626: p_init_msg_list => OKC_API.G_FALSE,
1627: x_return_status => l_return_status,
1628: x_msg_count => x_msg_count,
1629: x_msg_data => x_msg_data,
1630: p_restricted_update => OKC_API.g_true,
1631: p_clev_tbl => l_clev_tbl,
1632: x_clev_tbl => i_clev_tbl );
1633: IF (l_debug = 'Y') THEN
1634: OKC_DEBUG.set_trace_off;

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

1633: IF (l_debug = 'Y') THEN
1634: OKC_DEBUG.set_trace_off;
1635: END IF;
1636: --dbms_output.put_line('update_contract_line (-) ');
1637: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1638: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: ELSIF (l_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: OKC_DEBUG.set_trace_off;
1635: END IF;
1636: --dbms_output.put_line('update_contract_line (-) ');
1637: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1638: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1640: RAISE OKC_API.G_EXCEPTION_ERROR;
1641: END IF;
1642:

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

1635: END IF;
1636: --dbms_output.put_line('update_contract_line (-) ');
1637: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1638: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1640: RAISE OKC_API.G_EXCEPTION_ERROR;
1641: END IF;
1642:
1643: IF (l_debug = 'Y') THEN

Line 1640: RAISE OKC_API.G_EXCEPTION_ERROR;

1636: --dbms_output.put_line('update_contract_line (-) ');
1637: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1638: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1639: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1640: RAISE OKC_API.G_EXCEPTION_ERROR;
1641: END IF;
1642:
1643: IF (l_debug = 'Y') THEN
1644: okc_debug.set_trace_on;

Line 1657: 'INVOICE') = okc_api.g_true THEN

1653: --
1654: -- If l_dummy = 'x' and p_terminate_in_parameters_rec.p_termination_date <= sysdate and
1655: If l_dummy = 'x' And
1656: OKC_ASSENT_PUB.line_operation_allowed(p_terminate_in_parameters_rec.p_cle_id,
1657: 'INVOICE') = okc_api.g_true THEN
1658:
1659: --dbms_output.put_line('PRE_TERMINATE_SERVICE (+) ');
1660:
1661: OKS_BILL_REC_PUB.pre_terminate_service ( p_api_version => 1,

Line 1662: p_init_msg_list => OKC_API.G_FALSE,

1658:
1659: --dbms_output.put_line('PRE_TERMINATE_SERVICE (+) ');
1660:
1661: OKS_BILL_REC_PUB.pre_terminate_service ( p_api_version => 1,
1662: p_init_msg_list => OKC_API.G_FALSE,
1663: x_return_status => l_return_status,
1664: x_msg_count => x_msg_count,
1665: x_msg_data => x_msg_data,
1666: p_calledfrom => NULL,

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

1670: x_amount => l_amount );
1671:
1672: --dbms_output.put_line('PRE_TERMINATE_SERVICE (-) ');
1673:
1674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1675: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1676: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1677: raise OKC_API.G_EXCEPTION_ERROR;
1678: END IF;

Line 1675: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1671:
1672: --dbms_output.put_line('PRE_TERMINATE_SERVICE (-) ');
1673:
1674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1675: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1676: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1677: raise OKC_API.G_EXCEPTION_ERROR;
1678: END IF;
1679: END if;

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

1672: --dbms_output.put_line('PRE_TERMINATE_SERVICE (-) ');
1673:
1674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1675: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1676: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1677: raise OKC_API.G_EXCEPTION_ERROR;
1678: END IF;
1679: END if;
1680: */

Line 1677: raise OKC_API.G_EXCEPTION_ERROR;

1673:
1674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1675: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1676: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1677: raise OKC_API.G_EXCEPTION_ERROR;
1678: END IF;
1679: END if;
1680: */
1681:

Line 1692: p_init_msg_list => OKC_API.G_FALSE,

1688: l_price_negotiated,l_kl_sts_code;
1689: CLOSE cur_header;
1690:
1691: OKC_KL_TERM_ASMBLR_PVT.acn_assemble(p_api_version => 1,
1692: p_init_msg_list => OKC_API.G_FALSE,
1693: x_return_status => l_return_status,
1694: x_msg_count => x_msg_count,
1695: x_msg_data => x_msg_data,
1696: p_k_id => p_terminate_in_parameters_rec.p_dnz_chr_id,

Line 1707: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1703: p_k_subclass => l_scs_code,
1704: p_kl_status_code => l_kl_sts_code,
1705: p_estimated_amount => l_price_negotiated);
1706:
1707: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1708: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1709: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1710: RAISE OKC_API.G_EXCEPTION_ERROR;
1711: END IF;

Line 1708: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1704: p_kl_status_code => l_kl_sts_code,
1705: p_estimated_amount => l_price_negotiated);
1706:
1707: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1708: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1709: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1710: RAISE OKC_API.G_EXCEPTION_ERROR;
1711: END IF;
1712:

Line 1709: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1705: p_estimated_amount => l_price_negotiated);
1706:
1707: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1708: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1709: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1710: RAISE OKC_API.G_EXCEPTION_ERROR;
1711: END IF;
1712:
1713: END IF;

Line 1710: RAISE OKC_API.G_EXCEPTION_ERROR;

1706:
1707: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1708: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1709: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1710: RAISE OKC_API.G_EXCEPTION_ERROR;
1711: END IF;
1712:
1713: END IF;
1714:

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

1711: END IF;
1712:
1713: END IF;
1714:
1715: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1716: --dbms_output.put_line(' terminate_cle (-) ');
1717:
1718: EXCEPTION
1719: WHEN E_Resource_Busy THEN

Line 1723: x_return_status := okc_api.g_ret_sts_error;

1719: WHEN E_Resource_Busy THEN
1720: IF (l_debug = 'Y') THEN
1721: okc_debug.set_trace_on;
1722: END IF;
1723: x_return_status := okc_api.g_ret_sts_error;
1724: OKC_API.set_message(G_FND_APP,
1725: G_FORM_UNABLE_TO_RESERVE_REC);
1726: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1727:

Line 1724: OKC_API.set_message(G_FND_APP,

1720: IF (l_debug = 'Y') THEN
1721: okc_debug.set_trace_on;
1722: END IF;
1723: x_return_status := okc_api.g_ret_sts_error;
1724: OKC_API.set_message(G_FND_APP,
1725: G_FORM_UNABLE_TO_RESERVE_REC);
1726: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1727:
1728: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1728: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1724: OKC_API.set_message(G_FND_APP,
1725: G_FORM_UNABLE_TO_RESERVE_REC);
1726: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1727:
1728: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1729: IF (l_debug = 'Y') THEN
1730: okc_debug.set_trace_on;
1731: END IF;
1732: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1732: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1728: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1729: IF (l_debug = 'Y') THEN
1730: okc_debug.set_trace_on;
1731: END IF;
1732: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1733: (l_api_name,
1734: G_PKG_NAME,
1735: 'OKC_API.G_RET_STS_ERROR',
1736: x_msg_count,

Line 1735: 'OKC_API.G_RET_STS_ERROR',

1731: END IF;
1732: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1733: (l_api_name,
1734: G_PKG_NAME,
1735: 'OKC_API.G_RET_STS_ERROR',
1736: x_msg_count,
1737: x_msg_data,
1738: '_PROCESS');
1739:

Line 1740: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1736: x_msg_count,
1737: x_msg_data,
1738: '_PROCESS');
1739:
1740: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1741: IF (l_debug = 'Y') THEN
1742: okc_debug.set_trace_on;
1743: END IF;
1744: x_return_status := OKC_API.HANDLE_EXCEPTIONS

Line 1744: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1740: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1741: IF (l_debug = 'Y') THEN
1742: okc_debug.set_trace_on;
1743: END IF;
1744: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1745: (l_api_name,
1746: G_PKG_NAME,
1747: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1748: x_msg_count,

Line 1747: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1743: END IF;
1744: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1745: (l_api_name,
1746: G_PKG_NAME,
1747: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1748: x_msg_count,
1749: x_msg_data,
1750: '_PROCESS');
1751: WHEN OTHERS THEN

Line 1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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