[Home] [Help]
170: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
171:
172: -- If debug_level = 1 then dump the procedure name
173: IF (l_debug_level > 0) THEN
174: csi_gen_utility_pvt.put_line( 'create_item_instance');
175: END IF;
176:
177: -- If the debug level = 2 then dump all the parameters values.
178: IF (l_debug_level > 1) THEN
176:
177: -- If the debug level = 2 then dump all the parameters values.
178: IF (l_debug_level > 1) THEN
179:
180: csi_gen_utility_pvt.put_line( 'create_item_instance' ||
181: p_api_version ||'-'||
182: p_commit ||'-'||
183: p_init_msg_list ||'-'||
184: p_validation_level );
181: p_api_version ||'-'||
182: p_commit ||'-'||
183: p_init_msg_list ||'-'||
184: p_validation_level );
185: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
182: p_commit ||'-'||
183: p_init_msg_list ||'-'||
184: p_validation_level );
185: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
183: p_init_msg_list ||'-'||
184: p_validation_level );
185: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
184: p_validation_level );
185: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
192: END IF;
185: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
192: END IF;
193: /***** srramakr commented for bug # 3304439
186: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
192: END IF;
193: /***** srramakr commented for bug # 3304439
194: -- Check for the profile option and enable trace
187: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
188: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
189: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
190: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
192: END IF;
193: /***** srramakr commented for bug # 3304439
194: -- Check for the profile option and enable trace
195: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
191: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
192: END IF;
193: /***** srramakr commented for bug # 3304439
194: -- Check for the profile option and enable trace
195: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
196: -- End enable trace
197: ****/
198: -- Start API body
199: --
200: -- Calling Pre Customer User Hook
201: BEGIN
202:
203: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
204: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre ..');
205: CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre
206: (
207: p_api_version => 1.0
208: ,p_commit => fnd_api.g_false
227: WHILE l_msg_count > 0 LOOP
228: x_msg_data := FND_MSG_PUB.GET
229: ( l_msg_index,
230: FND_API.G_FALSE );
231: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre API ');
232: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
233: l_msg_index := l_msg_index + 1;
234: l_msg_count := l_msg_count - 1;
235: END LOOP;
228: x_msg_data := FND_MSG_PUB.GET
229: ( l_msg_index,
230: FND_API.G_FALSE );
231: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre API ');
232: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
233: l_msg_index := l_msg_index + 1;
234: l_msg_count := l_msg_count - 1;
235: END LOOP;
236: RAISE FND_API.G_EXC_ERROR;
238: --
239: END IF;
240: EXCEPTION
241: WHEN OTHERS THEN
242: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Pre Customer');
243: RAISE FND_API.G_EXC_ERROR;
244: END;
245: --
246: -- Calling Pre Vertical User Hook
246: -- Calling Pre Vertical User Hook
247: BEGIN
248:
249: IF JTF_USR_HKS.Ok_to_execute( G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
250: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre ..');
251: CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre
252: (
253: p_api_version => 1.0
254: ,p_commit => fnd_api.g_false
273: WHILE l_msg_count > 0 LOOP
274: x_msg_data := FND_MSG_PUB.GET
275: ( l_msg_index,
276: FND_API.G_FALSE );
277: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre API ');
278: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
279: l_msg_index := l_msg_index + 1;
280: l_msg_count := l_msg_count - 1;
281: END LOOP;
274: x_msg_data := FND_MSG_PUB.GET
275: ( l_msg_index,
276: FND_API.G_FALSE );
277: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre API ');
278: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
279: l_msg_index := l_msg_index + 1;
280: l_msg_count := l_msg_count - 1;
281: END LOOP;
282: RAISE FND_API.G_EXC_ERROR;
285: END IF;
286:
287: EXCEPTION
288: WHEN OTHERS THEN
289: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Pre Vertical');
290: RAISE FND_API.G_EXC_ERROR;
291: END;
292:
293: -- End of PRE User Hooks
333: WHILE l_msg_count > 0 LOOP
334: x_msg_data := FND_MSG_PUB.GET
335: ( l_msg_index,
336: FND_API.G_FALSE );
337: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.. ');
338: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
339: l_msg_index := l_msg_index + 1;
340: l_msg_count := l_msg_count - 1;
341: END LOOP;
334: x_msg_data := FND_MSG_PUB.GET
335: ( l_msg_index,
336: FND_API.G_FALSE );
337: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.. ');
338: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
339: l_msg_index := l_msg_index + 1;
340: l_msg_count := l_msg_count - 1;
341: END LOOP;
342: RAISE FND_API.G_EXC_ERROR;
345: -- Calling Post Customer User Hook
346: BEGIN
347:
348: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
349: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post ..');
350: CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post
351: (
352: p_api_version => 1.0
353: ,p_commit => fnd_api.g_false
372: WHILE l_msg_count > 0 LOOP
373: x_msg_data := FND_MSG_PUB.GET
374: ( l_msg_index,
375: FND_API.G_FALSE );
376: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
377: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
378: l_msg_index := l_msg_index + 1;
379: l_msg_count := l_msg_count - 1;
380: END LOOP;
373: x_msg_data := FND_MSG_PUB.GET
374: ( l_msg_index,
375: FND_API.G_FALSE );
376: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
377: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
378: l_msg_index := l_msg_index + 1;
379: l_msg_count := l_msg_count - 1;
380: END LOOP;
381: RAISE FND_API.G_EXC_ERROR;
383: --
384: END IF;
385: EXCEPTION
386: WHEN OTHERS THEN
387: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Post Customer');
388: RAISE FND_API.G_EXC_ERROR;
389: END;
390:
391:
491: WHILE l_msg_count > 0 LOOP
492: x_msg_data := FND_MSG_PUB.GET
493: ( l_msg_index,
494: FND_API.G_FALSE );
495: csi_gen_utility_pvt.put_line( ' Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
496: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
497: l_msg_index := l_msg_index + 1;
498: l_msg_count := l_msg_count - 1;
499: END LOOP;
492: x_msg_data := FND_MSG_PUB.GET
493: ( l_msg_index,
494: FND_API.G_FALSE );
495: csi_gen_utility_pvt.put_line( ' Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
496: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
497: l_msg_index := l_msg_index + 1;
498: l_msg_count := l_msg_count - 1;
499: END LOOP;
500: RAISE FND_API.G_EXC_ERROR;
531: WHILE l_msg_count > 0 LOOP
532: x_msg_data := FND_MSG_PUB.GET
533: ( l_msg_index,
534: FND_API.G_FALSE );
535: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
536: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
537: l_msg_index := l_msg_index + 1;
538: l_msg_count := l_msg_count - 1;
539: END LOOP;
532: x_msg_data := FND_MSG_PUB.GET
533: ( l_msg_index,
534: FND_API.G_FALSE );
535: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
536: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
537: l_msg_index := l_msg_index + 1;
538: l_msg_count := l_msg_count - 1;
539: END LOOP;
540: RAISE FND_API.G_EXC_ERROR;
573: x_msg_data := FND_MSG_PUB.GET
574: ( l_msg_index,
575: FND_API.G_FALSE );
576:
577: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
578: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
579: l_msg_index := l_msg_index + 1;
580: l_msg_count := l_msg_count - 1;
581: END LOOP;
574: ( l_msg_index,
575: FND_API.G_FALSE );
576:
577: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
578: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
579: l_msg_index := l_msg_index + 1;
580: l_msg_count := l_msg_count - 1;
581: END LOOP;
582: RAISE FND_API.G_EXC_ERROR;
614: x_msg_data := FND_MSG_PUB.GET
615: ( l_msg_index,
616: FND_API.G_FALSE );
617:
618: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
619: l_msg_index := l_msg_index + 1;
620: l_msg_count := l_msg_count - 1;
621: END LOOP;
622: RAISE FND_API.G_EXC_ERROR;
653: WHILE l_msg_count > 0 LOOP
654: x_msg_data := FND_MSG_PUB.GET
655: ( l_msg_index,
656: FND_API.G_FALSE );
657: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
658: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
659: l_msg_index := l_msg_index + 1;
660: l_msg_count := l_msg_count - 1;
661: END LOOP;
654: x_msg_data := FND_MSG_PUB.GET
655: ( l_msg_index,
656: FND_API.G_FALSE );
657: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
658: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
659: l_msg_index := l_msg_index + 1;
660: l_msg_count := l_msg_count - 1;
661: END LOOP;
662: RAISE FND_API.G_EXC_ERROR;
702: ,x_msg_data => x_msg_data
703: );
704:
705: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
706: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.CREATE_VERSION_LABEL..');
707: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
708: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
709: FND_MESSAGE.SET_TOKEN('API_ERROR', 'CREATE_VERSION_LABEL');
710: FND_MSG_PUB.Add;
703: );
704:
705: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
706: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.CREATE_VERSION_LABEL..');
707: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
708: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
709: FND_MESSAGE.SET_TOKEN('API_ERROR', 'CREATE_VERSION_LABEL');
710: FND_MSG_PUB.Add;
711: RAISE FND_API.G_EXC_ERROR;
720: -- Calling Contracts
721: -- Added on 02-OCT-01
722: -- Added by sk for fixing bug 2245976
723: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
724: csi_gen_utility_pvt.populate_install_param_rec;
725: END IF;
726: --
727: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
728: --
745: l_transaction_type:= 'NEW';
746:
747: -- Added for DEBUG purposes for bug 9028424
748: IF p_instance_rec.call_contracts = fnd_api.g_false THEN
749: csi_gen_utility_pvt.put_line('call_contracts(1): '||p_instance_rec.call_contracts);
750: ELSIF p_instance_rec.call_contracts = 'N' THEN
751: csi_gen_utility_pvt.put_line('call_contracts(2): '||p_instance_rec.call_contracts);
752: ELSE
753: csi_gen_utility_pvt.put_line('call_contracts(3): '||p_instance_rec.call_contracts);
747: -- Added for DEBUG purposes for bug 9028424
748: IF p_instance_rec.call_contracts = fnd_api.g_false THEN
749: csi_gen_utility_pvt.put_line('call_contracts(1): '||p_instance_rec.call_contracts);
750: ELSIF p_instance_rec.call_contracts = 'N' THEN
751: csi_gen_utility_pvt.put_line('call_contracts(2): '||p_instance_rec.call_contracts);
752: ELSE
753: csi_gen_utility_pvt.put_line('call_contracts(3): '||p_instance_rec.call_contracts);
754: END IF;
755: -- End DEBUG section
749: csi_gen_utility_pvt.put_line('call_contracts(1): '||p_instance_rec.call_contracts);
750: ELSIF p_instance_rec.call_contracts = 'N' THEN
751: csi_gen_utility_pvt.put_line('call_contracts(2): '||p_instance_rec.call_contracts);
752: ELSE
753: csi_gen_utility_pvt.put_line('call_contracts(3): '||p_instance_rec.call_contracts);
754: END IF;
755: -- End DEBUG section
756:
757: IF (p_instance_rec.call_contracts <> fnd_api.g_false AND p_instance_rec.call_contracts <> 'N') --added by radha on 04/04/02 --added by HYONLEE on 10/30/09
780: x_msg_data := FND_MSG_PUB.GET
781: ( l_msg_index,
782: FND_API.G_FALSE
783: );
784: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
785: l_msg_index := l_msg_index + 1;
786: l_msg_count := l_msg_count - 1;
787: END LOOP;
788: RAISE FND_API.G_EXC_ERROR;
842:
843: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
844: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
845: FND_MSG_PUB.Add;
846: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
847: RAISE FND_API.G_EXC_ERROR;
848: END IF;
849: END IF;
850: ELSIF ( (p_instance_rec.config_inst_hdr_id IS NULL OR p_instance_rec.config_inst_hdr_id = fnd_api.g_miss_num)
912: WHILE l_msg_count > 0 LOOP
913: x_msg_data := FND_MSG_PUB.GET
914: ( l_msg_index,
915: FND_API.G_FALSE );
916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
917: csi_gen_utility_pvt.put_line( 'while updating config status');
918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
919: l_msg_index := l_msg_index + 1;
920: l_msg_count := l_msg_count - 1;
913: x_msg_data := FND_MSG_PUB.GET
914: ( l_msg_index,
915: FND_API.G_FALSE );
916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
917: csi_gen_utility_pvt.put_line( 'while updating config status');
918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
919: l_msg_index := l_msg_index + 1;
920: l_msg_count := l_msg_count - 1;
921: END LOOP;
914: ( l_msg_index,
915: FND_API.G_FALSE );
916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
917: csi_gen_utility_pvt.put_line( 'while updating config status');
918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
919: l_msg_index := l_msg_index + 1;
920: l_msg_count := l_msg_count - 1;
921: END LOOP;
922: RAISE FND_API.G_EXC_ERROR;
964: WHILE l_msg_count > 0 LOOP
965: x_msg_data := FND_MSG_PUB.GET
966: ( l_msg_index,
967: FND_API.G_FALSE );
968: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
969: csi_gen_utility_pvt.put_line( 'while updating config status');
970: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
971: l_msg_index := l_msg_index + 1;
972: l_msg_count := l_msg_count - 1;
965: x_msg_data := FND_MSG_PUB.GET
966: ( l_msg_index,
967: FND_API.G_FALSE );
968: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
969: csi_gen_utility_pvt.put_line( 'while updating config status');
970: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
971: l_msg_index := l_msg_index + 1;
972: l_msg_count := l_msg_count - 1;
973: END LOOP;
966: ( l_msg_index,
967: FND_API.G_FALSE );
968: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
969: csi_gen_utility_pvt.put_line( 'while updating config status');
970: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
971: l_msg_index := l_msg_index + 1;
972: l_msg_count := l_msg_count - 1;
973: END LOOP;
974: RAISE FND_API.G_EXC_ERROR;
979: END LOOP;
980: END IF;
981: --
982: IF px_oks_txn_inst_tbl.count > 0 THEN
983: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
984: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
985: --
986: IF p_txn_rec.transaction_type_id = 3 THEN
987: l_batch_id := p_txn_rec.source_header_ref_id;
980: END IF;
981: --
982: IF px_oks_txn_inst_tbl.count > 0 THEN
983: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
984: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
985: --
986: IF p_txn_rec.transaction_type_id = 3 THEN
987: l_batch_id := p_txn_rec.source_header_ref_id;
988: l_batch_type := p_txn_rec.source_group_ref;
1014: WHILE l_msg_count > 0 LOOP
1015: x_msg_data := FND_MSG_PUB.GET
1016: ( l_msg_index,
1017: FND_API.G_FALSE );
1018: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
1019: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1020: l_msg_index := l_msg_index + 1;
1021: l_msg_count := l_msg_count - 1;
1022: END LOOP;
1015: x_msg_data := FND_MSG_PUB.GET
1016: ( l_msg_index,
1017: FND_API.G_FALSE );
1018: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
1019: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1020: l_msg_index := l_msg_index + 1;
1021: l_msg_count := l_msg_count - 1;
1022: END LOOP;
1023: RAISE FND_API.G_EXC_ERROR;
1028: -- End of API body
1029:
1030: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1031: IF l_raise_bes_event = 'Y' THEN
1032: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1033: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1034: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1035: IF l_internal_party_id <> l_party_id THEN
1036: --Added for bug 7156553, base bug 6996605, when completing a sales order for a serial controlled item instance
1029:
1030: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1031: IF l_raise_bes_event = 'Y' THEN
1032: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1033: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1034: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1035: IF l_internal_party_id <> l_party_id THEN
1036: --Added for bug 7156553, base bug 6996605, when completing a sales order for a serial controlled item instance
1037: --which has been previously shipped out through a sales order then returned through a RMA,
1030: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1031: IF l_raise_bes_event = 'Y' THEN
1032: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1033: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1034: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1035: IF l_internal_party_id <> l_party_id THEN
1036: --Added for bug 7156553, base bug 6996605, when completing a sales order for a serial controlled item instance
1037: --which has been previously shipped out through a sales order then returned through a RMA,
1038: --the event to raise should be the update event, since a create event has already been raised
1049: WHEN OTHERS THEN
1050: l_create_event_called := 'N';
1051: END;
1052: IF (l_debug_level > 1) THEN
1053: csi_gen_utility_pvt.put_line('l_create_event_called : '||l_create_event_called);
1054: END IF;
1055: IF l_create_event_called = 'N' THEN
1056: csi_gen_utility_pvt.put_line('Firing the Create Instance Evnet');
1057: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
1052: IF (l_debug_level > 1) THEN
1053: csi_gen_utility_pvt.put_line('l_create_event_called : '||l_create_event_called);
1054: END IF;
1055: IF l_create_event_called = 'N' THEN
1056: csi_gen_utility_pvt.put_line('Firing the Create Instance Evnet');
1057: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
1058: (p_api_version => p_api_version
1059: ,p_commit => fnd_api.g_false
1060: ,p_init_msg_list => p_init_msg_list
1071: l_msg_count := x_msg_count;
1072:
1073: WHILE l_msg_count > 0 LOOP
1074: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
1075: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1076: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1077: l_msg_index := l_msg_index + 1;
1078: l_msg_count := l_msg_count - 1;
1079: END LOOP;
1072:
1073: WHILE l_msg_count > 0 LOOP
1074: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
1075: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1076: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1077: l_msg_index := l_msg_index + 1;
1078: l_msg_count := l_msg_count - 1;
1079: END LOOP;
1080: RAISE FND_API.G_EXC_ERROR;
1079: END LOOP;
1080: RAISE FND_API.G_EXC_ERROR;
1081: END IF;
1082: ELSE
1083: csi_gen_utility_pvt.put_line('Firing the Update Instance Event');
1084: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
1085: ( p_api_version => p_api_version
1086: ,p_commit => fnd_api.g_false
1087: ,p_init_msg_list => p_init_msg_list
1098: l_msg_count := x_msg_count;
1099:
1100: WHILE l_msg_count > 0 LOOP
1101: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
1102: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
1103: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1104: l_msg_index := l_msg_index + 1;
1105: l_msg_count := l_msg_count - 1;
1106: END LOOP;
1099:
1100: WHILE l_msg_count > 0 LOOP
1101: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
1102: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
1103: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1104: l_msg_index := l_msg_index + 1;
1105: l_msg_count := l_msg_count - 1;
1106: END LOOP;
1107: RAISE FND_API.G_EXC_ERROR;
1134: -- Calling Post Vertical User Hook
1135: BEGIN
1136:
1137: IF JTF_USR_HKS.Ok_to_execute( G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
1138: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post ..');
1139: CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post
1140: (
1141: p_api_version => 1.0
1142: ,p_commit => fnd_api.g_false
1161: WHILE l_msg_count > 0 LOOP
1162: x_msg_data := FND_MSG_PUB.GET
1163: ( l_msg_index,
1164: FND_API.G_FALSE );
1165: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
1166: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1167: l_msg_index := l_msg_index + 1;
1168: l_msg_count := l_msg_count - 1;
1169: END LOOP;
1162: x_msg_data := FND_MSG_PUB.GET
1163: ( l_msg_index,
1164: FND_API.G_FALSE );
1165: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
1166: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1167: l_msg_index := l_msg_index + 1;
1168: l_msg_count := l_msg_count - 1;
1169: END LOOP;
1170: RAISE FND_API.G_EXC_ERROR;
1172: --
1173: END IF;
1174: EXCEPTION
1175: WHEN OTHERS THEN
1176: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Post Vertical');
1177: RAISE FND_API.G_EXC_ERROR;
1178: END;
1179: -- End of POST User Hooks
1180:
1466: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
1467:
1468: -- If debug_level = 1 then dump the procedure name
1469: IF (l_debug_level > 0) THEN
1470: csi_gen_utility_pvt.put_line( 'update_item_instance');
1471: END IF;
1472:
1473: -- If the debug level = 2 then dump all the parameters values.
1474: IF (l_debug_level > 1) THEN
1471: END IF;
1472:
1473: -- If the debug level = 2 then dump all the parameters values.
1474: IF (l_debug_level > 1) THEN
1475: csi_gen_utility_pvt.put_line( 'update_item_instance' ||
1476: p_api_version ||'-'||
1477: p_commit ||'-'||
1478: p_init_msg_list ||'-'||
1479: p_validation_level );
1476: p_api_version ||'-'||
1477: p_commit ||'-'||
1478: p_init_msg_list ||'-'||
1479: p_validation_level );
1480: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1477: p_commit ||'-'||
1478: p_init_msg_list ||'-'||
1479: p_validation_level );
1480: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1478: p_init_msg_list ||'-'||
1479: p_validation_level );
1480: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1486: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1479: p_validation_level );
1480: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1486: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1487: END IF;
1480: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1486: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1487: END IF;
1488:
1481: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1486: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1487: END IF;
1488:
1489: /***** srramakr commented for bug # 3304439
1482: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1483: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1484: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1485: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1486: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1487: END IF;
1488:
1489: /***** srramakr commented for bug # 3304439
1490: -- Check for the profile option and enable trace
1487: END IF;
1488:
1489: /***** srramakr commented for bug # 3304439
1490: -- Check for the profile option and enable trace
1491: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
1492: -- End enable trace
1493: ****/
1494: -- Start API body
1495: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1492: -- End enable trace
1493: ****/
1494: -- Start API body
1495: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1496: csi_gen_utility_pvt.populate_install_param_rec;
1497: END IF;
1498: --
1499: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
1500: --
1504: RAISE FND_API.G_EXC_ERROR;
1505: END IF;
1506:
1507: -- Begin Add Code for Siebel Genesis Project
1508: csi_gen_utility_pvt.put_line('Inside CSI_ITEM_INSTANCE_PUB.Update_Item_Instance');
1509: csi_gen_utility_pvt.put_line('p_instance_rec = '||to_char(p_instance_rec.instance_id));
1510: -- End Add Code for Siebel Genesis Project
1511:
1512: --Added for bug 7156553, base bug 6990065, when creating a new customer instance, sometime the procedure
1505: END IF;
1506:
1507: -- Begin Add Code for Siebel Genesis Project
1508: csi_gen_utility_pvt.put_line('Inside CSI_ITEM_INSTANCE_PUB.Update_Item_Instance');
1509: csi_gen_utility_pvt.put_line('p_instance_rec = '||to_char(p_instance_rec.instance_id));
1510: -- End Add Code for Siebel Genesis Project
1511:
1512: --Added for bug 7156553, base bug 6990065, when creating a new customer instance, sometime the procedure
1513: --create_instance is called to create the instance in inventory first, then
1516: --will get invoked for the instance.
1517: BEGIN
1518: --Modified for Bug 14346149, forword ported the changes from 11i bug 9436131
1519: IF p_party_tbl.count > 0 THEN
1520: csi_gen_utility_pvt.put_line('p_party_tbl.count = '||p_party_tbl.count);
1521: FOR l_party_rec IN p_party_tbl.FIRST .. p_party_tbl.LAST LOOP
1522: IF p_party_tbl.EXISTS(l_party_rec) THEN
1523: csi_gen_utility_pvt.put_line('p_party_tbl(l_party_rec).instance_party_id = '||p_party_tbl(l_party_rec).instance_party_id);
1524: SELECT instance_id
1519: IF p_party_tbl.count > 0 THEN
1520: csi_gen_utility_pvt.put_line('p_party_tbl.count = '||p_party_tbl.count);
1521: FOR l_party_rec IN p_party_tbl.FIRST .. p_party_tbl.LAST LOOP
1522: IF p_party_tbl.EXISTS(l_party_rec) THEN
1523: csi_gen_utility_pvt.put_line('p_party_tbl(l_party_rec).instance_party_id = '||p_party_tbl(l_party_rec).instance_party_id);
1524: SELECT instance_id
1525: INTO l_inst_id
1526: FROM csi_i_parties
1527: WHERE instance_party_id = p_party_tbl(l_party_rec).instance_party_id
1528: AND ROWNUM = 1;
1529: END IF;
1530: END LOOP;
1531: END IF;
1532: csi_gen_utility_pvt.put_line('l_inst_id = '||l_inst_id);
1533: IF l_inst_id is not null THEN
1534: csi_gen_utility_pvt.put_line('l_inst_id is not null');
1535: SELECT 'Y'
1536: INTO l_create_event_called
1530: END LOOP;
1531: END IF;
1532: csi_gen_utility_pvt.put_line('l_inst_id = '||l_inst_id);
1533: IF l_inst_id is not null THEN
1534: csi_gen_utility_pvt.put_line('l_inst_id is not null');
1535: SELECT 'Y'
1536: INTO l_create_event_called
1537: FROM csi_item_instances_h
1538: WHERE instance_id = l_inst_id
1545: WHERE instance_id = p_instance_rec.instance_id
1546: AND new_accounting_class_code = 'CUST_PROD'
1547: AND ROWNUM = 1;
1548: END IF;
1549: csi_gen_utility_pvt.put_line('l_create_event_called = '||l_create_event_called);
1550: EXCEPTION
1551: WHEN OTHERS THEN
1552: l_create_event_called := 'N';
1553: END;
1551: WHEN OTHERS THEN
1552: l_create_event_called := 'N';
1553: END;
1554: IF (l_debug_level > 1) THEN
1555: csi_gen_utility_pvt.put_line('l_create_event_called : '||l_create_event_called);
1556: END IF;
1557:
1558: --Added for MACD lock functionality
1559: IF NOT (csi_Item_Instance_Pvt.Anything_To_Update(p_instance_rec => p_instance_rec ))
1582: -- End addition for MACD lock functionality
1583: -- Call Pre Customer User Hook
1584: BEGIN
1585: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
1586: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre ..');
1587: CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre
1588: (
1589: p_api_version => 1.0
1590: ,p_commit => fnd_api.g_false
1610: WHILE l_msg_count > 0 LOOP
1611: x_msg_data := FND_MSG_PUB.GET
1612: ( l_msg_index,
1613: FND_API.G_FALSE );
1614: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre API ');
1615: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1616: l_msg_index := l_msg_index + 1;
1617: l_msg_count := l_msg_count - 1;
1618: END LOOP;
1611: x_msg_data := FND_MSG_PUB.GET
1612: ( l_msg_index,
1613: FND_API.G_FALSE );
1614: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre API ');
1615: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1616: l_msg_index := l_msg_index + 1;
1617: l_msg_count := l_msg_count - 1;
1618: END LOOP;
1619: RAISE FND_API.G_EXC_ERROR;
1622: END IF;
1623:
1624: EXCEPTION
1625: WHEN OTHERS THEN
1626: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Pre Customer');
1627: RAISE FND_API.G_EXC_ERROR;
1628: END;
1629: --
1630: -- Call Pre Vertical user Hook
1629: --
1630: -- Call Pre Vertical user Hook
1631: BEGIN
1632: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
1633: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre ..');
1634: CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre
1635: (
1636: p_api_version => 1.0
1637: ,p_commit => fnd_api.g_false
1657: WHILE l_msg_count > 0 LOOP
1658: x_msg_data := FND_MSG_PUB.GET
1659: ( l_msg_index,
1660: FND_API.G_FALSE );
1661: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre API ');
1662: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1663: l_msg_index := l_msg_index + 1;
1664: l_msg_count := l_msg_count - 1;
1665: END LOOP;
1658: x_msg_data := FND_MSG_PUB.GET
1659: ( l_msg_index,
1660: FND_API.G_FALSE );
1661: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre API ');
1662: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1663: l_msg_index := l_msg_index + 1;
1664: l_msg_count := l_msg_count - 1;
1665: END LOOP;
1666: RAISE FND_API.G_EXC_ERROR;
1667: END IF;
1668: END IF;
1669: EXCEPTION
1670: WHEN OTHERS THEN
1671: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Pre Vertical');
1672: RAISE FND_API.G_EXC_ERROR;
1673: END;
1674: -- End of PRE User Hooks
1675: --
1709: -- bug 2972082
1710: IF p_instance_rec.cascade_ownership_flag IS NOT NULL AND
1711: p_instance_rec.cascade_ownership_flag='Y'
1712: THEN
1713: csi_gen_utility_pvt.put_line('Cascade_ownership_flag :'||p_instance_rec.cascade_ownership_flag);
1714: IF p_party_tbl.count > 0
1715: THEN
1716: FOR l_party_rec IN p_party_tbl.FIRST .. p_party_tbl.LAST
1717: LOOP
1750: THEN
1751: IF l_src_change_owner = 'N' THEN
1752: NULL;
1753: ELSE
1754: csi_gen_utility_pvt.put_line('Owner party or account information is not passed for the instance');
1755: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1756: RAISE FND_API.G_EXC_ERROR;
1757: END IF;
1758: END IF;
1751: IF l_src_change_owner = 'N' THEN
1752: NULL;
1753: ELSE
1754: csi_gen_utility_pvt.put_line('Owner party or account information is not passed for the instance');
1755: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1756: RAISE FND_API.G_EXC_ERROR;
1757: END IF;
1758: END IF;
1759: ELSE
1786:
1787: EXCEPTION
1788: WHEN OTHERS
1789: THEN
1790: csi_gen_utility_pvt.put_line('Owner party information not found for the instance');
1791: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1792: RAISE FND_API.G_EXC_ERROR;
1793: END;
1794:
1787: EXCEPTION
1788: WHEN OTHERS
1789: THEN
1790: csi_gen_utility_pvt.put_line('Owner party information not found for the instance');
1791: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1792: RAISE FND_API.G_EXC_ERROR;
1793: END;
1794:
1795:
1820: p_account_tbl:=l_cascade_account_tbl;
1821: END IF;
1822: EXCEPTION
1823: WHEN OTHERS THEN
1824: csi_gen_utility_pvt.put_line('Owner account information not found for the instance');
1825: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership');
1826: RAISE FND_API.G_EXC_ERROR;
1827: END;
1828: END IF; -- End of building account record.
1821: END IF;
1822: EXCEPTION
1823: WHEN OTHERS THEN
1824: csi_gen_utility_pvt.put_line('Owner account information not found for the instance');
1825: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership');
1826: RAISE FND_API.G_EXC_ERROR;
1827: END;
1828: END IF; -- End of building account record.
1829: END IF; -- End of party building party record.
1901: IF p_account_tbl.EXISTS(acct_rec) THEN
1902: IF p_account_tbl(acct_rec).parent_tbl_index = l_party_slot AND
1903: p_account_tbl(acct_rec).relationship_type_code = 'OWNER' THEN
1904: l_new_instance_rec.call_contracts := FND_API.G_FALSE; -- since p_instance_rec is IN parameter
1905: csi_gen_utility_pvt.put_line('Instance Rec Call contracts set to FALSE');
1906: exit;
1907: END IF;
1908: END IF;
1909: END LOOP;
1924: p_party_tbl(party_rec).party_id = l_internal_party_id THEN
1925: l_new_instance_rec.call_contracts := FND_API.G_FALSE; -- since p_instance_rec is IN parameter
1926: -- Added
1927: l_new_instance_rec.owner_party_id:=p_party_tbl(party_rec).party_id;
1928: csi_gen_utility_pvt.put_line('Instance Rec Call contracts set to FALSE');
1929: exit;
1930: END IF;
1931: END IF;
1932: END LOOP;
1991: WHILE l_msg_count > 0 LOOP
1992: x_msg_data := FND_MSG_PUB.GET
1993: ( l_msg_index,
1994: FND_API.G_FALSE );
1995: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
1996: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1997: l_msg_index := l_msg_index + 1;
1998: l_msg_count := l_msg_count - 1;
1999: END LOOP;
1992: x_msg_data := FND_MSG_PUB.GET
1993: ( l_msg_index,
1994: FND_API.G_FALSE );
1995: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
1996: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1997: l_msg_index := l_msg_index + 1;
1998: l_msg_count := l_msg_count - 1;
1999: END LOOP;
2000: RAISE FND_API.G_EXC_ERROR;
2032: x_msg_data := FND_MSG_PUB.GET
2033: ( l_msg_index,
2034: FND_API.G_FALSE
2035: );
2036: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2037: l_msg_index := l_msg_index + 1;
2038: l_msg_count := l_msg_count - 1;
2039: END LOOP;
2040: RAISE FND_API.G_EXC_ERROR;
2076: x_msg_data := FND_MSG_PUB.GET
2077: ( l_msg_index,
2078: FND_API.G_FALSE
2079: );
2080: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2081: l_msg_index := l_msg_index + 1;
2082: l_msg_count := l_msg_count - 1;
2083: END LOOP;
2084: FND_MSG_PUB.Count_And_Get
2093: x_msg_data := FND_MSG_PUB.GET
2094: ( l_msg_index,
2095: FND_API.G_FALSE
2096: );
2097: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2098: l_msg_index := l_msg_index + 1;
2099: l_msg_count := l_msg_count - 1;
2100: END LOOP;
2101: RAISE FND_API.G_EXC_ERROR;
2108: -- Call Post Customer User Hook
2109: BEGIN
2110:
2111: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
2112: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post ..');
2113: CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post
2114: (
2115: p_api_version => 1.0
2116: ,p_commit => fnd_api.g_false
2136: WHILE l_msg_count > 0 LOOP
2137: x_msg_data := FND_MSG_PUB.GET
2138: ( l_msg_index,
2139: FND_API.G_FALSE );
2140: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post API ');
2141: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2142: l_msg_index := l_msg_index + 1;
2143: l_msg_count := l_msg_count - 1;
2144: END LOOP;
2137: x_msg_data := FND_MSG_PUB.GET
2138: ( l_msg_index,
2139: FND_API.G_FALSE );
2140: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post API ');
2141: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2142: l_msg_index := l_msg_index + 1;
2143: l_msg_count := l_msg_count - 1;
2144: END LOOP;
2145: RAISE FND_API.G_EXC_ERROR;
2147: END IF;
2148:
2149: EXCEPTION
2150: WHEN OTHERS THEN
2151: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Post Customer');
2152: RAISE FND_API.G_EXC_ERROR;
2153: END;
2154: --
2155: x_return_status := l_tmp_return_status;
2346: LOOP
2347: x_msg_data := FND_MSG_PUB.GET
2348: ( l_msg_index,
2349: FND_API.G_FALSE );
2350: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2351: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2352: l_msg_index := l_msg_index + 1;
2353: l_msg_count := l_msg_count - 1;
2354: END LOOP;
2347: x_msg_data := FND_MSG_PUB.GET
2348: ( l_msg_index,
2349: FND_API.G_FALSE );
2350: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2351: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2352: l_msg_index := l_msg_index + 1;
2353: l_msg_count := l_msg_count - 1;
2354: END LOOP;
2355: RAISE FND_API.G_EXC_ERROR;
2418: WHILE l_msg_count > 0 LOOP
2419: x_msg_data := FND_MSG_PUB.GET
2420: ( l_msg_index,
2421: FND_API.G_FALSE );
2422: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2423: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2424: l_msg_index := l_msg_index + 1;
2425: l_msg_count := l_msg_count - 1;
2426: END LOOP;
2419: x_msg_data := FND_MSG_PUB.GET
2420: ( l_msg_index,
2421: FND_API.G_FALSE );
2422: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2423: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2424: l_msg_index := l_msg_index + 1;
2425: l_msg_count := l_msg_count - 1;
2426: END LOOP;
2427: RAISE FND_API.G_EXC_ERROR;
2451: WHILE l_msg_count > 0 LOOP
2452: x_msg_data := FND_MSG_PUB.GET
2453: ( l_msg_index,
2454: FND_API.G_FALSE );
2455: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2456: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2457: l_msg_index := l_msg_index + 1;
2458: l_msg_count := l_msg_count - 1;
2459: END LOOP;
2452: x_msg_data := FND_MSG_PUB.GET
2453: ( l_msg_index,
2454: FND_API.G_FALSE );
2455: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2456: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2457: l_msg_index := l_msg_index + 1;
2458: l_msg_count := l_msg_count - 1;
2459: END LOOP;
2460: RAISE FND_API.G_EXC_ERROR;
2537: WHILE l_msg_count > 0 LOOP
2538: x_msg_data := FND_MSG_PUB.GET
2539: ( l_msg_index,
2540: FND_API.G_FALSE );
2541: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
2542: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2543: l_msg_index := l_msg_index + 1;
2544: l_msg_count := l_msg_count - 1;
2545: END LOOP;
2538: x_msg_data := FND_MSG_PUB.GET
2539: ( l_msg_index,
2540: FND_API.G_FALSE );
2541: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
2542: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2543: l_msg_index := l_msg_index + 1;
2544: l_msg_count := l_msg_count - 1;
2545: END LOOP;
2546: RAISE FND_API.G_EXC_ERROR;
2591: WHILE l_msg_count > 0 LOOP
2592: x_msg_data := FND_MSG_PUB.GET
2593: ( l_msg_index,
2594: FND_API.G_FALSE );
2595: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
2596: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2597: l_msg_index := l_msg_index + 1;
2598: l_msg_count := l_msg_count - 1;
2599: END LOOP;
2592: x_msg_data := FND_MSG_PUB.GET
2593: ( l_msg_index,
2594: FND_API.G_FALSE );
2595: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
2596: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2597: l_msg_index := l_msg_index + 1;
2598: l_msg_count := l_msg_count - 1;
2599: END LOOP;
2600: RAISE FND_API.G_EXC_ERROR;
2653: WHILE l_msg_count > 0 LOOP
2654: x_msg_data := FND_MSG_PUB.GET
2655: ( l_msg_index,
2656: FND_API.G_FALSE );
2657: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2658: l_msg_index := l_msg_index + 1;
2659: l_msg_count := l_msg_count - 1;
2660: END LOOP;
2661: RAISE FND_API.G_EXC_ERROR;
2713: WHILE l_msg_count > 0 LOOP
2714: x_msg_data := FND_MSG_PUB.GET
2715: ( l_msg_index,
2716: FND_API.G_FALSE );
2717: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2718: l_msg_index := l_msg_index + 1;
2719: l_msg_count := l_msg_count - 1;
2720: END LOOP;
2721: RAISE FND_API.G_EXC_ERROR;
2746: AND (p_instance_rec.config_inst_item_id IS NOT NULL AND p_instance_rec.config_inst_item_id <> fnd_api.g_miss_num)
2747: AND (l_old_ins_csr.config_inst_item_id <> p_instance_rec.config_inst_item_id) )
2748: THEN
2749: l_no_config_keys:=TRUE;
2750: csi_gen_utility_pvt.put_line( 'Config keys were not provided. So no batch validation will be performed');
2751: END IF;
2752:
2753: IF NOT l_no_config_keys
2754: THEN
2803:
2804: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2805: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
2806: FND_MSG_PUB.Add;
2807: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
2808: RAISE FND_API.G_EXC_ERROR;
2809: END IF;
2810: END IF;
2811:
2875: WHILE l_msg_count > 0 LOOP
2876: x_msg_data := FND_MSG_PUB.GET
2877: ( l_msg_index,
2878: FND_API.G_FALSE );
2879: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2880: csi_gen_utility_pvt.put_line( 'while updating config status');
2881: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2882: l_msg_index := l_msg_index + 1;
2883: l_msg_count := l_msg_count - 1;
2876: x_msg_data := FND_MSG_PUB.GET
2877: ( l_msg_index,
2878: FND_API.G_FALSE );
2879: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2880: csi_gen_utility_pvt.put_line( 'while updating config status');
2881: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2882: l_msg_index := l_msg_index + 1;
2883: l_msg_count := l_msg_count - 1;
2884: END LOOP;
2877: ( l_msg_index,
2878: FND_API.G_FALSE );
2879: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2880: csi_gen_utility_pvt.put_line( 'while updating config status');
2881: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2882: l_msg_index := l_msg_index + 1;
2883: l_msg_count := l_msg_count - 1;
2884: END LOOP;
2885: RAISE FND_API.G_EXC_ERROR;
2926: WHILE l_msg_count > 0 LOOP
2927: x_msg_data := FND_MSG_PUB.GET
2928: ( l_msg_index,
2929: FND_API.G_FALSE );
2930: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2931: csi_gen_utility_pvt.put_line( 'while updating config status');
2932: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2933: l_msg_index := l_msg_index + 1;
2934: l_msg_count := l_msg_count - 1;
2927: x_msg_data := FND_MSG_PUB.GET
2928: ( l_msg_index,
2929: FND_API.G_FALSE );
2930: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2931: csi_gen_utility_pvt.put_line( 'while updating config status');
2932: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2933: l_msg_index := l_msg_index + 1;
2934: l_msg_count := l_msg_count - 1;
2935: END LOOP;
2928: ( l_msg_index,
2929: FND_API.G_FALSE );
2930: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2931: csi_gen_utility_pvt.put_line( 'while updating config status');
2932: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2933: l_msg_index := l_msg_index + 1;
2934: l_msg_count := l_msg_count - 1;
2935: END LOOP;
2936: RAISE FND_API.G_EXC_ERROR;
2996: WHILE l_msg_count > 0 LOOP
2997: x_msg_data := FND_MSG_PUB.GET
2998: ( l_msg_index,
2999: FND_API.G_FALSE );
3000: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3001: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3002: l_msg_index := l_msg_index + 1;
3003: l_msg_count := l_msg_count - 1;
3004: END LOOP;
2997: x_msg_data := FND_MSG_PUB.GET
2998: ( l_msg_index,
2999: FND_API.G_FALSE );
3000: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3001: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3002: l_msg_index := l_msg_index + 1;
3003: l_msg_count := l_msg_count - 1;
3004: END LOOP;
3005: RAISE FND_API.G_EXC_ERROR;
3104: WHEN OTHERS THEN
3105: l_party_id := NULL;
3106: END;
3107:
3108: csi_gen_utility_pvt.put_line('l_party_id - ' || l_party_id );
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3105: l_party_id := NULL;
3106: END;
3107:
3108: csi_gen_utility_pvt.put_line('l_party_id - ' || l_party_id );
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3106: END;
3107:
3108: csi_gen_utility_pvt.put_line('l_party_id - ' || l_party_id );
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3107:
3108: csi_gen_utility_pvt.put_line('l_party_id - ' || l_party_id );
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3115: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_usage_code - ' || l_old_ins_csr.instance_usage_code );
3108: csi_gen_utility_pvt.put_line('l_party_id - ' || l_party_id );
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3115: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_usage_code - ' || l_old_ins_csr.instance_usage_code );
3116:
3109: csi_gen_utility_pvt.put_line('l_internal_party_id - ' || l_internal_party_id );
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3115: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_usage_code - ' || l_old_ins_csr.instance_usage_code );
3116:
3117: --
3110: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_status_id - ' || l_old_ins_csr.instance_status_id );
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3115: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_usage_code - ' || l_old_ins_csr.instance_usage_code );
3116:
3117: --
3118: -- srramakr. If the current party is Internal, then no need to call OKS
3111: csi_gen_utility_pvt.put_line('l_instance_csr.instance_status_id - ' || l_instance_csr.instance_status_id );
3112: csi_gen_utility_pvt.put_line('p_txn_rec.source_line_ref_id - ' || p_txn_rec.source_line_ref_id );
3113: csi_gen_utility_pvt.put_line('p_txn_rec.transaction_type_id - ' || p_txn_rec.transaction_type_id );
3114: csi_gen_utility_pvt.put_line('l_instance_csr.instance_usage_code - ' || l_instance_csr.instance_usage_code );
3115: csi_gen_utility_pvt.put_line('l_old_ins_csr.instance_usage_code - ' || l_old_ins_csr.instance_usage_code );
3116:
3117: --
3118: -- srramakr. If the current party is Internal, then no need to call OKS
3119: -- with TRM or RET. The call would have been made when the ownership got changed.
3134: END IF;
3135: END IF;
3136: END IF;
3137: --
3138: csi_gen_utility_pvt.put_line('l_transaction_type - ' || l_transaction_type ); -- Added for bug 13057871
3139: IF l_transaction_type IS NULL
3140: THEN
3141: IF l_old_ins_csr.active_end_date <= SYSDATE
3142: AND (l_instance_csr.active_end_date IS NULL
3176: IF l_transaction_type IS NOT NULL THEN
3177:
3178: -- Added for DEBUG purposes for bug 9028424
3179: IF l_new_instance_rec.call_contracts = fnd_api.g_false THEN
3180: csi_gen_utility_pvt.put_line('call_contracts(1): '||l_new_instance_rec.call_contracts);
3181: ELSIF l_new_instance_rec.call_contracts = 'N' THEN
3182: csi_gen_utility_pvt.put_line('call_contracts(2): '||l_new_instance_rec.call_contracts);
3183: ELSE
3184: csi_gen_utility_pvt.put_line('call_contracts(3): '||l_new_instance_rec.call_contracts);
3178: -- Added for DEBUG purposes for bug 9028424
3179: IF l_new_instance_rec.call_contracts = fnd_api.g_false THEN
3180: csi_gen_utility_pvt.put_line('call_contracts(1): '||l_new_instance_rec.call_contracts);
3181: ELSIF l_new_instance_rec.call_contracts = 'N' THEN
3182: csi_gen_utility_pvt.put_line('call_contracts(2): '||l_new_instance_rec.call_contracts);
3183: ELSE
3184: csi_gen_utility_pvt.put_line('call_contracts(3): '||l_new_instance_rec.call_contracts);
3185: END IF;
3186: -- End DEBUG section
3180: csi_gen_utility_pvt.put_line('call_contracts(1): '||l_new_instance_rec.call_contracts);
3181: ELSIF l_new_instance_rec.call_contracts = 'N' THEN
3182: csi_gen_utility_pvt.put_line('call_contracts(2): '||l_new_instance_rec.call_contracts);
3183: ELSE
3184: csi_gen_utility_pvt.put_line('call_contracts(3): '||l_new_instance_rec.call_contracts);
3185: END IF;
3186: -- End DEBUG section
3187:
3188: -- srramakr changed from p_instance_rec to l_new_instance_rec
3215: x_msg_data := FND_MSG_PUB.GET
3216: ( l_msg_index,
3217: FND_API.G_FALSE
3218: );
3219: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3220: l_msg_index := l_msg_index + 1;
3221: l_msg_count := l_msg_count - 1;
3222: END LOOP;
3223: RAISE FND_API.G_EXC_ERROR;
3228: --
3229: x_return_status := l_tmp_return_status;
3230: --
3231: IF px_oks_txn_inst_tbl.count > 0 THEN
3232: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3233: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3234: --
3235: IF p_txn_rec.transaction_type_id = 3 THEN
3236: l_batch_id := p_txn_rec.source_header_ref_id;
3229: x_return_status := l_tmp_return_status;
3230: --
3231: IF px_oks_txn_inst_tbl.count > 0 THEN
3232: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3233: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3234: --
3235: IF p_txn_rec.transaction_type_id = 3 THEN
3236: l_batch_id := p_txn_rec.source_header_ref_id;
3237: l_batch_type := p_txn_rec.source_group_ref;
3264: x_msg_data := FND_MSG_PUB.GET
3265: ( l_msg_index,
3266: FND_API.G_FALSE
3267: );
3268: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3269: l_msg_index := l_msg_index + 1;
3270: l_msg_count := l_msg_count - 1;
3271: END LOOP;
3272: FND_MSG_PUB.Count_And_Get
3280: WHILE l_msg_count > 0 LOOP
3281: x_msg_data := FND_MSG_PUB.GET
3282: ( l_msg_index,
3283: FND_API.G_FALSE );
3284: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3285: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3286: l_msg_index := l_msg_index + 1;
3287: l_msg_count := l_msg_count - 1;
3288: END LOOP;
3281: x_msg_data := FND_MSG_PUB.GET
3282: ( l_msg_index,
3283: FND_API.G_FALSE );
3284: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3285: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3286: l_msg_index := l_msg_index + 1;
3287: l_msg_count := l_msg_count - 1;
3288: END LOOP;
3289: RAISE FND_API.G_EXC_ERROR;
3310:
3311: -- Call Post Vertical user Hook
3312: BEGIN
3313: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
3314: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post ..');
3315: CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post
3316: (
3317: p_api_version => 1.0
3318: ,p_commit => fnd_api.g_false
3338: WHILE l_msg_count > 0 LOOP
3339: x_msg_data := FND_MSG_PUB.GET
3340: ( l_msg_index,
3341: FND_API.G_FALSE );
3342: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post API ');
3343: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3344: l_msg_index := l_msg_index + 1;
3345: l_msg_count := l_msg_count - 1;
3346: END LOOP;
3339: x_msg_data := FND_MSG_PUB.GET
3340: ( l_msg_index,
3341: FND_API.G_FALSE );
3342: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post API ');
3343: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3344: l_msg_index := l_msg_index + 1;
3345: l_msg_count := l_msg_count - 1;
3346: END LOOP;
3347: RAISE FND_API.G_EXC_ERROR;
3349: END IF;
3350:
3351: EXCEPTION
3352: WHEN OTHERS THEN
3353: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Post Vertical');
3354: RAISE FND_API.G_EXC_ERROR;
3355: END;
3356: x_return_status := l_tmp_return_status;
3357: -- End of POST User Hooks
3357: -- End of POST User Hooks
3358: --
3359:
3360: -- Begin Add Code for Siebel Genesis Project
3361: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3362: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3363: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3364:
3365: l_instance_id := p_instance_rec.instance_id;
3358: --
3359:
3360: -- Begin Add Code for Siebel Genesis Project
3361: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3362: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3363: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3364:
3365: l_instance_id := p_instance_rec.instance_id;
3366: IF (l_instance_id = NULL OR l_instance_id = FND_API.G_MISS_NUM) THEN
3359:
3360: -- Begin Add Code for Siebel Genesis Project
3361: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3362: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3363: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3364:
3365: l_instance_id := p_instance_rec.instance_id;
3366: IF (l_instance_id = NULL OR l_instance_id = FND_API.G_MISS_NUM) THEN
3367: IF p_party_tbl.count > 0 THEN
3378: WHEN OTHERS THEN NULL;
3379: END;
3380:
3381: IF l_raise_bes_event = 'Y' THEN
3382: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3383: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3384: csi_gen_utility_pvt.put_line('Before calling update instance event');
3385: IF (l_internal_party_id <> l_owner_party_id OR
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3379: END;
3380:
3381: IF l_raise_bes_event = 'Y' THEN
3382: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3383: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3384: csi_gen_utility_pvt.put_line('Before calling update instance event');
3385: IF (l_internal_party_id <> l_owner_party_id OR
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3387: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3380:
3381: IF l_raise_bes_event = 'Y' THEN
3382: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3383: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3384: csi_gen_utility_pvt.put_line('Before calling update instance event');
3385: IF (l_internal_party_id <> l_owner_party_id OR
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3387: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3388: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3383: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3384: csi_gen_utility_pvt.put_line('Before calling update instance event');
3385: IF (l_internal_party_id <> l_owner_party_id OR
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3387: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3388: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3389: IF l_create_event_called = 'N' THEN
3390: csi_gen_utility_pvt.put_line('Calling Create Instance Event');
3391: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
3384: csi_gen_utility_pvt.put_line('Before calling update instance event');
3385: IF (l_internal_party_id <> l_owner_party_id OR
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3387: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3388: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3389: IF l_create_event_called = 'N' THEN
3390: csi_gen_utility_pvt.put_line('Calling Create Instance Event');
3391: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
3392: ( p_api_version => p_api_version
3386: (p_txn_rec.transaction_type_id IN (53,54) AND l_create_event_called = 'Y')) THEN -- Bug 7156553, base bug 7155591
3387: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3388: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3389: IF l_create_event_called = 'N' THEN
3390: csi_gen_utility_pvt.put_line('Calling Create Instance Event');
3391: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
3392: ( p_api_version => p_api_version
3393: ,p_commit => fnd_api.g_false
3394: ,p_init_msg_list => p_init_msg_list
3405: l_msg_count := x_msg_count;
3406:
3407: WHILE l_msg_count > 0 LOOP
3408: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
3409: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
3410: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3411: l_msg_index := l_msg_index + 1;
3412: l_msg_count := l_msg_count - 1;
3413: END LOOP;
3406:
3407: WHILE l_msg_count > 0 LOOP
3408: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
3409: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
3410: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3411: l_msg_index := l_msg_index + 1;
3412: l_msg_count := l_msg_count - 1;
3413: END LOOP;
3414: RAISE FND_API.G_EXC_ERROR;
3413: END LOOP;
3414: RAISE FND_API.G_EXC_ERROR;
3415: END IF;
3416: ELSE
3417: csi_gen_utility_pvt.put_line('Calling Update Instance Event');
3418: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
3419: ( p_api_version => p_api_version
3420: ,p_commit => fnd_api.g_false
3421: ,p_init_msg_list => p_init_msg_list
3432: l_msg_count := x_msg_count;
3433:
3434: WHILE l_msg_count > 0 LOOP
3435: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
3436: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3437: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3438: l_msg_index := l_msg_index + 1;
3439: l_msg_count := l_msg_count - 1;
3440: END LOOP;
3433:
3434: WHILE l_msg_count > 0 LOOP
3435: x_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
3436: csi_gen_utility_pvt.put_line(' Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3437: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3438: l_msg_index := l_msg_index + 1;
3439: l_msg_count := l_msg_count - 1;
3440: END LOOP;
3441: RAISE FND_API.G_EXC_ERROR;
3601: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
3602:
3603: -- If debug_level = 1 then dump the procedure name
3604: IF (l_debug_level > 0) THEN
3605: csi_gen_utility_pvt.put_line( 'expire_item_instance');
3606: END IF;
3607:
3608: -- If the debug level = 2 then dump all the parameters values.
3609: IF (l_debug_level > 1) THEN
3606: END IF;
3607:
3608: -- If the debug level = 2 then dump all the parameters values.
3609: IF (l_debug_level > 1) THEN
3610: csi_gen_utility_pvt.put_line( 'expire_item_instance:' ||
3611: p_api_version ||'-'||
3612: p_commit ||'-'||
3613: p_init_msg_list ||'-'||
3614: p_validation_level );
3612: p_commit ||'-'||
3613: p_init_msg_list ||'-'||
3614: p_validation_level );
3615: -- Dump the records in the log file
3616: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
3617: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3618: END IF;
3619: /***** srramakr commented for bug # 3304439
3620: -- Check for the profile option and enable trace
3613: p_init_msg_list ||'-'||
3614: p_validation_level );
3615: -- Dump the records in the log file
3616: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
3617: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3618: END IF;
3619: /***** srramakr commented for bug # 3304439
3620: -- Check for the profile option and enable trace
3621: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
3617: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3618: END IF;
3619: /***** srramakr commented for bug # 3304439
3620: -- Check for the profile option and enable trace
3621: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
3622: -- End enable trace
3623: ****/
3624: -- Start API body
3625: --
3625: --
3626: -- Call Pre Customer User Hook
3627: BEGIN
3628: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
3629: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre ..');
3630: CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre
3631: (
3632: p_api_version => 1.0
3633: ,p_commit => fnd_api.g_false
3647: WHILE l_msg_count > 0 LOOP
3648: x_msg_data := FND_MSG_PUB.GET
3649: ( l_msg_index,
3650: FND_API.G_FALSE );
3651: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre API ');
3652: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3653: l_msg_index := l_msg_index + 1;
3654: l_msg_count := l_msg_count - 1;
3655: END LOOP;
3648: x_msg_data := FND_MSG_PUB.GET
3649: ( l_msg_index,
3650: FND_API.G_FALSE );
3651: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre API ');
3652: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3653: l_msg_index := l_msg_index + 1;
3654: l_msg_count := l_msg_count - 1;
3655: END LOOP;
3656: RAISE FND_API.G_EXC_ERROR;
3657: END IF;
3658: END IF;
3659: EXCEPTION
3660: WHEN OTHERS THEN
3661: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Pre Customer');
3662: RAISE FND_API.G_EXC_ERROR;
3663: END;
3664: --
3665: -- Call Pre Vertical User Hook
3664: --
3665: -- Call Pre Vertical User Hook
3666: BEGIN
3667: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
3668: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre ..');
3669: CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre
3670: (
3671: p_api_version => 1.0
3672: ,p_commit => fnd_api.g_false
3686: WHILE l_msg_count > 0 LOOP
3687: x_msg_data := FND_MSG_PUB.GET
3688: ( l_msg_index,
3689: FND_API.G_FALSE );
3690: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre API ');
3691: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3692: l_msg_index := l_msg_index + 1;
3693: l_msg_count := l_msg_count - 1;
3694: END LOOP;
3687: x_msg_data := FND_MSG_PUB.GET
3688: ( l_msg_index,
3689: FND_API.G_FALSE );
3690: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre API ');
3691: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3692: l_msg_index := l_msg_index + 1;
3693: l_msg_count := l_msg_count - 1;
3694: END LOOP;
3695: RAISE FND_API.G_EXC_ERROR;
3696: END IF;
3697: END IF;
3698: EXCEPTION
3699: WHEN OTHERS THEN
3700: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Pre Vertical');
3701: RAISE FND_API.G_EXC_ERROR;
3702: END;
3703: -- End PRE User Hooks
3704: --
3724: x_msg_data := FND_MSG_PUB.GET(
3725: l_msg_index,
3726: FND_API.G_FALSE
3727: );
3728: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
3729: l_msg_index := l_msg_index + 1;
3730: l_msg_count := l_msg_count - 1;
3731: END LOOP;
3732: RAISE FND_API.G_EXC_ERROR;
3734: --
3735: -- Call Post Customer User Hook
3736: BEGIN
3737: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
3738: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post ..');
3739: CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post
3740: (
3741: p_api_version => 1.0
3742: ,p_commit => fnd_api.g_false
3756: WHILE l_msg_count > 0 LOOP
3757: x_msg_data := FND_MSG_PUB.GET
3758: ( l_msg_index,
3759: FND_API.G_FALSE );
3760: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post API ');
3761: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3762: l_msg_index := l_msg_index + 1;
3763: l_msg_count := l_msg_count - 1;
3764: END LOOP;
3757: x_msg_data := FND_MSG_PUB.GET
3758: ( l_msg_index,
3759: FND_API.G_FALSE );
3760: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post API ');
3761: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3762: l_msg_index := l_msg_index + 1;
3763: l_msg_count := l_msg_count - 1;
3764: END LOOP;
3765: RAISE FND_API.G_EXC_ERROR;
3766: END IF;
3767: END IF;
3768: EXCEPTION
3769: WHEN OTHERS THEN
3770: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Post Customer');
3771: RAISE FND_API.G_EXC_ERROR;
3772: END;
3773: --
3774:
3783: AND (p_instance_rec.config_inst_item_id IS NULL OR p_instance_rec.config_inst_item_id = fnd_api.g_miss_num)
3784: )
3785: THEN
3786: l_no_config_keys:=TRUE;
3787: csi_gen_utility_pvt.put_line( 'Config keys were not provided. So no batch validation will be performed');
3788: END IF;
3789:
3790: IF NOT l_no_config_keys
3791: THEN
3840:
3841: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3842: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
3843: FND_MSG_PUB.Add;
3844: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
3845: RAISE FND_API.G_EXC_ERROR;
3846: END IF;
3847: END IF;
3848: -- Commenting the following code in order to maintain status history.
3912: WHILE l_msg_count > 0 LOOP
3913: x_msg_data := FND_MSG_PUB.GET
3914: ( l_msg_index,
3915: FND_API.G_FALSE );
3916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3917: csi_gen_utility_pvt.put_line( 'while updating config status');
3918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3919: l_msg_index := l_msg_index + 1;
3920: l_msg_count := l_msg_count - 1;
3913: x_msg_data := FND_MSG_PUB.GET
3914: ( l_msg_index,
3915: FND_API.G_FALSE );
3916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3917: csi_gen_utility_pvt.put_line( 'while updating config status');
3918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3919: l_msg_index := l_msg_index + 1;
3920: l_msg_count := l_msg_count - 1;
3921: END LOOP;
3914: ( l_msg_index,
3915: FND_API.G_FALSE );
3916: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3917: csi_gen_utility_pvt.put_line( 'while updating config status');
3918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3919: l_msg_index := l_msg_index + 1;
3920: l_msg_count := l_msg_count - 1;
3921: END LOOP;
3922: RAISE FND_API.G_EXC_ERROR;
3963: WHILE l_msg_count > 0 LOOP
3964: x_msg_data := FND_MSG_PUB.GET
3965: ( l_msg_index,
3966: FND_API.G_FALSE );
3967: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3968: csi_gen_utility_pvt.put_line( 'while updating config status');
3969: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3970: l_msg_index := l_msg_index + 1;
3971: l_msg_count := l_msg_count - 1;
3964: x_msg_data := FND_MSG_PUB.GET
3965: ( l_msg_index,
3966: FND_API.G_FALSE );
3967: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3968: csi_gen_utility_pvt.put_line( 'while updating config status');
3969: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3970: l_msg_index := l_msg_index + 1;
3971: l_msg_count := l_msg_count - 1;
3972: END LOOP;
3965: ( l_msg_index,
3966: FND_API.G_FALSE );
3967: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3968: csi_gen_utility_pvt.put_line( 'while updating config status');
3969: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3970: l_msg_index := l_msg_index + 1;
3971: l_msg_count := l_msg_count - 1;
3972: END LOOP;
3973: RAISE FND_API.G_EXC_ERROR;
3978: END LOOP;
3979: END IF;
3980: -- End addition of changes for bug 3799694
3981: IF px_oks_txn_inst_tbl.count > 0 THEN
3982: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3983: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3984: --
3985: IF p_txn_rec.transaction_type_id = 3 THEN
3986: l_batch_id := p_txn_rec.source_header_ref_id;
3979: END IF;
3980: -- End addition of changes for bug 3799694
3981: IF px_oks_txn_inst_tbl.count > 0 THEN
3982: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3983: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3984: --
3985: IF p_txn_rec.transaction_type_id = 3 THEN
3986: l_batch_id := p_txn_rec.source_header_ref_id;
3987: l_batch_type := p_txn_rec.source_group_ref;
4013: WHILE l_msg_count > 0 LOOP
4014: x_msg_data := FND_MSG_PUB.GET
4015: ( l_msg_index,
4016: FND_API.G_FALSE );
4017: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
4018: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4019: l_msg_index := l_msg_index + 1;
4020: l_msg_count := l_msg_count - 1;
4021: END LOOP;
4014: x_msg_data := FND_MSG_PUB.GET
4015: ( l_msg_index,
4016: FND_API.G_FALSE );
4017: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
4018: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4019: l_msg_index := l_msg_index + 1;
4020: l_msg_count := l_msg_count - 1;
4021: END LOOP;
4022: RAISE FND_API.G_EXC_ERROR;
4041: p_data => x_msg_data );
4042: -- Call Post Vertical User Hook
4043: BEGIN
4044: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
4045: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post ..');
4046: CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post
4047: (
4048: p_api_version => 1.0
4049: ,p_commit => fnd_api.g_false
4063: WHILE l_msg_count > 0 LOOP
4064: x_msg_data := FND_MSG_PUB.GET
4065: ( l_msg_index,
4066: FND_API.G_FALSE );
4067: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post API ');
4068: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4069: l_msg_index := l_msg_index + 1;
4070: l_msg_count := l_msg_count - 1;
4071: END LOOP;
4064: x_msg_data := FND_MSG_PUB.GET
4065: ( l_msg_index,
4066: FND_API.G_FALSE );
4067: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post API ');
4068: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4069: l_msg_index := l_msg_index + 1;
4070: l_msg_count := l_msg_count - 1;
4071: END LOOP;
4072: RAISE FND_API.G_EXC_ERROR;
4073: END IF;
4074: END IF;
4075: EXCEPTION
4076: WHEN OTHERS THEN
4077: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Post Vertical');
4078: RAISE FND_API.G_EXC_ERROR;
4079: END;
4080: -- End of POST User Hooks
4081:
4192: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4193:
4194: -- If debug_level = 1 then dump the procedure name
4195: IF (l_debug_level > 0) THEN
4196: csi_gen_utility_pvt.put_line( 'get_item_instances');
4197: END IF;
4198:
4199: -- If the debug level = 2 then dump all the parameters values.
4200: IF (l_debug_level > 1) THEN
4197: END IF;
4198:
4199: -- If the debug level = 2 then dump all the parameters values.
4200: IF (l_debug_level > 1) THEN
4201: csi_gen_utility_pvt.put_line( 'get_item_instances' ||
4202: p_api_version ||'-'||
4203: p_commit ||'-'||
4204: p_init_msg_list ||'-'||
4205: p_validation_level );
4203: p_commit ||'-'||
4204: p_init_msg_list ||'-'||
4205: p_validation_level );
4206: --dump the query records into a log file
4207: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4208: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4209: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4210: END IF;
4211:
4204: p_init_msg_list ||'-'||
4205: p_validation_level );
4206: --dump the query records into a log file
4207: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4208: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4209: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4210: END IF;
4211:
4212: /***** srramakr commented for bug # 3304439
4205: p_validation_level );
4206: --dump the query records into a log file
4207: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4208: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4209: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4210: END IF;
4211:
4212: /***** srramakr commented for bug # 3304439
4213: -- Check for the profile option and enable trace
4210: END IF;
4211:
4212: /***** srramakr commented for bug # 3304439
4213: -- Check for the profile option and enable trace
4214: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
4215: -- End enable trace
4216: ****/
4217: -- Start API body
4218:
4525: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4526:
4527: -- If debug_level = 1 then dump the procedure name
4528: IF (l_debug_level > 0) THEN
4529: csi_gen_utility_pvt.put_line( 'get_item_instance_details');
4530: END IF;
4531:
4532: -- If the debug level = 2 then dump all the parameters values.
4533: IF (l_debug_level > 1) THEN
4530: END IF;
4531:
4532: -- If the debug level = 2 then dump all the parameters values.
4533: IF (l_debug_level > 1) THEN
4534: csi_gen_utility_pvt.put_line( 'get_item_instance_details:' ||
4535: p_api_version ||'-'||
4536: p_commit ||'-'||
4537: p_init_msg_list ||'-'||
4538: p_validation_level );
4536: p_commit ||'-'||
4537: p_init_msg_list ||'-'||
4538: p_validation_level );
4539: --dump the queried records into a log file
4540: csi_gen_utility_pvt.dump_instance_header_rec(p_instance_rec);
4541: END IF;
4542:
4543: /***** srramakr commented for bug # 3304439
4544: -- Check for the profile option and enable trace
4541: END IF;
4542:
4543: /***** srramakr commented for bug # 3304439
4544: -- Check for the profile option and enable trace
4545: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
4546: -- End enable trace
4547: ****/
4548: -- Start API body
4549:
4596: IF ((l_last_purge_date IS NOT NULL) AND (p_time_stamp <= l_last_purge_date))
4597: THEN
4598: -- If the user is requesting the instance history before the purge date
4599: -- then display a warning message
4600: csi_gen_utility_pvt.put_line('Warning! History for this entity has already been purged for the datetime stamp passed. ' ||
4601: 'Please provide a valid datetime stamp.');
4602: FND_MESSAGE.Set_Name('CSI', 'CSI_API_HIST_AFTER_PURGE_REQ');
4603: FND_MESSAGE.Set_Token('LAST_PURGE_DATE', l_last_purge_date);
4604: FND_MSG_PUB.ADD;
4654: WHILE l_msg_count > 0 LOOP
4655: x_msg_data := FND_MSG_PUB.GET
4656: ( l_msg_index,
4657: FND_API.G_FALSE );
4658: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_relationships.. ');
4659: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4660: l_msg_index := l_msg_index + 1;
4661: l_msg_count := l_msg_count - 1;
4662: END LOOP;
4655: x_msg_data := FND_MSG_PUB.GET
4656: ( l_msg_index,
4657: FND_API.G_FALSE );
4658: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_relationships.. ');
4659: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4660: l_msg_index := l_msg_index + 1;
4661: l_msg_count := l_msg_count - 1;
4662: END LOOP;
4663: RAISE FND_API.G_EXC_ERROR;
4692: WHILE l_msg_count > 0 LOOP
4693: x_msg_data := FND_MSG_PUB.GET
4694: ( l_msg_index,
4695: FND_API.G_FALSE );
4696: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_accounts.. ');
4697: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4698: l_msg_index := l_msg_index + 1;
4699: l_msg_count := l_msg_count - 1;
4700: END LOOP;
4693: x_msg_data := FND_MSG_PUB.GET
4694: ( l_msg_index,
4695: FND_API.G_FALSE );
4696: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_accounts.. ');
4697: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4698: l_msg_index := l_msg_index + 1;
4699: l_msg_count := l_msg_count - 1;
4700: END LOOP;
4701: RAISE FND_API.G_EXC_ERROR;
4742: WHILE l_msg_count > 0 LOOP
4743: x_msg_data := FND_MSG_PUB.GET
4744: ( l_msg_index,
4745: FND_API.G_FALSE );
4746: csi_gen_utility_pvt.put_line( ' Error from csi_organization_unit_pub.get_organization_unit.. ');
4747: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4748: l_msg_index := l_msg_index + 1;
4749: l_msg_count := l_msg_count - 1;
4750: END LOOP;
4743: x_msg_data := FND_MSG_PUB.GET
4744: ( l_msg_index,
4745: FND_API.G_FALSE );
4746: csi_gen_utility_pvt.put_line( ' Error from csi_organization_unit_pub.get_organization_unit.. ');
4747: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4748: l_msg_index := l_msg_index + 1;
4749: l_msg_count := l_msg_count - 1;
4750: END LOOP;
4751: RAISE FND_API.G_EXC_ERROR;
4774: WHILE l_msg_count > 0 LOOP
4775: x_msg_data := FND_MSG_PUB.GET
4776: ( l_msg_index,
4777: FND_API.G_FALSE );
4778: csi_gen_utility_pvt.put_line( ' Error from csi_pricing_attribs_pub.get_pricing_attribs.. ');
4779: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4780: l_msg_index := l_msg_index + 1;
4781: l_msg_count := l_msg_count - 1;
4782: END LOOP;
4775: x_msg_data := FND_MSG_PUB.GET
4776: ( l_msg_index,
4777: FND_API.G_FALSE );
4778: csi_gen_utility_pvt.put_line( ' Error from csi_pricing_attribs_pub.get_pricing_attribs.. ');
4779: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4780: l_msg_index := l_msg_index + 1;
4781: l_msg_count := l_msg_count - 1;
4782: END LOOP;
4783: RAISE FND_API.G_EXC_ERROR;
4807: WHILE l_msg_count > 0 LOOP
4808: x_msg_data := FND_MSG_PUB.GET
4809: ( l_msg_index,
4810: FND_API.G_FALSE );
4811: csi_gen_utility_pvt.put_line( ' Error from get_extended_attrib_values.. ');
4812: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4813: l_msg_index := l_msg_index + 1;
4814: l_msg_count := l_msg_count - 1;
4815: END LOOP;
4808: x_msg_data := FND_MSG_PUB.GET
4809: ( l_msg_index,
4810: FND_API.G_FALSE );
4811: csi_gen_utility_pvt.put_line( ' Error from get_extended_attrib_values.. ');
4812: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4813: l_msg_index := l_msg_index + 1;
4814: l_msg_count := l_msg_count - 1;
4815: END LOOP;
4816: RAISE FND_API.G_EXC_ERROR;
4840: WHILE l_msg_count > 0 LOOP
4841: x_msg_data := FND_MSG_PUB.GET
4842: ( l_msg_index,
4843: FND_API.G_FALSE );
4844: csi_gen_utility_pvt.put_line( ' Error from csi_asset_pvt.get_instance_assets.. ');
4845: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4846: l_msg_index := l_msg_index + 1;
4847: l_msg_count := l_msg_count - 1;
4848: END LOOP;
4841: x_msg_data := FND_MSG_PUB.GET
4842: ( l_msg_index,
4843: FND_API.G_FALSE );
4844: csi_gen_utility_pvt.put_line( ' Error from csi_asset_pvt.get_instance_assets.. ');
4845: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4846: l_msg_index := l_msg_index + 1;
4847: l_msg_count := l_msg_count - 1;
4848: END LOOP;
4849: RAISE FND_API.G_EXC_ERROR;
4980: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4981:
4982: -- If debug_level = 1 then dump the procedure name
4983: IF (l_debug_level > 0) THEN
4984: csi_gen_utility_pvt.put_line( 'get_version_label');
4985: END IF;
4986:
4987: -- If the debug level = 2 then dump all the parameters values.
4988: IF (l_debug_level > 1) THEN
4985: END IF;
4986:
4987: -- If the debug level = 2 then dump all the parameters values.
4988: IF (l_debug_level > 1) THEN
4989: csi_gen_utility_pvt.put_line( 'get_version_label:' ||
4990: p_api_version ||'-'||
4991: p_commit ||'-'||
4992: p_init_msg_list ||'-'||
4993: p_validation_level );
4995: END IF;
4996:
4997: /***** srramakr commented for bug # 3304439
4998: -- Check for the profile option and enable trace
4999: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5000: -- End enable trace
5001: ****/
5002:
5003: -- Start API body
5164: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5165:
5166: -- If debug_level = 1 then dump the procedure name
5167: IF (l_debug_level > 0) THEN
5168: csi_gen_utility_pvt.put_line( 'create_version_label');
5169: END IF;
5170:
5171:
5172: -- If the debug level = 2 then dump all the parameters values.
5170:
5171:
5172: -- If the debug level = 2 then dump all the parameters values.
5173: IF (l_debug_level > 1) THEN
5174: csi_gen_utility_pvt.put_line( 'create_version_label:'||
5175: p_api_version ||'-'||
5176: p_commit ||'-'||
5177: p_init_msg_list ||'-'||
5178: p_validation_level );
5177: p_init_msg_list ||'-'||
5178: p_validation_level );
5179:
5180: -- Dump the records in the log file
5181: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5182: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5183: END IF;
5184:
5185: /***** srramakr commented for bug # 3304439
5178: p_validation_level );
5179:
5180: -- Dump the records in the log file
5181: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5182: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5183: END IF;
5184:
5185: /***** srramakr commented for bug # 3304439
5186: -- Check for the profile option and enable trace
5183: END IF;
5184:
5185: /***** srramakr commented for bug # 3304439
5186: -- Check for the profile option and enable trace
5187: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5188: -- End enable trace
5189: ****/
5190:
5191: -- Start API body
5212: WHILE l_msg_count > 0 LOOP
5213: x_msg_data := FND_MSG_PUB.GET(
5214: l_msg_index,
5215: FND_API.G_FALSE);
5216: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5217: l_msg_index := l_msg_index + 1;
5218: l_msg_count := l_msg_count - 1;
5219: END LOOP;
5220: ROLLBACK TO create_version_label_pub;
5335: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5336:
5337: -- If debug_level = 1 then dump the procedure name
5338: IF (l_debug_level > 0) THEN
5339: csi_gen_utility_pvt.put_line( 'update_version_label');
5340: END IF;
5341:
5342:
5343: -- If the debug level = 2 then dump all the parameters values.
5341:
5342:
5343: -- If the debug level = 2 then dump all the parameters values.
5344: IF (l_debug_level > 1) THEN
5345: csi_gen_utility_pvt.put_line( 'update_version_label:'||
5346: p_api_version ||'-'||
5347: p_commit ||'-'||
5348: p_init_msg_list );
5349:
5347: p_commit ||'-'||
5348: p_init_msg_list );
5349:
5350: -- Dump the records in the log file
5351: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5352: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5353:
5354: END IF;
5355:
5348: p_init_msg_list );
5349:
5350: -- Dump the records in the log file
5351: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5352: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5353:
5354: END IF;
5355:
5356: /***** srramakr commented for bug # 3304439
5354: END IF;
5355:
5356: /***** srramakr commented for bug # 3304439
5357: -- Check for the profile option and enable trace
5358: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5359: -- End enable trace
5360: ****/
5361: -- Start API body
5362: --
5383: WHILE l_msg_count > 0 LOOP
5384: x_msg_data := FND_MSG_PUB.GET(
5385: l_msg_index,
5386: FND_API.G_FALSE );
5387: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5388: l_msg_index := l_msg_index + 1;
5389: l_msg_count := l_msg_count - 1;
5390: END LOOP;
5391: END IF;
5502: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5503:
5504: -- If debug_level = 1 then dump the procedure name
5505: IF (l_debug_level > 0) THEN
5506: csi_gen_utility_pvt.put_line( 'expire_version_label');
5507: END IF;
5508:
5509: -- If the debug level = 2 then dump all the parameters values.
5510: IF (l_debug_level > 1) THEN
5507: END IF;
5508:
5509: -- If the debug level = 2 then dump all the parameters values.
5510: IF (l_debug_level > 1) THEN
5511: csi_gen_utility_pvt.put_line( 'expire_version_label:'||
5512: p_api_version ||'-'||
5513: p_commit ||'-'||
5514: p_init_msg_list );
5515: -- Dump the records in the log file
5512: p_api_version ||'-'||
5513: p_commit ||'-'||
5514: p_init_msg_list );
5515: -- Dump the records in the log file
5516: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5517: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5518: END IF;
5519: /***** srramakr commented for bug # 3304439
5520: -- Check for the profile option and enable trace
5513: p_commit ||'-'||
5514: p_init_msg_list );
5515: -- Dump the records in the log file
5516: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5517: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5518: END IF;
5519: /***** srramakr commented for bug # 3304439
5520: -- Check for the profile option and enable trace
5521: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5517: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5518: END IF;
5519: /***** srramakr commented for bug # 3304439
5520: -- Check for the profile option and enable trace
5521: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5522: -- End enable trace
5523: ****/
5524: -- Start API body
5525: --
5545: WHILE l_msg_count > 0 LOOP
5546: x_msg_data := FND_MSG_PUB.GET(
5547: l_msg_index,
5548: FND_API.G_FALSE );
5549: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5550: l_msg_index := l_msg_index + 1;
5551: l_msg_count := l_msg_count - 1;
5552: END LOOP;
5553: END IF;
5821: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5822:
5823: -- If debug_level = 1 then dump the procedure name
5824: IF (l_debug_level > 0) THEN
5825: csi_gen_utility_pvt.put_line( 'get_extended_attrib_values');
5826: END IF;
5827:
5828:
5829: -- If the debug level = 2 then dump all the parameters values.
5827:
5828:
5829: -- If the debug level = 2 then dump all the parameters values.
5830: IF (l_debug_level > 1) THEN
5831: csi_gen_utility_pvt.put_line( p_api_version ||'-'
5832: || p_commit ||'-'
5833: || p_init_msg_list ||'-'
5834: || p_validation_level ||'-'
5835: || p_time_stamp);
5834: || p_validation_level ||'-'
5835: || p_time_stamp);
5836:
5837: -- Dump extended attribs
5838: csi_gen_utility_pvt.dump_ext_attrib_query_rec(p_ext_attribs_query_rec);
5839: END IF;
5840:
5841: /***** srramakr commented for bug # 3304439
5842: -- Check for the profile option and enable trace
5839: END IF;
5840:
5841: /***** srramakr commented for bug # 3304439
5842: -- Check for the profile option and enable trace
5843: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
5844: -- End enable trace
5845: ****/
5846:
5847: -- Start API body
6102: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6103:
6104: -- If debug_level = 1 then dump the procedure name
6105: IF (l_debug_level > 0) THEN
6106: csi_gen_utility_pvt.put_line( 'create_extended_attrib_values');
6107: END IF;
6108:
6109:
6110: -- If the debug level = 2 then dump all the parameters values.
6108:
6109:
6110: -- If the debug level = 2 then dump all the parameters values.
6111: IF (l_debug_level > 1) THEN
6112: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6113: || p_commit ||'-'
6114: || p_init_msg_list ||'-'
6115: || p_validation_level );
6116:
6114: || p_init_msg_list ||'-'
6115: || p_validation_level );
6116:
6117: -- Dump extended attribs tbl
6118: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6119: -- Dump txn_rec
6120: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6121:
6122: END IF;
6116:
6117: -- Dump extended attribs tbl
6118: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6119: -- Dump txn_rec
6120: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6121:
6122: END IF;
6123:
6124: /***** srramakr commented for bug # 3304439
6122: END IF;
6123:
6124: /***** srramakr commented for bug # 3304439
6125: -- Check for the profile option and enable trace
6126: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6127: -- End enable trace
6128: ****/
6129:
6130:
6157: x_msg_data := FND_MSG_PUB.GET
6158: (l_msg_index,
6159: FND_API.G_FALSE );
6160:
6161: csi_gen_utility_pvt.put_line( ' Failed Pub:create_extended_attrib_values..');
6162: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6163: l_msg_index := l_msg_index + 1;
6164: l_msg_count := l_msg_count - 1;
6165: END LOOP;
6158: (l_msg_index,
6159: FND_API.G_FALSE );
6160:
6161: csi_gen_utility_pvt.put_line( ' Failed Pub:create_extended_attrib_values..');
6162: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6163: l_msg_index := l_msg_index + 1;
6164: l_msg_count := l_msg_count - 1;
6165: END LOOP;
6166: RAISE FND_API.G_EXC_ERROR;
6298: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6299:
6300: -- If debug_level = 1 then dump the procedure name
6301: IF (l_debug_level > 0) THEN
6302: csi_gen_utility_pvt.put_line( 'update_extended_attrib_values');
6303: END IF;
6304:
6305:
6306: -- If the debug level = 2 then dump all the parameters values.
6304:
6305:
6306: -- If the debug level = 2 then dump all the parameters values.
6307: IF (l_debug_level > 1) THEN
6308: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6309: || p_commit ||'-'
6310: || p_init_msg_list ||'-'
6311: || p_validation_level );
6312:
6310: || p_init_msg_list ||'-'
6311: || p_validation_level );
6312:
6313: -- Dump extended attribs tbl
6314: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6315: -- Dump txn_rec
6316: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6317: END IF;
6318:
6312:
6313: -- Dump extended attribs tbl
6314: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6315: -- Dump txn_rec
6316: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6317: END IF;
6318:
6319: /***** srramakr commented for bug # 3304439
6320: -- Check for the profile option and enable trace
6317: END IF;
6318:
6319: /***** srramakr commented for bug # 3304439
6320: -- Check for the profile option and enable trace
6321: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6322: -- End enable trace
6323: ****/
6324:
6325:
6351: x_msg_data := FND_MSG_PUB.GET
6352: (l_msg_index,
6353: FND_API.G_FALSE );
6354:
6355: csi_gen_utility_pvt.put_line( ' Failed Pub:update_extended_attrib_values..');
6356: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6357: l_msg_index := l_msg_index + 1;
6358: l_msg_count := l_msg_count - 1;
6359: END LOOP;
6352: (l_msg_index,
6353: FND_API.G_FALSE );
6354:
6355: csi_gen_utility_pvt.put_line( ' Failed Pub:update_extended_attrib_values..');
6356: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6357: l_msg_index := l_msg_index + 1;
6358: l_msg_count := l_msg_count - 1;
6359: END LOOP;
6360: RAISE FND_API.G_EXC_ERROR;
6487: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6488:
6489: -- If debug_level = 1 then dump the procedure name
6490: IF (l_debug_level > 0) THEN
6491: csi_gen_utility_pvt.put_line( 'delete_extended_attrib_values');
6492: END IF;
6493:
6494:
6495: -- If the debug level = 2 then dump all the parameters values.
6493:
6494:
6495: -- If the debug level = 2 then dump all the parameters values.
6496: IF (l_debug_level > 1) THEN
6497: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6498: || p_commit ||'-'
6499: || p_init_msg_list ||'-'
6500: || p_validation_level );
6501: -- Dump extended attribs tbl
6498: || p_commit ||'-'
6499: || p_init_msg_list ||'-'
6500: || p_validation_level );
6501: -- Dump extended attribs tbl
6502: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6503: -- Dump txn_rec
6504: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6505: END IF;
6506:
6500: || p_validation_level );
6501: -- Dump extended attribs tbl
6502: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6503: -- Dump txn_rec
6504: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6505: END IF;
6506:
6507: /***** srramakr commented for bug # 3304439
6508: -- Check for the profile option and enable trace
6505: END IF;
6506:
6507: /***** srramakr commented for bug # 3304439
6508: -- Check for the profile option and enable trace
6509: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6510: -- End enable trace
6511: ****/
6512:
6513:
6537: x_msg_data := FND_MSG_PUB.GET
6538: (l_msg_index,
6539: FND_API.G_FALSE );
6540:
6541: csi_gen_utility_pvt.put_line( ' Failed Pub:expire_extended_attrib_values..');
6542: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6543: l_msg_index := l_msg_index + 1;
6544: l_msg_count := l_msg_count - 1;
6545: END LOOP;
6538: (l_msg_index,
6539: FND_API.G_FALSE );
6540:
6541: csi_gen_utility_pvt.put_line( ' Failed Pub:expire_extended_attrib_values..');
6542: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6543: l_msg_index := l_msg_index + 1;
6544: l_msg_count := l_msg_count - 1;
6545: END LOOP;
6546: RAISE FND_API.G_EXC_ERROR;
6684: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6685:
6686: -- If debug_level = 1 then dump the procedure name
6687: IF (l_debug_level > 0) THEN
6688: csi_gen_utility_pvt.put_line('copy_item_instance ');
6689: END IF;
6690:
6691: -- If the debug level = 2 then dump all the parameters values.
6692: IF (l_debug_level > 1) THEN
6689: END IF;
6690:
6691: -- If the debug level = 2 then dump all the parameters values.
6692: IF (l_debug_level > 1) THEN
6693: csi_gen_utility_pvt.put_line('copy_item_instance '||
6694: p_api_version ||'-'
6695: || p_commit ||'-'
6696: || p_init_msg_list ||'-'
6697: || p_validation_level ||'-'
6704: || p_copy_pricing_attribs
6705: );
6706:
6707: -- Dump item instanc red
6708: csi_gen_utility_pvt.dump_instance_rec(p_source_instance_rec);
6709: -- Dump txn_rec
6710: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6711:
6712: END IF;
6706:
6707: -- Dump item instanc red
6708: csi_gen_utility_pvt.dump_instance_rec(p_source_instance_rec);
6709: -- Dump txn_rec
6710: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6711:
6712: END IF;
6713:
6714: -- Start API body
6741: p_encoded => 'F',
6742: p_data => x_msg_data,
6743: p_msg_index_out => x_msg_index_out );
6744:
6745: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6746: End LOOP;
6747: RAISE fnd_api.g_exc_error;
6748: END IF;
6749:
6944: END IF;
6945:
6946: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
6947: THEN
6948: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
6949: l_msg_index := 1;
6950: l_msg_count := x_msg_count;
6951: WHILE l_msg_count > 0 LOOP
6952: x_msg_data := FND_MSG_PUB.GET
6952: x_msg_data := FND_MSG_PUB.GET
6953: ( l_msg_index,
6954: FND_API.G_FALSE
6955: );
6956: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
6957: l_msg_index := l_msg_index + 1;
6958: l_msg_count := l_msg_count - 1;
6959: END LOOP;
6960: RAISE FND_API.G_EXC_ERROR;