DBA Data[Home] [Help]

APPS.OKS_IBINT_PUB dependencies on OKC_API

Line 84: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',P_custid); --message changed Vigandhi

80: Fetch l_party_csr Into l_party_id;
81: If l_party_csr%notfound Then
82: Close l_Party_Csr ;
83: Return(NULL);
84: OKC_API.set_message(G_APP_NAME,'OKS_PARTY_ID_NOT_FOUND','CUSTOMER_ID',P_custid); --message changed Vigandhi
85: Raise G_EXCEPTION_HALT_VALIDATION;
86: End if;
87:
88: Close l_party_csr;

Line 126: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

122:
123: l_link_rec1 l_link_csr_a%rowtype;
124: l_link_rec2 l_link_csr_b%rowtype;
125: l_link_to_order_id Varchar2(40);
126: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
127: l_msg_count Number;
128: l_msg_data Varchar2(2000);
129: link_flag Number := 0;
130: l_codv_tbl_in OKS_COD_PVT.codv_tbl_type;

Line 142: OKC_API.set_message(G_APP_NAME,'OKS_ORDER_DETAILS','ORDER_DETAILS',p_order_line_id);

138: Fetch l_link_csr1 Into l_link_to_order_id;
139:
140: If l_link_csr1%notfound Then
141: Close l_link_csr1 ;
142: OKC_API.set_message(G_APP_NAME,'OKS_ORDER_DETAILS','ORDER_DETAILS',p_order_line_id);
143: Raise G_EXCEPTION_HALT_VALIDATION;
144: End if;
145:
146: Close l_link_csr1;

Line 174: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

170: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.UPDATE_CONTRACT_DETAILS',
171: 'oks_cod_pvt.update_row(Return status = '|| l_return_status || ')');
172: END IF;
173:
174: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
175: x_return_status := l_return_status;
176: Raise G_EXCEPTION_HALT_VALIDATION;
177: End if;
178:

Line 211: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

207: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.UPDATE_CONTRACT_DETAILS',
208: 'oks_cod_pvt.update_row(Return status = '|| l_return_status || ')');
209: END IF;
210:
211: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
212: x_return_status := l_return_status;
213: Raise G_EXCEPTION_HALT_VALIDATION;
214: End If;
215:

Line 227: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

223: When G_EXCEPTION_HALT_VALIDATION Then
224: x_return_status := l_return_status;
225:
226: When Others Then
227: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
228: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
229: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
230: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.UPDATE_CONTRACT_DETAILS.UNEXPECTED',
231: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);

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

224: x_return_status := l_return_status;
225:
226: When Others Then
227: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
228: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
229: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
230: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.UPDATE_CONTRACT_DETAILS.UNEXPECTED',
231: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
232: END IF;

Line 256: OKC_API.set_message(G_APP_NAME,'OKS_ORD_LINE-DTLS_NOT_FOUND','ORDER_LINE',p_order_line_id); --message changed -Vigandhi

252:
253: If l_header_csr%notfound Then
254: Close l_header_csr;
255: Return(NULL);
256: OKC_API.set_message(G_APP_NAME,'OKS_ORD_LINE-DTLS_NOT_FOUND','ORDER_LINE',p_order_line_id); --message changed -Vigandhi
257: Raise G_EXCEPTION_HALT_VALIDATION;
258: End if;
259:
260: Close l_header_csr;

Line 299: x_return_status := OKC_API.G_RET_STS_SUCCESS;

295:
296: l_chdr_id NUMBER;
297:
298: Begin
299: x_return_status := OKC_API.G_RET_STS_SUCCESS;
300: Open l_chr_csr;
301: Fetch l_chr_csr Into l_renewal_rec;
302: Close l_chr_csr;
303:

Line 306: x_return_status := OKC_API.G_RET_STS_ERROR;

302: Close l_chr_csr;
303:
304: Exception
305: When Others Then
306: x_return_status := OKC_API.G_RET_STS_ERROR;
307: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
308: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.GET_CONTRACT_DETAILS.UNEXPECTED',
309: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
310: END IF;

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

307: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
308: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.GET_CONTRACT_DETAILS.UNEXPECTED',
309: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
310: END IF;
311: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
312: End;
313:
314: PROCEDURE IB_New(
315: P_instance_rec Instance_rec_type,

Line 322: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

318: x_msg_count OUT NOCOPY Number,
319: x_msg_data OUT NOCOPY VARCHAR2
320: )
321: Is
322: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
323: l_msg_count NUMBER;
324: l_parameters Varchar2(2000);
325: l_Header_rec OKS_EXTWAR_UTIL_PVT.Header_Rec_Type;
326: l_line_rec OKS_EXTWAR_UTIL_PVT.Line_Rec_Type;

Line 508: If p_instance_rec.order_line_id Is NULL Or (p_instance_rec.order_line_id = Okc_api.g_miss_num) Then

504:
505:
506: Begin
507:
508: If p_instance_rec.order_line_id Is NULL Or (p_instance_rec.order_line_id = Okc_api.g_miss_num) Then
509:
510: -- Added: Vigandhi : 18-nov-2004
511: -- Get the renewal rules defined in GCD
512: p_party_id := Get_Party_id(p_instance_rec.old_CustomeR_acct_id);

Line 539: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

535: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
536: 'oks_renew_util_pub.get_renew_rules(Return status = ' ||l_return_status );
537: END IF;
538:
539: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
540: x_return_status := l_return_status;
541: Raise G_EXCEPTION_HALT_VALIDATION;
542: End If;
543:

Line 559: l_return_status := OKC_API.G_RET_STS_ERROR;

555: Where id = -1;
556:
557: If SQL%ROWCOUNT < 1 Then
558:
559: l_return_status := OKC_API.G_RET_STS_ERROR;
560: OKC_API.set_message(G_APP_NAME,'OKS_INVD_COV_TMPLT_HDR');
561: Raise G_EXCEPTION_HALT_VALIDATION;
562:
563: END IF;

Line 560: OKC_API.set_message(G_APP_NAME,'OKS_INVD_COV_TMPLT_HDR');

556:
557: If SQL%ROWCOUNT < 1 Then
558:
559: l_return_status := OKC_API.G_RET_STS_ERROR;
560: OKC_API.set_message(G_APP_NAME,'OKS_INVD_COV_TMPLT_HDR');
561: Raise G_EXCEPTION_HALT_VALIDATION;
562:
563: END IF;
564: End If;

Line 573: l_return_status := OKC_API.G_RET_STS_ERROR;

569: Open l_Ord_Hdr_csr(p_instance_rec.Order_line_id);
570: Fetch l_Ord_Hdr_csr into l_Ord_hdr_rec;
571: If l_Ord_Hdr_csr%notfound then
572: Close l_Ord_Hdr_csr;
573: l_return_status := OKC_API.G_RET_STS_ERROR;
574: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
575: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
576: 'l_ord_hdr_csr failed. No details found for line id ' ||p_instance_rec.Order_line_id );
577: END IF;

Line 578: OKC_API.set_message(G_APP_NAME, 'OKS_ORD_HDR_DTLS_NOT_FOUND','ORDER_HEADER_ID',p_instance_rec.Order_line_id);

574: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
575: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
576: 'l_ord_hdr_csr failed. No details found for line id ' ||p_instance_rec.Order_line_id );
577: END IF;
578: OKC_API.set_message(G_APP_NAME, 'OKS_ORD_HDR_DTLS_NOT_FOUND','ORDER_HEADER_ID',p_instance_rec.Order_line_id);
579: Raise G_EXCEPTION_HALT_VALIDATION;
580: End if;
581: Close l_Ord_Hdr_csr;
582:

Line 610: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

606: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
607: 'oks_renew_util_pub.get_renew_rules(Return status = ' ||l_return_status );
608: END IF;
609:
610: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
611: x_return_status := l_return_status;
612: Raise G_EXCEPTION_HALT_VALIDATION;
613: End If;
614:

Line 673: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

669: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
670: 'oks_extwar_util_pvt.get_warranty_info(Return status = '||l_return_status ||',Count = '|| war_tbl.count ||')' );
671: END IF;
672:
673: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
674: x_return_status := l_return_status;
675: Raise G_EXCEPTION_HALT_VALIDATION;
676: End If;
677:

Line 683: If war_tbl.count = 0 And p_instance_rec.order_line_id = okc_api.g_miss_num Then

679:
680: --If No warranty and if legacy ..Skip immediate And delayed service routine
681:
682:
683: If war_tbl.count = 0 And p_instance_rec.order_line_id = okc_api.g_miss_num Then
684:
685: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
686: fnd_log.string(FND_LOG.LEVEL_STATEMENT,G_MODULE_CURRENT||'.IB_NEW',
687: ' Legacy no order line ' );

Line 691: ElsIf p_instance_rec.order_line_id <> okc_api.g_miss_num Then

687: ' Legacy no order line ' );
688: END IF;
689: Raise G_EXCEPTION_HALT_VALIDATION;
690:
691: ElsIf p_instance_rec.order_line_id <> okc_api.g_miss_num Then
692: p_order_header_id := Get_order_header_id(p_instance_rec.order_line_id);
693: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
694: fnd_log.string(FND_LOG.LEVEL_STATEMENT,G_MODULE_CURRENT||'.IB_NEW',
695: ' Order Line Routine. '|| ';'|| 'Order header id = '||p_order_header_id ||'Before update statement' );

Line 731: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

727: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
728: 'oks_integration_util_pub.create_k_order_details(Return status = '||l_return_status ||')' );
729: END IF;
730:
731: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
732: x_return_status := l_return_status;
733: Raise G_EXCEPTION_HALT_VALIDATION;
734: End If;
735:

Line 742: If p_instance_rec.order_line_id = okc_api.g_miss_num Then -- Legacy Warranty Routine

738: -- Warranty Check
739:
740: If Not war_tbl.Count = 0 Then
741:
742: If p_instance_rec.order_line_id = okc_api.g_miss_num Then -- Legacy Warranty Routine
743: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
744: fnd_log.string(FND_LOG.LEVEL_STATEMENT,G_MODULE_CURRENT||'.IB_NEW',
745: ' Legacy Warranty Routine' );
746: END IF;

Line 883: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

879: 'oks_extwarprgm_pvt .create_contract_ibnew(Return status = '||l_return_status ||
880: ',Chr_id = ' || l_chr_Id || ')');
881: END IF;
882:
883: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
884:
885: FOR i in 1..fnd_msg_pub.count_msg
886: Loop
887: fnd_msg_pub.get

Line 935: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

931: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
932: 'oks_extwar_util_pvt.get_contract_header_info(Return status = '||l_return_status || ')');
933: END IF;
934:
935: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
936: x_return_status := l_return_status;
937: Raise G_EXCEPTION_HALT_VALIDATION;
938: End If;
939:

Line 958: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

954: 'oks_extwar_util_pvt.get_contract_line_info(Return status = '||l_return_status || ')');
955: END IF;
956:
957: -- Exception to be written
958: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
959: x_return_status := l_return_status;
960: Raise G_EXCEPTION_HALT_VALIDATION;
961: End If;
962:

Line 981: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

977: 'Service status = ' || l_service_status || ')');
978: END IF;
979:
980: -- Exception to be written
981: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
982: x_return_status := l_return_status;
983: Raise G_EXCEPTION_HALT_VALIDATION;
984: End If;
985:

Line 1111: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1107: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
1108: 'oks_extwarprgm_pvt .create_contract_ibnew(Return status = '||l_return_status || ')');
1109: END IF;
1110:
1111: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1112:
1113: FOR i in 1..fnd_msg_pub.count_msg
1114: Loop
1115: fnd_msg_pub.get

Line 2059: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;

2055: k_rpl_tbl OKS_EXTWARPRGM_PVT.Contract_tbl;
2056: k_upd_tbl OKS_EXTWARPRGM_PVT.Contract_tbl;
2057:
2058:
2059: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;
2060: l_inst_dtls_tbl OKS_IHD_PVT.ihdv_tbl_type ;
2061: l_subscr_instance Varchar2(1);
2062: l_ref_num Varchar2(30);
2063: l_temp Number;

Line 2102: l_return_status := OKC_API.G_RET_STS_ERROR;

2098: Fetch check_subscription_instance into l_subscr_instance;
2099: Close check_subscription_instance;
2100:
2101: If l_subscr_instance = 'Y' Then
2102: l_return_status := OKC_API.G_RET_STS_ERROR;
2103: OKC_API.set_message(G_APP_NAME,'OKS_SUBSCRIPTION_INST_ERR');
2104: Raise G_EXCEPTION_HALT_VALIDATION;
2105:
2106: End If;

Line 2103: OKC_API.set_message(G_APP_NAME,'OKS_SUBSCRIPTION_INST_ERR');

2099: Close check_subscription_instance;
2100:
2101: If l_subscr_instance = 'Y' Then
2102: l_return_status := OKC_API.G_RET_STS_ERROR;
2103: OKC_API.set_message(G_APP_NAME,'OKS_SUBSCRIPTION_INST_ERR');
2104: Raise G_EXCEPTION_HALT_VALIDATION;
2105:
2106: End If;
2107: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2130: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2126: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2127: 'OKS_MASS_UPDATE.update_contracts(Return status = ' ||l_return_status );
2128: END IF;
2129:
2130: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2131: x_return_status := l_return_status;
2132: Raise G_EXCEPTION_HALT_VALIDATION;
2133: End If;
2134: Else

Line 2182: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2178: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2179: 'Ib_new(Return status = '||l_return_status ||')' );
2180: End If;
2181: x_return_status := l_return_status;
2182: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2183: x_return_status := l_return_status;
2184: Raise G_EXCEPTION_HALT_VALIDATION;
2185: End if;
2186:

Line 2204: If instance_tbl(i).order_line_id = okc_api.g_miss_num Then

2200: OPEN l_refnum_csr (instance_tbl(i).old_customer_product_id);
2201: FETCH l_refnum_csr into l_ref_num;
2202: Close l_refnum_csr;
2203:
2204: If instance_tbl(i).order_line_id = okc_api.g_miss_num Then
2205: l_temp := null;
2206: Else
2207: l_temp := instance_tbl(i).order_line_id ;
2208: End If;

Line 2241: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2237: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE.instance history',
2238: 'oks_ins_pvt.insert_row(Return status = '||l_return_status ||')' );
2239: End If;
2240: x_return_status := l_return_status;
2241: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2242: x_return_status := l_return_status;
2243: Raise G_EXCEPTION_HALT_VALIDATION;
2244: End if;
2245: l_instparent_id := x_insthist_rec.id;

Line 2267: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2263: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE.instance history details',
2264: 'oks_ihd_pvt.insert_row(Return status = '||l_return_status ||')' );
2265: End If;
2266: x_return_status := l_return_status;
2267: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2268: x_return_status := l_return_status;
2269: Raise G_EXCEPTION_HALT_VALIDATION;
2270: End if;
2271:

Line 2306: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2302: 'oks_extwarprgm_pvt .create_k_system_transfer(Return status = '||l_return_status ||')' );
2303: End If;
2304:
2305: x_return_status := l_return_status;
2306: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2307: x_return_status := l_return_status;
2308: Raise G_EXCEPTION_HALT_VALIDATION;
2309: End if;
2310:

Line 2337: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2333: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2334: 'Create_contract_terminate(Return status = '||l_return_status ||')' );
2335: End If;
2336: x_return_status := l_return_status;
2337: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2338: x_return_status := l_return_status;
2339: Raise G_EXCEPTION_HALT_VALIDATION;
2340: End if;
2341: End If;

Line 2370: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2366: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2367: 'Create_Contract_IBreturn(Return status = '||l_return_status ||')' );
2368: End If;
2369: x_return_status := l_return_status;
2370: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2371: x_return_status := l_return_status;
2372: Raise G_EXCEPTION_HALT_VALIDATION;
2373: End if;
2374: End If;

Line 2406: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2402: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2403: 'Create_contract_IBupdate(Return status = '||l_return_status ||')' );
2404: End If;
2405: x_return_status := l_return_status;
2406: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2407: x_return_status := l_return_status;
2408: Raise G_EXCEPTION_HALT_VALIDATION;
2409: End if;
2410: End If;

Line 2441: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2437: 'Update_contract_idc(Return status = '||l_return_status ||')' );
2438: End If;
2439: x_return_status := l_return_status;
2440:
2441: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2442: x_return_status := l_return_status;
2443: Raise G_EXCEPTION_HALT_VALIDATION;
2444: End if;
2445:

Line 2474: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2470: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2471: 'Create_contract_ibsplit(Return status = '||l_return_status ||')' );
2472: End If;
2473: x_return_status := l_return_status;
2474: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2475: x_return_status := l_return_status;
2476: Raise G_EXCEPTION_HALT_VALIDATION;
2477: End if;
2478: End If;

Line 2554: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2550: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2551: 'Update_Contract_IBReplace(Return status = '||l_return_status ||')' );
2552: End If;
2553: x_return_status := l_return_status;
2554: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2555: x_return_status := l_return_status;
2556: Raise G_EXCEPTION_HALT_VALIDATION;
2557: End if;
2558: End If;

Line 2625: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2621: p_data => x_msg_data
2622: );
2623:
2624: When Others Then
2625: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2626: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2627: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2628: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2629: END IF;

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

2626: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2627: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2628: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2629: END IF;
2630: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2631: --Fix for bug 4947476
2632: FND_MSG_PUB.Count_And_Get
2633: (
2634: p_count => x_msg_count,

Line 2658: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2654: DELETE FROM OKS_BATCH_RULES
2655: WHERE batch_ID = P_Batch_ID;
2656: Exception
2657: When Others Then
2658: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2659: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2660: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2661: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2662: END IF;

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

2659: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2660: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2661: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2662: END IF;
2663: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2664:
2665: End;
2666:
2667: -- Procedure to validate batch rules before submitting

Line 2698: x_return_status := OKC_API.G_RET_STS_ERROR;

2694: CLOSE l_check_csr;
2695:
2696: IF l_dummy_var = '?'
2697: THEN
2698: x_return_status := OKC_API.G_RET_STS_ERROR;
2699: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2700: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
2701: 'Accounts mismatch ' ||p_batch_id ||'Account id'|| p_new_owner_id );
2702: END IF;

Line 2703: OKC_API.set_message(G_APP_NAME, 'OKS_BATCH_RULES_MISMATCH');

2699: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2700: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
2701: 'Accounts mismatch ' ||p_batch_id ||'Account id'|| p_new_owner_id );
2702: END IF;
2703: OKC_API.set_message(G_APP_NAME, 'OKS_BATCH_RULES_MISMATCH');
2704: END IF;
2705: ELSE
2706: IF p_batch_id IS NOT NULL
2707: THEN

Line 2716: If x_return_status <> OKC_API.G_RET_STS_SUCCESS

2712: x_return_status => x_return_status,
2713: x_msg_count => x_msg_count,
2714: x_msg_data => x_msg_data);
2715:
2716: If x_return_status <> OKC_API.G_RET_STS_SUCCESS
2717: THEN
2718: x_return_status := OKC_API.G_RET_STS_ERROR;
2719: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2720: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',

Line 2718: x_return_status := OKC_API.G_RET_STS_ERROR;

2714: x_msg_data => x_msg_data);
2715:
2716: If x_return_status <> OKC_API.G_RET_STS_SUCCESS
2717: THEN
2718: x_return_status := OKC_API.G_RET_STS_ERROR;
2719: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2720: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
2721: 'Error while deleting the batch ' ||p_batch_id);
2722: END IF;

Line 2789: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2785: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_BATCH',
2786: 'oks_brl_pvt.insert_row(Return status = '|| l_return_status || ')');
2787: END IF;
2788:
2789: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2790: x_return_status := l_return_status;
2791: Raise G_EXCEPTION_HALT_VALIDATION;
2792: End if;
2793: x_return_status := l_return_status;

Line 2803: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2799: 'No Batch rules created');
2800: END IF;
2801:
2802: When Others Then
2803: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2804: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2805: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2806: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.CARETE_BATCH_RULES.UNEXPECTED',
2807: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);

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

2800: END IF;
2801:
2802: When Others Then
2803: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2804: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2805: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2806: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.CARETE_BATCH_RULES.UNEXPECTED',
2807: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2808: END IF;

Line 2829: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

2825: RETURN l_subscr_instance;
2826: END CHECK_SUBSCR_INSTANCE;
2827:
2828: PROCEDURE POPULATE_CHILD_INSTANCES (p_api_version IN Number,
2829: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
2830: p_instance_id IN NUMBER,
2831: p_transaction_type IN VARCHAR2,
2832: x_msg_Count OUT NOCOPY Number,
2833: x_msg_Data OUT NOCOPY Varchar2,

Line 2849: ,p_commit => okc_api.g_false

2845:
2846: CSI_UTILITY_GRP.Get_impacted_item_instances
2847: (
2848: p_api_version => p_api_version
2849: ,p_commit => okc_api.g_false
2850: ,p_init_msg_list => p_init_msg_list
2851: ,p_validation_level => fnd_api.g_valid_level_full
2852: ,x_txn_inst_tbl => l_txn_inst_tbl
2853: ,p_txn_oks_rec => l_txn_rec

Line 2880: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

2876: END POPULATE_CHILD_INSTANCES;
2877:
2878:
2879: PROCEDURE GET_CONTRACTS(p_api_version IN Number,
2880: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
2881: p_instance_id IN NUMBER,
2882: p_validate_yn IN VARCHAR2 ,
2883: x_msg_Count OUT NOCOPY Number,
2884: x_msg_Data OUT NOCOPY Varchar2,

Line 3149: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,

3145:
3146:
3147: PROCEDURE CHECK_CONTRACTS_IMPACTED(
3148: P_Api_Version IN NUMBER,
3149: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,
3150: P_instance_id IN NUMBER,
3151: p_parent_instance_yn IN VARCHAR2,
3152: p_transaction_date IN DATE,
3153: p_new_install_date IN DATE,

Line 3478: l_init_msg_list CONSTANT VARCHAR2 (1) := okc_api.g_false;

3474: )
3475: IS
3476:
3477: l_api_version CONSTANT NUMBER := 1.0;
3478: l_init_msg_list CONSTANT VARCHAR2 (1) := okc_api.g_false;
3479: l_return_status VARCHAR2 (1) := 'S';
3480: l_api_type CONSTANT VARCHAR2(50) := 'PUB';
3481: l_api_name CONSTANT VARCHAR2(50) := 'k_cov_webadi';
3482:

Line 3735: l_return_status := okc_api.g_ret_sts_error;

3731: || ' in current status'
3732: );
3733: END IF;
3734: x_msg_data := 'Cannot add the sublines to contract in current status';
3735: l_return_status := okc_api.g_ret_sts_error;
3736: Raise G_EXCEPTION_HALT_VALIDATION;
3737: END IF;
3738:
3739: /*start of get line details*/

Line 3764: l_return_status := okc_api.g_ret_sts_error;

3760: );
3761: END IF;
3762:
3763: x_msg_data := 'The Owner party of the contract subline and Owner party of the Instance are not the same.';
3764: l_return_status := okc_api.g_ret_sts_error;
3765: Raise G_EXCEPTION_HALT_VALIDATION;
3766: END IF;
3767:
3768: /*Check if the product UOM code is valid*/

Line 3786: l_return_status := okc_api.g_ret_sts_error;

3782: );
3783: END IF;
3784:
3785: x_msg_data := 'The product UOM code is invalid';
3786: l_return_status := okc_api.g_ret_sts_error;
3787: Raise G_EXCEPTION_HALT_VALIDATION;
3788: END IF;
3789:
3790: /*Check if the instance in the present status is serviceable.*/

Line 3808: l_return_status := okc_api.g_ret_sts_error;

3804: );
3805: END IF;
3806:
3807: x_msg_data := 'The contract subline cannot be associated to the Instance, with the specified Instance status.';
3808: l_return_status := okc_api.g_ret_sts_error;
3809: Raise G_EXCEPTION_HALT_VALIDATION;
3810: END IF;
3811:
3812: /*Check if the item being added is serviceable*/

Line 3830: l_return_status := okc_api.g_ret_sts_error;

3826: );
3827: END IF;
3828:
3829: x_msg_data := 'The Item is not a serviceable Item.';
3830: l_return_status := okc_api.g_ret_sts_error;
3831: RAISE G_EXCEPTION_HALT_VALIDATION;
3832: END IF;
3833:
3834: /*---------------End of all Validations---------------------*/

Line 3854: l_return_status := okc_api.g_ret_sts_error;

3850: || ' service/warranty lines.'
3851: );
3852: END IF;
3853: x_msg_data := 'Cannot add sublines to non-service/warranty lines';
3854: l_return_status := okc_api.g_ret_sts_error;
3855: Raise G_EXCEPTION_HALT_VALIDATION;
3856: END IF;
3857: l_clev_tbl_in (1).lse_id := l_lsl_id;
3858: l_clev_tbl_in (1).line_number := get_sub_line_number (p_chr_id, p_attach2_line_id);

Line 3881: p_restricted_update => okc_api.g_true,

3877:
3878: okc_contract_pub.create_contract_line
3879: (p_api_version => l_api_version,
3880: p_init_msg_list => l_init_msg_list,
3881: p_restricted_update => okc_api.g_true,
3882: x_return_status => l_return_status,
3883: x_msg_count => x_msg_count,
3884: x_msg_data => x_msg_data,
3885: p_clev_tbl => l_clev_tbl_in,

Line 3905: okc_api.set_message (g_app_name,

3901: THEN
3902: l_cov_line_id := l_clev_tbl_out (1).ID;
3903: x_covlvl_id := l_cov_line_id;
3904: ELSE
3905: okc_api.set_message (g_app_name,
3906: g_required_value,
3907: g_col_name_token,
3908: 'K LINE (SUB LINE)'
3909: );

Line 3917: l_klnv_tbl_in (1).created_by := okc_api.g_miss_num;

3913: /*Insertion of OKS_DETAILS- Start*/
3914: l_klnv_tbl_in (1).tax_amount := 0;
3915: l_klnv_tbl_in (1).cle_id := l_cov_line_id;
3916: l_klnv_tbl_in (1).dnz_chr_id := p_chr_id;
3917: l_klnv_tbl_in (1).created_by := okc_api.g_miss_num;
3918: l_klnv_tbl_in (1).creation_date := okc_api.g_miss_date;
3919: l_klnv_tbl_in (1).status_text := 'Subline created from IBWebADI';
3920:
3921: l_invoice_text := getformattedinvoicetext

Line 3918: l_klnv_tbl_in (1).creation_date := okc_api.g_miss_date;

3914: l_klnv_tbl_in (1).tax_amount := 0;
3915: l_klnv_tbl_in (1).cle_id := l_cov_line_id;
3916: l_klnv_tbl_in (1).dnz_chr_id := p_chr_id;
3917: l_klnv_tbl_in (1).created_by := okc_api.g_miss_num;
3918: l_klnv_tbl_in (1).creation_date := okc_api.g_miss_date;
3919: l_klnv_tbl_in (1).status_text := 'Subline created from IBWebADI';
3920:
3921: l_invoice_text := getformattedinvoicetext
3922: (p_k_covd_rec.Inventory_item_id,

Line 3958: okc_api.set_message (g_app_name,

3954: END IF;
3955:
3956: IF NOT l_return_status = 'S'
3957: THEN
3958: okc_api.set_message (g_app_name,
3959: g_required_value,
3960: g_col_name_token,
3961: 'OKS Contract COV LINE'
3962: );

Line 4014: okc_api.set_message (g_app_name,

4010: IF l_return_status = 'S'
4011: THEN
4012: l_line_item_id := l_cimv_tbl (1).ID;
4013: ELSE
4014: okc_api.set_message (g_app_name,
4015: g_required_value,
4016: g_col_name_token,
4017: 'KItem (SUB LINE)'
4018: );

Line 4034: x_return_status := okc_api.g_ret_sts_unexp_error;

4030: NULL;
4031: WHEN OTHERS
4032: THEN
4033: x_msg_data := 'Unexpected error during OKS cov level creation';
4034: x_return_status := okc_api.g_ret_sts_unexp_error;
4035: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT(l_api_name || l_api_type);
4036: okc_api.set_message (g_app_name,
4037: g_unexpected_error,
4038: g_sqlcode_token,

Line 4036: okc_api.set_message (g_app_name,

4032: THEN
4033: x_msg_data := 'Unexpected error during OKS cov level creation';
4034: x_return_status := okc_api.g_ret_sts_unexp_error;
4035: DBMS_TRANSACTION.ROLLBACK_SAVEPOINT(l_api_name || l_api_type);
4036: okc_api.set_message (g_app_name,
4037: g_unexpected_error,
4038: g_sqlcode_token,
4039: SQLCODE,
4040: g_sqlerrm_token,