DBA Data[Home] [Help]

APPS.OKS_OMINT_PUB dependencies on OKC_API

Line 17: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

13:
14: Procedure Get_Duration
15: (
16: P_Api_Version IN Number,
17: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
18: X_msg_Count OUT NOCOPY Number,
19: X_msg_Data OUT NOCOPY Varchar2,
20: X_Return_Status OUT NOCOPY Varchar2,
21: P_customer_id IN Number,

Line 25: P_coterm_checked_yn IN Varchar2 Default OKC_API.G_FALSE,

21: P_customer_id IN Number,
22: P_system_id IN Number,
23: P_Service_Duration IN Number,
24: P_service_period IN Varchar2,
25: P_coterm_checked_yn IN Varchar2 Default OKC_API.G_FALSE,
26: P_start_date IN Date,
27: P_end_date IN Date,
28: X_service_duration OUT NOCOPY Number,
29: X_service_period OUT NOCOPY Varchar2,

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

32: Is
33: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
34: l_api_version CONSTANT NUMBER := 11.5;
35: l_row_count NUMBER;
36: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
37:
38: Cursor l_Customer_Coterm_Csr is
39: Select Coterminate_Day_Month
40: From HZ_CUST_ACCOUNTS --OKX_CUSTOMER_ACCOUNTS_V

Line 74: x_return_status := OKC_API.G_RET_STS_SUCCESS;

70: l_unit_of_measure Varchar2(20);
71: l_tce_rec l_tce_csr%rowtype;
72: BEGIN
73:
74: x_return_status := OKC_API.G_RET_STS_SUCCESS;
75:
76: -- Profile Check
77: l_min_duration := fnd_profile.value('OKS_MINIMUM_SVC_DURATION');
78: l_min_period := fnd_profile.value('OKS_MINIMUM_SVC_PERIOD');

Line 84: l_return_status := OKC_API.G_RET_STS_ERROR;

80: If l_min_duration Is Null Or l_min_period Is Null Then
81: -- l_min_duration := 60;
82: -- l_min_period := 'DAY';
83:
84: l_return_status := OKC_API.G_RET_STS_ERROR;
85: OKC_API.set_message(G_APP_NAME,'OKS_PROFILE_NOT_SET');
86: Raise G_EXCEPTION_HALT_VALIDATION;
87:
88: End If;

Line 85: OKC_API.set_message(G_APP_NAME,'OKS_PROFILE_NOT_SET');

81: -- l_min_duration := 60;
82: -- l_min_period := 'DAY';
83:
84: l_return_status := OKC_API.G_RET_STS_ERROR;
85: OKC_API.set_message(G_APP_NAME,'OKS_PROFILE_NOT_SET');
86: Raise G_EXCEPTION_HALT_VALIDATION;
87:
88: End If;
89:

Line 93: l_return_status := OKC_API.G_RET_STS_ERROR;

89:
90: -- Parameter Check
91:
92: If p_start_date Is Null Then
93: l_return_status := OKC_API.G_RET_STS_ERROR;
94: OKC_API.set_message(G_APP_NAME,'OKS_START_DATE_REQUIRED');
95: Raise G_EXCEPTION_HALT_VALIDATION;
96: End If;
97:

Line 94: OKC_API.set_message(G_APP_NAME,'OKS_START_DATE_REQUIRED');

90: -- Parameter Check
91:
92: If p_start_date Is Null Then
93: l_return_status := OKC_API.G_RET_STS_ERROR;
94: OKC_API.set_message(G_APP_NAME,'OKS_START_DATE_REQUIRED');
95: Raise G_EXCEPTION_HALT_VALIDATION;
96: End If;
97:
98: If p_end_date Is Null And (p_service_duration Is Null Or p_service_period Is Null) Then

Line 99: l_return_status := OKC_API.G_RET_STS_ERROR;

95: Raise G_EXCEPTION_HALT_VALIDATION;
96: End If;
97:
98: If p_end_date Is Null And (p_service_duration Is Null Or p_service_period Is Null) Then
99: l_return_status := OKC_API.G_RET_STS_ERROR;
100: OKC_API.set_message(G_APP_NAME,'OKS_END_DT_DUR_REQUIRED');
101: Raise G_EXCEPTION_HALT_VALIDATION;
102: End If;
103:

Line 100: OKC_API.set_message(G_APP_NAME,'OKS_END_DT_DUR_REQUIRED');

96: End If;
97:
98: If p_end_date Is Null And (p_service_duration Is Null Or p_service_period Is Null) Then
99: l_return_status := OKC_API.G_RET_STS_ERROR;
100: OKC_API.set_message(G_APP_NAME,'OKS_END_DT_DUR_REQUIRED');
101: Raise G_EXCEPTION_HALT_VALIDATION;
102: End If;
103:
104: If p_Service_Duration Is Not Null Then

Line 108: l_return_status := OKC_API.G_RET_STS_ERROR;

104: If p_Service_Duration Is Not Null Then
105: Open l_UOM_Csr;
106: Fetch l_UOM_Csr Into l_UOM_Rec;
107: If l_UOM_Csr%NotFound Then
108: l_return_status := OKC_API.G_RET_STS_ERROR;
109: OKC_API.set_message(G_APP_NAME,'OKS_INVD_PERIOD');
110: Raise G_EXCEPTION_HALT_VALIDATION;
111: End if;
112: l_unit_of_measure := l_uom_rec.uom_code;

Line 109: OKC_API.set_message(G_APP_NAME,'OKS_INVD_PERIOD');

105: Open l_UOM_Csr;
106: Fetch l_UOM_Csr Into l_UOM_Rec;
107: If l_UOM_Csr%NotFound Then
108: l_return_status := OKC_API.G_RET_STS_ERROR;
109: OKC_API.set_message(G_APP_NAME,'OKS_INVD_PERIOD');
110: Raise G_EXCEPTION_HALT_VALIDATION;
111: End if;
112: l_unit_of_measure := l_uom_rec.uom_code;
113: End If;

Line 165: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

161: x_timeunit => x_service_period,
162: x_return_status => l_return_status
163: );
164:
165: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
166: Raise G_EXCEPTION_HALT_VALIDATION;
167: End if;
168: Else
169:

Line 229: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

225: x_return_status => l_return_status
226: );
227:
228:
229: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
230: Raise G_EXCEPTION_HALT_VALIDATION;
231: End If;
232:
233: End if;

Line 240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

236:
237: When G_EXCEPTION_HALT_VALIDATION Then
238: x_return_status := l_return_status;
239: When Others Then
240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
241: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
242:
243: END;
244:

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

237: When G_EXCEPTION_HALT_VALIDATION Then
238: x_return_status := l_return_status;
239: When Others Then
240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
241: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
242:
243: END;
244:
245:

Line 249: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

245:
246: Procedure Is_service_available
247: (
248: P_Api_Version IN Number,
249: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
250: X_msg_Count OUT NOCOPY Number,
251: X_msg_Data OUT NOCOPY Varchar2,
252: X_Return_Status OUT NOCOPY Varchar2,
253: p_check_service_rec IN CHECK_SERVICE_REC_TYPE,

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

259: Is
260: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
261: l_api_version CONSTANT NUMBER := 11.5;
262: l_row_count NUMBER;
263: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
264:
265: --Local
266: l_first Boolean := TRUE;
267: l_pstat Boolean;

Line 569: l_return_status := OKC_API.G_RET_STS_ERROR;

565: --end 4897884
566:
567: If p_check_service_rec.Service_Item_id Is Null
568: Or (p_check_service_rec.Customer_id Is Null and l_product_item_id Is Null) Then
569: l_return_status := OKC_API.G_RET_STS_ERROR;
570: x_available_yn := 'N';
571: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');
572: Raise G_EXCEPTION_HALT_VALIDATION;
573: End If;

Line 571: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');

567: If p_check_service_rec.Service_Item_id Is Null
568: Or (p_check_service_rec.Customer_id Is Null and l_product_item_id Is Null) Then
569: l_return_status := OKC_API.G_RET_STS_ERROR;
570: x_available_yn := 'N';
571: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');
572: Raise G_EXCEPTION_HALT_VALIDATION;
573: End If;
574: /****** Added to check whether Item is servicable or not ****/
575:

Line 583: l_return_status := OKC_API.G_RET_STS_SUCCESS;

579: Fetch l_model_item_csr Into l_model_flag;
580: Close l_model_item_csr;
581:
582: If l_model_flag = 'Y' then
583: l_return_status := OKC_API.G_RET_STS_SUCCESS;
584: x_available_yn := 'Y';
585: Raise G_EXCEPTION_HALT_VALIDATION;
586: End If;
587: */

Line 599: l_return_status := OKC_API.G_RET_STS_ERROR;

595: Fetch l_servicable_prod_csr Into l_servicable_flag_yn;
596: Close l_servicable_prod_csr;
597:
598: IF NVL(l_servicable_flag_yn,'N') = 'N' THEN
599: l_return_status := OKC_API.G_RET_STS_ERROR;
600: x_available_yn := 'N';
601: OKC_API.set_message(G_APP_NAME, 'OKS_PRODUCT_NOT_SERVICABLE');
602: Raise G_EXCEPTION_HALT_VALIDATION;
603: END IF;

Line 601: OKC_API.set_message(G_APP_NAME, 'OKS_PRODUCT_NOT_SERVICABLE');

597:
598: IF NVL(l_servicable_flag_yn,'N') = 'N' THEN
599: l_return_status := OKC_API.G_RET_STS_ERROR;
600: x_available_yn := 'N';
601: OKC_API.set_message(G_APP_NAME, 'OKS_PRODUCT_NOT_SERVICABLE');
602: Raise G_EXCEPTION_HALT_VALIDATION;
603: END IF;
604: End If;
605:

Line 645: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_check_service_rec.customer_id));

641:
642: If l_party_id IS Null Then
643: l_return_status := 'E';
644: x_available_yn := 'N';
645: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_check_service_rec.customer_id));
646: Raise G_EXCEPTION_HALT_VALIDATION;
647: End If;
648:
649: Customer(l_party_id, l_cstat);

Line 701: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

697: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);
698: --END NPALEPU */
699: --end 4897884
700: When Others Then
701: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
702: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
703: --npalepu 23-dec-2005 removed the code for bug # 4897884
704: /* --NPALEPU 29-sep-2005 for bug # 4608694
705: --Resetting th eoriginal context

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

698: --END NPALEPU */
699: --end 4897884
700: When Others Then
701: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
702: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
703: --npalepu 23-dec-2005 removed the code for bug # 4897884
704: /* --NPALEPU 29-sep-2005 for bug # 4608694
705: --Resetting th eoriginal context
706: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);

Line 716: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

712:
713: Procedure Available_Services
714: (
715: P_Api_Version IN Number,
716: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
717: X_msg_Count OUT NOCOPY Number,
718: X_msg_Data OUT NOCOPY Varchar2,
719: X_Return_Status OUT NOCOPY Varchar2,
720: p_avail_service_rec IN AVAIL_SERVICE_REC_TYPE,

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

756: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
757: l_api_version CONSTANT NUMBER := 11.5;
758: l_row_count NUMBER;
759: l_msg_data VARCHAR2(2000);
760: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
761: l_ptr Binary_Integer := 0 ;
762: l_avail Varchar2(1);
763: l_isrec Check_service_rec_type;
764: l_Srv_tbl order_service_tbl_type;

Line 827: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_avail_service_rec.customer_id));

823: Close l_party_csr;
824:
825: If l_party_id IS Null Then
826: l_return_status := 'E';
827: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_avail_service_rec.customer_id));
828: Raise G_EXCEPTION_HALT_VALIDATION;
829: End If;
830:
831: End If;

Line 851: OKC_API.G_FALSE,

847: --npalepu modified on 20-nov-2005
848: /* Is_Service_Available
849: (
850: 1.0,
851: OKC_API.G_FALSE,
852: l_row_count,
853: l_msg_Data,
854: l_Return_Status,
855: l_isrec,

Line 861: P_init_msg_list => OKC_API.G_FALSE,

857: ); */
858: Is_Service_Available
859: (
860: P_Api_Version => 1.0,
861: P_init_msg_list => OKC_API.G_FALSE,
862: X_msg_Count => l_row_count,
863: X_msg_Data => l_msg_Data,
864: X_Return_Status => l_Return_Status,
865: p_check_service_rec => l_isrec,

Line 870: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

866: X_Available_YN => l_Avail
867: );
868: --end npalepu
869:
870: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
871: Raise G_EXCEPTION_HALT_VALIDATION;
872: End If;
873:
874:

Line 882: x_return_status := OKC_API.G_RET_STS_SUCCESS;

878: End If;
879:
880: End Loop;
881:
882: x_return_status := OKC_API.G_RET_STS_SUCCESS;
883:
884: --npalepu removed the following code for bug # 4897884
885: /* --NPALEPU 21-sep-2005 for bug # 4608694
886: --Resetting to original context

Line 903: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

899: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);
900: --END NPALEPU */
901: --end 4897884
902: When Others Then
903: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
904: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
905: --npalepu removed the following code for bug # 4897884
906: /* --NPALEPU 21-sep-2005 for bug # 4608694
907: --Resetting to original context

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

900: --END NPALEPU */
901: --end 4897884
902: When Others Then
903: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
904: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
905: --npalepu removed the following code for bug # 4897884
906: /* --NPALEPU 21-sep-2005 for bug # 4608694
907: --Resetting to original context
908: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);

Line 917: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

913:
914: Procedure OKS_Available_Services
915: (
916: P_Api_Version IN Number,
917: P_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
918: X_msg_Count OUT NOCOPY Number,
919: X_msg_Data OUT NOCOPY Varchar2,
920: X_Return_Status OUT NOCOPY Varchar2,
921: p_avail_service_rec IN AVAIL_SERVICE_REC_TYPE,

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

959: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
960: l_api_version CONSTANT NUMBER := 11.5;
961: l_row_count NUMBER;
962: l_msg_data VARCHAR2(2000);
963: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
964: l_ptr Binary_Integer := 0 ;
965: l_avail Varchar2(1);
966: l_isrec Check_service_rec_type;
967: l_Srv_tbl order_service_tbl_type;

Line 994: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_check_service_rec.customer_id));

990: Close l_party_csr;
991:
992: If l_party_id IS Null Then
993: l_return_status := 'E';
994: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_check_service_rec.customer_id));
995: Raise G_EXCEPTION_HALT_VALIDATION;
996: End If;
997:
998: End If;

Line 1055: OKC_API.G_FALSE,

1051: --npalepu modified on 20-nov-2005
1052: /* Is_Service_Available
1053: (
1054: 1.0,
1055: OKC_API.G_FALSE,
1056: l_row_count,
1057: l_msg_Data,
1058: l_Return_Status,
1059: l_isrec,

Line 1065: P_init_msg_list => OKC_API.G_FALSE,

1061: ); */
1062: Is_Service_Available
1063: (
1064: P_Api_Version => 1.0,
1065: P_init_msg_list => OKC_API.G_FALSE,
1066: X_msg_Count => l_row_count,
1067: X_msg_Data => l_msg_Data,
1068: X_Return_Status => l_Return_Status,
1069: p_check_service_rec => l_isrec,

Line 1074: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1070: X_Available_YN => l_Avail
1071: );
1072: --end npalepu
1073:
1074: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1075: Raise G_EXCEPTION_HALT_VALIDATION;
1076: End If;
1077:
1078:

Line 1090: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1086: End If;
1087:
1088: End Loop;
1089:
1090: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1091:
1092: --npalepu removed the following code for bug # 4897884
1093: /* --NPALEPU 21-sep-2005 for bug # 4608694
1094: --Resetting to original context

Line 1111: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1107: --END NPALEPU */
1108: --end 4897884
1109:
1110: When Others Then
1111: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1112: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1113: --npalepu removed the following code for bug # 4897884
1114: /* --NPALEPU 21-sep-2005 for bug # 4608694
1115: --Resetting to original context

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

1108: --end 4897884
1109:
1110: When Others Then
1111: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1112: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1113: --npalepu removed the following code for bug # 4897884
1114: /* --NPALEPU 21-sep-2005 for bug # 4608694
1115: --Resetting to original context
1116: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);

Line 1127: ,p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE

1123: (p_api_version IN Number
1124: ,p_party_id IN Number
1125: ,p_service_id IN Number
1126: ,p_request_date IN Date Default sysdate
1127: ,p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE
1128: ,x_available_yn OUT NOCOPY Varchar2
1129: ,x_msg_Count OUT NOCOPY Number
1130: ,x_msg_Data OUT NOCOPY Varchar2
1131: ,x_return_status OUT NOCOPY Varchar2)

Line 1162: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1158:
1159:
1160: BEGIN
1161: -- initialize return status
1162: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1163: If p_Service_id Is Null Or p_party_id Is Null Then
1164: x_return_status := OKC_API.G_RET_STS_ERROR;
1165: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');
1166: Raise G_EXCEPTION_HALT_VALIDATION;

Line 1164: x_return_status := OKC_API.G_RET_STS_ERROR;

1160: BEGIN
1161: -- initialize return status
1162: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1163: If p_Service_id Is Null Or p_party_id Is Null Then
1164: x_return_status := OKC_API.G_RET_STS_ERROR;
1165: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');
1166: Raise G_EXCEPTION_HALT_VALIDATION;
1167: End If;
1168:

Line 1165: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');

1161: -- initialize return status
1162: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1163: If p_Service_id Is Null Or p_party_id Is Null Then
1164: x_return_status := OKC_API.G_RET_STS_ERROR;
1165: OKC_API.set_message(G_APP_NAME, 'OKS_MISSING_REQUIRED_PARAMETERS');
1166: Raise G_EXCEPTION_HALT_VALIDATION;
1167: End If;
1168:
1169: Open l_service_csr ('C');

Line 1230: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1226:
1227: End If;
1228: End If;
1229: Close l_service_csr;
1230: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1231:
1232:
1233: Exception
1234:

Line 1240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1236: Close l_service_csr;
1237: Null;
1238: When Others Then
1239: x_available_yn := 'N';
1240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1241: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1242:
1243: END Is_service_available;
1244:

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

1237: Null;
1238: When Others Then
1239: x_available_yn := 'N';
1240: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1241: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1242:
1243: END Is_service_available;
1244:
1245:

Line 1248: ,p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE

1244:
1245:
1246: Procedure Delete_Contract_details
1247: ( p_api_version IN Number
1248: ,p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE
1249: ,p_order_line_id IN Number
1250: ,x_msg_Count OUT NOCOPY Number
1251: ,x_msg_Data OUT NOCOPY Varchar2
1252: ,x_return_status OUT NOCOPY Varchar2)

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

1253: Is
1254:
1255: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
1256: l_api_version CONSTANT NUMBER := 11.5;
1257: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1258: l_msg_count Number;
1259: l_msg_data Varchar(2000);
1260: l_line_id Number := Null;
1261: l_coc_tbl_in Oks_coc_pvt.cocv_tbl_type;

Line 1315: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1311: ,P_cocv_tbl => l_coc_tbl_in
1312:
1313: );
1314:
1315: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1316: Raise G_EXCEPTION_HALT_VALIDATION;
1317: End If;
1318: End Loop;
1319:

Line 1331: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1327: ,X_msg_data => l_msg_data
1328: ,P_codv_tbl => l_cod_tbl_in
1329: );
1330:
1331: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1332: Raise G_EXCEPTION_HALT_VALIDATION;
1333: End If;
1334: End Loop;
1335:

Line 1351: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1347: ,P_cocv_tbl => l_coc_tbl_in
1348:
1349: );
1350:
1351: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1352: Raise G_EXCEPTION_HALT_VALIDATION;
1353: End If;
1354: End Loop;
1355:

Line 1367: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1363: ,X_msg_data => l_msg_data
1364: ,P_codv_tbl => l_cod_tbl_in
1365: );
1366:
1367: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1368: Raise G_EXCEPTION_HALT_VALIDATION;
1369: End If;
1370:
1371:

Line 1384: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1380: Exception
1381: When G_EXCEPTION_HALT_VALIDATION Then
1382: x_return_status := l_return_status;
1383: When Others Then
1384: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1385: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1386:
1387: END Delete_Contract_details;
1388:

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

1381: When G_EXCEPTION_HALT_VALIDATION Then
1382: x_return_status := l_return_status;
1383: When Others Then
1384: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1385: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1386:
1387: END Delete_Contract_details;
1388:
1389:

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

1459:
1460: l_organization_id NUMBER;
1461: /* End of code added for Bug#15885433*/
1462:
1463: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1464: l_cp_rec l_cp_csr%rowtype;
1465: l_line_rec l_oline_csr%rowtype;
1466: l_install_date Date;
1467: l_ship_date Date;

Line 1477: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1473:
1474: l_line_rec := Null;
1475: l_cp_rec := Null;
1476:
1477: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1478: x_return_status := l_return_status;
1479: Open l_oline_csr;
1480: Fetch l_oline_csr into l_line_rec;
1481: Close l_oline_csr;

Line 1510: OKC_API.set_message(G_APP_NAME,'OKS_NULL_SDT','LINE_ID',p_order_line_id);

1506: Close l_cp_csr;
1507:
1508: If l_cp_rec.instance_id Is Null Then
1509: l_return_status := 'E';
1510: OKC_API.set_message(G_APP_NAME,'OKS_NULL_SDT','LINE_ID',p_order_line_id);
1511: Raise G_EXCEPTION_HALT_VALIDATION;
1512: End If;
1513: l_warend_date := Null;
1514: Open l_get_warr_dates_csr(l_cp_rec.instance_id);

Line 1549: OKC_API.set_message(G_APP_NAME,'OKS_NULL_SDT','LINE_ID',p_order_line_id);

1545:
1546: End If;
1547: If X_start_date Is Null Then
1548: l_return_status := 'E';
1549: OKC_API.set_message(G_APP_NAME,'OKS_NULL_SDT','LINE_ID',p_order_line_id);
1550: Raise G_EXCEPTION_HALT_VALIDATION;
1551: End If;
1552: X_end_date := okc_time_util_pub.get_enddate
1553: ( X_Start_Date

Line 1564: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1560: Exception
1561: When G_EXCEPTION_HALT_VALIDATION Then
1562: x_return_status := l_return_status;
1563: When Others Then
1564: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1565: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1566:
1567:
1568:

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

1561: When G_EXCEPTION_HALT_VALIDATION Then
1562: x_return_status := l_return_status;
1563: When Others Then
1564: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1565: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1566:
1567:
1568:
1569: End;

Line 1756: IF l_status = OKC_API.G_RET_STS_ERROR

1752: END IF;
1753: --Addition Ends
1754:
1755:
1756: IF l_status = OKC_API.G_RET_STS_ERROR
1757: THEN
1758: return 0;
1759: END IF;
1760:

Line 1778: OKC_API.set_message('OKS','OKS_INVD_UOM_CODE');

1774: EXCEPTION
1775: WHEN
1776: INVALID_UOM_EXCEPTION
1777: THEN
1778: OKC_API.set_message('OKS','OKS_INVD_UOM_CODE');
1779: close cs_validate_uom;
1780: return 0;
1781: WHEN
1782: INVALID_DATE_EXCEPTION

Line 1784: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');

1780: return 0;
1781: WHEN
1782: INVALID_DATE_EXCEPTION
1783: THEN
1784: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');
1785: return 0;
1786: WHEN OTHERS THEN
1787: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1788: return 0;

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

1783: THEN
1784: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');
1785: return 0;
1786: WHEN OTHERS THEN
1787: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
1788: return 0;
1789:
1790: END get_quantity;
1791:

Line 1920: IF l_return_status = OKC_API.G_RET_STS_ERROR

1916: x_period_type => l_period_type,
1917: x_period_start => l_period_start,
1918: x_price_uom => l_price_uom,
1919: x_return_status => l_return_status);
1920: IF l_return_status = OKC_API.G_RET_STS_ERROR
1921: THEN
1922: return 0;
1923: END IF;
1924:

Line 2000: OKC_API.set_message('OKS','OKS_INVD_DURATION');

1996: END IF;
1997:
1998: END IF;
1999: ELSE --none of two sets of parameters are passed so set the error message and return 0
2000: OKC_API.set_message('OKS','OKS_INVD_DURATION');
2001: return 0;
2002: END IF;
2003: END IF;
2004: return(l_target_qty);

Line 2010: OKC_API.set_message('OKS','OKS_INVD_UOM_CODE');

2006: EXCEPTION
2007: WHEN
2008: INVALID_UOM_EXCEPTION
2009: THEN
2010: OKC_API.set_message('OKS','OKS_INVD_UOM_CODE');
2011: close cs_validate_uom;
2012: return 0;
2013: WHEN
2014: G_EXCEPTION_HALT_VALIDATION

Line 2020: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');

2016: return 0;
2017: WHEN
2018: INVALID_DATE_EXCEPTION
2019: THEN
2020: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');
2021: return 0;
2022: WHEN OTHERS THEN
2023: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2024: return 0;

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

2019: THEN
2020: OKC_API.set_message('OKC','OKC_REP_INV_EFF_DATE_SD');
2021: return 0;
2022: WHEN OTHERS THEN
2023: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2024: return 0;
2025:
2026: END get_target_duration;
2027:

Line 2036: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,

2032:
2033: PROCEDURE Available_Services
2034: (
2035: P_Api_Version IN NUMBER,
2036: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,
2037: P_search_input IN VARCHAR2 Default OKC_API.G_MISS_CHAR,
2038: P_MAX_ROWS_RETURNED IN NUMBER Default 200,
2039: X_msg_Count OUT NOCOPY NUMBER,
2040: X_msg_Data OUT NOCOPY VARCHAR2,

Line 2037: P_search_input IN VARCHAR2 Default OKC_API.G_MISS_CHAR,

2033: PROCEDURE Available_Services
2034: (
2035: P_Api_Version IN NUMBER,
2036: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,
2037: P_search_input IN VARCHAR2 Default OKC_API.G_MISS_CHAR,
2038: P_MAX_ROWS_RETURNED IN NUMBER Default 200,
2039: X_msg_Count OUT NOCOPY NUMBER,
2040: X_msg_Data OUT NOCOPY VARCHAR2,
2041: X_Return_Status OUT NOCOPY VARCHAR2,

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

2154: l_api_name CONSTANT VARCHAR2(30) := 'GET_DURATION';
2155: l_api_version CONSTANT NUMBER := 11.5;
2156: l_row_count NUMBER;
2157: l_msg_data VARCHAR2(2000);
2158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2159: l_ptr Binary_Integer := 0 ;
2160: l_avail Varchar2(1);
2161: l_isrec Check_service_rec_type;
2162: l_found BOOLEAN;

Line 2227: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_avail_service_rec.customer_id));

2223: Close l_party_csr;
2224:
2225: If l_party_id IS Null Then
2226: l_return_status := 'E';
2227: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',to_char(p_avail_service_rec.customer_id));
2228: Raise G_EXCEPTION_HALT_VALIDATION;
2229: End If; /*IF */
2230:
2231: End If; /*IF */

Line 2233: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN

2229: End If; /*IF */
2230:
2231: End If; /*IF */
2232:
2233: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN
2234: --npalepu modified on 23-dec-2005 for bug # 4897884
2235: /* OPEN l_service_csr1; */
2236: OPEN l_service_csr1(l_organization_id);
2237: --end 4897884

Line 2243: End IF;/*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

2239: --npalepu modified on 23-dec-2005 for bug # 4897884
2240: /* OPEN l_service_csr; */
2241: OPEN l_service_csr(l_organization_id);
2242: --end 4897884
2243: End IF;/*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2244:
2245: LOOP
2246: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN
2247: FETCH l_service_csr1 BULK COLLECT INTO l_Srv_tbl LIMIT 1000;

Line 2246: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN

2242: --end 4897884
2243: End IF;/*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2244:
2245: LOOP
2246: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN
2247: FETCH l_service_csr1 BULK COLLECT INTO l_Srv_tbl LIMIT 1000;
2248: ELSE
2249: FETCH l_service_csr BULK COLLECT INTO l_Srv_tbl LIMIT 1000;
2250: END IF; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

Line 2250: END IF; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

2246: IF ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) THEN
2247: FETCH l_service_csr1 BULK COLLECT INTO l_Srv_tbl LIMIT 1000;
2248: ELSE
2249: FETCH l_service_csr BULK COLLECT INTO l_Srv_tbl LIMIT 1000;
2250: END IF; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2251:
2252: IF l_Srv_tbl.count > 0 THEN
2253: l_index := l_Srv_tbl.FIRST;
2254:

Line 2268: OKC_API.G_FALSE,

2264: --npalepu modified on 20-nov-2005
2265: /* Is_Service_Available
2266: (
2267: 1.0,
2268: OKC_API.G_FALSE,
2269: l_row_count,
2270: l_msg_Data,
2271: l_Return_Status,
2272: l_isrec,

Line 2278: P_init_msg_list => OKC_API.G_FALSE,

2274: ); */
2275: Is_Service_Available
2276: (
2277: P_Api_Version => 1.0,
2278: P_init_msg_list => OKC_API.G_FALSE,
2279: X_msg_Count => l_row_count,
2280: X_msg_Data => l_msg_Data,
2281: X_Return_Status => l_Return_Status,
2282: p_check_service_rec => l_isrec,

Line 2287: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2283: X_Available_YN => l_Avail
2284: );
2285: --end npalepu
2286:
2287: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2288: Raise G_EXCEPTION_HALT_VALIDATION;
2289: End If;
2290:
2291: IF (l_ptr >= P_MAX_ROWS_RETURNED) THEN

Line 2324: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then

2320: l_outer_loop_exit := 'N';
2321: Exit;
2322: END IF; /*IF <(l_outer_loop_exit = 'Y')> */
2323:
2324: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then
2325: Exit When l_service_csr1%NOTFound;
2326: ELSE
2327: Exit When l_service_csr%NOTFound;
2328: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

Line 2328: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

2324: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then
2325: Exit When l_service_csr1%NOTFound;
2326: ELSE
2327: Exit When l_service_csr%NOTFound;
2328: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2329:
2330: END LOOP;/*End of Outer Loop */
2331:
2332: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then

Line 2332: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then

2328: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2329:
2330: END LOOP;/*End of Outer Loop */
2331:
2332: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then
2333: CLOSE l_service_csr1;
2334: ELSE
2335: CLOSE l_service_csr;
2336: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

Line 2336: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */

2332: If ((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL)) then
2333: CLOSE l_service_csr1;
2334: ELSE
2335: CLOSE l_service_csr;
2336: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2337:
2338: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2339:
2340: --npalepu removed the code for bug # 4897884

Line 2338: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2334: ELSE
2335: CLOSE l_service_csr;
2336: End If; /*IF <((P_search_input = OKC_API.G_MISS_CHAR) OR (P_search_input IS NULL))> */
2337:
2338: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2339:
2340: --npalepu removed the code for bug # 4897884
2341: /* --NPALEPU 21-sep-2005 for bug # 4608694
2342: --Resetting to original context

Line 2362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2358: mo_global.set_policy_context(l_original_access_mode,l_original_org_id);
2359: --END NPALEPU */
2360: --end 4897884
2361: When Others Then
2362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2363: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2364: IF (l_service_csr1%ISOPEN) THEN
2365: CLOSE l_service_csr1;
2366: ELSIF (l_service_csr%ISOPEN) THEN

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

2359: --END NPALEPU */
2360: --end 4897884
2361: When Others Then
2362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2363: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
2364: IF (l_service_csr1%ISOPEN) THEN
2365: CLOSE l_service_csr1;
2366: ELSIF (l_service_csr%ISOPEN) THEN
2367: CLOSE l_service_csr;