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.OKS_CONTRACTS_PUB dependencies on OKC_API

Line 80: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

76: x_Status := 'E';
77: End If;
78: EXCEPTION
79: WHEN OTHERS THEN
80: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
81: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).CHECK_LINE_EFFECTIVITY :: Error:'||SQLCODE ||':'||SQLERRM);
82:
83: END CHECK_LINE_EFFECTIVITY;
84: -----------------------------------------------------------------------------

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

98: IS
99:
100: l_api_version CONSTANT NUMBER := 1.0;
101: l_init_msg_list CONSTANT VARCHAR2(1) := 'F';
102: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
103:
104: l_index VARCHAR2(240);
105:
106: --Party Role

Line 181: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

177:
178: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Party_Role :: create_k_party_role status: '|| l_return_status);
179: ----dbms_output.put_line('party role:'||l_return_status);
180:
181: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
182:
183: x_roleid := l_cplv_tbl_out(1).id;
184: Else
185: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_rle_code || ' Party Role (HEADER)');

Line 185: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_rle_code || ' Party Role (HEADER)');

181: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
182:
183: x_roleid := l_cplv_tbl_out(1).id;
184: Else
185: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_rle_code || ' Party Role (HEADER)');
186: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB):Party_Role :: Error in Create_k_party role' );
187: Raise G_EXCEPTION_HALT_VALIDATION;
188:
189:

Line 197: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

193: EXCEPTION
194: WHEN G_EXCEPTION_HALT_VALIDATION THEN
195: x_return_status := l_return_status ;
196: WHEN OTHERS THEN
197: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
198: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
199: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB):Party_Role :: Error:'||SQLCODE ||':'||SQLERRM );
200:
201: End Party_Role;

Line 198: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

194: WHEN G_EXCEPTION_HALT_VALIDATION THEN
195: x_return_status := l_return_status ;
196: WHEN OTHERS THEN
197: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
198: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
199: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB):Party_Role :: Error:'||SQLCODE ||':'||SQLERRM );
200:
201: End Party_Role;
202:

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

308: l_sae_id Number;
309: l_sae_release Varchar2(100);
310: l_api_version CONSTANT NUMBER := 1.0;
311: l_init_msg_list CONSTANT VARCHAR2(1) := 'F';
312: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
313: l_index VARCHAR2(240);
314: l_msg_count NUMBER;
315: l_msg_data VARCHAR2(2000);
316:

Line 320: x_return_status := OKC_API.G_RET_STS_SUCCESS;

316:
317:
318:
319: Begin
320: x_return_status := OKC_API.G_RET_STS_SUCCESS;
321:
322: For l_ptr in 1..P_Articles_tbl.count
323: Loop
324:

Line 360: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

356: );
357: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).CREATE_ARTICLES :: Create_k_article status:'|| l_return_status);
358: x_return_status := l_return_status;
359:
360: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
361: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ARITCLES (HEADER)');
362: Raise G_EXCEPTION_HALT_VALIDATION;
363:
364: End If;

Line 361: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ARITCLES (HEADER)');

357: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).CREATE_ARTICLES :: Create_k_article status:'|| l_return_status);
358: x_return_status := l_return_status;
359:
360: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
361: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ARITCLES (HEADER)');
362: Raise G_EXCEPTION_HALT_VALIDATION;
363:
364: End If;
365:

Line 375: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

371: WHEN G_EXCEPTION_HALT_VALIDATION THEN
372: x_return_status := l_return_status ;
373:
374: WHEN Others THEN
375: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
376: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
377: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).CREATE_ARTICLES :: Error : '||SQLCODE ||':'|| SQLERRM);
378:
379: End Create_articles;

Line 376: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

372: x_return_status := l_return_status ;
373:
374: WHEN Others THEN
375: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
376: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
377: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).CREATE_ARTICLES :: Error : '||SQLCODE ||':'|| SQLERRM);
378:
379: End Create_articles;
380: ------------------------------------------------------------------------------------------

Line 461: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

457:
458: EXCEPTION
459: When Others Then
460: OKS_RENEW_PVT.DEBUG_LOG( 'VALIDATE CREDIT CARD :: Error in Validate Credit card');
461: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
462:
463: END Validate_Credit_Card;
464:
465:

Line 477: x_return_status := OKC_API.G_RET_STS_SUCCESS;

473: )
474: IS
475:
476: BEGIN
477: x_return_status := OKC_API.G_RET_STS_SUCCESS;
478:
479:
480:
481: IF p_line_rec.srv_id IS NULL THEN

Line 483: x_return_status := OKC_API.G_RET_STS_ERROR;

479:
480:
481: IF p_line_rec.srv_id IS NULL THEN
482:
483: x_return_status := OKC_API.G_RET_STS_ERROR;
484: ----dbms_output.put_line('K LINE VALIDATION :- SRV ID REQUIRED FOR LINE RECORD');
485: OKS_RENEW_PVT.DEBUG_LOG( 'OKS_CONTARACTS_PUB .VALIDATE_LINE_RECORD :: SRV_Id required for line record');
486: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV ID REQUIRED FOR LINE RECORD');
487: Raise G_EXCEPTION_HALT_VALIDATION;

Line 486: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV ID REQUIRED FOR LINE RECORD');

482:
483: x_return_status := OKC_API.G_RET_STS_ERROR;
484: ----dbms_output.put_line('K LINE VALIDATION :- SRV ID REQUIRED FOR LINE RECORD');
485: OKS_RENEW_PVT.DEBUG_LOG( 'OKS_CONTARACTS_PUB .VALIDATE_LINE_RECORD :: SRV_Id required for line record');
486: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV ID REQUIRED FOR LINE RECORD');
487: Raise G_EXCEPTION_HALT_VALIDATION;
488:
489: ELSIF p_line_rec.organization_id IS NULL THEN
490:

Line 491: x_return_status := OKC_API.G_RET_STS_ERROR;

487: Raise G_EXCEPTION_HALT_VALIDATION;
488:
489: ELSIF p_line_rec.organization_id IS NULL THEN
490:
491: x_return_status := OKC_API.G_RET_STS_ERROR;
492: ----dbms_output.put_line('(OKS_CONTRACTS_PUB): K LINE VALIDATION :- ORGANIZATION ID REQUIRED FOR LINE RECORD');
493: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Organization_Id required for line record');
494: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORGANIZATION ID REQUIRED FOR LINE RECORD');
495: Raise G_EXCEPTION_HALT_VALIDATION;

Line 494: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORGANIZATION ID REQUIRED FOR LINE RECORD');

490:
491: x_return_status := OKC_API.G_RET_STS_ERROR;
492: ----dbms_output.put_line('(OKS_CONTRACTS_PUB): K LINE VALIDATION :- ORGANIZATION ID REQUIRED FOR LINE RECORD');
493: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Organization_Id required for line record');
494: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORGANIZATION ID REQUIRED FOR LINE RECORD');
495: Raise G_EXCEPTION_HALT_VALIDATION;
496:
497: ELSIF p_line_rec.srv_sdt IS NULL THEN
498:

Line 499: x_return_status := OKC_API.G_RET_STS_ERROR;

495: Raise G_EXCEPTION_HALT_VALIDATION;
496:
497: ELSIF p_line_rec.srv_sdt IS NULL THEN
498:
499: x_return_status := OKC_API.G_RET_STS_ERROR;
500: ----dbms_output.put_line('K LINE VALIDATION :- SRV START DATE REQUIRED FOR LINE RECORD');
501: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: SRV Start_Date required for line record');
502: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV START DATE REQUIRED FOR LINE RECORD');
503: Raise G_EXCEPTION_HALT_VALIDATION;

Line 502: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV START DATE REQUIRED FOR LINE RECORD');

498:
499: x_return_status := OKC_API.G_RET_STS_ERROR;
500: ----dbms_output.put_line('K LINE VALIDATION :- SRV START DATE REQUIRED FOR LINE RECORD');
501: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: SRV Start_Date required for line record');
502: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV START DATE REQUIRED FOR LINE RECORD');
503: Raise G_EXCEPTION_HALT_VALIDATION;
504:
505: ELSIF p_line_rec.srv_edt IS NULL THEN
506:

Line 507: x_return_status := OKC_API.G_RET_STS_ERROR;

503: Raise G_EXCEPTION_HALT_VALIDATION;
504:
505: ELSIF p_line_rec.srv_edt IS NULL THEN
506:
507: x_return_status := OKC_API.G_RET_STS_ERROR;
508: ----dbms_output.put_line('K LINE VALIDATION :- SRV END DATE REQUIRED FOR LINE RECORD');
509: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: SRV End_Date required for line record');
510: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV END DATE REQUIRED FOR LINE RECORD');
511: Raise G_EXCEPTION_HALT_VALIDATION;

Line 510: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV END DATE REQUIRED FOR LINE RECORD');

506:
507: x_return_status := OKC_API.G_RET_STS_ERROR;
508: ----dbms_output.put_line('K LINE VALIDATION :- SRV END DATE REQUIRED FOR LINE RECORD');
509: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: SRV End_Date required for line record');
510: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' SRV END DATE REQUIRED FOR LINE RECORD');
511: Raise G_EXCEPTION_HALT_VALIDATION;
512:
513: ELSIF p_line_rec.k_hdr_id IS NULL THEN
514:

Line 515: x_return_status := OKC_API.G_RET_STS_ERROR;

511: Raise G_EXCEPTION_HALT_VALIDATION;
512:
513: ELSIF p_line_rec.k_hdr_id IS NULL THEN
514:
515: x_return_status := OKC_API.G_RET_STS_ERROR;
516: ----dbms_output.put_line('K LINE VALIDATION :- K_hdr_id REQUIRED FOR LINE RECORD');
517: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Header_Id required for line record');
518: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' K_hdr_id REQUIRED FOR LINE RECORD');
519: Raise G_EXCEPTION_HALT_VALIDATION;

Line 518: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' K_hdr_id REQUIRED FOR LINE RECORD');

514:
515: x_return_status := OKC_API.G_RET_STS_ERROR;
516: ----dbms_output.put_line('K LINE VALIDATION :- K_hdr_id REQUIRED FOR LINE RECORD');
517: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Header_Id required for line record');
518: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' K_hdr_id REQUIRED FOR LINE RECORD');
519: Raise G_EXCEPTION_HALT_VALIDATION;
520:
521:
522: ELSIF p_line_rec.org_id IS NULL THEN

Line 524: x_return_status := OKC_API.G_RET_STS_ERROR;

520:
521:
522: ELSIF p_line_rec.org_id IS NULL THEN
523:
524: x_return_status := OKC_API.G_RET_STS_ERROR;
525: ----dbms_output.put_line('K LINE VALIDATION :- ORG_ID REQUIRED FOR LINE RECORD');
526: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: ORG Id required for line record');
527: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORG_ID REQUIRED FOR LINE RECORD');
528: Raise G_EXCEPTION_HALT_VALIDATION;

Line 527: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORG_ID REQUIRED FOR LINE RECORD');

523:
524: x_return_status := OKC_API.G_RET_STS_ERROR;
525: ----dbms_output.put_line('K LINE VALIDATION :- ORG_ID REQUIRED FOR LINE RECORD');
526: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: ORG Id required for line record');
527: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ORG_ID REQUIRED FOR LINE RECORD');
528: Raise G_EXCEPTION_HALT_VALIDATION;
529:
530: ELSIF (p_line_rec.usage_type = 'VRT' OR p_line_rec.usage_type = 'QTY' OR p_line_rec.usage_type = 'FRT')
531: AND ( p_line_rec.usage_period IS NULL) THEN

Line 533: x_return_status := OKC_API.G_RET_STS_ERROR;

529:
530: ELSIF (p_line_rec.usage_type = 'VRT' OR p_line_rec.usage_type = 'QTY' OR p_line_rec.usage_type = 'FRT')
531: AND ( p_line_rec.usage_period IS NULL) THEN
532:
533: x_return_status := OKC_API.G_RET_STS_ERROR;
534: ----dbms_output.put_line('K LINE VALIDATION :- USAGE PERIOD REQUIRED FOR LINE RECORD');
535: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Usage_Period required for line record');
536: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' USAGE PERIOD REQUIRED FOR LINE RECORD');
537: Raise G_EXCEPTION_HALT_VALIDATION;

Line 536: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' USAGE PERIOD REQUIRED FOR LINE RECORD');

532:
533: x_return_status := OKC_API.G_RET_STS_ERROR;
534: ----dbms_output.put_line('K LINE VALIDATION :- USAGE PERIOD REQUIRED FOR LINE RECORD');
535: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Usage_Period required for line record');
536: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' USAGE PERIOD REQUIRED FOR LINE RECORD');
537: Raise G_EXCEPTION_HALT_VALIDATION;
538:
539: ELSIF (p_line_rec.usage_type = 'VRT' OR p_line_rec.usage_type = 'QTY') AND (p_line_rec.invoicing_rule_type <> -3) THEN
540:

Line 541: x_return_status := OKC_API.G_RET_STS_ERROR;

537: Raise G_EXCEPTION_HALT_VALIDATION;
538:
539: ELSIF (p_line_rec.usage_type = 'VRT' OR p_line_rec.usage_type = 'QTY') AND (p_line_rec.invoicing_rule_type <> -3) THEN
540:
541: x_return_status := OKC_API.G_RET_STS_ERROR;
542: ----dbms_output.put_line('K LINE VALIDATION :- ARRERS INVOICE TYPE REQUIRED FOR LINE RECORD');
543: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Arrers Invoice Type required for line record');
544: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ARRERS INVOICE TYPE REQUIRED.');
545: Raise G_EXCEPTION_HALT_VALIDATION;

Line 544: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ARRERS INVOICE TYPE REQUIRED.');

540:
541: x_return_status := OKC_API.G_RET_STS_ERROR;
542: ----dbms_output.put_line('K LINE VALIDATION :- ARRERS INVOICE TYPE REQUIRED FOR LINE RECORD');
543: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Arrers Invoice Type required for line record');
544: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, ' ARRERS INVOICE TYPE REQUIRED.');
545: Raise G_EXCEPTION_HALT_VALIDATION;
546:
547: END IF;
548:

Line 554: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

550:
551: WHEN G_EXCEPTION_HALT_VALIDATION THEN
552: NULL;
553: WHEN Others THEN
554: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
555: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
556: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Error :'||SQLCODE ||':'|| SQLERRM);
557:
558: END Validate_Line_Record;

Line 555: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

551: WHEN G_EXCEPTION_HALT_VALIDATION THEN
552: NULL;
553: WHEN Others THEN
554: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
555: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
556: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Error :'||SQLCODE ||':'|| SQLERRM);
557:
558: END Validate_Line_Record;
559:

Line 578: x_return_status := OKC_API.G_RET_STS_SUCCESS;

574: l_msg_count Number;
575:
576: BEGIN
577:
578: x_return_status := OKC_API.G_RET_STS_SUCCESS;
579:
580: IF p_cp_rec.Product_start_date IS NULL THEN
581:
582: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 582: x_return_status := OKC_API.G_RET_STS_ERROR;

578: x_return_status := OKC_API.G_RET_STS_SUCCESS;
579:
580: IF p_cp_rec.Product_start_date IS NULL THEN
581:
582: x_return_status := OKC_API.G_RET_STS_ERROR;
583: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCT START DATE REQUIRED FOR COVERED PRODUCT');
584: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_Start_Date required for CP');
585: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT START DATE REQUIRED FOR COVERED PRODUCT');
586: Raise G_EXCEPTION_HALT_VALIDATION;

Line 585: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT START DATE REQUIRED FOR COVERED PRODUCT');

581:
582: x_return_status := OKC_API.G_RET_STS_ERROR;
583: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCT START DATE REQUIRED FOR COVERED PRODUCT');
584: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_Start_Date required for CP');
585: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT START DATE REQUIRED FOR COVERED PRODUCT');
586: Raise G_EXCEPTION_HALT_VALIDATION;
587:
588: ELSIF p_cp_rec.Product_end_date IS NULL THEN
589:

Line 590: x_return_status := OKC_API.G_RET_STS_ERROR;

586: Raise G_EXCEPTION_HALT_VALIDATION;
587:
588: ELSIF p_cp_rec.Product_end_date IS NULL THEN
589:
590: x_return_status := OKC_API.G_RET_STS_ERROR;
591: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCT END DATE REQUIRED FOR COVERED PRODUCT');
592: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_End_Date required for CP');
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT END DATE REQUIRED FOR COVERED PRODUCT');
594: Raise G_EXCEPTION_HALT_VALIDATION;

Line 593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT END DATE REQUIRED FOR COVERED PRODUCT');

589:
590: x_return_status := OKC_API.G_RET_STS_ERROR;
591: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCT END DATE REQUIRED FOR COVERED PRODUCT');
592: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_End_Date required for CP');
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT END DATE REQUIRED FOR COVERED PRODUCT');
594: Raise G_EXCEPTION_HALT_VALIDATION;
595:
596: ELSIF p_cp_rec.Customer_Product_Id IS NULL THEN
597:

Line 598: x_return_status := OKC_API.G_RET_STS_ERROR;

594: Raise G_EXCEPTION_HALT_VALIDATION;
595:
596: ELSIF p_cp_rec.Customer_Product_Id IS NULL THEN
597:
598: x_return_status := OKC_API.G_RET_STS_ERROR;
599: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCTID REQUIRED FOR COVERED PRODUCT');
600: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_Id required for CP');
601: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT ID REQUIRED FOR COVERED PRODUCT');
602: Raise G_EXCEPTION_HALT_VALIDATION;

Line 601: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT ID REQUIRED FOR COVERED PRODUCT');

597:
598: x_return_status := OKC_API.G_RET_STS_ERROR;
599: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- PRODUCTID REQUIRED FOR COVERED PRODUCT');
600: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Product_Id required for CP');
601: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRODUCT ID REQUIRED FOR COVERED PRODUCT');
602: Raise G_EXCEPTION_HALT_VALIDATION;
603:
604: ELSIF p_usage_type = 'FRT' AND p_cp_rec.fixed_qty IS NULL THEN
605:

Line 606: x_return_status := OKC_API.G_RET_STS_ERROR;

602: Raise G_EXCEPTION_HALT_VALIDATION;
603:
604: ELSIF p_usage_type = 'FRT' AND p_cp_rec.fixed_qty IS NULL THEN
605:
606: x_return_status := OKC_API.G_RET_STS_ERROR;
607: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- FIXED_QTY REQUIRED FOR COVERED PRODUCT');
608: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Fixed_qty required for CP');
609: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'FIXED_QTY REQUIRED FOR COVERED PRODUCT');
610: Raise G_EXCEPTION_HALT_VALIDATION;

Line 609: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'FIXED_QTY REQUIRED FOR COVERED PRODUCT');

605:
606: x_return_status := OKC_API.G_RET_STS_ERROR;
607: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- FIXED_QTY REQUIRED FOR COVERED PRODUCT');
608: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Fixed_qty required for CP');
609: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'FIXED_QTY REQUIRED FOR COVERED PRODUCT');
610: Raise G_EXCEPTION_HALT_VALIDATION;
611:
612: ELSIF p_usage_type = 'NPR' AND p_cp_rec.negotiated_amount IS NULL THEN
613:

Line 614: x_return_status := OKC_API.G_RET_STS_ERROR;

610: Raise G_EXCEPTION_HALT_VALIDATION;
611:
612: ELSIF p_usage_type = 'NPR' AND p_cp_rec.negotiated_amount IS NULL THEN
613:
614: x_return_status := OKC_API.G_RET_STS_ERROR;
615: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- NEGOTIATED_AMOUNT REQUIRED FOR COVERED PRODUCT');
616: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Negotiated_amount required for CP');
617: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'NEGOTIATED_AMOUNT REQUIRED FOR COVERED PRODUCT');
618: Raise G_EXCEPTION_HALT_VALIDATION;

Line 617: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'NEGOTIATED_AMOUNT REQUIRED FOR COVERED PRODUCT');

613:
614: x_return_status := OKC_API.G_RET_STS_ERROR;
615: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- NEGOTIATED_AMOUNT REQUIRED FOR COVERED PRODUCT');
616: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Negotiated_amount required for CP');
617: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'NEGOTIATED_AMOUNT REQUIRED FOR COVERED PRODUCT');
618: Raise G_EXCEPTION_HALT_VALIDATION;
619:
620: ELSIF (p_usage_type = 'VRT' OR p_usage_type = 'QTY')AND
621: (p_cp_rec.default_qty IS NULL OR p_cp_rec.base_reading IS NULL)THEN

Line 623: x_return_status := OKC_API.G_RET_STS_ERROR;

619:
620: ELSIF (p_usage_type = 'VRT' OR p_usage_type = 'QTY')AND
621: (p_cp_rec.default_qty IS NULL OR p_cp_rec.base_reading IS NULL)THEN
622:
623: x_return_status := OKC_API.G_RET_STS_ERROR;
624: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- DEFAULT_QTY AND BASE_READING REQUIRED REQUIRED FOR COVERED PRODUCT');
625: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Default_Qty and Base_reading required for CP');
626: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'DEFAULT_QTY AND BASE_READING REQUIRED FOR COVERED PRODUCT');
627: Raise G_EXCEPTION_HALT_VALIDATION;

Line 626: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'DEFAULT_QTY AND BASE_READING REQUIRED FOR COVERED PRODUCT');

622:
623: x_return_status := OKC_API.G_RET_STS_ERROR;
624: ----dbms_output.put_line('K COVERED PRODUCT VALIDATION :- DEFAULT_QTY AND BASE_READING REQUIRED REQUIRED FOR COVERED PRODUCT');
625: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Default_Qty and Base_reading required for CP');
626: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'DEFAULT_QTY AND BASE_READING REQUIRED FOR COVERED PRODUCT');
627: Raise G_EXCEPTION_HALT_VALIDATION;
628:
629: END IF;
630:

Line 636: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

632:
633: WHEN G_EXCEPTION_HALT_VALIDATION THEN
634: NULL;
635: WHEN Others THEN
636: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
637: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
638: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Error :' || SQLCODE ||':'|| SQLERRM);
639: END Validate_Cp_Rec;
640:

Line 637: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

633: WHEN G_EXCEPTION_HALT_VALIDATION THEN
634: NULL;
635: WHEN Others THEN
636: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
637: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
638: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_CP_REC :: Error :' || SQLCODE ||':'|| SQLERRM);
639: END Validate_Cp_Rec;
640:
641:

Line 664: l_return_status VARCHAR2(10) := OKC_API.G_RET_STS_SUCCESS;

660: l_tavv_tbl_in okc_time_pub.tavv_tbl_type;
661: l_tavv_tbl_out okc_time_pub.tavv_tbl_type;
662: l_msg_count Number;
663: l_msg_data VARCHAR2(2000);
664: l_return_status VARCHAR2(10) := OKC_API.G_RET_STS_SUCCESS;
665: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
666:
667: BEGIN
668:

Line 665: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;

661: l_tavv_tbl_out okc_time_pub.tavv_tbl_type;
662: l_msg_count Number;
663: l_msg_data VARCHAR2(2000);
664: l_return_status VARCHAR2(10) := OKC_API.G_RET_STS_SUCCESS;
665: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
666:
667: BEGIN
668:
669: OPEN l_line_csr(p_line_id);

Line 674: x_return_status := OKC_API.G_RET_STS_ERROR;

670: FETCH l_line_csr INTO l_line_rec;
671:
672: IF l_line_csr%NOTFOUND THEN
673:
674: x_return_status := OKC_API.G_RET_STS_ERROR;
675: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'LINE NOT FOUND - CREATE_TIMEVAL');
676: Raise G_EXCEPTION_HALT_VALIDATION ;
677: Close l_line_csr;
678: RETURN;

Line 675: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'LINE NOT FOUND - CREATE_TIMEVAL');

671:
672: IF l_line_csr%NOTFOUND THEN
673:
674: x_return_status := OKC_API.G_RET_STS_ERROR;
675: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'LINE NOT FOUND - CREATE_TIMEVAL');
676: Raise G_EXCEPTION_HALT_VALIDATION ;
677: Close l_line_csr;
678: RETURN;
679:

Line 705: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

701:
702: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRCACTS_PUB).CREATE_TIMEVAL :: CREATE_TPA_VALUE status: '||l_return_status);
703:
704: x_return_status := l_return_status;
705: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
706: x_time_val := l_tavv_tbl_out(1).id;
707: Else
708:
709: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');

Line 709: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');

705: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
706: x_time_val := l_tavv_tbl_out(1).id;
707: Else
708:
709: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');
710: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRCACTS_PUB).CREATE_TIMEVAL :: Error in create timeval');
711: Raise G_EXCEPTION_HALT_VALIDATION ;
712:
713: End If;

Line 722: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

718:
719: WHEN G_EXCEPTION_HALT_VALIDATION THEN
720: NULL;
721: WHEN Others THEN
722: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
723: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
724: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Error :'||SQLCODE ||':'|| SQLERRM);
725:
726: END Create_timeval;

Line 723: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

719: WHEN G_EXCEPTION_HALT_VALIDATION THEN
720: NULL;
721: WHEN Others THEN
722: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
723: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
724: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).VALIDATE_LINE_RECORD :: Error :'||SQLCODE ||':'|| SQLERRM);
725:
726: END Create_timeval;
727:

Line 753: x_return_status := OKC_API.G_RET_STS_ERROR;

749: BEGIN
750:
751: IF p_strm_level_tbl(1).cle_id IS NULL THEN
752:
753: x_return_status := OKC_API.G_RET_STS_ERROR;
754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE ID REQUIRED FOR SLH');
755: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Line Id required for SLH');
756: Raise G_EXCEPTION_HALT_VALIDATION ;
757:

Line 754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE ID REQUIRED FOR SLH');

750:
751: IF p_strm_level_tbl(1).cle_id IS NULL THEN
752:
753: x_return_status := OKC_API.G_RET_STS_ERROR;
754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE ID REQUIRED FOR SLH');
755: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Line Id required for SLH');
756: Raise G_EXCEPTION_HALT_VALIDATION ;
757:
758: END IF;

Line 779: ELSIF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

775: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Create_timeval status:'|| x_return_status);
776:
777: IF x_return_status = 'S' THEN
778: l_slh_rec.Object2_Id1 := l_time_val;
779: ELSIF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
781: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
782: RAISE OKC_API.G_EXCEPTION_ERROR;
783: END IF;

Line 780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

776:
777: IF x_return_status = 'S' THEN
778: l_slh_rec.Object2_Id1 := l_time_val;
779: ELSIF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
781: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
782: RAISE OKC_API.G_EXCEPTION_ERROR;
783: END IF;
784: */

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

777: IF x_return_status = 'S' THEN
778: l_slh_rec.Object2_Id1 := l_time_val;
779: ELSIF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
781: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
782: RAISE OKC_API.G_EXCEPTION_ERROR;
783: END IF;
784: */
785: l_invoice_rule_id := p_invoice_rule_id;

Line 782: RAISE OKC_API.G_EXCEPTION_ERROR;

778: l_slh_rec.Object2_Id1 := l_time_val;
779: ELSIF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
781: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
782: RAISE OKC_API.G_EXCEPTION_ERROR;
783: END IF;
784: */
785: l_invoice_rule_id := p_invoice_rule_id;
786: IF l_invoice_rule_id IS NULL THEN

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

797: );
798:
799: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Create_bill_sch_rules status:'|| x_return_status);
800: --FND_FILE.PUT_LINE (FND_FILE.LOG,'K BILL SCHEDULE STATUS:- ' || x_return_status);
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;

Line 802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

798:
799: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Create_bill_sch_rules status:'|| x_return_status);
800: --FND_FILE.PUT_LINE (FND_FILE.LOG,'K BILL SCHEDULE STATUS:- ' || x_return_status);
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:

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

799: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Create_bill_sch_rules status:'|| x_return_status);
800: --FND_FILE.PUT_LINE (FND_FILE.LOG,'K BILL SCHEDULE STATUS:- ' || x_return_status);
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:
807: EXCEPTION

Line 804: RAISE OKC_API.G_EXCEPTION_ERROR;

800: --FND_FILE.PUT_LINE (FND_FILE.LOG,'K BILL SCHEDULE STATUS:- ' || x_return_status);
801: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
802: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
803: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
804: RAISE OKC_API.G_EXCEPTION_ERROR;
805: END IF;
806:
807: EXCEPTION
808:

Line 813: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

809: WHEN G_EXCEPTION_HALT_VALIDATION THEN
810: NULL;
811:
812: WHEN Others THEN
813: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
814: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
815: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Error: '||SQLCODE ||':'|| SQLERRM);
816:
817: END Create_Bill_Schedule;

Line 814: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

810: NULL;
811:
812: WHEN Others THEN
813: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
814: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
815: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Bill_Schedule :: Error: '||SQLCODE ||':'|| SQLERRM);
816:
817: END Create_Bill_Schedule;
818:

Line 854: x_return_status := OKC_API.G_RET_STS_SUCCESS;

850: l_duration Number;
851: l_timeunits Varchar2(25);
852: Begin
853:
854: x_return_status := OKC_API.G_RET_STS_SUCCESS;
855: /* -- Rules Rearchitecture TPA id removed
856: l_tavv_tbl_in(1).dnz_chr_id := P_chr_id;
857: l_tavv_tbl_in(1).datetime := P_srv_sdt;
858:

Line 873: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

869:
870: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Create_TPA_value status:'|| l_return_status ||'Id'||l_tavv_tbl_out(1).id);
871: ----dbms_output.put_line('TPA value status '||l_return_status);
872:
873: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
874: l_tpa_id := l_tavv_tbl_out(1).id;
875: Else
876: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');
877: Raise G_EXCEPTION_HALT_VALIDATION;

Line 876: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');

872:
873: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
874: l_tpa_id := l_tavv_tbl_out(1).id;
875: Else
876: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CREATE_TPA_VALUE');
877: Raise G_EXCEPTION_HALT_VALIDATION;
878: End If;
879: */
880: Okc_time_util_pub.get_duration

Line 894: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

890: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Duration:'|| l_duration ||'time unit' ||l_timeunits);
891:
892: ----dbms_output.put_line('get duration status '||l_return_status);
893:
894: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
895: Raise G_EXCEPTION_HALT_VALIDATION;
896: End If;
897: /*
898: l_slh_rec.cle_id := P_line_id;

Line 946: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

942:
943: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Create_Bill_Sch_Rules status: '||l_return_status);
944: ----dbms_output.put_line('K LINE CREATION :- Create_Bill_Sch_Rules STATUS ' || l_return_status );
945:
946: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
947: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sched Billing Rule (LINE)');
948: Raise G_EXCEPTION_HALT_VALIDATION;
949: End If;
950: x_return_status := l_return_status;

Line 947: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sched Billing Rule (LINE)');

943: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Create_Bill_Sch_Rules status: '||l_return_status);
944: ----dbms_output.put_line('K LINE CREATION :- Create_Bill_Sch_Rules STATUS ' || l_return_status );
945:
946: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
947: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sched Billing Rule (LINE)');
948: Raise G_EXCEPTION_HALT_VALIDATION;
949: End If;
950: x_return_status := l_return_status;
951:

Line 957: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

953: When G_EXCEPTION_HALT_VALIDATION Then
954: x_return_status := l_return_status;
955: Null;
956: When Others Then
957: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
958: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
959: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Error: '|| SQLCODE|| ':' ||SQLERRM);
960:
961: End;

Line 958: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

954: x_return_status := l_return_status;
955: Null;
956: When Others Then
957: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
958: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
959: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Billing_Schd :: Error: '|| SQLCODE|| ':' ||SQLERRM);
960:
961: End;
962:

Line 1019: l_rgpv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1015: l_rgpv_tbl_in(1).sfwt_flag := 'N';
1016: l_rgpv_tbl_in(1).rgd_code := G_RULE_GROUP_CODE;
1017: l_rgpv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1018: l_rgpv_tbl_in(1).rgp_type := 'KRG';
1019: l_rgpv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1020: l_rgpv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1021: l_rgpv_tbl_in(1).creation_date := SYSDATE;
1022: l_rgpv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1023: l_rgpv_tbl_in(1).last_update_date := SYSDATE;

Line 1020: l_rgpv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1016: l_rgpv_tbl_in(1).rgd_code := G_RULE_GROUP_CODE;
1017: l_rgpv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1018: l_rgpv_tbl_in(1).rgp_type := 'KRG';
1019: l_rgpv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1020: l_rgpv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1021: l_rgpv_tbl_in(1).creation_date := SYSDATE;
1022: l_rgpv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1023: l_rgpv_tbl_in(1).last_update_date := SYSDATE;
1024:

Line 1022: l_rgpv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1018: l_rgpv_tbl_in(1).rgp_type := 'KRG';
1019: l_rgpv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1020: l_rgpv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1021: l_rgpv_tbl_in(1).creation_date := SYSDATE;
1022: l_rgpv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1023: l_rgpv_tbl_in(1).last_update_date := SYSDATE;
1024:
1025:
1026: OKC_RULE_PUB.create_rule_group

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

1036: x_return_status := l_return_status;
1037: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Rule_Grp :: create_rule_group status:'|| x_return_status);
1038: --dbms_output.put_line('OKC_RULE_PUB.create_rule_group = ' || l_return_status);
1039:
1040: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1041:
1042: RAISE G_EXCEPTION_HALT_VALIDATION;
1043:
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

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

1040: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1041:
1042: RAISE G_EXCEPTION_HALT_VALIDATION;
1043:
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1045:
1046: RAISE G_EXCEPTION_HALT_VALIDATION;
1047:
1048: END IF;

Line 1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1057: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1058: null;
1059: WHEN Others THEN
1060:
1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1062: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1063: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Rule_Grp :: Error:'||SQLCODE ||':'|| SQLERRM );
1064:
1065: -----end rule group check

Line 1062: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

1058: null;
1059: WHEN Others THEN
1060:
1061: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1062: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1063: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Rule_Grp :: Error:'||SQLCODE ||':'|| SQLERRM );
1064:
1065: -----end rule group check
1066: End Create_Rule_Grp;

Line 1131: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;

1127: l_partyid NUMBER;
1128: l_contact_id NUMBER;
1129:
1130: l_api_version CONSTANT NUMBER := 1.0;
1131: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
1132: l_return_status VARCHAR2(1) := 'S';
1133: l_index VARCHAR2 (2000);
1134: l_msg_data VARCHAR2 (2000);
1135: l_msg_count NUMBER;

Line 1158: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

1154:
1155: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Merchant Role Creation CPL_Id: '||l_partyid_v);
1156: --dbms_output.put_line( ' MERCHANT ROLE CREATION :- CPL ID ' || l_partyid_v);
1157:
1158: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
1159: Raise G_EXCEPTION_HALT_VALIDATION;
1160: End If;
1161:
1162:

Line 1180: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

1176:
1177: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Subscriber Role Creation CPL_Id: '||l_partyid);
1178: --dbms_output.put_line( ' SUBSCRIBER ROLE CREATION :- CPL ID ' || l_partyid);
1179:
1180: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
1181: Raise G_EXCEPTION_HALT_VALIDATION;
1182: End If;
1183:
1184:

Line 1203: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

1199:
1200: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Vendor Role Creation CPL_Id: '||l_partyid_v);
1201: --dbms_output.put_line( ' VENDOR ROLE CREATION :- CPL ID ' || l_partyid_v);
1202:
1203: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
1204: Raise G_EXCEPTION_HALT_VALIDATION;
1205: End If;
1206:
1207:

Line 1225: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

1221:
1222: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Customer Role Creation CPL_Id: '||l_partyid);
1223: --dbms_output.put_line( ' CUSTOMER ROLE CREATION :- CPL ID ' || l_partyid);
1224:
1225: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
1226: Raise G_EXCEPTION_HALT_VALIDATION;
1227: End If;
1228:
1229: End If;

Line 1256: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

1252:
1253: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Third Party Role Creation CPL_Id: '||l_partyid_t);
1254: --dbms_output.put_line( ' THIRD PARTY ROLE CREATION :- CPL ID ' || l_partyid_t);
1255:
1256: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
1257: Raise G_EXCEPTION_HALT_VALIDATION;
1258: End If;
1259:
1260: End If;

Line 1303: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_contact_info_tbl (i).contact_role

1299: END IF;
1300: End If;
1301:
1302: IF l_add2partyid Is Null THEN
1303: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_contact_info_tbl (i).contact_role
1304: || ' Contact (HEADER) Missing Role Id ' || p_contact_info_tbl (i).contact_object_code);
1305: Raise G_EXCEPTION_HALT_VALIDATION;
1306: End If;
1307:

Line 1341: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

1337: --dbms_output.put_line('insert contact'||l_return_status);
1338:
1339: x_return_status := l_return_status;
1340:
1341: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
1342: l_contact_id := l_ctcv_tbl_out(1).id;
1343: Else
1344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_contact_info_tbl (i).contact_role
1345: || ' Contact (HEADER) ' || p_contact_info_tbl (i).contact_object_code);

Line 1344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_contact_info_tbl (i).contact_role

1340:
1341: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
1342: l_contact_id := l_ctcv_tbl_out(1).id;
1343: Else
1344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_contact_info_tbl (i).contact_role
1345: || ' Contact (HEADER) ' || p_contact_info_tbl (i).contact_object_code);
1346: Raise G_EXCEPTION_HALT_VALIDATION;
1347: End if;
1348:

Line 1360: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1356: EXCEPTION
1357: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1358: x_return_status := l_return_status;
1359: WHEN Others THEN
1360: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1361: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1362: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Error: '||SQLCODE||':'|| SQLERRM);
1363:
1364: END Create_Contacts;

Line 1361: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

1357: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1358: x_return_status := l_return_status;
1359: WHEN Others THEN
1360: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1361: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1362: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contacts :: Error: '||SQLCODE||':'|| SQLERRM);
1363:
1364: END Create_Contacts;
1365:

Line 1395: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;

1391:
1392: l_grpid NUMBER;
1393: l_pdfid NUMBER;
1394: l_ctrgrp NUMBER;
1395: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
1396: l_return_status VARCHAR2(10);
1397: l_msg_count NUMBER;
1398: l_msg_data VARCHAR2(2000);
1399: l_msg_index_out NUMBER;

Line 1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1406: l_cgcv_tbl_in.DELETE;
1407: l_ctrgrp := Nvl(p_chr_group, Nvl(Fnd_Profile.Value ('OKS_WARR_CONTRACT_GROUP'),2));
1408: l_cgcv_tbl_in(1).cgp_parent_id := l_ctrgrp;
1409: l_cgcv_tbl_in(1).included_chr_id := p_contract_id;
1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

Line 1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1407: l_ctrgrp := Nvl(p_chr_group, Nvl(Fnd_Profile.Value ('OKS_WARR_CONTRACT_GROUP'),2));
1408: l_cgcv_tbl_in(1).cgp_parent_id := l_ctrgrp;
1409: l_cgcv_tbl_in(1).included_chr_id := p_contract_id;
1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;

Line 1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;

1408: l_cgcv_tbl_in(1).cgp_parent_id := l_ctrgrp;
1409: l_cgcv_tbl_in(1).included_chr_id := p_contract_id;
1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1416: l_cgcv_tbl_in(1).included_cgp_id := NULL;

Line 1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1409: l_cgcv_tbl_in(1).included_chr_id := p_contract_id;
1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1416: l_cgcv_tbl_in(1).included_cgp_id := NULL;
1417:

Line 1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

1410: l_cgcv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1416: l_cgcv_tbl_in(1).included_cgp_id := NULL;
1417:
1418: okc_contract_group_pub.create_contract_grpngs

Line 1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;

1411: l_cgcv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1412: l_cgcv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1413: l_cgcv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1414: l_cgcv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1415: l_cgcv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1416: l_cgcv_tbl_in(1).included_cgp_id := NULL;
1417:
1418: okc_contract_group_pub.create_contract_grpngs
1419: (

Line 1434: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1430: --dbms_output.put_line( 'K HDR CREATION :- GROUPING STATUS ' || l_return_status);
1431:
1432: x_return_status := l_return_status;
1433:
1434: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1435: l_grpid := l_cgcv_tbl_out(1).id;
1436: Else
1437: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Contract Group (HEADER)');
1438: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1437: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Contract Group (HEADER)');

1433:
1434: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1435: l_grpid := l_cgcv_tbl_out(1).id;
1436: Else
1437: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Contract Group (HEADER)');
1438: Raise G_EXCEPTION_HALT_VALIDATION;
1439: End if;
1440:
1441:

Line 1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;

1443:
1444: l_cpsv_tbl_in(1).pdf_id := p_pdf_id;
1445: l_cpsv_tbl_in(1).CHR_ID := p_contract_id;
1446: l_cpsv_tbl_in(1).USER_ID := FND_global.user_id;
1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;
1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

Line 1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1444: l_cpsv_tbl_in(1).pdf_id := p_pdf_id;
1445: l_cpsv_tbl_in(1).CHR_ID := p_contract_id;
1446: l_cpsv_tbl_in(1).USER_ID := FND_global.user_id;
1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;
1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

Line 1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1445: l_cpsv_tbl_in(1).CHR_ID := p_contract_id;
1446: l_cpsv_tbl_in(1).USER_ID := FND_global.user_id;
1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;
1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;

Line 1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;

1446: l_cpsv_tbl_in(1).USER_ID := FND_global.user_id;
1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;
1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1454:

Line 1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1447: l_cpsv_tbl_in(1).IN_PROCESS_YN := OKC_API.G_MISS_CHAR;
1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1454:
1455: okc_contract_pub.create_contract_process

Line 1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;

1448: l_cpsv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1454:
1455: okc_contract_pub.create_contract_process
1456: (

Line 1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;

1449: l_cpsv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1450: l_cpsv_tbl_in(1).creation_date := OKC_API.G_MISS_DATE;
1451: l_cpsv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1452: l_cpsv_tbl_in(1).last_update_date := OKC_API.G_MISS_DATE;
1453: l_cpsv_tbl_in(1).last_update_login := OKC_API.G_MISS_NUM;
1454:
1455: okc_contract_pub.create_contract_process
1456: (
1457: p_api_version => l_api_version,

Line 1474: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Contract WorkFlow (HEADER)');

1470:
1471: If l_return_status = 'S' then
1472: l_pdfid := l_cpsv_tbl_out(1).id;
1473: Else
1474: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Contract WorkFlow (HEADER)');
1475: Raise G_EXCEPTION_HALT_VALIDATION;
1476: End if;
1477:
1478: End If; -- pdf not null

Line 1486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1482:
1483: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1484: x_return_status := l_return_status;
1485: WHEN Others THEN
1486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1487: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1488: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Groups :: Error: '|| SQLCODE||':'|| SQLERRM);
1489:
1490: END Create_Groups;

Line 1487: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

1483: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1484: x_return_status := l_return_status;
1485: WHEN Others THEN
1486: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1487: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1488: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Groups :: Error: '|| SQLCODE||':'|| SQLERRM);
1489:
1490: END Create_Groups;
1491:

Line 1601: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;

1597: --Agreements/Governance
1598: l_gvev_tbl_in okc_contract_pub.gvev_tbl_type;
1599: l_gvev_tbl_out okc_contract_pub.gvev_tbl_type;
1600: --miss
1601: l_init_msg_list VARCHAR2(2000) := OKC_API.G_FALSE;
1602: l_return_status VARCHAR2(10);
1603: l_msg_count NUMBER;
1604: l_msg_data VARCHAR2(2000);
1605: l_msg_index_out NUMBER;

Line 1723: IF NOT l_return_status = okc_api.g_ret_sts_success THEN

1719: );
1720: OKS_RENEW_PVT.DEBUG_LOG('(OKS_EXTWARPRGM_PVT).Create_K_Hdr :: OKS contract header : '|| l_return_status);
1721: FND_FILE.PUT_LINE(fnd_file.LOG,'K HDR CREATION :- OKS Contract Header STATUS '|| l_return_status );
1722:
1723: IF NOT l_return_status = okc_api.g_ret_sts_success THEN
1724: OKC_API.SET_MESSAGE(
1725: g_app_name,
1726: g_required_value,
1727: g_col_name_token,

Line 1724: OKC_API.SET_MESSAGE(

1720: OKS_RENEW_PVT.DEBUG_LOG('(OKS_EXTWARPRGM_PVT).Create_K_Hdr :: OKS contract header : '|| l_return_status);
1721: FND_FILE.PUT_LINE(fnd_file.LOG,'K HDR CREATION :- OKS Contract Header STATUS '|| l_return_status );
1722:
1723: IF NOT l_return_status = okc_api.g_ret_sts_success THEN
1724: OKC_API.SET_MESSAGE(
1725: g_app_name,
1726: g_required_value,
1727: g_col_name_token,
1728: 'OKS (HEADER)'

Line 1752: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1748: l_rulv_tbl_in(1).object2_id1 := 'TAX_CONTROL_FLAG';
1749: l_rulv_tbl_in(1).object2_id2 := p_contract_rec.tax_status_flag;
1750: l_rulv_tbl_in(1).JTOT_OBJECT2_CODE := G_JTF_TAXCTRL;
1751: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1752: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1753: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1754: l_rulv_tbl_in(1).creation_date := SYSDATE;
1755: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1756: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 1753: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1749: l_rulv_tbl_in(1).object2_id2 := p_contract_rec.tax_status_flag;
1750: l_rulv_tbl_in(1).JTOT_OBJECT2_CODE := G_JTF_TAXCTRL;
1751: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1752: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1753: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1754: l_rulv_tbl_in(1).creation_date := SYSDATE;
1755: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1756: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1757:

Line 1755: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1751: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1752: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1753: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1754: l_rulv_tbl_in(1).creation_date := SYSDATE;
1755: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1756: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1757:
1758: OKC_RULE_PUB.create_rule
1759: (

Line 1772: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

1768: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: Tax rule status:'|| l_return_status);
1769: --dbms_output.put_line( 'K HDR CREATION :- TAX RULE STATUS ' || l_return_Status);
1770: x_return_status := l_return_status;
1771:
1772: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1773: l_rule_id := l_rulv_tbl_out(1).id;
1774: ELSE
1775: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (HEADER)');
1776: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1775: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (HEADER)');

1771:
1772: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1773: l_rule_id := l_rulv_tbl_out(1).id;
1774: ELSE
1775: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (HEADER)');
1776: Raise G_EXCEPTION_HALT_VALIDATION;
1777: END IF;
1778: END IF;
1779: END IF;

Line 1797: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1793: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.price_list_id;
1794: l_rulv_tbl_in(1).object1_id2 := '#';
1795: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PRICE;
1796: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1797: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1798: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1799: l_rulv_tbl_in(1).creation_date := SYSDATE;
1800: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1801: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 1798: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1794: l_rulv_tbl_in(1).object1_id2 := '#';
1795: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PRICE;
1796: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1797: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1798: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1799: l_rulv_tbl_in(1).creation_date := SYSDATE;
1800: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1801: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1802: OKC_RULE_PUB.create_rule

Line 1800: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1796: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1797: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1798: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1799: l_rulv_tbl_in(1).creation_date := SYSDATE;
1800: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1801: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1802: OKC_RULE_PUB.create_rule
1803: (
1804: p_api_version => l_api_version,

Line 1818: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

1814: --dbms_output.put_line( 'K HDR CREATION :- PRE RULE STATUS ' || l_return_Status);
1815: x_return_status := l_return_status;
1816:
1817:
1818: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1819: l_rule_id := l_rulv_tbl_out(1).id;
1820: ELSE
1821: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE LIST (HEADER)');
1822: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1821: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE LIST (HEADER)');

1817:
1818: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1819: l_rule_id := l_rulv_tbl_out(1).id;
1820: ELSE
1821: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE LIST (HEADER)');
1822: Raise G_EXCEPTION_HALT_VALIDATION;
1823: END IF;
1824:
1825: END IF;

Line 1862: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1858:
1859: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: QTO rule status:'|| l_return_status);
1860: --dbms_output.put_line('K HDR CREATION :- QTO RULE STATUS ' || l_return_Status);
1861:
1862: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1863: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');
1864: Raise G_EXCEPTION_HALT_VALIDATION;
1865: End If;
1866: End If;

Line 1863: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');

1859: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: QTO rule status:'|| l_return_status);
1860: --dbms_output.put_line('K HDR CREATION :- QTO RULE STATUS ' || l_return_Status);
1861:
1862: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1863: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');
1864: Raise G_EXCEPTION_HALT_VALIDATION;
1865: End If;
1866: End If;
1867:

Line 1887: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1883: );
1884: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: QTO rule status:'|| l_return_status);
1885: --dbms_output.put_line('K HDR CREATION :- QTO RULE STATUS ' || l_return_Status);
1886:
1887: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1888: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');
1889: Raise G_EXCEPTION_HALT_VALIDATION;
1890: End If;
1891: End If;

Line 1888: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');

1884: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: QTO rule status:'|| l_return_status);
1885: --dbms_output.put_line('K HDR CREATION :- QTO RULE STATUS ' || l_return_Status);
1886:
1887: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1888: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'QTO RUle (HEADER)');
1889: Raise G_EXCEPTION_HALT_VALIDATION;
1890: End If;
1891: End If;
1892: End If;

Line 1908: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1904: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.payment_term_id;
1905: l_rulv_tbl_in(1).object1_id2 := '#';
1906: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PAYMENT_TERM;
1907: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1908: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1909: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1910: l_rulv_tbl_in(1).creation_date := SYSDATE;
1911: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1912: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 1909: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1905: l_rulv_tbl_in(1).object1_id2 := '#';
1906: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PAYMENT_TERM;
1907: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1908: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1909: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1910: l_rulv_tbl_in(1).creation_date := SYSDATE;
1911: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1912: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1913:

Line 1911: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1907: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1908: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1909: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1910: l_rulv_tbl_in(1).creation_date := SYSDATE;
1911: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1912: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1913:
1914: OKC_RULE_PUB.create_rule
1915: (

Line 1929: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

1925: x_return_status := l_return_status;
1926: --dbms_output.put_line( 'K HDR CREATION :- PTR RULE STATUS ' || x_return_Status);
1927:
1928:
1929: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1930: l_rule_id := l_rulv_tbl_out(1).id;
1931: ELSE
1932: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PAYMENT TERM (HEADER)');
1933: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1932: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PAYMENT TERM (HEADER)');

1928:
1929: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
1930: l_rule_id := l_rulv_tbl_out(1).id;
1931: ELSE
1932: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PAYMENT TERM (HEADER)');
1933: Raise G_EXCEPTION_HALT_VALIDATION;
1934: END IF;
1935: END IF;
1936: END IF;

Line 1956: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1952: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
1953: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.cvn_rate;
1954: l_rulv_tbl_in(1).rule_information2 := to_char(p_contract_rec.cvn_date ,'YYYY/MM/DD HH24:MI:SS') ;
1955: l_rulv_tbl_in(1).rule_information3 := p_contract_rec.cvn_euro_rate;
1956: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1957: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1958: l_rulv_tbl_in(1).creation_date := SYSDATE;
1959: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1960: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 1957: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1953: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.cvn_rate;
1954: l_rulv_tbl_in(1).rule_information2 := to_char(p_contract_rec.cvn_date ,'YYYY/MM/DD HH24:MI:SS') ;
1955: l_rulv_tbl_in(1).rule_information3 := p_contract_rec.cvn_euro_rate;
1956: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1957: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1958: l_rulv_tbl_in(1).creation_date := SYSDATE;
1959: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1960: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1961:

Line 1959: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

1955: l_rulv_tbl_in(1).rule_information3 := p_contract_rec.cvn_euro_rate;
1956: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
1957: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
1958: l_rulv_tbl_in(1).creation_date := SYSDATE;
1959: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
1960: l_rulv_tbl_in(1).last_update_date := SYSDATE;
1961:
1962: OKC_RULE_PUB.create_rule
1963: (

Line 1976: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1972: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: CVN rule status:'|| l_return_status);
1973: x_return_status := l_return_status;
1974: --dbms_output.put_line( 'K HDR CREATION :- CVN RULE STATUS ' || l_return_Status);
1975:
1976: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1977: l_rule_id := l_rulv_tbl_out(1).id;
1978: Else
1979: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CONVERSION TYPE (HEADER)');
1980: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1979: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CONVERSION TYPE (HEADER)');

1975:
1976: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1977: l_rule_id := l_rulv_tbl_out(1).id;
1978: Else
1979: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CONVERSION TYPE (HEADER)');
1980: Raise G_EXCEPTION_HALT_VALIDATION;
1981: End If;
1982: END IF;
1983: END IF;

Line 2001: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

1997: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.bill_to_id;
1998: l_rulv_tbl_in(1).object1_id2 := '#';
1999: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_BILLTO;
2000: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2001: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2002: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2003: l_rulv_tbl_in(1).creation_date := SYSDATE;
2004: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2005: l_rulv_tbl_in(1).last_update_date := SYSDATE ;

Line 2002: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

1998: l_rulv_tbl_in(1).object1_id2 := '#';
1999: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_BILLTO;
2000: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2001: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2002: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2003: l_rulv_tbl_in(1).creation_date := SYSDATE;
2004: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2005: l_rulv_tbl_in(1).last_update_date := SYSDATE ;
2006:

Line 2004: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2000: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2001: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2002: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2003: l_rulv_tbl_in(1).creation_date := SYSDATE;
2004: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2005: l_rulv_tbl_in(1).last_update_date := SYSDATE ;
2006:
2007: OKC_RULE_PUB.create_rule
2008: (

Line 2021: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2017: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: BTO rule status:'|| l_return_status);
2018: x_return_status := l_return_status;
2019: --dbms_output.put_line( 'K HDR CREATION :- BTO RULE STATUS ' || l_return_Status);
2020:
2021: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2022: l_rule_id := l_rulv_tbl_out(1).id;
2023: Else
2024: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo Id (HEADER)');
2025: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2024: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo Id (HEADER)');

2020:
2021: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2022: l_rule_id := l_rulv_tbl_out(1).id;
2023: Else
2024: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo Id (HEADER)');
2025: Raise G_EXCEPTION_HALT_VALIDATION;
2026: End If;
2027: End If;
2028: End If;

Line 2046: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2042: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.ship_to_id;
2043: l_rulv_tbl_in(1).object1_id2 := '#';
2044: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_SHIPTO;
2045: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2046: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2047: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2048: l_rulv_tbl_in(1).creation_date := SYSDATE;
2049: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2050: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2047: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2043: l_rulv_tbl_in(1).object1_id2 := '#';
2044: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_SHIPTO;
2045: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2046: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2047: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2048: l_rulv_tbl_in(1).creation_date := SYSDATE;
2049: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2050: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2051:

Line 2049: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2045: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2046: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2047: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2048: l_rulv_tbl_in(1).creation_date := SYSDATE;
2049: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2050: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2051:
2052: OKC_RULE_PUB.create_rule
2053: (

Line 2066: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2062: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: STO rule status:'|| l_return_status);
2063: x_return_status := l_return_status;
2064: --dbms_output.put_line( 'K HDR CREATION :- STO RULE STATUS ' || l_return_Status);
2065:
2066: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2067: l_rule_id := l_rulv_tbl_out(1).id;
2068: Else
2069: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo Id (HEADER)');
2070: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2069: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo Id (HEADER)');

2065:
2066: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2067: l_rule_id := l_rulv_tbl_out(1).id;
2068: Else
2069: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo Id (HEADER)');
2070: Raise G_EXCEPTION_HALT_VALIDATION;
2071: End If;
2072: End If;
2073: End If;

Line 2102: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Agreement Id (HEADER)');

2098: x_return_status := l_return_status;
2099: If l_return_status = 'S' then
2100: l_govern_id := l_gvev_tbl_out(1).id;
2101: Else
2102: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Agreement Id (HEADER)');
2103: Raise G_EXCEPTION_HALT_VALIDATION;
2104: End if;
2105: End If;
2106:

Line 2124: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2120: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.accounting_rule_type;
2121: l_rulv_tbl_in(1).object1_id2 := '#';
2122: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_ARL;
2123: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2124: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2125: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2126: l_rulv_tbl_in(1).creation_date := SYSDATE;
2127: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2128: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2125: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2121: l_rulv_tbl_in(1).object1_id2 := '#';
2122: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_ARL;
2123: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2124: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2125: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2126: l_rulv_tbl_in(1).creation_date := SYSDATE;
2127: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2128: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2129:

Line 2127: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2123: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2124: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2125: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2126: l_rulv_tbl_in(1).creation_date := SYSDATE;
2127: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2128: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2129:
2130: OKC_RULE_PUB.create_rule
2131: (

Line 2144: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2140: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: ARL rule status:'|| l_return_status);
2141: x_return_status := l_return_status;
2142: --dbms_output.put_line( 'K HDR CREATION :- ARL RULE STATUS ' || l_return_Status);
2143:
2144: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2145: l_rule_id := l_rulv_tbl_out(1).id;
2146: Else
2147: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Accounting Id (HEADER)');
2148: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2147: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Accounting Id (HEADER)');

2143:
2144: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2145: l_rule_id := l_rulv_tbl_out(1).id;
2146: Else
2147: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Accounting Id (HEADER)');
2148: Raise G_EXCEPTION_HALT_VALIDATION;
2149: End If;
2150: End If;
2151: End If;

Line 2169: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2165: l_rulv_tbl_in(1).object1_id1 := p_contract_rec.invoice_rule_type;
2166: l_rulv_tbl_in(1).object1_id2 := '#';
2167: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_IRE;
2168: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2169: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2170: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2171: l_rulv_tbl_in(1).creation_date := SYSDATE;
2172: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2173: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2170: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2166: l_rulv_tbl_in(1).object1_id2 := '#';
2167: l_rulv_tbl_in(1).jtot_object1_code := G_JTF_IRE;
2168: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2169: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2170: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2171: l_rulv_tbl_in(1).creation_date := SYSDATE;
2172: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2173: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2174:

Line 2172: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2168: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2169: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2170: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2171: l_rulv_tbl_in(1).creation_date := SYSDATE;
2172: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2173: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2174:
2175: OKC_RULE_PUB.create_rule
2176: (

Line 2189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2185: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: IRE rule status:'|| l_return_status);
2186: x_return_status := l_return_status;
2187: --dbms_output.put_line( 'K HDR CREATION :- IRE RULE STATUS ' || l_return_Status);
2188:
2189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2190: l_rule_id := l_rulv_tbl_out(1).id;
2191: Else
2192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (HEADER)');
2193: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (HEADER)');

2188:
2189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2190: l_rule_id := l_rulv_tbl_out(1).id;
2191: Else
2192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (HEADER)');
2193: Raise G_EXCEPTION_HALT_VALIDATION;
2194: End If;
2195: End If;
2196: End If;

Line 2213: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2209: l_rulv_tbl_in(1).warn_yn := 'N';
2210: l_rulv_tbl_in(1).rule_information_category := 'REN';
2211: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_type;
2212: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2213: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2214: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2215: l_rulv_tbl_in(1).creation_date := SYSDATE;
2216: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2217: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2214: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2210: l_rulv_tbl_in(1).rule_information_category := 'REN';
2211: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_type;
2212: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2213: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2214: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2215: l_rulv_tbl_in(1).creation_date := SYSDATE;
2216: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2217: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2218:

Line 2216: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2212: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2213: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2214: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2215: l_rulv_tbl_in(1).creation_date := SYSDATE;
2216: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2217: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2218:
2219: OKC_RULE_PUB.create_rule
2220: (

Line 2233: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2229: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: REN rule status:'|| l_return_status);
2230: x_return_status := l_return_status;
2231: --dbms_output.put_line( 'K HDR CREATION :- REN RULE STATUS ' || l_return_Status);
2232:
2233: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2234: l_rule_id := l_rulv_tbl_out(1).id;
2235: Else
2236: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Type (HEADER)');
2237: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2236: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Type (HEADER)');

2232:
2233: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2234: l_rule_id := l_rulv_tbl_out(1).id;
2235: Else
2236: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Type (HEADER)');
2237: Raise G_EXCEPTION_HALT_VALIDATION;
2238: End If;
2239: End If;
2240: End If;

Line 2266: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2262: l_rulv_tbl_in(1).object1_id2 := '#';
2263: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PRICE;
2264: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_pricing_type;
2265: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2266: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2267: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2268: l_rulv_tbl_in(1).creation_date := SYSDATE;
2269: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2270: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2267: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2263: l_rulv_tbl_in(1).JTOT_OBJECT1_CODE := G_JTF_PRICE;
2264: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_pricing_type;
2265: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2266: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2267: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2268: l_rulv_tbl_in(1).creation_date := SYSDATE;
2269: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2270: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2271:

Line 2269: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2265: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2266: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2267: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2268: l_rulv_tbl_in(1).creation_date := SYSDATE;
2269: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2270: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2271:
2272: OKC_RULE_PUB.create_rule
2273: (

Line 2287: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2283: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: RPT rule status:'|| l_return_status);
2284: x_return_status := l_return_status;
2285: --dbms_output.put_line( 'K HDR CREATION :- RPT RULE STATUS ' || l_return_Status);
2286:
2287: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2288: l_rule_id := l_rulv_tbl_out(1).id;
2289: Else
2290: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Pricing (HEADER)');
2291: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2290: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Pricing (HEADER)');

2286:
2287: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2288: l_rule_id := l_rulv_tbl_out(1).id;
2289: Else
2290: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal Pricing (HEADER)');
2291: Raise G_EXCEPTION_HALT_VALIDATION;
2292: End If;
2293: End If;
2294: End If;

Line 2311: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2307: l_rulv_tbl_in(1).warn_yn := 'N';
2308: l_rulv_tbl_in(1).rule_information_category := 'RPO';
2309: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_po;
2310: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2311: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2312: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2313: l_rulv_tbl_in(1).creation_date := SYSDATE;
2314: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2315: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2312: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2308: l_rulv_tbl_in(1).rule_information_category := 'RPO';
2309: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.renewal_po;
2310: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2311: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2312: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2313: l_rulv_tbl_in(1).creation_date := SYSDATE;
2314: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2315: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2316:

Line 2314: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2310: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2311: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2312: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2313: l_rulv_tbl_in(1).creation_date := SYSDATE;
2314: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2315: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2316:
2317: OKC_RULE_PUB.create_rule
2318: (

Line 2331: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2327: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: RPO rule status:'|| l_return_status);
2328: x_return_status := l_return_status;
2329: --dbms_output.put_line( 'K HDR CREATION :- RPO RULE STATUS ' || l_return_Status);
2330:
2331: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2332: l_rule_id := l_rulv_tbl_out(1).id;
2333: Else
2334: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal PO (HEADER)');
2335: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2334: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal PO (HEADER)');

2330:
2331: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2332: l_rule_id := l_rulv_tbl_out(1).id;
2333: Else
2334: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Renewal PO (HEADER)');
2335: Raise G_EXCEPTION_HALT_VALIDATION;
2336: End If;
2337: End If;
2338: End If;

Line 2358: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2354: l_rulv_tbl_in(1).object1_id2 := '#';
2355: l_rulv_tbl_in(1).jtot_object1_code := 'OKS_TRXTYPE';
2356: l_rulv_tbl_in(1).rule_information11 := p_contract_rec.Ar_interface_yn;
2357: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2358: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2359: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2360: l_rulv_tbl_in(1).creation_date := SYSDATE;
2361: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2362: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2359: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2355: l_rulv_tbl_in(1).jtot_object1_code := 'OKS_TRXTYPE';
2356: l_rulv_tbl_in(1).rule_information11 := p_contract_rec.Ar_interface_yn;
2357: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2358: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2359: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2360: l_rulv_tbl_in(1).creation_date := SYSDATE;
2361: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2362: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2363:

Line 2361: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2357: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2358: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2359: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2360: l_rulv_tbl_in(1).creation_date := SYSDATE;
2361: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2362: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2363:
2364: OKC_RULE_PUB.create_rule
2365: (

Line 2378: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2374: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: SBG rule status:'|| l_return_status);
2375: x_return_status := l_return_status;
2376: --dbms_output.put_line( 'K HDR CREATION :- SBG RULE STATUS ' || l_return_Status);
2377:
2378: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2379: l_rule_id := l_rulv_tbl_out(1).id;
2380: Else
2381: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'AR Interface (HEADER)');
2382: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2381: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'AR Interface (HEADER)');

2377:
2378: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2379: l_rule_id := l_rulv_tbl_out(1).id;
2380: Else
2381: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'AR Interface (HEADER)');
2382: Raise G_EXCEPTION_HALT_VALIDATION;
2383: End If;
2384: End If;
2385: End If;

Line 2403: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2399: l_rulv_tbl_in(1).rule_information1 := TO_CHAR(p_contract_rec.estimate_percent);
2400: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.estimate_duration);
2401: l_rulv_tbl_in(1).rule_information3 := p_contract_rec.estimate_period;
2402: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2403: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2404: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2405: l_rulv_tbl_in(1).creation_date := SYSDATE;
2406: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2407: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2404: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2400: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.estimate_duration);
2401: l_rulv_tbl_in(1).rule_information3 := p_contract_rec.estimate_period;
2402: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2403: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2404: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2405: l_rulv_tbl_in(1).creation_date := SYSDATE;
2406: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2407: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2408:

Line 2406: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2402: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2403: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2404: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2405: l_rulv_tbl_in(1).creation_date := SYSDATE;
2406: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2407: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2408:
2409: OKC_RULE_PUB.create_rule
2410: (

Line 2423: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2419: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: RER rule status:'|| l_return_status);
2420: x_return_status := l_return_status;
2421: --dbms_output.put_line( 'K HDR CREATION :- RER RULE STATUS ' || l_return_Status);
2422:
2423: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2424: l_rule_id := l_rulv_tbl_out(1).id;
2425: Else
2426: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Estimated Percent (HEADER)');
2427: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2426: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Estimated Percent (HEADER)');

2422:
2423: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2424: l_rule_id := l_rulv_tbl_out(1).id;
2425: Else
2426: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Estimated Percent (HEADER)');
2427: Raise G_EXCEPTION_HALT_VALIDATION;
2428: End If;
2429: End If;
2430: End If;

Line 2448: OKC_API.SET_MESSAGE

2444:
2445: l_validate_cc := Validate_Credit_Card(p_cc_num_stripped => x_credit_card_no);
2446:
2447: IF l_validate_cc = 0 THEN ---failure
2448: OKC_API.SET_MESSAGE
2449: ( p_app_name => 'OKS'
2450: ,p_msg_name => G_INVALID_VALUE
2451: ,p_token1 => G_COL_NAME_TOKEN
2452: ,p_token1_value => 'Credit Card Number'

Line 2454: x_return_status := OKC_API.G_RET_STS_ERROR;

2450: ,p_msg_name => G_INVALID_VALUE
2451: ,p_token1 => G_COL_NAME_TOKEN
2452: ,p_token1_value => 'Credit Card Number'
2453: );
2454: x_return_status := OKC_API.G_RET_STS_ERROR;
2455: Raise G_EXCEPTION_HALT_VALIDATION;
2456:
2457: ELSIF l_validate_cc = 1 THEN
2458: ------ERROROUT_AD('ccr rule creation starting : ');

Line 2468: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2464: l_rulv_tbl_in(1).rule_information_category := 'CCR';
2465: l_rulv_tbl_in(1).rule_information1 := x_credit_card_no;
2466: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.Expiry_date ,'YYYY/MM/DD HH24:MI:SS');
2467: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2468: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2469: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2470: l_rulv_tbl_in(1).creation_date := SYSDATE;
2471: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2472: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2469: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2465: l_rulv_tbl_in(1).rule_information1 := x_credit_card_no;
2466: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.Expiry_date ,'YYYY/MM/DD HH24:MI:SS');
2467: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2468: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2469: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2470: l_rulv_tbl_in(1).creation_date := SYSDATE;
2471: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2472: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2473:

Line 2471: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2467: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2468: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2469: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2470: l_rulv_tbl_in(1).creation_date := SYSDATE;
2471: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2472: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2473:
2474: OKC_RULE_PUB.create_rule
2475: (

Line 2488: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2484: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: CCR rule status:'|| l_return_status);
2485: x_return_status := l_return_status;
2486: --dbms_output.put_line( 'K HDR CREATION :- CCR RULE STATUS ' || l_return_Status);
2487:
2488: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2489: l_rule_id := l_rulv_tbl_out(1).id;
2490: Else
2491: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Creadit Card Rule (HEADER)');
2492: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2491: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Creadit Card Rule (HEADER)');

2487:
2488: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2489: l_rule_id := l_rulv_tbl_out(1).id;
2490: Else
2491: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Creadit Card Rule (HEADER)');
2492: Raise G_EXCEPTION_HALT_VALIDATION;
2493: End If;
2494: END IF; ---credit card valid
2495: End If; ---rule does not exit

Line 2514: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

2510: l_rulv_tbl_in(1).warn_yn := 'N';
2511: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.rve_percent;
2512: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.rve_end_date, 'YYYY/MM/DD HH24:MI:SS');
2513: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2514: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2515: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2516: l_rulv_tbl_in(1).creation_date := SYSDATE;
2517: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2518: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 2515: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

2511: l_rulv_tbl_in(1).rule_information1 := p_contract_rec.rve_percent;
2512: l_rulv_tbl_in(1).rule_information2 := TO_CHAR(p_contract_rec.rve_end_date, 'YYYY/MM/DD HH24:MI:SS');
2513: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2514: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2515: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2516: l_rulv_tbl_in(1).creation_date := SYSDATE;
2517: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2518: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2519:

Line 2517: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

2513: l_rulv_tbl_in(1).dnz_chr_id := p_dnz_chr_id;
2514: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
2515: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
2516: l_rulv_tbl_in(1).creation_date := SYSDATE;
2517: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
2518: l_rulv_tbl_in(1).last_update_date := SYSDATE;
2519:
2520: OKC_RULE_PUB.create_rule
2521: (

Line 2534: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2530: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: REV rule status:'|| l_return_status);
2531: x_return_status := l_return_status;
2532: --dbms_output.put_line( 'K HDR CREATION :- RVE RULE STATUS ' || l_return_Status);
2533:
2534: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2535: l_rule_id := l_rulv_tbl_out(1).id;
2536: Else
2537: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Payment Details Estimation (HEADER)');
2538: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2537: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Payment Details Estimation (HEADER)');

2533:
2534: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2535: l_rule_id := l_rulv_tbl_out(1).id;
2536: Else
2537: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Payment Details Estimation (HEADER)');
2538: Raise G_EXCEPTION_HALT_VALIDATION;
2539: End If;
2540: End If;
2541: End If;

Line 2550: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2546: EXCEPTION
2547: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2548: x_return_status := l_return_status;
2549: WHEN Others THEN
2550: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2551: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2552: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: Error:'|| SQLCODE||':'|| SQLERRM);
2553:
2554: END Create_All_Rules;

Line 2551: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2547: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2548: x_return_status := l_return_status;
2549: WHEN Others THEN
2550: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2551: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2552: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_All_Rules :: Error:'|| SQLCODE||':'|| SQLERRM);
2553:
2554: END Create_All_Rules;
2555:

Line 2579: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;

2575:
2576: l_counter NUMBER;
2577: l_salescredit_id NUMBER;
2578: l_api_version CONSTANT NUMBER := 1.0;
2579: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
2580: l_return_status VARCHAR2(1) := 'S';
2581: l_index VARCHAR2(2000);
2582:
2583:

Line 2604: p_init_msg_list => OKC_API.G_FALSE,

2600:
2601: OKS_SALES_CREDIT_PUB.Insert_Sales_Credit
2602: (
2603: p_api_version => 1.0,
2604: p_init_msg_list => OKC_API.G_FALSE,
2605: x_return_status => l_return_status,
2606: x_msg_count => x_msg_count,
2607: x_msg_data => x_msg_data,
2608: p_scrv_tbl => l_scrv_tbl_in,

Line 2616: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2612: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Sales_Credits :: Insert sales credit status:'|| l_return_status);
2613: x_return_status := l_return_status;
2614: --dbms_output.put_line('K LINE CREATION :- SALESCREDIT STATUS ' || l_return_status);
2615:
2616: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2617: l_salescredit_id := l_scrv_tbl_out(1).id;
2618: Else
2619: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sales Credit Failure');
2620: Raise G_EXCEPTION_HALT_VALIDATION;

Line 2619: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sales Credit Failure');

2615:
2616: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2617: l_salescredit_id := l_scrv_tbl_out(1).id;
2618: Else
2619: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Sales Credit Failure');
2620: Raise G_EXCEPTION_HALT_VALIDATION;
2621: End if;
2622:
2623: Exit When l_counter = p_salescredit_Tbl_in.Last;

Line 2634: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2630: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2631: x_return_status := l_return_status;
2632:
2633: When Others Then
2634: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2635: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2636: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Sales_Credits :: Error:'|| SQLCODE||':'||SQLERRM);
2637:
2638:

Line 2635: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2631: x_return_status := l_return_status;
2632:
2633: When Others Then
2634: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2635: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2636: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Sales_Credits :: Error:'|| SQLCODE||':'||SQLERRM);
2637:
2638:
2639: END Create_Sales_Credits;

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

2656: Is
2657:
2658: l_api_version CONSTANT NUMBER := 1.0;
2659: l_init_msg_list CONSTANT VARCHAR2(1) := 'F';
2660: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2661: l_crjv_tbl_in OKC_K_REL_OBJS_PUB.crjv_tbl_type;
2662: l_crjv_tbl_out OKC_K_REL_OBJS_PUB.crjv_tbl_type;
2663:
2664: Begin

Line 2687: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2683: X_CRJV_TBL => l_crjv_tbl_out
2684: );
2685: x_return_status := l_return_status;
2686:
2687: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2688:
2689: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');
2690: Raise G_EXCEPTION_HALT_VALIDATION;
2691: End if;

Line 2689: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');

2685: x_return_status := l_return_status;
2686:
2687: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2688:
2689: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');
2690: Raise G_EXCEPTION_HALT_VALIDATION;
2691: End if;
2692:
2693: ElsIf p_orderlineid Is Not Null Then

Line 2711: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2707: P_CRJV_TBL => l_crjv_tbl_in,
2708: X_CRJV_TBL => l_crjv_tbl_out
2709: );
2710: x_return_status := l_return_status;
2711: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2712:
2713: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');
2714: Raise G_EXCEPTION_HALT_VALIDATION;
2715: End if;

Line 2713: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');

2709: );
2710: x_return_status := l_return_status;
2711: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2712:
2713: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'OKC_k_rel_objs Create row Error');
2714: Raise G_EXCEPTION_HALT_VALIDATION;
2715: End if;
2716:
2717: End If;

Line 2725: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2721: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2722: x_return_status := l_return_status;
2723:
2724: When Others Then
2725: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2726: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2727: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Obj_Rel ::Error :'||SQLCODE||':'|| SQLERRM);
2728:
2729: END Create_Obj_Rel;

Line 2726: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2722: x_return_status := l_return_status;
2723:
2724: When Others Then
2725: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2726: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2727: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Obj_Rel ::Error :'||SQLCODE||':'|| SQLERRM);
2728:
2729: END Create_Obj_Rel;
2730:

Line 2824: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2820: END IF;
2821:
2822: Exception
2823: When Others Then
2824: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2825: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Check_hdr_Effectivity ::Error: '||SQLCODE ||':'||SQLERRM );
2826:
2827: End Check_hdr_Effectivity;
2828: ---------------------------------------------------------------------------

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

2870: l_rulv_tbl_in okc_rule_pub.rulv_tbl_type;
2871: l_rulv_tbl_out okc_rule_pub.rulv_tbl_type;
2872: l_api_version CONSTANT NUMBER := 1.0;
2873: l_init_msg_list CONSTANT VARCHAR2(1) := 'F';
2874: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2875: l_index NUMBER;
2876: l_module VARCHAR2(50) := 'TBL_RULE.CREATE_ROWS';
2877: l_debug BOOLEAN := TRUE;
2878:

Line 2905: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2901:
2902:
2903: Exception
2904: When Others Then
2905: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2906: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2907: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).create_rules :: Error: '||SQLCODE||':'||SQLERRM );
2908:
2909: End create_rules;

Line 2906: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2902:
2903: Exception
2904: When Others Then
2905: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2906: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2907: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).create_rules :: Error: '||SQLCODE||':'||SQLERRM );
2908:
2909: End create_rules;
2910: ------------------------------------------------------------------------------------

Line 2978: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2974:
2975: Exception
2976:
2977: When Others Then
2978: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2979: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2980: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Check_for_usage ::Error: '||SQLCODE ||':'||SQLERRM );
2981:
2982: End ;

Line 2979: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

2975: Exception
2976:
2977: When Others Then
2978: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2979: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2980: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Check_for_usage ::Error: '||SQLCODE ||':'||SQLERRM );
2981:
2982: End ;
2983:

Line 3021: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;

3017: l_findparty_id NUMBER;
3018: l_hdr_contactid NUMBER;
3019: --Miss
3020: l_api_version CONSTANT NUMBER := 1.0;
3021: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
3022: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3023: l_index VARCHAR2(2000);
3024: l_msg_count NUMBER;
3025: l_msg_data VARCHAR2(2000);

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

3018: l_hdr_contactid NUMBER;
3019: --Miss
3020: l_api_version CONSTANT NUMBER := 1.0;
3021: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
3022: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3023: l_index VARCHAR2(2000);
3024: l_msg_count NUMBER;
3025: l_msg_data VARCHAR2(2000);
3026: l_msg_index_out NUMBER;

Line 3030: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3026: l_msg_index_out NUMBER;
3027: l_msg_index NUMBER;
3028: Begin
3029:
3030: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3031:
3032: Okc_context.set_okc_org_context (p_K_header_rec.authoring_org_id, p_K_header_rec.organization_id);
3033:
3034: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::CREATE CONTRACT HEADER: ');

Line 3070: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3066:
3067: If p_k_header_rec.sts_code Not In ('TERMINATED','EXPIRED','CANCELLED') Then
3068:
3069: x_chrid := l_chrid;
3070: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3071: Raise G_EXCEPTION_HALT_VALIDATION;
3072:
3073: End If;
3074:

Line 3108: l_chrv_tbl_in(1).chr_type := OKC_API.G_MISS_CHAR;

3104: l_chrv_tbl_in(1).short_description := Nvl(p_k_header_rec.short_description,'Warranty/Extended Warranty');
3105: l_chrv_tbl_in(1).template_yn := 'N';
3106: l_chrv_tbl_in(1).start_date := p_k_header_rec.start_date;
3107: l_chrv_tbl_in(1).end_date := p_k_header_rec.end_date;
3108: l_chrv_tbl_in(1).chr_type := OKC_API.G_MISS_CHAR;
3109: l_chrv_tbl_in(1).archived_yn := 'N';
3110: l_chrv_tbl_in(1).deleted_yn := 'N';
3111: l_chrv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
3112: l_chrv_tbl_in(1).creation_date := SYSDATE;

Line 3111: l_chrv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

3107: l_chrv_tbl_in(1).end_date := p_k_header_rec.end_date;
3108: l_chrv_tbl_in(1).chr_type := OKC_API.G_MISS_CHAR;
3109: l_chrv_tbl_in(1).archived_yn := 'N';
3110: l_chrv_tbl_in(1).deleted_yn := 'N';
3111: l_chrv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
3112: l_chrv_tbl_in(1).creation_date := SYSDATE;
3113: l_chrv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
3114: l_chrv_tbl_in(1).last_update_date := SYSDATE;
3115: l_chrv_tbl_in(1).currency_code := p_k_header_rec.currency;

Line 3113: l_chrv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

3109: l_chrv_tbl_in(1).archived_yn := 'N';
3110: l_chrv_tbl_in(1).deleted_yn := 'N';
3111: l_chrv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
3112: l_chrv_tbl_in(1).creation_date := SYSDATE;
3113: l_chrv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
3114: l_chrv_tbl_in(1).last_update_date := SYSDATE;
3115: l_chrv_tbl_in(1).currency_code := p_k_header_rec.currency;
3116: l_chrv_tbl_in(1).buy_or_sell := 'S';
3117: l_chrv_tbl_in(1).issue_or_receive := 'I';

Line 3176: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'HEADER (HEADER)');

3172: If l_return_status = 'S' then
3173: l_chrid := l_chrv_tbl_out(1).id;
3174: x_chrid := l_chrv_tbl_out(1).id;
3175: Else
3176: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'HEADER (HEADER)');
3177: Raise G_EXCEPTION_HALT_VALIDATION;
3178: End if;
3179:
3180: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header :: Header Id: '||to_char(l_chrid) );

Line 3198: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3194:
3195: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_Rule_grp status : '||l_return_status );
3196:
3197: x_return_status := l_return_status;
3198: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3199: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3200: Raise G_EXCEPTION_HALT_VALIDATION;
3201: End If;*/
3202:

Line 3199: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3195: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_Rule_grp status : '||l_return_status );
3196:
3197: x_return_status := l_return_status;
3198: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3199: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3200: Raise G_EXCEPTION_HALT_VALIDATION;
3201: End If;*/
3202:
3203: --dbms_output.put_line( 'K HDR CREATION :- RULE GROUP STATUS '||l_return_status);

Line 3229: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3225: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_contacts status : '||l_return_status );
3226: --dbms_output.put_line('COntacts'||l_return_status);
3227: x_return_status := l_return_status;
3228:
3229: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3230: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3231: Raise G_EXCEPTION_HALT_VALIDATION;
3232: End If;
3233:

Line 3230: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3226: --dbms_output.put_line('COntacts'||l_return_status);
3227: x_return_status := l_return_status;
3228:
3229: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3230: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3231: Raise G_EXCEPTION_HALT_VALIDATION;
3232: End If;
3233:
3234:

Line 3253: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3249: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_Groups status : '||l_return_status );
3250: --dbms_output.put_line('create group'||l_return_status);
3251: x_return_status := l_return_status;
3252:
3253: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3255: Raise G_EXCEPTION_HALT_VALIDATION;
3256: End If;
3257:

Line 3254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3250: --dbms_output.put_line('create group'||l_return_status);
3251: x_return_status := l_return_status;
3252:
3253: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3254: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3255: Raise G_EXCEPTION_HALT_VALIDATION;
3256: End If;
3257:
3258:

Line 3277: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3273: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Rule group Id : '||to_char(l_rule_group_id) );
3274:
3275: x_return_status := l_return_status;
3276:
3277: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3278: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'HEADER RULES NOT CREATED (HEADER)');
3279: Raise G_EXCEPTION_HALT_VALIDATION;
3280: End If;
3281:

Line 3278: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'HEADER RULES NOT CREATED (HEADER)');

3274:
3275: x_return_status := l_return_status;
3276:
3277: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3278: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'HEADER RULES NOT CREATED (HEADER)');
3279: Raise G_EXCEPTION_HALT_VALIDATION;
3280: End If;
3281:
3282: --dbms_output.put_line( 'K HDR CREATION :- RULES CREATION STATUS '||l_return_status);

Line 3300: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3296: x_return_status := l_return_status;
3297:
3298: --dbms_output.put_line( 'K HDR CREATION :- Sales Credit STATUS '||l_return_status);
3299:
3300: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3301: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3302: Raise G_EXCEPTION_HALT_VALIDATION;
3303: End If;
3304:

Line 3301: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3297:
3298: --dbms_output.put_line( 'K HDR CREATION :- Sales Credit STATUS '||l_return_status);
3299:
3300: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3301: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3302: Raise G_EXCEPTION_HALT_VALIDATION;
3303: End If;
3304:
3305: ----create obj rel

Line 3320: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3316:
3317: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_Obj_Rel status : '||l_return_status );
3318: x_return_status := l_return_status;
3319:
3320: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3321: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3322: Raise G_EXCEPTION_HALT_VALIDATION;
3323: End If;
3324:

Line 3321: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3317: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Create_Obj_Rel status : '||l_return_status );
3318: x_return_status := l_return_status;
3319:
3320: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3321: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3322: Raise G_EXCEPTION_HALT_VALIDATION;
3323: End If;
3324:
3325: --dbms_output.put_line( 'K HDR CREATION :- OBJ RULE STATUS ' || l_return_Status);

Line 3343: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3339: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::create_articles status : '||l_return_status );
3340: x_return_status := l_return_status;
3341: --dbms_output.put_line( 'K HDR CREATION :- ARTICLE CREATION ' || l_return_Status);
3342:
3343: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3345: Raise G_EXCEPTION_HALT_VALIDATION;
3346: End If;
3347:

Line 3344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');

3340: x_return_status := l_return_status;
3341: --dbms_output.put_line( 'K HDR CREATION :- ARTICLE CREATION ' || l_return_Status);
3342:
3343: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3344: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Header Id (HEADER)');
3345: Raise G_EXCEPTION_HALT_VALIDATION;
3346: End If;
3347:
3348: x_chrid := l_chrid;

Line 3354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3350: EXCEPTION
3351: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3352: x_return_status := l_return_status;
3353: WHEN Others THEN
3354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3355: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3356: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Error : '||SQLCODE|| ':'||SQLERRM );
3357:
3358: END Create_Contract_Header;

Line 3355: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

3351: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3352: x_return_status := l_return_status;
3353: WHEN Others THEN
3354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3355: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
3356: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract_Header ::Error : '||SQLCODE|| ':'||SQLERRM );
3357:
3358: END Create_Contract_Header;
3359:

Line 3427: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;

3423: )
3424: Is
3425:
3426: l_api_version CONSTANT NUMBER := 1.0;
3427: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
3428: l_return_status VARCHAR2(1) := 'S';
3429: l_index VARCHAR2(2000);
3430:
3431: l_ctcv_tbl_in Okc_contract_party_pub.ctcv_tbl_type;

Line 3556: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3552:
3553:
3554: BEGIN
3555:
3556: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3557:
3558: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: CREATE SERVICE LINE FOR LINE TYPE : '||p_k_line_rec.line_type );
3559:
3560: Validate_Line_Record

Line 3568: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

3564:
3565: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Validate_Line_Record status : '||l_return_status );
3566: --dbms_output.put_line('validate line rec'||l_return_status);
3567:
3568: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
3569: x_return_status := OKC_API.G_RET_STS_ERROR;
3570: Raise G_EXCEPTION_HALT_VALIDATION;
3571: END IF;
3572:

Line 3569: x_return_status := OKC_API.G_RET_STS_ERROR;

3565: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Validate_Line_Record status : '||l_return_status );
3566: --dbms_output.put_line('validate line rec'||l_return_status);
3567:
3568: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
3569: x_return_status := OKC_API.G_RET_STS_ERROR;
3570: Raise G_EXCEPTION_HALT_VALIDATION;
3571: END IF;
3572:
3573: OPEN l_header_csr(p_k_line_rec.k_hdr_id);

Line 3637: x_return_status := OKC_API.G_RET_STS_SUCCESS;

3633: --dbms_output.put_line('K LINE CREATION :- LINE ID ' || l_line_id);
3634:
3635: If l_line_id Is Not Null Then
3636: x_Service_Line_id := l_line_id;
3637: x_return_status := OKC_API.G_RET_STS_SUCCESS;
3638: End If;
3639:
3640:
3641: Check_hdr_effectivity

Line 3659: x_return_status := OKC_API.G_RET_STS_ERROR;

3655: If l_hdrstatus = 'N' Then
3656: NULL;
3657:
3658: ElsIf l_hdrstatus = 'Y' Then
3659: x_return_status := OKC_API.G_RET_STS_ERROR;
3660: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');
3661: Raise G_EXCEPTION_HALT_VALIDATION;
3662:
3663: End If;

Line 3660: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');

3656: NULL;
3657:
3658: ElsIf l_hdrstatus = 'Y' Then
3659: x_return_status := OKC_API.G_RET_STS_ERROR;
3660: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');
3661: Raise G_EXCEPTION_HALT_VALIDATION;
3662:
3663: End If;
3664: --dbms_output.put_line('Check header Effectivity status '||x_return_status);

Line 3743: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Line (LINE)');

3739:
3740: If l_return_status = 'S' then
3741: l_line_id := l_clev_tbl_out(1).id;
3742: Else
3743: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Line (LINE)');
3744: Raise G_EXCEPTION_HALT_VALIDATION;
3745: End if;
3746:
3747: -- rules inserted by oks --IRT

Line 3776: OKC_API.SET_MESSAGE(

3772: p_validate_yn => 'N'
3773: );
3774:
3775: IF NOT l_return_status = 'S' THEN
3776: OKC_API.SET_MESSAGE(
3777: g_app_name,
3778: g_required_value,
3779: g_col_name_token,
3780: 'OKS Contract LINE'

Line 3802: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3798: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: get_duration status : '||l_return_status );
3799: x_return_status := l_return_status;
3800: --dbms_output.put_line('get duration status = ' || x_return_status );
3801:
3802: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3803: Raise G_EXCEPTION_HALT_VALIDATION;
3804: End If;
3805:
3806: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Line jtot_obj_code : '||l_line_jtot_obj_code );

Line 3843: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

3839: --dbms_output.put_line('K LINE CREATION :- KITEM STATUS ' || l_return_status);
3840:
3841: x_return_status := l_return_status;
3842:
3843: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
3844: l_line_item_id := l_cimv_tbl_out(1).id;
3845: Else
3846: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Service Inventory Item ID ' || p_k_line_rec.srv_id || ' ORG ' + okc_context.get_okc_organization_id);
3847: Raise G_EXCEPTION_HALT_VALIDATION;

Line 3846: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Service Inventory Item ID ' || p_k_line_rec.srv_id || ' ORG ' + okc_context.get_okc_organization_id);

3842:
3843: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
3844: l_line_item_id := l_cimv_tbl_out(1).id;
3845: Else
3846: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Service Inventory Item ID ' || p_k_line_rec.srv_id || ' ORG ' + okc_context.get_okc_organization_id);
3847: Raise G_EXCEPTION_HALT_VALIDATION;
3848: End if;
3849:
3850: ----create sales credit

Line 3920: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

3916: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Create CAN Rule status : '||l_return_status );
3917: --dbms_output.put_line('K LINE CREATION :- CAN RULE STATUS ' || l_return_status);
3918: x_return_status := l_return_status;
3919:
3920: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3921: l_rule_id := l_rulv_tbl_out(1).id;
3922: Else
3923: OKC_API.set_message
3924: (

Line 3923: OKC_API.set_message

3919:
3920: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
3921: l_rule_id := l_rulv_tbl_out(1).id;
3922: Else
3923: OKC_API.set_message
3924: (
3925: p_app_name => 'OKS',
3926: p_msg_name => G_REQUIRED_VALUE,
3927: p_token1 => G_COL_NAME_TOKEN,

Line 4025: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

4021:
4022: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: create_contact '||i||':'||l_return_status );
4023: x_return_status := l_return_status;
4024:
4025: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4026: l_line_contact_id := l_ctcv_tbl_out(1).id;
4027: Else
4028: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_Contact_tbl (i).contact_role
4029: || ' Contact (LINE) ' || p_Contact_tbl (i).contact_object_code);

Line 4028: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_Contact_tbl (i).contact_role

4024:
4025: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4026: l_line_contact_id := l_ctcv_tbl_out(1).id;
4027: Else
4028: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, p_Contact_tbl (i).contact_role
4029: || ' Contact (LINE) ' || p_Contact_tbl (i).contact_object_code);
4030: Raise G_EXCEPTION_HALT_VALIDATION;
4031: End if;
4032:

Line 4063: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;

4059: l_rulv_tbl_in(1).object2_id1 := 'TAX_CONTROL_FLAG';
4060: l_rulv_tbl_in(1).object2_id2 := p_k_line_rec.tax_status_flag;
4061: l_rulv_tbl_in(1).JTOT_OBJECT2_CODE := G_JTF_TAXCTRL;
4062: l_rulv_tbl_in(1).dnz_chr_id := p_k_line_rec.k_hdr_id;
4063: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
4064: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
4065: l_rulv_tbl_in(1).creation_date := SYSDATE;
4066: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
4067: l_rulv_tbl_in(1).last_update_date := SYSDATE;

Line 4064: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;

4060: l_rulv_tbl_in(1).object2_id2 := p_k_line_rec.tax_status_flag;
4061: l_rulv_tbl_in(1).JTOT_OBJECT2_CODE := G_JTF_TAXCTRL;
4062: l_rulv_tbl_in(1).dnz_chr_id := p_k_line_rec.k_hdr_id;
4063: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
4064: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
4065: l_rulv_tbl_in(1).creation_date := SYSDATE;
4066: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
4067: l_rulv_tbl_in(1).last_update_date := SYSDATE;
4068:

Line 4066: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;

4062: l_rulv_tbl_in(1).dnz_chr_id := p_k_line_rec.k_hdr_id;
4063: l_rulv_tbl_in(1).object_version_number := OKC_API.G_MISS_NUM;
4064: l_rulv_tbl_in(1).created_by := OKC_API.G_MISS_NUM;
4065: l_rulv_tbl_in(1).creation_date := SYSDATE;
4066: l_rulv_tbl_in(1).last_updated_by := OKC_API.G_MISS_NUM;
4067: l_rulv_tbl_in(1).last_update_date := SYSDATE;
4068:
4069: OKC_RULE_PUB.create_rule
4070: (

Line 4084: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

4080: --dbms_output.put_line( 'K LINE CREATION :- TAX RULE STATUS ' || l_return_Status);
4081:
4082: x_return_status := l_return_status;
4083:
4084: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
4085: l_rule_id := l_rulv_tbl_out(1).id;
4086: ELSE
4087: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (LINE)');
4088: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4087: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (LINE)');

4083:
4084: IF l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
4085: l_rule_id := l_rulv_tbl_out(1).id;
4086: ELSE
4087: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TAX EXEMPTION (LINE)');
4088: Raise G_EXCEPTION_HALT_VALIDATION;
4089: END IF;
4090:
4091: END IF;

Line 4131: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4127: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: ARL rule Status:'||l_return_status );
4128: --dbms_output.put_line('K LINE CREATION :- ARL RULE STATUS ' || l_return_status);
4129: x_return_status := l_return_status;
4130:
4131: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4132: l_rule_id := l_rulv_tbl_out(1).id;
4133: Else
4134: OKC_API.set_message
4135: (

Line 4134: OKC_API.set_message

4130:
4131: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4132: l_rule_id := l_rulv_tbl_out(1).id;
4133: Else
4134: OKC_API.set_message
4135: (
4136: p_app_name => 'OKS',
4137: p_msg_name => G_REQUIRED_VALUE,
4138: p_token1 => G_COL_NAME_TOKEN,

Line 4189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4185: --dbms_output.put_line('K LINE CREATION :- QRE RULE STATUS ' || l_return_status);
4186:
4187: x_return_status := l_return_status;
4188:
4189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4190: l_rule_id := l_rulv_tbl_out(1).id;
4191: Else
4192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (LINE)');
4193: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (LINE)');

4188:
4189: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4190: l_rule_id := l_rulv_tbl_out(1).id;
4191: Else
4192: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (LINE)');
4193: Raise G_EXCEPTION_HALT_VALIDATION;
4194: End If;
4195:
4196: End If;

Line 4236: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4232: --dbms_output.put_line( 'K LINE CREATION :- IRE RULE STATUS ' || l_return_Status);
4233:
4234: x_return_status := l_return_status;
4235:
4236: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4237: l_rule_id := l_rulv_tbl_out(1).id;
4238: Else
4239: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (LINE)');
4240: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4239: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (LINE)');

4235:
4236: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4237: l_rule_id := l_rulv_tbl_out(1).id;
4238: Else
4239: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Invoice Id (LINE)');
4240: Raise G_EXCEPTION_HALT_VALIDATION;
4241: End If;
4242:
4243: End If;

Line 4279: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4275: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: IRT rule Status:'||l_return_status );
4276: --dbms_output.put_line('K LINE CREATION :- IRT RULE STATUS ' || l_return_status);
4277: x_return_status := l_return_status;
4278:
4279: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4280: l_rule_id := l_rulv_tbl_out(1).id;
4281: Else
4282: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (LINE)');
4283: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4282: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (LINE)');

4278:
4279: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4280: l_rule_id := l_rulv_tbl_out(1).id;
4281: Else
4282: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (LINE)');
4283: Raise G_EXCEPTION_HALT_VALIDATION;
4284: End If;
4285:
4286: End If;

Line 4317: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4313: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: LRT rule Status:'||l_return_status );
4314: --dbms_output.put_line('K LINE CREATION :- LRT RULE STATUS ' || l_return_status);
4315: x_return_status := l_return_status;
4316:
4317: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4318: l_rule_id := l_rulv_tbl_out(1).id;
4319: Else
4320: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (LINE)');
4321: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4320: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (LINE)');

4316:
4317: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4318: l_rule_id := l_rulv_tbl_out(1).id;
4319: Else
4320: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (LINE)');
4321: Raise G_EXCEPTION_HALT_VALIDATION;
4322: End If;
4323:
4324: End If;

Line 4359: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4355: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: BTO rule Status:'||l_return_status );
4356: --dbms_output.put_line('K LINE CREATION :- BTO RULE STATUS ' || l_return_status);
4357: x_return_status := l_return_status;
4358:
4359: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4360: l_rule_id := l_rulv_tbl_out(1).id;
4361: Else
4362: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo ID (LINE)');
4363: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4362: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo ID (LINE)');

4358:
4359: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4360: l_rule_id := l_rulv_tbl_out(1).id;
4361: Else
4362: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'BillTo ID (LINE)');
4363: Raise G_EXCEPTION_HALT_VALIDATION;
4364: End If;
4365:
4366: End If;

Line 4403: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4399: --dbms_output.put_line('K LINE CREATION :- STO RULE STATUS ' || l_return_status);
4400:
4401: x_return_status := l_return_status;
4402:
4403: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4404: l_rule_id := l_rulv_tbl_out(1).id;
4405: Else
4406: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo ID (LINE)');
4407: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4406: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo ID (LINE)');

4402:
4403: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4404: l_rule_id := l_rulv_tbl_out(1).id;
4405: Else
4406: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ShipTo ID (LINE)');
4407: Raise G_EXCEPTION_HALT_VALIDATION;
4408: End If;
4409:
4410: End If;

Line 4437: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4433: --dbms_output.put_line('K LINE CREATION :- OBJ REL STATUS ' || l_return_status);
4434:
4435: x_return_status := l_return_status;
4436:
4437: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4438: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Line Id (LINE)');
4439: Raise G_EXCEPTION_HALT_VALIDATION;
4440: End If;
4441:

Line 4438: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Line Id (LINE)');

4434:
4435: x_return_status := l_return_status;
4436:
4437: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4438: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Order Line Id (LINE)');
4439: Raise G_EXCEPTION_HALT_VALIDATION;
4440: End If;
4441:
4442: End If; ----------end objrel only for ext warranty

Line 4456: x_return_status := OKC_API.G_RET_STS_ERROR ;

4452: FETCH l_template_csr INTO l_template_id;
4453:
4454: IF l_template_csr%NOTFOUND THEN
4455: Close l_template_csr;
4456: x_return_status := OKC_API.G_RET_STS_ERROR ;
4457: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TEMPLATE ID NOT FOUND (LINE)');
4458: Raise G_EXCEPTION_HALT_VALIDATION;
4459: ELSE
4460: Close l_template_csr;

Line 4457: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TEMPLATE ID NOT FOUND (LINE)');

4453:
4454: IF l_template_csr%NOTFOUND THEN
4455: Close l_template_csr;
4456: x_return_status := OKC_API.G_RET_STS_ERROR ;
4457: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TEMPLATE ID NOT FOUND (LINE)');
4458: Raise G_EXCEPTION_HALT_VALIDATION;
4459: ELSE
4460: Close l_template_csr;
4461: END IF;

Line 4479: p_init_msg_list => OKC_API.G_FALSE,

4475:
4476: OKS_COVERAGES_PUB.CREATE_ACTUAL_COVERAGE
4477: (
4478: p_api_version => 1.0,
4479: p_init_msg_list => OKC_API.G_FALSE,
4480: x_return_status => l_return_status,
4481: x_msg_count => x_msg_count,
4482: x_msg_data => x_msg_data,
4483: P_ac_rec_in => l_cov_rec,

Line 4492: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4488: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Create_Actual_Coverage Status :'||l_return_status );
4489: --dbms_output.put_line('K LINE CREATION :- COV STATUS ' || l_return_status);
4490: x_return_status := l_return_status;
4491:
4492: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4493: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CoverageInstantiate (LINE)');
4494: Raise G_EXCEPTION_HALT_VALIDATION;
4495: End If;
4496:

Line 4493: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CoverageInstantiate (LINE)');

4489: --dbms_output.put_line('K LINE CREATION :- COV STATUS ' || l_return_status);
4490: x_return_status := l_return_status;
4491:
4492: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4493: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CoverageInstantiate (LINE)');
4494: Raise G_EXCEPTION_HALT_VALIDATION;
4495: End If;
4496:
4497: End if; -- for coverages

Line 4529: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4525: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: autoinstantiate_counters Status :'||l_return_status );
4526: --dbms_output.put_line('K LINE CREATION :- CTR STATUS ' || l_return_status);
4527: x_return_status := l_return_status;
4528:
4529: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4530: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Counter Instantiate (LINE)');
4531: Raise G_EXCEPTION_HALT_VALIDATION;
4532: End If;
4533:

Line 4530: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Counter Instantiate (LINE)');

4526: --dbms_output.put_line('K LINE CREATION :- CTR STATUS ' || l_return_status);
4527: x_return_status := l_return_status;
4528:
4529: If Not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4530: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Counter Instantiate (LINE)');
4531: Raise G_EXCEPTION_HALT_VALIDATION;
4532: End If;
4533:
4534: End If;

Line 4543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4539:
4540: When G_EXCEPTION_HALT_VALIDATION Then
4541: x_return_status := l_return_status;
4542: When Others Then
4543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4544: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4545: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Error:'||SQLCODE ||':'|| SQLERRM);
4546:
4547: End Create_Service_line;

Line 4544: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

4540: When G_EXCEPTION_HALT_VALIDATION Then
4541: x_return_status := l_return_status;
4542: When Others Then
4543: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4544: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
4545: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Service_Line :: Error:'||SQLCODE ||':'|| SQLERRM);
4546:
4547: End Create_Service_line;
4548:

Line 4570: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;

4566: )
4567: Is
4568:
4569: l_api_version CONSTANT NUMBER := 1.0;
4570: l_init_msg_list CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
4571: l_return_status VARCHAR2(1) := 'S';
4572: l_index VARCHAR2(2000);
4573:
4574: --Contract Line Table

Line 4646: x_return_status := OKC_API.G_RET_STS_SUCCESS;

4642:
4643: Begin
4644:
4645:
4646: x_return_status := OKC_API.G_RET_STS_SUCCESS;
4647:
4648: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: CREATE COVERED LINE FOR LINE :'||p_k_covd_rec.Attach_2_Line_id );
4649: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Attached to line type :'||p_k_covd_rec.product_sts_code );
4650:

Line 4653: x_return_status := OKC_API.G_RET_STS_ERROR;

4649: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Attached to line type :'||p_k_covd_rec.product_sts_code );
4650:
4651: IF p_k_covd_rec.Attach_2_Line_id IS NULL THEN
4652:
4653: x_return_status := OKC_API.G_RET_STS_ERROR;
4654: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACH_2_LINE_ID REQUIRED FOR COVERED PRODUCT');
4655: Raise G_EXCEPTION_HALT_VALIDATION;
4656:
4657: END IF;

Line 4654: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACH_2_LINE_ID REQUIRED FOR COVERED PRODUCT');

4650:
4651: IF p_k_covd_rec.Attach_2_Line_id IS NULL THEN
4652:
4653: x_return_status := OKC_API.G_RET_STS_ERROR;
4654: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ATTACH_2_LINE_ID REQUIRED FOR COVERED PRODUCT');
4655: Raise G_EXCEPTION_HALT_VALIDATION;
4656:
4657: END IF;
4658:

Line 4666: ---message debug and okc.api

4662: FETCH l_parent_line_csr INTO l_parent_line_rec;
4663:
4664: IF l_parent_line_csr%NOTFOUND THEN
4665: Close l_parent_line_csr;
4666: ---message debug and okc.api
4667: x_return_status := OKC_API.G_RET_STS_ERROR;
4668: Raise G_EXCEPTION_HALT_VALIDATION;
4669: ELSE
4670: Close l_parent_line_csr;

Line 4667: x_return_status := OKC_API.G_RET_STS_ERROR;

4663:
4664: IF l_parent_line_csr%NOTFOUND THEN
4665: Close l_parent_line_csr;
4666: ---message debug and okc.api
4667: x_return_status := OKC_API.G_RET_STS_ERROR;
4668: Raise G_EXCEPTION_HALT_VALIDATION;
4669: ELSE
4670: Close l_parent_line_csr;
4671: END IF;

Line 4704: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

4700:
4701: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Validate_Cp_Rec Status :'||l_return_status );
4702:
4703:
4704: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
4705: x_return_status := OKC_API.G_RET_STS_ERROR;
4706: Raise G_EXCEPTION_HALT_VALIDATION;
4707: END IF;
4708:

Line 4705: x_return_status := OKC_API.G_RET_STS_ERROR;

4701: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Validate_Cp_Rec Status :'||l_return_status );
4702:
4703:
4704: IF NOT l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
4705: x_return_status := OKC_API.G_RET_STS_ERROR;
4706: Raise G_EXCEPTION_HALT_VALIDATION;
4707: END IF;
4708:
4709: --dbms_output.put_line('validate CP '||l_return_status );

Line 4725: If l_return_status = OKC_API.G_RET_STS_ERROR Then

4721: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Check_line_effectivity Status :'||l_return_status );
4722: x_return_status := l_return_status;
4723: --dbms_output.put_line('validate line effectivity '|| x_return_status );
4724:
4725: If l_return_status = OKC_API.G_RET_STS_ERROR Then
4726:
4727: x_return_status := OKC_API.G_RET_STS_ERROR;
4728: Raise G_EXCEPTION_HALT_VALIDATION;
4729:

Line 4727: x_return_status := OKC_API.G_RET_STS_ERROR;

4723: --dbms_output.put_line('validate line effectivity '|| x_return_status );
4724:
4725: If l_return_status = OKC_API.G_RET_STS_ERROR Then
4726:
4727: x_return_status := OKC_API.G_RET_STS_ERROR;
4728: Raise G_EXCEPTION_HALT_VALIDATION;
4729:
4730: ElsIf l_return_status = 'Y' Then
4731:

Line 4753: x_return_status := OKC_API.G_RET_STS_ERROR;

4749: NULL;
4750:
4751: ElsIf l_hdrstatus = 'Y' Then
4752:
4753: x_return_status := OKC_API.G_RET_STS_ERROR;
4754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CP EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');
4755: Raise G_EXCEPTION_HALT_VALIDATION;
4756: End If;
4757: End if;

Line 4754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CP EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');

4750:
4751: ElsIf l_hdrstatus = 'Y' Then
4752:
4753: x_return_status := OKC_API.G_RET_STS_ERROR;
4754: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'CP EFFECTIVITY SHOULD BE WITH IN CONTRACT EFFECTIVITY');
4755: Raise G_EXCEPTION_HALT_VALIDATION;
4756: End If;
4757: End if;
4758:

Line 4832: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

4828: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: create_contract_line status:'|| l_return_status);
4829: --dbms_output.put_line('K COVD LINE CREATION :- LINE STATUS ' || l_return_status);
4830: x_return_status := l_return_status;
4831:
4832: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4833: l_line_id := l_clev_tbl_out(1).id;
4834: Else
4835: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'K LINE (SUB LINE)');
4836: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4835: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'K LINE (SUB LINE)');

4831:
4832: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4833: l_line_id := l_clev_tbl_out(1).id;
4834: Else
4835: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'K LINE (SUB LINE)');
4836: Raise G_EXCEPTION_HALT_VALIDATION;
4837: End if;
4838:
4839: -- cov rules inserted by oks

Line 4874: OKC_API.SET_MESSAGE(

4870: OKS_RENEW_PVT.DEBUG_LOG('(OKS_EXTWARPRGM_PVT).OKS create cov lvl status :: ' || l_return_status );
4871: FND_FILE.PUT_LINE(fnd_file.LOG, 'OKS COV LINE CREATION :- LINE STATUS '|| l_return_status );
4872:
4873: IF NOT l_return_status = 'S' THEN
4874: OKC_API.SET_MESSAGE(
4875: g_app_name,
4876: g_required_value,
4877: g_col_name_token,
4878: 'OKS Contract COV LINE'

Line 4912: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

4908: --dbms_output.put_line('K COVD LINE CREATION :- KITEM STATUS ' || l_return_status);
4909:
4910: x_return_status := l_return_status;
4911:
4912: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4913: l_line_item_id := l_cimv_tbl_out(1).id;
4914: --dbms_output.put_line('item id '||l_cimv_tbl_out(1).id );
4915: Else
4916: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'KItem (SUB LINE)');

Line 4916: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'KItem (SUB LINE)');

4912: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
4913: l_line_item_id := l_cimv_tbl_out(1).id;
4914: --dbms_output.put_line('item id '||l_cimv_tbl_out(1).id );
4915: Else
4916: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'KItem (SUB LINE)');
4917: Raise G_EXCEPTION_HALT_VALIDATION;
4918: End if;
4919:
4920: /*

Line 4938: If NOT l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4934: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Create_Rule_grp status :'|| l_return_status );
4935: --dbms_output.put_line('K COVD LINE CREATION :- RGP STATUS ' || l_return_status);
4936: x_return_status := l_return_status;
4937:
4938: If NOT l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4939: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Rule Group (SUB LINE)');
4940: Raise G_EXCEPTION_HALT_VALIDATION;
4941: End If;
4942:

Line 4939: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Rule Group (SUB LINE)');

4935: --dbms_output.put_line('K COVD LINE CREATION :- RGP STATUS ' || l_return_status);
4936: x_return_status := l_return_status;
4937:
4938: If NOT l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4939: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Rule Group (SUB LINE)');
4940: Raise G_EXCEPTION_HALT_VALIDATION;
4941: End If;
4942:
4943: --Invoice Text Routine

Line 4972: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

4968: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: IRT Rule status :'|| l_return_status );
4969: --dbms_output.put_line('K COVD LINE CREATION :- IRT RULE STATUS ' || l_return_status);
4970: x_return_status := l_return_status;
4971:
4972: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4973: l_rule_id := l_rulv_tbl_out(1).id;
4974: Else
4975: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (SUB LINE)');
4976: Raise G_EXCEPTION_HALT_VALIDATION;

Line 4975: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (SUB LINE)');

4971:
4972: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
4973: l_rule_id := l_rulv_tbl_out(1).id;
4974: Else
4975: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'INVOICE TEXT (SUB LINE)');
4976: Raise G_EXCEPTION_HALT_VALIDATION;
4977: End If;
4978:
4979: End If;

Line 5020: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

5016: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: QRE Rule status :'|| l_return_status );
5017: --dbms_output.put_line('K COVD LINE CREATION :- QRE RULE STATUS ' || l_return_status);
5018: x_return_status := l_return_status;
5019:
5020: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
5021: l_rule_id := l_rulv_tbl_out(1).id;
5022: Else
5023: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (SUB LINE)');
5024: Raise G_EXCEPTION_HALT_VALIDATION;

Line 5023: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (SUB LINE)');

5019:
5020: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
5021: l_rule_id := l_rulv_tbl_out(1).id;
5022: Else
5023: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'USAGE ITEM (SUB LINE)');
5024: Raise G_EXCEPTION_HALT_VALIDATION;
5025: End If;
5026:
5027: End If; -- end if for QRE rule

Line 5062: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then

5058: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: LRT Rule status :'|| l_return_status );
5059: --dbms_output.put_line('K COVD LINE CREATION :- LRT RULE STATUS ' || l_return_status);
5060: x_return_status := l_return_status;
5061:
5062: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
5063: l_rule_id := l_rulv_tbl_out(1).id;
5064: Else
5065: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (SUB LINE)');
5066: Raise G_EXCEPTION_HALT_VALIDATION;

Line 5065: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (SUB LINE)');

5061:
5062: If l_return_status = OKC_API.G_RET_STS_SUCCESS Then
5063: l_rule_id := l_rulv_tbl_out(1).id;
5064: Else
5065: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'LINE RENEWAL TYPE (SUB LINE)');
5066: Raise G_EXCEPTION_HALT_VALIDATION;
5067: End If;
5068:
5069: End If;

Line 5197: If l_return_status = OKC_API.G_RET_STS_SUCCESS then

5193: --dbms_output.put_line('K COVD LINE CREATION :- PRICE ATTRIB STATUS ' || l_return_status);
5194:
5195: x_return_status := l_return_status;
5196:
5197: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
5198: l_priceattrib_id := l_pavv_tbl_out(1).id;
5199: Else
5200: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE ATTRIBUTES (SUB LINE)');
5201: Raise G_EXCEPTION_HALT_VALIDATION;

Line 5200: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE ATTRIBUTES (SUB LINE)');

5196:
5197: If l_return_status = OKC_API.G_RET_STS_SUCCESS then
5198: l_priceattrib_id := l_pavv_tbl_out(1).id;
5199: Else
5200: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'PRICE ATTRIBUTES (SUB LINE)');
5201: Raise G_EXCEPTION_HALT_VALIDATION;
5202: End if;
5203: End If;
5204: x_cp_line_id := l_line_id;

Line 5213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

5209: x_return_status := l_return_status;
5210: Null;
5211: When Others Then
5212:
5213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5214: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5215: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Error :'|| SQLCODE||':'|| SQLERRM);
5216:
5217:

Line 5214: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

5210: Null;
5211: When Others Then
5212:
5213: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5214: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5215: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Covered_Line :: Error :'|| SQLCODE||':'|| SQLERRM);
5216:
5217:
5218: End Create_Covered_Line;

Line 5288: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5284:
5285: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Item :: create_item_instance status :'|| l_return_status );
5286: --dbms_output.put_line('create item instance status:- ' || l_return_status);
5287:
5288: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5289: RAISE G_EXCEPTION_HALT_VALIDATION;
5290: END IF;
5291:
5292: x_return_status := l_return_status;

Line 5298: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

5294: When G_EXCEPTION_HALT_VALIDATION Then
5295: x_return_status := l_return_status;
5296: Null;
5297: When Others Then
5298: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5299: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5300: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Item :: Error :'|| SQLCODE||':'||SQLERRM );
5301: End create_item;
5302:

Line 5299: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

5295: x_return_status := l_return_status;
5296: Null;
5297: When Others Then
5298: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5299: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5300: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Item :: Error :'|| SQLCODE||':'||SQLERRM );
5301: End create_item;
5302:
5303:

Line 5372: l_return_status VARCHAR2(2000) := OKC_API.G_RET_STS_SUCCESS;

5368: l_u_service_line_id NUMBER; -- Service line id for Usage line
5369: l_cp_line_id NUMBER;
5370: l_time_val NUMBER;
5371: cp_id NUMBER;
5372: l_return_status VARCHAR2(2000) := OKC_API.G_RET_STS_SUCCESS;
5373: l_K_line_rec OKS_CONTRACTS_PUB.line_Rec_Type; -- subscription line record
5374: l_counter_tbl OKS_CONTRACTS_PUB.counter_tbl; -- counter table
5375: l_K_support_rec OKS_CONTRACTS_PUB.line_Rec_Type; -- Support line record
5376: l_K_usage_rec OKS_CONTRACTS_PUB.line_Rec_Type; -- Usage line record

Line 5426: p_instance_rec.in_transit_order_line_id := okc_api.g_miss_num;

5422: p_instance_rec.unit_of_measure := 'Ea';
5423: p_instance_rec.instance_condition_id := 1; --NULL;
5424: p_instance_rec.active_start_date := FND_API.G_MISS_DATE;
5425: p_instance_rec.active_end_date := FND_API.G_MISS_DATE; --TO_DATE('Null');
5426: p_instance_rec.in_transit_order_line_id := okc_api.g_miss_num;
5427: p_party_tbl(1).party_source_table := 'HZ_PARTIES';
5428: p_party_tbl(1).party_id := p_k_header_rec.party_id;--1000; --NULL;
5429: p_party_tbl(1).relationship_type_code := 'OWNER';
5430: p_party_tbl(1).contact_flag := 'N';

Line 5473: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5469: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Item Id :'||p_instance_rec.instance_id );
5470: --dbms_output.put_line('create item status:- ' || l_return_status);
5471: --dbms_output.put_line('create item status :: item id:- ' || p_instance_rec.instance_id);
5472:
5473: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5474: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5475: RAISE G_EXCEPTION_HALT_VALIDATION;
5476: END IF;
5477: */

Line 5502: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5498: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create SB Service Line status :'|| l_return_status );
5499: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Service line Id for SB Line :'|| l_sb_service_line_id );
5500: --dbms_output.put_line('K SUBSCRIPTION LINE CREATION STATUS:- ' || l_return_status);
5501:
5502: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5503: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5504: RAISE G_EXCEPTION_HALT_VALIDATION;
5505: END IF;
5506:

Line 5522: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5518:
5519: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create default sch status :'|| l_return_status );
5520: --dbms_output.put_line('K SUBSCRIPTION LINE CREATION STATUS:- ' || l_return_status);
5521:
5522: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5523: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5524: RAISE G_EXCEPTION_HALT_VALIDATION;
5525: END IF;
5526:

Line 5553: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5549: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create SU Service Line status :'|| l_return_status);
5550: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Service line Id for Su Line :'|| l_su_service_line_id);
5551: --dbms_output.put_line('K CONTRACT SUPPORT SERVICE LINE CREATION STATUS:- ' || l_return_status);
5552:
5553: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5554: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5555: RAISE G_EXCEPTION_HALT_VALIDATION;
5556: END IF;
5557:

Line 5565: l_return_status := OKC_API.G_RET_STS_ERROR;

5561: Fetch l_line_Csr into l_line_dtl_rec;
5562:
5563: If l_line_Csr%notfound Then
5564: Close l_line_Csr ;
5565: l_return_status := OKC_API.G_RET_STS_ERROR;
5566: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5567: -- message 'OKS_CUSTPROD' to be changed
5568: Raise G_EXCEPTION_HALT_VALIDATION;
5569: End if;

Line 5566: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);

5562:
5563: If l_line_Csr%notfound Then
5564: Close l_line_Csr ;
5565: l_return_status := OKC_API.G_RET_STS_ERROR;
5566: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5567: -- message 'OKS_CUSTPROD' to be changed
5568: Raise G_EXCEPTION_HALT_VALIDATION;
5569: End if;
5570:

Line 5605: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN

5601: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create_Covered_Line for SU line status :'|| l_return_status );
5602: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Covered line id for support line :'|| l_cp_line_id );
5603: --dbms_output.put_line('K COVERED PRODUCT CREATION FOR SUPPORT SERVICE LINE STATUS:- ' || l_return_status);
5604:
5605: IF Not l_return_status = OKC_API.G_RET_STS_SUCCESS THEN
5606: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5607: RAISE G_EXCEPTION_HALT_VALIDATION;
5608: END IF;
5609:

Line 5628: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

5624: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Check_for_usage status :'|| x_return_status);
5625: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Number of Usage Lines :'|| l_counter_tbl.count );
5626: --dbms_output.put_line('CHECK FOR USAGE LINE STATUS:- ' || x_return_status||' ctr tbl'||l_counter_tbl.count);
5627:
5628: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5629: RAISE G_EXCEPTION_HALT_VALIDATION;
5630: END IF;
5631:
5632: -- opening rule detail cursor :

Line 5651: x_return_status := OKC_API.G_RET_STS_ERROR;

5647: Open l_rule_dtl_Csr;
5648: Fetch l_rule_dtl_Csr into l_rule_dtl_rec;
5649: If l_rule_dtl_Csr%notfound Then
5650: Close l_rule_dtl_Csr ;
5651: x_return_status := OKC_API.G_RET_STS_ERROR;
5652: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5653: Raise G_EXCEPTION_HALT_VALIDATION;
5654: End if;
5655: Close l_rule_dtl_Csr;

Line 5652: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);

5648: Fetch l_rule_dtl_Csr into l_rule_dtl_rec;
5649: If l_rule_dtl_Csr%notfound Then
5650: Close l_rule_dtl_Csr ;
5651: x_return_status := OKC_API.G_RET_STS_ERROR;
5652: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5653: Raise G_EXCEPTION_HALT_VALIDATION;
5654: End if;
5655: Close l_rule_dtl_Csr;
5656:

Line 5685: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

5681: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Service Line Id sor usage line :'|| l_u_service_line_id );
5682:
5683: --dbms_output.put_line('K CONTRACT USAGE LINE CREATION STATUS:- ' || x_return_status);
5684:
5685: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5686: RAISE G_EXCEPTION_HALT_VALIDATION;
5687: END IF;
5688:
5689: -- opening line cursor

Line 5694: l_return_status := OKC_API.G_RET_STS_ERROR;

5690: Open l_line_Csr(l_counter_tbl(i).usage_item_id,l_k_usage_rec.org_id ); --to pass invetory item id
5691: Fetch l_line_Csr into l_line_dtl_rec;
5692: If l_line_Csr%notfound Then
5693: Close l_line_Csr ;
5694: l_return_status := OKC_API.G_RET_STS_ERROR;
5695: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5696: Raise G_EXCEPTION_HALT_VALIDATION;
5697: End if;
5698: Close l_line_Csr;

Line 5695: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);

5691: Fetch l_line_Csr into l_line_dtl_rec;
5692: If l_line_Csr%notfound Then
5693: Close l_line_Csr ;
5694: l_return_status := OKC_API.G_RET_STS_ERROR;
5695: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_instance_rec.instance_id);
5696: Raise G_EXCEPTION_HALT_VALIDATION;
5697: End if;
5698: Close l_line_Csr;
5699:

Line 5757: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

5753: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Line Id for usage covered line :'|| l_cp_line_id );
5754:
5755: --dbms_output.put_line('K COVERED PRODUCT CREATION FOR USAGE LINE STATUS:- ' || x_return_status);
5756:
5757: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5758: RAISE G_EXCEPTION_HALT_VALIDATION;
5759: END IF;
5760:
5761: -- Billing schedule for usage line

Line 5781: x_return_status := OKC_API.G_RET_STS_ERROR;

5777: --dbms_output.put_line('create time val '|| x_return_status);
5778: IF x_return_status = 'S' THEN
5779: l_slh_rec.Object2_Id1 := l_time_val;
5780: ELSE
5781: x_return_status := OKC_API.G_RET_STS_ERROR;
5782: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
5783: Raise G_EXCEPTION_HALT_VALIDATION;
5784: END IF;
5785: END IF;

Line 5798: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

5794: x_return_status => x_return_status
5795: );
5796:
5797: --dbms_output.put_line('K BILL SCHEDULE FOR USAGE LINE STATUS ' || x_return_status);
5798: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5799: RAISE G_EXCEPTION_HALT_VALIDATION;
5800: END IF;
5801:
5802: -- End of Billing Schedule for Usage Line

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

5831:
5832: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create_Billing_Schd for SB Line status :'|| l_return_status );
5833: --dbms_output.put_line('SUBSCRIPTION LINE BILL SCHEDULE STATUS:- ' || l_return_status);
5834:
5835: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5836: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5837: RAISE G_EXCEPTION_HALT_VALIDATION;
5838: END IF;
5839:

Line 5885: l_return_status := OKC_API.G_RET_STS_ERROR;

5881:
5882: IF l_return_status = 'S' THEN
5883: l_slh_rec.Object2_Id1 := l_time_val;
5884: ELSE
5885: l_return_status := OKC_API.G_RET_STS_ERROR;
5886: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTIONS');
5887: Raise G_EXCEPTION_HALT_VALIDATION;
5888: END IF;
5889: END IF;

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

5900:
5901: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Create_Bill_Sch_Rules for Support Line status :'|| l_return_status );
5902: --dbms_output.put_line('K BILL SCHEDULE FOR SERVICE LINE STATUS ' || l_return_status);
5903: */
5904: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
5905: RAISE G_EXCEPTION_HALT_VALIDATION;
5906: END IF;
5907:
5908: END IF; -- end of billing for line type = 'SU'

Line 5921: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

5917: When G_EXCEPTION_HALT_VALIDATION Then
5918: x_return_status := l_return_status;
5919: Null;
5920: When Others Then
5921: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5922: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5923: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Error :'|| SQLCODE || SQLERRM);
5924:
5925: END Create_subscription;

Line 5922: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

5918: x_return_status := l_return_status;
5919: Null;
5920: When Others Then
5921: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
5922: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
5923: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Subscription :: Error :'|| SQLCODE || SQLERRM);
5924:
5925: END Create_subscription;
5926:

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

6002: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Create_Contract_Header status :'|| l_return_status );
6003: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Contract Header Id :'|| to_char(l_contract_header_id) );
6004: --dbms_output.put_line('K CONTRACT HEADER CREATION STATUS:- ' || l_return_status);
6005:
6006: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6007: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6008: RAISE G_EXCEPTION_HALT_VALIDATION;
6009: END IF;
6010:

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

6036:
6037: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Create_Subscription status :'|| l_return_status);
6038: --dbms_output.put_line('CREATE SUBSCRIPTION STATUS:- ' || l_return_status);
6039:
6040: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6041: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6042: RAISE G_EXCEPTION_HALT_VALIDATION;
6043: END IF;
6044: ELSE

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

6064: x_msg_data => x_msg_data
6065: );
6066: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Create_Service_Line status :'|| l_return_status );
6067: --dbms_output.put_line('K CONTRACT SERVICE LINE CREATION STATUS:- ' || l_return_status);
6068: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6069: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6070: RAISE G_EXCEPTION_HALT_VALIDATION;
6071: END IF;
6072:

Line 6091: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

6087:
6088: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Create_Covered_Line status :'|| l_return_status );
6089: --dbms_output.put_line('K COVERED PRODUCT LINE CREATION STATUS:- ' || l_return_status);
6090:
6091: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6092: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6093: RAISE G_EXCEPTION_HALT_VALIDATION;
6094: END IF;
6095:

Line 6119: x_return_status := OKC_API.G_RET_STS_ERROR;

6115:
6116: IF l_return_status = 'S' THEN
6117: l_slh_rec.Object2_Id1 := l_time_val;
6118: ELSE
6119: x_return_status := OKC_API.G_RET_STS_ERROR;
6120: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TIME VALUE REQUIRED FOR SLH');
6121: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6122: Raise G_EXCEPTION_HALT_VALIDATION;
6123: END IF;

Line 6120: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TIME VALUE REQUIRED FOR SLH');

6116: IF l_return_status = 'S' THEN
6117: l_slh_rec.Object2_Id1 := l_time_val;
6118: ELSE
6119: x_return_status := OKC_API.G_RET_STS_ERROR;
6120: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'TIME VALUE REQUIRED FOR SLH');
6121: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6122: Raise G_EXCEPTION_HALT_VALIDATION;
6123: END IF;
6124: END IF;*/

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

6134:
6135: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Create_Bill_Sch_Rules status :'|| l_return_status );
6136: --dbms_output.put_line('K BILL SCHEDULE STATUS:- ' || l_return_status);
6137:
6138: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
6139:
6140: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT('BEFORE_TRANSACTION');
6141: RAISE G_EXCEPTION_HALT_VALIDATION;
6142: END IF;

Line 6164: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

6160: When G_EXCEPTION_HALT_VALIDATION Then
6161: x_return_status := l_return_status;
6162: Null;
6163: When Others Then
6164: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
6165: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
6166: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Error :'|| SQLCODE || ':'|| SQLERRM );
6167: END Create_Contract;
6168:

Line 6165: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

6161: x_return_status := l_return_status;
6162: Null;
6163: When Others Then
6164: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
6165: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
6166: OKS_RENEW_PVT.DEBUG_LOG( '(OKS_CONTRACTS_PUB).Create_Contract :: Error :'|| SQLCODE || ':'|| SQLERRM );
6167: END Create_Contract;
6168:
6169: /* dummy overloaded procedure for OKL*/