DBA Data[Home] [Help]

APPS.OKS_IBINT_PUB dependencies on OKC_API

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

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

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

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

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

142: Fetch l_link_csr1 Into l_link_to_order_id;
143:
144: If l_link_csr1%notfound Then
145: Close l_link_csr1 ;
146: OKC_API.set_message(G_APP_NAME,'OKS_ORDER_DETAILS','ORDER_DETAILS',p_order_line_id);
147: Raise G_EXCEPTION_HALT_VALIDATION;
148: End if;
149:
150: Close l_link_csr1;

Line 178: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

Line 215: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

Line 231: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

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

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

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

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

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

Line 303: x_return_status := OKC_API.G_RET_STS_SUCCESS;

299:
300: l_chdr_id NUMBER;
301:
302: Begin
303: x_return_status := OKC_API.G_RET_STS_SUCCESS;
304: Open l_chr_csr;
305: Fetch l_chr_csr Into l_renewal_rec;
306: Close l_chr_csr;
307:

Line 310: x_return_status := OKC_API.G_RET_STS_ERROR;

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

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

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

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

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

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

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

Line 543: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

Line 563: l_return_status := OKC_API.G_RET_STS_ERROR;

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

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

560:
561: If SQL%ROWCOUNT < 1 Then
562:
563: l_return_status := OKC_API.G_RET_STS_ERROR;
564: OKC_API.set_message(G_APP_NAME,'OKS_INVD_COV_TMPLT_HDR');
565: Raise G_EXCEPTION_HALT_VALIDATION;
566:
567: END IF;
568: End If;

Line 577: l_return_status := OKC_API.G_RET_STS_ERROR;

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

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

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

Line 614: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

Line 677: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

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

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

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

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

Line 735: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

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

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

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

Line 887: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

883: 'oks_extwarprgm_pvt .create_contract_ibnew(Return status = '||l_return_status ||
884: ',Chr_id = ' || l_chr_Id || ')');
885: END IF;
886:
887: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
888: x_return_status := l_return_status;
889: Raise G_EXCEPTION_HALT_VALIDATION;
890: End if;
891:

Line 920: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

916: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
917: 'oks_extwar_util_pvt.get_contract_header_info(Return status = '||l_return_status || ')');
918: END IF;
919:
920: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
921: x_return_status := l_return_status;
922: Raise G_EXCEPTION_HALT_VALIDATION;
923: End If;
924:

Line 943: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

939: 'oks_extwar_util_pvt.get_contract_line_info(Return status = '||l_return_status || ')');
940: END IF;
941:
942: -- Exception to be written
943: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
944: x_return_status := l_return_status;
945: Raise G_EXCEPTION_HALT_VALIDATION;
946: End If;
947:

Line 966: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

962: 'Service status = ' || l_service_status || ')');
963: END IF;
964:
965: -- Exception to be written
966: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
967: x_return_status := l_return_status;
968: Raise G_EXCEPTION_HALT_VALIDATION;
969: End If;
970:

Line 1096: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

1092: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
1093: 'oks_extwarprgm_pvt .create_contract_ibnew(Return status = '||l_return_status || ')');
1094: END IF;
1095:
1096: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
1097:
1098: FOR i in 1..fnd_msg_pub.count_msg
1099: Loop
1100: fnd_msg_pub.get

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

2035: k_rpl_tbl OKS_EXTWARPRGM_PVT.Contract_tbl;
2036: k_upd_tbl OKS_EXTWARPRGM_PVT.Contract_tbl;
2037:
2038:
2039: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;
2040: l_inst_dtls_tbl OKS_IHD_PVT.ihdv_tbl_type ;
2041: l_subscr_instance Varchar2(1);
2042: l_ref_num Varchar2(30);
2043: l_temp Number;

Line 2082: l_return_status := OKC_API.G_RET_STS_ERROR;

2078: Fetch check_subscription_instance into l_subscr_instance;
2079: Close check_subscription_instance;
2080:
2081: If l_subscr_instance = 'Y' Then
2082: l_return_status := OKC_API.G_RET_STS_ERROR;
2083: OKC_API.set_message(G_APP_NAME,'OKS_SUBSCRIPTION_INST_ERR');
2084: Raise G_EXCEPTION_HALT_VALIDATION;
2085:
2086: End If;

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

2079: Close check_subscription_instance;
2080:
2081: If l_subscr_instance = 'Y' Then
2082: l_return_status := OKC_API.G_RET_STS_ERROR;
2083: OKC_API.set_message(G_APP_NAME,'OKS_SUBSCRIPTION_INST_ERR');
2084: Raise G_EXCEPTION_HALT_VALIDATION;
2085:
2086: End If;
2087: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2110: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2106: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2107: 'OKS_MASS_UPDATE.update_contracts(Return status = ' ||l_return_status );
2108: END IF;
2109:
2110: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2111: x_return_status := l_return_status;
2112: Raise G_EXCEPTION_HALT_VALIDATION;
2113: End If;
2114: Else

Line 2162: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2158: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2159: 'Ib_new(Return status = '||l_return_status ||')' );
2160: End If;
2161: x_return_status := l_return_status;
2162: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2163: x_return_status := l_return_status;
2164: Raise G_EXCEPTION_HALT_VALIDATION;
2165: End if;
2166:

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

2180: OPEN l_refnum_csr (instance_tbl(i).old_customer_product_id);
2181: FETCH l_refnum_csr into l_ref_num;
2182: Close l_refnum_csr;
2183:
2184: If instance_tbl(i).order_line_id = okc_api.g_miss_num Then
2185: l_temp := null;
2186: Else
2187: l_temp := instance_tbl(i).order_line_id ;
2188: End If;

Line 2221: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2217: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE.instance history',
2218: 'oks_ins_pvt.insert_row(Return status = '||l_return_status ||')' );
2219: End If;
2220: x_return_status := l_return_status;
2221: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2222: x_return_status := l_return_status;
2223: Raise G_EXCEPTION_HALT_VALIDATION;
2224: End if;
2225: l_instparent_id := x_insthist_rec.id;

Line 2247: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2243: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE.instance history details',
2244: 'oks_ihd_pvt.insert_row(Return status = '||l_return_status ||')' );
2245: End If;
2246: x_return_status := l_return_status;
2247: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2248: x_return_status := l_return_status;
2249: Raise G_EXCEPTION_HALT_VALIDATION;
2250: End if;
2251:

Line 2286: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2282: 'oks_extwarprgm_pvt .create_k_system_transfer(Return status = '||l_return_status ||')' );
2283: End If;
2284:
2285: x_return_status := l_return_status;
2286: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2287: x_return_status := l_return_status;
2288: Raise G_EXCEPTION_HALT_VALIDATION;
2289: End if;
2290:

Line 2317: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2313: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2314: 'Create_contract_terminate(Return status = '||l_return_status ||')' );
2315: End If;
2316: x_return_status := l_return_status;
2317: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2318: x_return_status := l_return_status;
2319: Raise G_EXCEPTION_HALT_VALIDATION;
2320: End if;
2321: End If;

Line 2350: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2346: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2347: 'Create_Contract_IBreturn(Return status = '||l_return_status ||')' );
2348: End If;
2349: x_return_status := l_return_status;
2350: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2351: x_return_status := l_return_status;
2352: Raise G_EXCEPTION_HALT_VALIDATION;
2353: End if;
2354: End If;

Line 2386: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2382: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2383: 'Create_contract_IBupdate(Return status = '||l_return_status ||')' );
2384: End If;
2385: x_return_status := l_return_status;
2386: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2387: x_return_status := l_return_status;
2388: Raise G_EXCEPTION_HALT_VALIDATION;
2389: End if;
2390: End If;

Line 2421: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2417: 'Update_contract_idc(Return status = '||l_return_status ||')' );
2418: End If;
2419: x_return_status := l_return_status;
2420:
2421: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2422: x_return_status := l_return_status;
2423: Raise G_EXCEPTION_HALT_VALIDATION;
2424: End if;
2425:

Line 2454: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2450: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2451: 'Create_contract_ibsplit(Return status = '||l_return_status ||')' );
2452: End If;
2453: x_return_status := l_return_status;
2454: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2455: x_return_status := l_return_status;
2456: Raise G_EXCEPTION_HALT_VALIDATION;
2457: End if;
2458: End If;

Line 2534: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2530: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE',
2531: 'Update_Contract_IBReplace(Return status = '||l_return_status ||')' );
2532: End If;
2533: x_return_status := l_return_status;
2534: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2535: x_return_status := l_return_status;
2536: Raise G_EXCEPTION_HALT_VALIDATION;
2537: End if;
2538: End If;

Line 2605: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2601: p_data => x_msg_data
2602: );
2603:
2604: When Others Then
2605: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2606: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2607: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2608: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2609: END IF;

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

2606: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2607: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2608: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2609: END IF;
2610: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2611: --Fix for bug 4947476
2612: FND_MSG_PUB.Count_And_Get
2613: (
2614: p_count => x_msg_count,

Line 2638: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2634: DELETE FROM OKS_BATCH_RULES
2635: WHERE batch_ID = P_Batch_ID;
2636: Exception
2637: When Others Then
2638: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2639: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2640: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2641: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2642: END IF;

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

2639: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2640: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.IB_INTERFACE.UNEXPECTED',
2641: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2642: END IF;
2643: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2644:
2645: End;
2646:
2647: -- Procedure to validate batch rules before submitting

Line 2678: x_return_status := OKC_API.G_RET_STS_ERROR;

2674: CLOSE l_check_csr;
2675:
2676: IF l_dummy_var = '?'
2677: THEN
2678: x_return_status := OKC_API.G_RET_STS_ERROR;
2679: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2680: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
2681: 'Accounts mismatch ' ||p_batch_id ||'Account id'|| p_new_owner_id );
2682: END IF;

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

2679: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2680: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_NEW',
2681: 'Accounts mismatch ' ||p_batch_id ||'Account id'|| p_new_owner_id );
2682: END IF;
2683: OKC_API.set_message(G_APP_NAME, 'OKS_BATCH_RULES_MISMATCH');
2684: END IF;
2685: ELSE
2686: IF p_batch_id IS NOT NULL
2687: THEN

Line 2696: If x_return_status <> OKC_API.G_RET_STS_SUCCESS

2692: x_return_status => x_return_status,
2693: x_msg_count => x_msg_count,
2694: x_msg_data => x_msg_data);
2695:
2696: If x_return_status <> OKC_API.G_RET_STS_SUCCESS
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',

Line 2698: x_return_status := OKC_API.G_RET_STS_ERROR;

2694: x_msg_data => x_msg_data);
2695:
2696: If x_return_status <> OKC_API.G_RET_STS_SUCCESS
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: 'Error while deleting the batch ' ||p_batch_id);
2702: END IF;

Line 2769: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then

2765: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_BATCH',
2766: 'oks_brl_pvt.insert_row(Return status = '|| l_return_status || ')');
2767: END IF;
2768:
2769: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2770: x_return_status := l_return_status;
2771: Raise G_EXCEPTION_HALT_VALIDATION;
2772: End if;
2773: x_return_status := l_return_status;

Line 2783: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2779: 'No Batch rules created');
2780: END IF;
2781:
2782: When Others Then
2783: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2784: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2785: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2786: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.CARETE_BATCH_RULES.UNEXPECTED',
2787: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);

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

2780: END IF;
2781:
2782: When Others Then
2783: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2784: OKC_API.set_message(G_APP_NAME,G_UNEXPECTED_ERROR, G_SQLCODE_TOKEN, SQLCODE,G_SQLERRM_TOKEN, SQLERRM);
2785: IF FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2786: fnd_log.string(FND_LOG.LEVEL_UNEXPECTED,G_MODULE_CURRENT||'.CARETE_BATCH_RULES.UNEXPECTED',
2787: 'sqlcode = '||sqlcode||', sqlerrm = '||sqlerrm);
2788: END IF;

Line 2809: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

2805: RETURN l_subscr_instance;
2806: END CHECK_SUBSCR_INSTANCE;
2807:
2808: PROCEDURE POPULATE_CHILD_INSTANCES (p_api_version IN Number,
2809: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
2810: p_instance_id IN NUMBER,
2811: p_transaction_type IN VARCHAR2,
2812: x_msg_Count OUT NOCOPY Number,
2813: x_msg_Data OUT NOCOPY Varchar2,

Line 2829: ,p_commit => okc_api.g_false

2825:
2826: CSI_UTILITY_GRP.Get_impacted_item_instances
2827: (
2828: p_api_version => p_api_version
2829: ,p_commit => okc_api.g_false
2830: ,p_init_msg_list => p_init_msg_list
2831: ,p_validation_level => fnd_api.g_valid_level_full
2832: ,x_txn_inst_tbl => l_txn_inst_tbl
2833: ,p_txn_oks_rec => l_txn_rec

Line 2859: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,

2855: END POPULATE_CHILD_INSTANCES;
2856:
2857:
2858: PROCEDURE GET_CONTRACTS(p_api_version IN Number,
2859: p_init_msg_list IN Varchar2 Default OKC_API.G_FALSE,
2860: p_instance_id IN NUMBER,
2861: p_validate_yn IN VARCHAR2 ,
2862: x_msg_Count OUT NOCOPY Number,
2863: x_msg_Data OUT NOCOPY Varchar2,

Line 3117: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,

3113:
3114:
3115: PROCEDURE CHECK_CONTRACTS_IMPACTED(
3116: P_Api_Version IN NUMBER,
3117: P_init_msg_list IN VARCHAR2 Default OKC_API.G_FALSE,
3118: P_instance_id IN NUMBER,
3119: p_parent_instance_yn IN VARCHAR2,
3120: p_transaction_date IN DATE,
3121: p_new_install_date IN DATE,