[Home] [Help]
169: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
170:
171: -- If debug_level = 1 then dump the procedure name
172: IF (l_debug_level > 0) THEN
173: csi_gen_utility_pvt.put_line( 'create_item_instance');
174: END IF;
175:
176: -- If the debug level = 2 then dump all the parameters values.
177: IF (l_debug_level > 1) THEN
175:
176: -- If the debug level = 2 then dump all the parameters values.
177: IF (l_debug_level > 1) THEN
178:
179: csi_gen_utility_pvt.put_line( 'create_item_instance' ||
180: p_api_version ||'-'||
181: p_commit ||'-'||
182: p_init_msg_list ||'-'||
183: p_validation_level );
180: p_api_version ||'-'||
181: p_commit ||'-'||
182: p_init_msg_list ||'-'||
183: p_validation_level );
184: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
181: p_commit ||'-'||
182: p_init_msg_list ||'-'||
183: p_validation_level );
184: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
182: p_init_msg_list ||'-'||
183: p_validation_level );
184: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
183: p_validation_level );
184: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
191: END IF;
184: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
191: END IF;
192: /***** srramakr commented for bug # 3304439
185: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
191: END IF;
192: /***** srramakr commented for bug # 3304439
193: -- Check for the profile option and enable trace
186: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
187: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
188: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
189: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
191: END IF;
192: /***** srramakr commented for bug # 3304439
193: -- Check for the profile option and enable trace
194: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
190: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
191: END IF;
192: /***** srramakr commented for bug # 3304439
193: -- Check for the profile option and enable trace
194: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
195: -- End enable trace
196: ****/
197: -- Start API body
198: --
199: -- Calling Pre Customer User Hook
200: BEGIN
201:
202: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
203: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre ..');
204: CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre
205: (
206: p_api_version => 1.0
207: ,p_commit => fnd_api.g_false
226: WHILE l_msg_count > 0 LOOP
227: x_msg_data := FND_MSG_PUB.GET
228: ( l_msg_index,
229: FND_API.G_FALSE );
230: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre API ');
231: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
232: l_msg_index := l_msg_index + 1;
233: l_msg_count := l_msg_count - 1;
234: END LOOP;
227: x_msg_data := FND_MSG_PUB.GET
228: ( l_msg_index,
229: FND_API.G_FALSE );
230: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Pre API ');
231: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
232: l_msg_index := l_msg_index + 1;
233: l_msg_count := l_msg_count - 1;
234: END LOOP;
235: RAISE FND_API.G_EXC_ERROR;
237: --
238: END IF;
239: EXCEPTION
240: WHEN OTHERS THEN
241: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Pre Customer');
242: RAISE FND_API.G_EXC_ERROR;
243: END;
244: --
245: -- Calling Pre Vertical User Hook
245: -- Calling Pre Vertical User Hook
246: BEGIN
247:
248: IF JTF_USR_HKS.Ok_to_execute( G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
249: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre ..');
250: CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre
251: (
252: p_api_version => 1.0
253: ,p_commit => fnd_api.g_false
272: WHILE l_msg_count > 0 LOOP
273: x_msg_data := FND_MSG_PUB.GET
274: ( l_msg_index,
275: FND_API.G_FALSE );
276: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre API ');
277: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
278: l_msg_index := l_msg_index + 1;
279: l_msg_count := l_msg_count - 1;
280: END LOOP;
273: x_msg_data := FND_MSG_PUB.GET
274: ( l_msg_index,
275: FND_API.G_FALSE );
276: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Pre API ');
277: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
278: l_msg_index := l_msg_index + 1;
279: l_msg_count := l_msg_count - 1;
280: END LOOP;
281: RAISE FND_API.G_EXC_ERROR;
284: END IF;
285:
286: EXCEPTION
287: WHEN OTHERS THEN
288: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Pre Vertical');
289: RAISE FND_API.G_EXC_ERROR;
290: END;
291:
292: -- End of PRE User Hooks
332: WHILE l_msg_count > 0 LOOP
333: x_msg_data := FND_MSG_PUB.GET
334: ( l_msg_index,
335: FND_API.G_FALSE );
336: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.. ');
337: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
338: l_msg_index := l_msg_index + 1;
339: l_msg_count := l_msg_count - 1;
340: END LOOP;
333: x_msg_data := FND_MSG_PUB.GET
334: ( l_msg_index,
335: FND_API.G_FALSE );
336: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.. ');
337: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
338: l_msg_index := l_msg_index + 1;
339: l_msg_count := l_msg_count - 1;
340: END LOOP;
341: RAISE FND_API.G_EXC_ERROR;
344: -- Calling Post Customer User Hook
345: BEGIN
346:
347: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
348: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post ..');
349: CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post
350: (
351: p_api_version => 1.0
352: ,p_commit => fnd_api.g_false
371: WHILE l_msg_count > 0 LOOP
372: x_msg_data := FND_MSG_PUB.GET
373: ( l_msg_index,
374: FND_API.G_FALSE );
375: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
376: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
377: l_msg_index := l_msg_index + 1;
378: l_msg_count := l_msg_count - 1;
379: END LOOP;
372: x_msg_data := FND_MSG_PUB.GET
373: ( l_msg_index,
374: FND_API.G_FALSE );
375: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
376: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
377: l_msg_index := l_msg_index + 1;
378: l_msg_count := l_msg_count - 1;
379: END LOOP;
380: RAISE FND_API.G_EXC_ERROR;
382: --
383: END IF;
384: EXCEPTION
385: WHEN OTHERS THEN
386: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Post Customer');
387: RAISE FND_API.G_EXC_ERROR;
388: END;
389:
390:
490: WHILE l_msg_count > 0 LOOP
491: x_msg_data := FND_MSG_PUB.GET
492: ( l_msg_index,
493: FND_API.G_FALSE );
494: csi_gen_utility_pvt.put_line( ' Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
495: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
496: l_msg_index := l_msg_index + 1;
497: l_msg_count := l_msg_count - 1;
498: END LOOP;
491: x_msg_data := FND_MSG_PUB.GET
492: ( l_msg_index,
493: FND_API.G_FALSE );
494: csi_gen_utility_pvt.put_line( ' Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
495: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
496: l_msg_index := l_msg_index + 1;
497: l_msg_count := l_msg_count - 1;
498: END LOOP;
499: RAISE FND_API.G_EXC_ERROR;
530: WHILE l_msg_count > 0 LOOP
531: x_msg_data := FND_MSG_PUB.GET
532: ( l_msg_index,
533: FND_API.G_FALSE );
534: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
535: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
536: l_msg_index := l_msg_index + 1;
537: l_msg_count := l_msg_count - 1;
538: END LOOP;
531: x_msg_data := FND_MSG_PUB.GET
532: ( l_msg_index,
533: FND_API.G_FALSE );
534: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
535: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
536: l_msg_index := l_msg_index + 1;
537: l_msg_count := l_msg_count - 1;
538: END LOOP;
539: RAISE FND_API.G_EXC_ERROR;
572: x_msg_data := FND_MSG_PUB.GET
573: ( l_msg_index,
574: FND_API.G_FALSE );
575:
576: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
577: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
578: l_msg_index := l_msg_index + 1;
579: l_msg_count := l_msg_count - 1;
580: END LOOP;
573: ( l_msg_index,
574: FND_API.G_FALSE );
575:
576: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
577: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
578: l_msg_index := l_msg_index + 1;
579: l_msg_count := l_msg_count - 1;
580: END LOOP;
581: RAISE FND_API.G_EXC_ERROR;
613: x_msg_data := FND_MSG_PUB.GET
614: ( l_msg_index,
615: FND_API.G_FALSE );
616:
617: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
618: l_msg_index := l_msg_index + 1;
619: l_msg_count := l_msg_count - 1;
620: END LOOP;
621: RAISE FND_API.G_EXC_ERROR;
652: WHILE l_msg_count > 0 LOOP
653: x_msg_data := FND_MSG_PUB.GET
654: ( l_msg_index,
655: FND_API.G_FALSE );
656: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
657: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
658: l_msg_index := l_msg_index + 1;
659: l_msg_count := l_msg_count - 1;
660: END LOOP;
653: x_msg_data := FND_MSG_PUB.GET
654: ( l_msg_index,
655: FND_API.G_FALSE );
656: csi_gen_utility_pvt.put_line( ' Error from CSI_ASSET_PVT..');
657: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
658: l_msg_index := l_msg_index + 1;
659: l_msg_count := l_msg_count - 1;
660: END LOOP;
661: RAISE FND_API.G_EXC_ERROR;
701: ,x_msg_data => x_msg_data
702: );
703:
704: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
705: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.CREATE_VERSION_LABEL..');
706: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
707: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
708: FND_MESSAGE.SET_TOKEN('API_ERROR', 'CREATE_VERSION_LABEL');
709: FND_MSG_PUB.Add;
702: );
703:
704: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
705: csi_gen_utility_pvt.put_line( ' Error from CSI_ITEM_INSTANCE_PVT.CREATE_VERSION_LABEL..');
706: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
707: FND_MESSAGE.SET_NAME('CSI','CSI_FAILED_TO_CREATE_VERSION');
708: FND_MESSAGE.SET_TOKEN('API_ERROR', 'CREATE_VERSION_LABEL');
709: FND_MSG_PUB.Add;
710: RAISE FND_API.G_EXC_ERROR;
719: -- Calling Contracts
720: -- Added on 02-OCT-01
721: -- Added by sk for fixing bug 2245976
722: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
723: csi_gen_utility_pvt.populate_install_param_rec;
724: END IF;
725: --
726: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
727: --
768: x_msg_data := FND_MSG_PUB.GET
769: ( l_msg_index,
770: FND_API.G_FALSE
771: );
772: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
773: l_msg_index := l_msg_index + 1;
774: l_msg_count := l_msg_count - 1;
775: END LOOP;
776: RAISE FND_API.G_EXC_ERROR;
830:
831: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
832: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
833: FND_MSG_PUB.Add;
834: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
835: RAISE FND_API.G_EXC_ERROR;
836: END IF;
837: END IF;
838: ELSIF ( (p_instance_rec.config_inst_hdr_id IS NULL OR p_instance_rec.config_inst_hdr_id = fnd_api.g_miss_num)
900: WHILE l_msg_count > 0 LOOP
901: x_msg_data := FND_MSG_PUB.GET
902: ( l_msg_index,
903: FND_API.G_FALSE );
904: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
905: csi_gen_utility_pvt.put_line( 'while updating config status');
906: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
907: l_msg_index := l_msg_index + 1;
908: l_msg_count := l_msg_count - 1;
901: x_msg_data := FND_MSG_PUB.GET
902: ( l_msg_index,
903: FND_API.G_FALSE );
904: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
905: csi_gen_utility_pvt.put_line( 'while updating config status');
906: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
907: l_msg_index := l_msg_index + 1;
908: l_msg_count := l_msg_count - 1;
909: END LOOP;
902: ( l_msg_index,
903: FND_API.G_FALSE );
904: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
905: csi_gen_utility_pvt.put_line( 'while updating config status');
906: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
907: l_msg_index := l_msg_index + 1;
908: l_msg_count := l_msg_count - 1;
909: END LOOP;
910: RAISE FND_API.G_EXC_ERROR;
952: WHILE l_msg_count > 0 LOOP
953: x_msg_data := FND_MSG_PUB.GET
954: ( l_msg_index,
955: FND_API.G_FALSE );
956: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
957: csi_gen_utility_pvt.put_line( 'while updating config status');
958: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
959: l_msg_index := l_msg_index + 1;
960: l_msg_count := l_msg_count - 1;
953: x_msg_data := FND_MSG_PUB.GET
954: ( l_msg_index,
955: FND_API.G_FALSE );
956: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
957: csi_gen_utility_pvt.put_line( 'while updating config status');
958: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
959: l_msg_index := l_msg_index + 1;
960: l_msg_count := l_msg_count - 1;
961: END LOOP;
954: ( l_msg_index,
955: FND_API.G_FALSE );
956: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
957: csi_gen_utility_pvt.put_line( 'while updating config status');
958: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
959: l_msg_index := l_msg_index + 1;
960: l_msg_count := l_msg_count - 1;
961: END LOOP;
962: RAISE FND_API.G_EXC_ERROR;
967: END LOOP;
968: END IF;
969: --
970: IF px_oks_txn_inst_tbl.count > 0 THEN
971: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
972: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
973: --
974: IF p_txn_rec.transaction_type_id = 3 THEN
975: l_batch_id := p_txn_rec.source_header_ref_id;
968: END IF;
969: --
970: IF px_oks_txn_inst_tbl.count > 0 THEN
971: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
972: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
973: --
974: IF p_txn_rec.transaction_type_id = 3 THEN
975: l_batch_id := p_txn_rec.source_header_ref_id;
976: l_batch_type := p_txn_rec.source_group_ref;
1002: WHILE l_msg_count > 0 LOOP
1003: x_msg_data := FND_MSG_PUB.GET
1004: ( l_msg_index,
1005: FND_API.G_FALSE );
1006: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
1007: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1008: l_msg_index := l_msg_index + 1;
1009: l_msg_count := l_msg_count - 1;
1010: END LOOP;
1003: x_msg_data := FND_MSG_PUB.GET
1004: ( l_msg_index,
1005: FND_API.G_FALSE );
1006: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
1007: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1008: l_msg_index := l_msg_index + 1;
1009: l_msg_count := l_msg_count - 1;
1010: END LOOP;
1011: RAISE FND_API.G_EXC_ERROR;
1016: -- End of API body
1017:
1018: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1019: IF l_raise_bes_event = 'Y' THEN
1020: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1021: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1022: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1023: IF l_internal_party_id <> l_party_id THEN
1024: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
1017:
1018: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1019: IF l_raise_bes_event = 'Y' THEN
1020: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1021: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1022: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1023: IF l_internal_party_id <> l_party_id THEN
1024: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
1025: csi_gen_utility_pvt.put_line('Firing the CREATE INSTANCE EVENT ');
1018: -- Begin Add Code for Siebel Genesis Project - Call the Business Event
1019: IF l_raise_bes_event = 'Y' THEN
1020: csi_gen_utility_pvt.put_line('l_internal_party_Id = '||to_char(l_internal_party_id));
1021: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1022: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1023: IF l_internal_party_id <> l_party_id THEN
1024: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
1025: csi_gen_utility_pvt.put_line('Firing the CREATE INSTANCE EVENT ');
1026: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
1021: csi_gen_utility_pvt.put_line('l_party_Id = '||to_char(l_party_id));
1022: csi_gen_utility_pvt.put_line('fnd_api.g_miss_num = '||to_char(fnd_api.g_miss_num));
1023: IF l_internal_party_id <> l_party_id THEN
1024: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
1025: csi_gen_utility_pvt.put_line('Firing the CREATE INSTANCE EVENT ');
1026: CSI_BUSINESS_EVENT_PVT.CREATE_INSTANCE_EVENT
1027: (p_api_version => p_api_version
1028: ,p_commit => fnd_api.g_false
1029: ,p_init_msg_list => p_init_msg_list
1042: WHILE l_msg_count > 0 LOOP
1043: x_msg_data := FND_MSG_PUB.GET
1044: (l_msg_index,
1045: FND_API.G_FALSE );
1046: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1047: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1048: l_msg_index := l_msg_index + 1;
1049: l_msg_count := l_msg_count - 1;
1050: END LOOP;
1043: x_msg_data := FND_MSG_PUB.GET
1044: (l_msg_index,
1045: FND_API.G_FALSE );
1046: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1047: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1048: l_msg_index := l_msg_index + 1;
1049: l_msg_count := l_msg_count - 1;
1050: END LOOP;
1051: RAISE FND_API.G_EXC_ERROR;
1050: END LOOP;
1051: RAISE FND_API.G_EXC_ERROR;
1052: END IF;
1053: ELSIF (p_instance_rec.last_oe_order_line_id IS NOT NULL OR p_instance_rec.last_oe_order_line_id <> fnd_api.g_miss_num) THEN
1054: csi_gen_utility_pvt.put_line('Before link to line id ');
1055: BEGIN
1056: SELECT link_to_line_id, item_type_code
1057: INTO l_link_to_line_id, l_item_type_code
1058: FROM oe_order_lines_all
1083: WHILE l_msg_count > 0 LOOP
1084: x_msg_data := FND_MSG_PUB.GET
1085: (l_msg_index,
1086: FND_API.G_FALSE );
1087: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1088: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1089: l_msg_index := l_msg_index + 1;
1090: l_msg_count := l_msg_count - 1;
1091: END LOOP;
1084: x_msg_data := FND_MSG_PUB.GET
1085: (l_msg_index,
1086: FND_API.G_FALSE );
1087: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.CREATE_INSTANCE_EVENT');
1088: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1089: l_msg_index := l_msg_index + 1;
1090: l_msg_count := l_msg_count - 1;
1091: END LOOP;
1092: RAISE FND_API.G_EXC_ERROR;
1119: -- Calling Post Vertical User Hook
1120: BEGIN
1121:
1122: IF JTF_USR_HKS.Ok_to_execute( G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
1123: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post ..');
1124: CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post
1125: (
1126: p_api_version => 1.0
1127: ,p_commit => fnd_api.g_false
1146: WHILE l_msg_count > 0 LOOP
1147: x_msg_data := FND_MSG_PUB.GET
1148: ( l_msg_index,
1149: FND_API.G_FALSE );
1150: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
1151: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1152: l_msg_index := l_msg_index + 1;
1153: l_msg_count := l_msg_count - 1;
1154: END LOOP;
1147: x_msg_data := FND_MSG_PUB.GET
1148: ( l_msg_index,
1149: FND_API.G_FALSE );
1150: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Create_Item_Instance_Post API ');
1151: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1152: l_msg_index := l_msg_index + 1;
1153: l_msg_count := l_msg_count - 1;
1154: END LOOP;
1155: RAISE FND_API.G_EXC_ERROR;
1157: --
1158: END IF;
1159: EXCEPTION
1160: WHEN OTHERS THEN
1161: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Create Post Vertical');
1162: RAISE FND_API.G_EXC_ERROR;
1163: END;
1164: -- End of POST User Hooks
1165:
1445: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
1446:
1447: -- If debug_level = 1 then dump the procedure name
1448: IF (l_debug_level > 0) THEN
1449: csi_gen_utility_pvt.put_line( 'update_item_instance');
1450: END IF;
1451:
1452: -- If the debug level = 2 then dump all the parameters values.
1453: IF (l_debug_level > 1) THEN
1450: END IF;
1451:
1452: -- If the debug level = 2 then dump all the parameters values.
1453: IF (l_debug_level > 1) THEN
1454: csi_gen_utility_pvt.put_line( 'update_item_instance' ||
1455: p_api_version ||'-'||
1456: p_commit ||'-'||
1457: p_init_msg_list ||'-'||
1458: p_validation_level );
1455: p_api_version ||'-'||
1456: p_commit ||'-'||
1457: p_init_msg_list ||'-'||
1458: p_validation_level );
1459: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1456: p_commit ||'-'||
1457: p_init_msg_list ||'-'||
1458: p_validation_level );
1459: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1457: p_init_msg_list ||'-'||
1458: p_validation_level );
1459: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1465: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1458: p_validation_level );
1459: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1465: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1466: END IF;
1459: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1465: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1466: END IF;
1467:
1460: csi_gen_utility_pvt.dump_party_tbl(p_party_tbl);
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1465: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1466: END IF;
1467:
1468: /***** srramakr commented for bug # 3304439
1461: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
1462: csi_gen_utility_pvt.dump_organization_unit_tbl(p_org_assignments_tbl);
1463: csi_gen_utility_pvt.dump_pricing_attribs_tbl(p_pricing_attrib_tbl);
1464: csi_gen_utility_pvt.dump_party_account_tbl(p_account_tbl);
1465: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_values_tbl);
1466: END IF;
1467:
1468: /***** srramakr commented for bug # 3304439
1469: -- Check for the profile option and enable trace
1466: END IF;
1467:
1468: /***** srramakr commented for bug # 3304439
1469: -- Check for the profile option and enable trace
1470: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
1471: -- End enable trace
1472: ****/
1473: -- Start API body
1474: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1471: -- End enable trace
1472: ****/
1473: -- Start API body
1474: IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
1475: csi_gen_utility_pvt.populate_install_param_rec;
1476: END IF;
1477: --
1478: l_internal_party_id := csi_datastructures_pub.g_install_param_rec.internal_party_id;
1479: --
1483: RAISE FND_API.G_EXC_ERROR;
1484: END IF;
1485:
1486: -- Begin Add Code for Siebel Genesis Project
1487: csi_gen_utility_pvt.put_line('Inside CSI_ITEM_INSTANCE_PUB.Update_Item_Instance');
1488: csi_gen_utility_pvt.put_line('p_instance_rec = '||to_char(p_instance_rec.instance_id));
1489: -- End Add Code for Siebel Genesis Project
1490:
1491: --Added for MACD lock functionality
1484: END IF;
1485:
1486: -- Begin Add Code for Siebel Genesis Project
1487: csi_gen_utility_pvt.put_line('Inside CSI_ITEM_INSTANCE_PUB.Update_Item_Instance');
1488: csi_gen_utility_pvt.put_line('p_instance_rec = '||to_char(p_instance_rec.instance_id));
1489: -- End Add Code for Siebel Genesis Project
1490:
1491: --Added for MACD lock functionality
1492: IF NOT (csi_Item_Instance_Pvt.Anything_To_Update(p_instance_rec => p_instance_rec ))
1515: -- End addition for MACD lock functionality
1516: -- Call Pre Customer User Hook
1517: BEGIN
1518: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
1519: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre ..');
1520: CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre
1521: (
1522: p_api_version => 1.0
1523: ,p_commit => fnd_api.g_false
1543: WHILE l_msg_count > 0 LOOP
1544: x_msg_data := FND_MSG_PUB.GET
1545: ( l_msg_index,
1546: FND_API.G_FALSE );
1547: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre API ');
1548: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1549: l_msg_index := l_msg_index + 1;
1550: l_msg_count := l_msg_count - 1;
1551: END LOOP;
1544: x_msg_data := FND_MSG_PUB.GET
1545: ( l_msg_index,
1546: FND_API.G_FALSE );
1547: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Pre API ');
1548: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1549: l_msg_index := l_msg_index + 1;
1550: l_msg_count := l_msg_count - 1;
1551: END LOOP;
1552: RAISE FND_API.G_EXC_ERROR;
1555: END IF;
1556:
1557: EXCEPTION
1558: WHEN OTHERS THEN
1559: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Pre Customer');
1560: RAISE FND_API.G_EXC_ERROR;
1561: END;
1562: --
1563: -- Call Pre Vertical user Hook
1562: --
1563: -- Call Pre Vertical user Hook
1564: BEGIN
1565: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
1566: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre ..');
1567: CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre
1568: (
1569: p_api_version => 1.0
1570: ,p_commit => fnd_api.g_false
1590: WHILE l_msg_count > 0 LOOP
1591: x_msg_data := FND_MSG_PUB.GET
1592: ( l_msg_index,
1593: FND_API.G_FALSE );
1594: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre API ');
1595: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1596: l_msg_index := l_msg_index + 1;
1597: l_msg_count := l_msg_count - 1;
1598: END LOOP;
1591: x_msg_data := FND_MSG_PUB.GET
1592: ( l_msg_index,
1593: FND_API.G_FALSE );
1594: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Pre API ');
1595: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1596: l_msg_index := l_msg_index + 1;
1597: l_msg_count := l_msg_count - 1;
1598: END LOOP;
1599: RAISE FND_API.G_EXC_ERROR;
1600: END IF;
1601: END IF;
1602: EXCEPTION
1603: WHEN OTHERS THEN
1604: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Pre Vertical');
1605: RAISE FND_API.G_EXC_ERROR;
1606: END;
1607: -- End of PRE User Hooks
1608: --
1631: -- bug 2972082
1632: IF p_instance_rec.cascade_ownership_flag IS NOT NULL AND
1633: p_instance_rec.cascade_ownership_flag='Y'
1634: THEN
1635: csi_gen_utility_pvt.put_line('Cascade_ownership_flag :'||p_instance_rec.cascade_ownership_flag);
1636: IF p_party_tbl.count > 0
1637: THEN
1638: FOR l_party_rec IN p_party_tbl.FIRST .. p_party_tbl.LAST
1639: LOOP
1669: END IF;
1670: END LOOP;
1671: IF NOT(l_found)
1672: THEN
1673: csi_gen_utility_pvt.put_line('Owner party or account information is not passed for the instance');
1674: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1675: RAISE FND_API.G_EXC_ERROR;
1676: END IF;
1677: ELSE
1670: END LOOP;
1671: IF NOT(l_found)
1672: THEN
1673: csi_gen_utility_pvt.put_line('Owner party or account information is not passed for the instance');
1674: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1675: RAISE FND_API.G_EXC_ERROR;
1676: END IF;
1677: ELSE
1678: -- Since party information is not passed so I need to build the party and account
1704:
1705: EXCEPTION
1706: WHEN OTHERS
1707: THEN
1708: csi_gen_utility_pvt.put_line('Owner party information not found for the instance');
1709: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1710: RAISE FND_API.G_EXC_ERROR;
1711: END;
1712:
1705: EXCEPTION
1706: WHEN OTHERS
1707: THEN
1708: csi_gen_utility_pvt.put_line('Owner party information not found for the instance');
1709: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership.');
1710: RAISE FND_API.G_EXC_ERROR;
1711: END;
1712:
1713:
1738: p_account_tbl:=l_cascade_account_tbl;
1739: END IF;
1740: EXCEPTION
1741: WHEN OTHERS THEN
1742: csi_gen_utility_pvt.put_line('Owner account information not found for the instance');
1743: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership');
1744: RAISE FND_API.G_EXC_ERROR;
1745: END;
1746: END IF; -- End of building account record.
1739: END IF;
1740: EXCEPTION
1741: WHEN OTHERS THEN
1742: csi_gen_utility_pvt.put_line('Owner account information not found for the instance');
1743: csi_gen_utility_pvt.put_line(',which you are trying to cascade the ownership');
1744: RAISE FND_API.G_EXC_ERROR;
1745: END;
1746: END IF; -- End of building account record.
1747: END IF; -- End of party building party record.
1819: IF p_account_tbl.EXISTS(acct_rec) THEN
1820: IF p_account_tbl(acct_rec).parent_tbl_index = l_party_slot AND
1821: p_account_tbl(acct_rec).relationship_type_code = 'OWNER' THEN
1822: l_new_instance_rec.call_contracts := FND_API.G_FALSE; -- since p_instance_rec is IN parameter
1823: csi_gen_utility_pvt.put_line('Instance Rec Call contracts set to FALSE');
1824: exit;
1825: END IF;
1826: END IF;
1827: END LOOP;
1842: p_party_tbl(party_rec).party_id = l_internal_party_id THEN
1843: l_new_instance_rec.call_contracts := FND_API.G_FALSE; -- since p_instance_rec is IN parameter
1844: -- Added
1845: l_new_instance_rec.owner_party_id:=p_party_tbl(party_rec).party_id;
1846: csi_gen_utility_pvt.put_line('Instance Rec Call contracts set to FALSE');
1847: exit;
1848: END IF;
1849: END IF;
1850: END LOOP;
1909: WHILE l_msg_count > 0 LOOP
1910: x_msg_data := FND_MSG_PUB.GET
1911: ( l_msg_index,
1912: FND_API.G_FALSE );
1913: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
1914: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1915: l_msg_index := l_msg_index + 1;
1916: l_msg_count := l_msg_count - 1;
1917: END LOOP;
1910: x_msg_data := FND_MSG_PUB.GET
1911: ( l_msg_index,
1912: FND_API.G_FALSE );
1913: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
1914: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1915: l_msg_index := l_msg_index + 1;
1916: l_msg_count := l_msg_count - 1;
1917: END LOOP;
1918: RAISE FND_API.G_EXC_ERROR;
1950: x_msg_data := FND_MSG_PUB.GET
1951: ( l_msg_index,
1952: FND_API.G_FALSE
1953: );
1954: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1955: l_msg_index := l_msg_index + 1;
1956: l_msg_count := l_msg_count - 1;
1957: END LOOP;
1958: RAISE FND_API.G_EXC_ERROR;
1994: x_msg_data := FND_MSG_PUB.GET
1995: ( l_msg_index,
1996: FND_API.G_FALSE
1997: );
1998: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
1999: l_msg_index := l_msg_index + 1;
2000: l_msg_count := l_msg_count - 1;
2001: END LOOP;
2002: FND_MSG_PUB.Count_And_Get
2010: x_msg_data := FND_MSG_PUB.GET
2011: ( l_msg_index,
2012: FND_API.G_FALSE
2013: );
2014: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2015: l_msg_index := l_msg_index + 1;
2016: l_msg_count := l_msg_count - 1;
2017: END LOOP;
2018: RAISE FND_API.G_EXC_ERROR;
2025: -- Call Post Customer User Hook
2026: BEGIN
2027:
2028: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
2029: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post ..');
2030: CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post
2031: (
2032: p_api_version => 1.0
2033: ,p_commit => fnd_api.g_false
2053: WHILE l_msg_count > 0 LOOP
2054: x_msg_data := FND_MSG_PUB.GET
2055: ( l_msg_index,
2056: FND_API.G_FALSE );
2057: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post API ');
2058: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2059: l_msg_index := l_msg_index + 1;
2060: l_msg_count := l_msg_count - 1;
2061: END LOOP;
2054: x_msg_data := FND_MSG_PUB.GET
2055: ( l_msg_index,
2056: FND_API.G_FALSE );
2057: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Update_Item_Instance_Post API ');
2058: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2059: l_msg_index := l_msg_index + 1;
2060: l_msg_count := l_msg_count - 1;
2061: END LOOP;
2062: RAISE FND_API.G_EXC_ERROR;
2064: END IF;
2065:
2066: EXCEPTION
2067: WHEN OTHERS THEN
2068: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Post Customer');
2069: RAISE FND_API.G_EXC_ERROR;
2070: END;
2071: --
2072: x_return_status := l_tmp_return_status;
2263: LOOP
2264: x_msg_data := FND_MSG_PUB.GET
2265: ( l_msg_index,
2266: FND_API.G_FALSE );
2267: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2268: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2269: l_msg_index := l_msg_index + 1;
2270: l_msg_count := l_msg_count - 1;
2271: END LOOP;
2264: x_msg_data := FND_MSG_PUB.GET
2265: ( l_msg_index,
2266: FND_API.G_FALSE );
2267: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2268: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2269: l_msg_index := l_msg_index + 1;
2270: l_msg_count := l_msg_count - 1;
2271: END LOOP;
2272: RAISE FND_API.G_EXC_ERROR;
2335: WHILE l_msg_count > 0 LOOP
2336: x_msg_data := FND_MSG_PUB.GET
2337: ( l_msg_index,
2338: FND_API.G_FALSE );
2339: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2340: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2341: l_msg_index := l_msg_index + 1;
2342: l_msg_count := l_msg_count - 1;
2343: END LOOP;
2336: x_msg_data := FND_MSG_PUB.GET
2337: ( l_msg_index,
2338: FND_API.G_FALSE );
2339: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2340: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2341: l_msg_index := l_msg_index + 1;
2342: l_msg_count := l_msg_count - 1;
2343: END LOOP;
2344: RAISE FND_API.G_EXC_ERROR;
2368: WHILE l_msg_count > 0 LOOP
2369: x_msg_data := FND_MSG_PUB.GET
2370: ( l_msg_index,
2371: FND_API.G_FALSE );
2372: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2373: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2374: l_msg_index := l_msg_index + 1;
2375: l_msg_count := l_msg_count - 1;
2376: END LOOP;
2369: x_msg_data := FND_MSG_PUB.GET
2370: ( l_msg_index,
2371: FND_API.G_FALSE );
2372: csi_gen_utility_pvt.put_line('Error from CSI_PARTY_RELATIONSHIPS_PUB.. ');
2373: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2374: l_msg_index := l_msg_index + 1;
2375: l_msg_count := l_msg_count - 1;
2376: END LOOP;
2377: RAISE FND_API.G_EXC_ERROR;
2454: WHILE l_msg_count > 0 LOOP
2455: x_msg_data := FND_MSG_PUB.GET
2456: ( l_msg_index,
2457: FND_API.G_FALSE );
2458: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
2459: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2460: l_msg_index := l_msg_index + 1;
2461: l_msg_count := l_msg_count - 1;
2462: END LOOP;
2455: x_msg_data := FND_MSG_PUB.GET
2456: ( l_msg_index,
2457: FND_API.G_FALSE );
2458: csi_gen_utility_pvt.put_line( ' Error from CSI_ORGANIZATION_UNIT_PUB..');
2459: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2460: l_msg_index := l_msg_index + 1;
2461: l_msg_count := l_msg_count - 1;
2462: END LOOP;
2463: RAISE FND_API.G_EXC_ERROR;
2508: WHILE l_msg_count > 0 LOOP
2509: x_msg_data := FND_MSG_PUB.GET
2510: ( l_msg_index,
2511: FND_API.G_FALSE );
2512: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
2513: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2514: l_msg_index := l_msg_index + 1;
2515: l_msg_count := l_msg_count - 1;
2516: END LOOP;
2509: x_msg_data := FND_MSG_PUB.GET
2510: ( l_msg_index,
2511: FND_API.G_FALSE );
2512: csi_gen_utility_pvt.put_line( ' Error from CSI_PRICING_ATTRIBS_PUB..');
2513: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2514: l_msg_index := l_msg_index + 1;
2515: l_msg_count := l_msg_count - 1;
2516: END LOOP;
2517: RAISE FND_API.G_EXC_ERROR;
2570: WHILE l_msg_count > 0 LOOP
2571: x_msg_data := FND_MSG_PUB.GET
2572: ( l_msg_index,
2573: FND_API.G_FALSE );
2574: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2575: l_msg_index := l_msg_index + 1;
2576: l_msg_count := l_msg_count - 1;
2577: END LOOP;
2578: RAISE FND_API.G_EXC_ERROR;
2630: WHILE l_msg_count > 0 LOOP
2631: x_msg_data := FND_MSG_PUB.GET
2632: ( l_msg_index,
2633: FND_API.G_FALSE );
2634: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2635: l_msg_index := l_msg_index + 1;
2636: l_msg_count := l_msg_count - 1;
2637: END LOOP;
2638: RAISE FND_API.G_EXC_ERROR;
2663: AND (p_instance_rec.config_inst_item_id IS NOT NULL AND p_instance_rec.config_inst_item_id <> fnd_api.g_miss_num)
2664: AND (l_old_ins_csr.config_inst_item_id <> p_instance_rec.config_inst_item_id) )
2665: THEN
2666: l_no_config_keys:=TRUE;
2667: csi_gen_utility_pvt.put_line( 'Config keys were not provided. So no batch validation will be performed');
2668: END IF;
2669:
2670: IF NOT l_no_config_keys
2671: THEN
2720:
2721: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2722: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
2723: FND_MSG_PUB.Add;
2724: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
2725: RAISE FND_API.G_EXC_ERROR;
2726: END IF;
2727: END IF;
2728:
2792: WHILE l_msg_count > 0 LOOP
2793: x_msg_data := FND_MSG_PUB.GET
2794: ( l_msg_index,
2795: FND_API.G_FALSE );
2796: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2797: csi_gen_utility_pvt.put_line( 'while updating config status');
2798: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2799: l_msg_index := l_msg_index + 1;
2800: l_msg_count := l_msg_count - 1;
2793: x_msg_data := FND_MSG_PUB.GET
2794: ( l_msg_index,
2795: FND_API.G_FALSE );
2796: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2797: csi_gen_utility_pvt.put_line( 'while updating config status');
2798: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2799: l_msg_index := l_msg_index + 1;
2800: l_msg_count := l_msg_count - 1;
2801: END LOOP;
2794: ( l_msg_index,
2795: FND_API.G_FALSE );
2796: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2797: csi_gen_utility_pvt.put_line( 'while updating config status');
2798: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2799: l_msg_index := l_msg_index + 1;
2800: l_msg_count := l_msg_count - 1;
2801: END LOOP;
2802: RAISE FND_API.G_EXC_ERROR;
2843: WHILE l_msg_count > 0 LOOP
2844: x_msg_data := FND_MSG_PUB.GET
2845: ( l_msg_index,
2846: FND_API.G_FALSE );
2847: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2848: csi_gen_utility_pvt.put_line( 'while updating config status');
2849: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2850: l_msg_index := l_msg_index + 1;
2851: l_msg_count := l_msg_count - 1;
2844: x_msg_data := FND_MSG_PUB.GET
2845: ( l_msg_index,
2846: FND_API.G_FALSE );
2847: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2848: csi_gen_utility_pvt.put_line( 'while updating config status');
2849: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2850: l_msg_index := l_msg_index + 1;
2851: l_msg_count := l_msg_count - 1;
2852: END LOOP;
2845: ( l_msg_index,
2846: FND_API.G_FALSE );
2847: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2848: csi_gen_utility_pvt.put_line( 'while updating config status');
2849: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2850: l_msg_index := l_msg_index + 1;
2851: l_msg_count := l_msg_count - 1;
2852: END LOOP;
2853: RAISE FND_API.G_EXC_ERROR;
2913: WHILE l_msg_count > 0 LOOP
2914: x_msg_data := FND_MSG_PUB.GET
2915: ( l_msg_index,
2916: FND_API.G_FALSE );
2917: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2919: l_msg_index := l_msg_index + 1;
2920: l_msg_count := l_msg_count - 1;
2921: END LOOP;
2914: x_msg_data := FND_MSG_PUB.GET
2915: ( l_msg_index,
2916: FND_API.G_FALSE );
2917: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
2918: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
2919: l_msg_index := l_msg_index + 1;
2920: l_msg_count := l_msg_count - 1;
2921: END LOOP;
2922: RAISE FND_API.G_EXC_ERROR;
3108: x_msg_data := FND_MSG_PUB.GET
3109: ( l_msg_index,
3110: FND_API.G_FALSE
3111: );
3112: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3113: l_msg_index := l_msg_index + 1;
3114: l_msg_count := l_msg_count - 1;
3115: END LOOP;
3116: RAISE FND_API.G_EXC_ERROR;
3121: --
3122: x_return_status := l_tmp_return_status;
3123: --
3124: IF px_oks_txn_inst_tbl.count > 0 THEN
3125: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3126: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3127: --
3128: IF p_txn_rec.transaction_type_id = 3 THEN
3129: l_batch_id := p_txn_rec.source_header_ref_id;
3122: x_return_status := l_tmp_return_status;
3123: --
3124: IF px_oks_txn_inst_tbl.count > 0 THEN
3125: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3126: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3127: --
3128: IF p_txn_rec.transaction_type_id = 3 THEN
3129: l_batch_id := p_txn_rec.source_header_ref_id;
3130: l_batch_type := p_txn_rec.source_group_ref;
3157: x_msg_data := FND_MSG_PUB.GET
3158: ( l_msg_index,
3159: FND_API.G_FALSE
3160: );
3161: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3162: l_msg_index := l_msg_index + 1;
3163: l_msg_count := l_msg_count - 1;
3164: END LOOP;
3165: FND_MSG_PUB.Count_And_Get
3172: WHILE l_msg_count > 0 LOOP
3173: x_msg_data := FND_MSG_PUB.GET
3174: ( l_msg_index,
3175: FND_API.G_FALSE );
3176: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3177: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3178: l_msg_index := l_msg_index + 1;
3179: l_msg_count := l_msg_count - 1;
3180: END LOOP;
3173: x_msg_data := FND_MSG_PUB.GET
3174: ( l_msg_index,
3175: FND_API.G_FALSE );
3176: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3177: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3178: l_msg_index := l_msg_index + 1;
3179: l_msg_count := l_msg_count - 1;
3180: END LOOP;
3181: RAISE FND_API.G_EXC_ERROR;
3202: -- Call Post Vertical user Hook
3203: BEGIN
3204:
3205: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
3206: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post ..');
3207: CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post
3208: (
3209: p_api_version => 1.0
3210: ,p_commit => fnd_api.g_false
3230: WHILE l_msg_count > 0 LOOP
3231: x_msg_data := FND_MSG_PUB.GET
3232: ( l_msg_index,
3233: FND_API.G_FALSE );
3234: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post API ');
3235: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3236: l_msg_index := l_msg_index + 1;
3237: l_msg_count := l_msg_count - 1;
3238: END LOOP;
3231: x_msg_data := FND_MSG_PUB.GET
3232: ( l_msg_index,
3233: FND_API.G_FALSE );
3234: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Update_Item_Instance_Post API ');
3235: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3236: l_msg_index := l_msg_index + 1;
3237: l_msg_count := l_msg_count - 1;
3238: END LOOP;
3239: RAISE FND_API.G_EXC_ERROR;
3241: END IF;
3242:
3243: EXCEPTION
3244: WHEN OTHERS THEN
3245: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Update Post Vertical');
3246: RAISE FND_API.G_EXC_ERROR;
3247: END;
3248: x_return_status := l_tmp_return_status;
3249: -- End of POST User Hooks
3249: -- End of POST User Hooks
3250: --
3251:
3252: -- Begin Add Code for Siebel Genesis Project
3253: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3254: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3255: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3256:
3257: l_instance_id := p_instance_rec.instance_id;
3250: --
3251:
3252: -- Begin Add Code for Siebel Genesis Project
3253: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3254: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3255: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3256:
3257: l_instance_id := p_instance_rec.instance_id;
3258: IF (l_instance_id = NULL OR l_instance_id = FND_API.G_MISS_NUM) THEN
3251:
3252: -- Begin Add Code for Siebel Genesis Project
3253: csi_gen_utility_pvt.put_line('Source code = '||l_instance_csr.source_code);
3254: csi_gen_utility_pvt.put_line('p_instance_rec.instance_id = '||to_char(p_instance_rec.instance_id));
3255: csi_gen_utility_pvt.put_line('p_instance_rec.source_code = '||p_instance_rec.source_code);
3256:
3257: l_instance_id := p_instance_rec.instance_id;
3258: IF (l_instance_id = NULL OR l_instance_id = FND_API.G_MISS_NUM) THEN
3259: IF p_party_tbl.count > 0 THEN
3270: WHEN OTHERS THEN NULL;
3271: END;
3272:
3273: IF l_raise_bes_event = 'Y' THEN
3274: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3275: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3276: csi_gen_utility_pvt.put_line('Before calling update instance event');
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3271: END;
3272:
3273: IF l_raise_bes_event = 'Y' THEN
3274: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3275: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3276: csi_gen_utility_pvt.put_line('Before calling update instance event');
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3279: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3272:
3273: IF l_raise_bes_event = 'Y' THEN
3274: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3275: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3276: csi_gen_utility_pvt.put_line('Before calling update instance event');
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3279: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3280: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
3274: csi_gen_utility_pvt.put_line('l_internal_party_id = '||to_char(l_internal_party_id));
3275: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3276: csi_gen_utility_pvt.put_line('Before calling update instance event');
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3279: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3280: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
3281: csi_gen_utility_pvt.put_line('Calling Update Instance Event');
3282: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
3275: csi_gen_utility_pvt.put_line('l_owner_party_id = '||to_char(l_owner_party_id));
3276: csi_gen_utility_pvt.put_line('Before calling update instance event');
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3279: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3280: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
3281: csi_gen_utility_pvt.put_line('Calling Update Instance Event');
3282: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
3283: (p_api_version => p_api_version
3277: IF (l_internal_party_id <> l_owner_party_id OR p_txn_rec.transaction_type_id IN (53,54)) THEN
3278: csi_gen_utility_pvt.put_line('Before last_oe_order_line_id');
3279: csi_gen_utility_pvt.put_line('last_oe_order_line_id = '||to_char(p_instance_rec.last_oe_order_line_id));
3280: IF (p_instance_rec.last_oe_order_line_id IS NULL OR p_instance_rec.last_oe_order_line_id = fnd_api.g_miss_num) THEN
3281: csi_gen_utility_pvt.put_line('Calling Update Instance Event');
3282: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
3283: (p_api_version => p_api_version
3284: ,p_commit => fnd_api.g_false
3285: ,p_init_msg_list => p_init_msg_list
3298: WHILE l_msg_count > 0 LOOP
3299: x_msg_data := FND_MSG_PUB.GET
3300: (l_msg_index,
3301: FND_API.G_FALSE );
3302: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3303: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3304: l_msg_index := l_msg_index + 1;
3305: l_msg_count := l_msg_count - 1;
3306: END LOOP;
3299: x_msg_data := FND_MSG_PUB.GET
3300: (l_msg_index,
3301: FND_API.G_FALSE );
3302: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3303: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3304: l_msg_index := l_msg_index + 1;
3305: l_msg_count := l_msg_count - 1;
3306: END LOOP;
3307: RAISE FND_API.G_EXC_ERROR;
3306: END LOOP;
3307: RAISE FND_API.G_EXC_ERROR;
3308: END IF;
3309: ELSIF (p_instance_rec.last_oe_order_line_id IS NOT NULL or p_instance_rec.last_oe_order_line_id <> fnd_api.g_miss_num) THEN
3310: csi_gen_utility_pvt.put_line('Before link to line id');
3311: BEGIN
3312: SELECT link_to_line_id, item_type_code
3313: INTO l_link_to_line_id, l_item_type_code
3314: FROM oe_order_lines_all
3319: l_item_type_code := null;
3320: END;
3321:
3322: IF l_link_to_line_id is null and l_item_type_code = 'STANDARD' THEN
3323: csi_gen_utility_pvt.put_line('It is standard calling update instance event');
3324: CSI_BUSINESS_EVENT_PVT.UPDATE_INSTANCE_EVENT
3325: (p_api_version => p_api_version
3326: ,p_commit => fnd_api.g_false
3327: ,p_init_msg_list => p_init_msg_list
3340: WHILE l_msg_count > 0 LOOP
3341: x_msg_data := FND_MSG_PUB.GET
3342: (l_msg_index,
3343: FND_API.G_FALSE );
3344: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3345: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3346: l_msg_index := l_msg_index + 1;
3347: l_msg_count := l_msg_count - 1;
3348: END LOOP;
3341: x_msg_data := FND_MSG_PUB.GET
3342: (l_msg_index,
3343: FND_API.G_FALSE );
3344: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3345: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3346: l_msg_index := l_msg_index + 1;
3347: l_msg_count := l_msg_count - 1;
3348: END LOOP;
3349: RAISE FND_API.G_EXC_ERROR;
3348: END LOOP;
3349: RAISE FND_API.G_EXC_ERROR;
3350: END IF;
3351: ELSE
3352: csi_gen_utility_pvt.put_line(' Not standard it is in configuration');
3353: -- Check if relationships is already been built then allow update
3354: BEGIN
3355: SELECT 'Y',subject_id,object_id,relationship_type_code
3356: INTO l_relationship_exists,l_subject_id,l_object_id,l_relationship_type_code
3365: WHEN TOO_MANY_ROWS THEN
3366: l_relationship_exists := 'Y';
3367: END;
3368:
3369: csi_gen_utility_pvt.put_line('l_relationship_exists = '||l_relationship_exists);
3370: IF l_relationship_exists = 'Y' THEN
3371: csi_gen_utility_pvt.put_line('In relationships, therefore raise the update instance event');
3372: csi_gen_utility_pvt.put_line('The Subject Id '||l_subject_id);
3373: csi_gen_utility_pvt.put_line('The Object Id '||l_object_id);
3367: END;
3368:
3369: csi_gen_utility_pvt.put_line('l_relationship_exists = '||l_relationship_exists);
3370: IF l_relationship_exists = 'Y' THEN
3371: csi_gen_utility_pvt.put_line('In relationships, therefore raise the update instance event');
3372: csi_gen_utility_pvt.put_line('The Subject Id '||l_subject_id);
3373: csi_gen_utility_pvt.put_line('The Object Id '||l_object_id);
3374: csi_gen_utility_pvt.put_line('The relationship_type_code '||l_relationship_type_code);
3375:
3368:
3369: csi_gen_utility_pvt.put_line('l_relationship_exists = '||l_relationship_exists);
3370: IF l_relationship_exists = 'Y' THEN
3371: csi_gen_utility_pvt.put_line('In relationships, therefore raise the update instance event');
3372: csi_gen_utility_pvt.put_line('The Subject Id '||l_subject_id);
3373: csi_gen_utility_pvt.put_line('The Object Id '||l_object_id);
3374: csi_gen_utility_pvt.put_line('The relationship_type_code '||l_relationship_type_code);
3375:
3376: l_root_asset_id := csi_ii_relationships_pvt.Get_Root_Parent(l_subject_id,
3369: csi_gen_utility_pvt.put_line('l_relationship_exists = '||l_relationship_exists);
3370: IF l_relationship_exists = 'Y' THEN
3371: csi_gen_utility_pvt.put_line('In relationships, therefore raise the update instance event');
3372: csi_gen_utility_pvt.put_line('The Subject Id '||l_subject_id);
3373: csi_gen_utility_pvt.put_line('The Object Id '||l_object_id);
3374: csi_gen_utility_pvt.put_line('The relationship_type_code '||l_relationship_type_code);
3375:
3376: l_root_asset_id := csi_ii_relationships_pvt.Get_Root_Parent(l_subject_id,
3377: l_relationship_type_code,
3370: IF l_relationship_exists = 'Y' THEN
3371: csi_gen_utility_pvt.put_line('In relationships, therefore raise the update instance event');
3372: csi_gen_utility_pvt.put_line('The Subject Id '||l_subject_id);
3373: csi_gen_utility_pvt.put_line('The Object Id '||l_object_id);
3374: csi_gen_utility_pvt.put_line('The relationship_type_code '||l_relationship_type_code);
3375:
3376: l_root_asset_id := csi_ii_relationships_pvt.Get_Root_Parent(l_subject_id,
3377: l_relationship_type_code,
3378: l_object_id);
3396: WHILE l_msg_count > 0 LOOP
3397: x_msg_data := FND_MSG_PUB.GET
3398: (l_msg_index,
3399: FND_API.G_FALSE );
3400: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3401: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3402: l_msg_index := l_msg_index + 1;
3403: l_msg_count := l_msg_count - 1;
3404: END LOOP;
3397: x_msg_data := FND_MSG_PUB.GET
3398: (l_msg_index,
3399: FND_API.G_FALSE );
3400: csi_gen_utility_pvt.put_line('Error from CSI_BUSINESS_EVENT.UPDATE_INSTANCE_EVENT');
3401: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3402: l_msg_index := l_msg_index + 1;
3403: l_msg_count := l_msg_count - 1;
3404: END LOOP;
3405: RAISE FND_API.G_EXC_ERROR;
3564: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
3565:
3566: -- If debug_level = 1 then dump the procedure name
3567: IF (l_debug_level > 0) THEN
3568: csi_gen_utility_pvt.put_line( 'expire_item_instance');
3569: END IF;
3570:
3571: -- If the debug level = 2 then dump all the parameters values.
3572: IF (l_debug_level > 1) THEN
3569: END IF;
3570:
3571: -- If the debug level = 2 then dump all the parameters values.
3572: IF (l_debug_level > 1) THEN
3573: csi_gen_utility_pvt.put_line( 'expire_item_instance:' ||
3574: p_api_version ||'-'||
3575: p_commit ||'-'||
3576: p_init_msg_list ||'-'||
3577: p_validation_level );
3575: p_commit ||'-'||
3576: p_init_msg_list ||'-'||
3577: p_validation_level );
3578: -- Dump the records in the log file
3579: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
3580: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3581: END IF;
3582: /***** srramakr commented for bug # 3304439
3583: -- Check for the profile option and enable trace
3576: p_init_msg_list ||'-'||
3577: p_validation_level );
3578: -- Dump the records in the log file
3579: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
3580: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3581: END IF;
3582: /***** srramakr commented for bug # 3304439
3583: -- Check for the profile option and enable trace
3584: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
3580: csi_gen_utility_pvt.dump_instance_rec(p_instance_rec);
3581: END IF;
3582: /***** srramakr commented for bug # 3304439
3583: -- Check for the profile option and enable trace
3584: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
3585: -- End enable trace
3586: ****/
3587: -- Start API body
3588: --
3588: --
3589: -- Call Pre Customer User Hook
3590: BEGIN
3591: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'C' ) THEN
3592: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre ..');
3593: CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre
3594: (
3595: p_api_version => 1.0
3596: ,p_commit => fnd_api.g_false
3610: WHILE l_msg_count > 0 LOOP
3611: x_msg_data := FND_MSG_PUB.GET
3612: ( l_msg_index,
3613: FND_API.G_FALSE );
3614: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre API ');
3615: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3616: l_msg_index := l_msg_index + 1;
3617: l_msg_count := l_msg_count - 1;
3618: END LOOP;
3611: x_msg_data := FND_MSG_PUB.GET
3612: ( l_msg_index,
3613: FND_API.G_FALSE );
3614: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Pre API ');
3615: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3616: l_msg_index := l_msg_index + 1;
3617: l_msg_count := l_msg_count - 1;
3618: END LOOP;
3619: RAISE FND_API.G_EXC_ERROR;
3620: END IF;
3621: END IF;
3622: EXCEPTION
3623: WHEN OTHERS THEN
3624: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Pre Customer');
3625: RAISE FND_API.G_EXC_ERROR;
3626: END;
3627: --
3628: -- Call Pre Vertical User Hook
3627: --
3628: -- Call Pre Vertical User Hook
3629: BEGIN
3630: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'B', 'V' ) THEN
3631: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre ..');
3632: CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre
3633: (
3634: p_api_version => 1.0
3635: ,p_commit => fnd_api.g_false
3649: WHILE l_msg_count > 0 LOOP
3650: x_msg_data := FND_MSG_PUB.GET
3651: ( l_msg_index,
3652: FND_API.G_FALSE );
3653: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre API ');
3654: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3655: l_msg_index := l_msg_index + 1;
3656: l_msg_count := l_msg_count - 1;
3657: END LOOP;
3650: x_msg_data := FND_MSG_PUB.GET
3651: ( l_msg_index,
3652: FND_API.G_FALSE );
3653: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Pre API ');
3654: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3655: l_msg_index := l_msg_index + 1;
3656: l_msg_count := l_msg_count - 1;
3657: END LOOP;
3658: RAISE FND_API.G_EXC_ERROR;
3659: END IF;
3660: END IF;
3661: EXCEPTION
3662: WHEN OTHERS THEN
3663: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Pre Vertical');
3664: RAISE FND_API.G_EXC_ERROR;
3665: END;
3666: -- End PRE User Hooks
3667: --
3687: x_msg_data := FND_MSG_PUB.GET(
3688: l_msg_index,
3689: FND_API.G_FALSE
3690: );
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: END IF;
3696: --
3697: -- Call Post Customer User Hook
3698: BEGIN
3699: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'C' ) THEN
3700: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post ..');
3701: CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post
3702: (
3703: p_api_version => 1.0
3704: ,p_commit => fnd_api.g_false
3718: WHILE l_msg_count > 0 LOOP
3719: x_msg_data := FND_MSG_PUB.GET
3720: ( l_msg_index,
3721: FND_API.G_FALSE );
3722: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post API ');
3723: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3724: l_msg_index := l_msg_index + 1;
3725: l_msg_count := l_msg_count - 1;
3726: END LOOP;
3719: x_msg_data := FND_MSG_PUB.GET
3720: ( l_msg_index,
3721: FND_API.G_FALSE );
3722: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Expire_Item_Instance_Post API ');
3723: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3724: l_msg_index := l_msg_index + 1;
3725: l_msg_count := l_msg_count - 1;
3726: END LOOP;
3727: RAISE FND_API.G_EXC_ERROR;
3728: END IF;
3729: END IF;
3730: EXCEPTION
3731: WHEN OTHERS THEN
3732: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Post Customer');
3733: RAISE FND_API.G_EXC_ERROR;
3734: END;
3735: --
3736:
3745: AND (p_instance_rec.config_inst_item_id IS NULL OR p_instance_rec.config_inst_item_id = fnd_api.g_miss_num)
3746: )
3747: THEN
3748: l_no_config_keys:=TRUE;
3749: csi_gen_utility_pvt.put_line( 'Config keys were not provided. So no batch validation will be performed');
3750: END IF;
3751:
3752: IF NOT l_no_config_keys
3753: THEN
3802:
3803: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3804: FND_MESSAGE.SET_NAME('CSI','CSI_CONFIG_ERROR');
3805: FND_MSG_PUB.Add;
3806: csi_gen_utility_pvt.put_line('Call to batch validation has errored ');
3807: RAISE FND_API.G_EXC_ERROR;
3808: END IF;
3809: END IF;
3810: -- Commenting the following code in order to maintain status history.
3874: WHILE l_msg_count > 0 LOOP
3875: x_msg_data := FND_MSG_PUB.GET
3876: ( l_msg_index,
3877: FND_API.G_FALSE );
3878: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3879: csi_gen_utility_pvt.put_line( 'while updating config status');
3880: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3881: l_msg_index := l_msg_index + 1;
3882: l_msg_count := l_msg_count - 1;
3875: x_msg_data := FND_MSG_PUB.GET
3876: ( l_msg_index,
3877: FND_API.G_FALSE );
3878: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3879: csi_gen_utility_pvt.put_line( 'while updating config status');
3880: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3881: l_msg_index := l_msg_index + 1;
3882: l_msg_count := l_msg_count - 1;
3883: END LOOP;
3876: ( l_msg_index,
3877: FND_API.G_FALSE );
3878: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3879: csi_gen_utility_pvt.put_line( 'while updating config status');
3880: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3881: l_msg_index := l_msg_index + 1;
3882: l_msg_count := l_msg_count - 1;
3883: END LOOP;
3884: RAISE FND_API.G_EXC_ERROR;
3925: WHILE l_msg_count > 0 LOOP
3926: x_msg_data := FND_MSG_PUB.GET
3927: ( l_msg_index,
3928: FND_API.G_FALSE );
3929: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3930: csi_gen_utility_pvt.put_line( 'while updating config status');
3931: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3932: l_msg_index := l_msg_index + 1;
3933: l_msg_count := l_msg_count - 1;
3926: x_msg_data := FND_MSG_PUB.GET
3927: ( l_msg_index,
3928: FND_API.G_FALSE );
3929: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3930: csi_gen_utility_pvt.put_line( 'while updating config status');
3931: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3932: l_msg_index := l_msg_index + 1;
3933: l_msg_count := l_msg_count - 1;
3934: END LOOP;
3927: ( l_msg_index,
3928: FND_API.G_FALSE );
3929: csi_gen_utility_pvt.put_line( 'Error from UPDATE_ITEM_INSTANCE_PVT..');
3930: csi_gen_utility_pvt.put_line( 'while updating config status');
3931: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3932: l_msg_index := l_msg_index + 1;
3933: l_msg_count := l_msg_count - 1;
3934: END LOOP;
3935: RAISE FND_API.G_EXC_ERROR;
3940: END LOOP;
3941: END IF;
3942: -- End addition of changes for bug 3799694
3943: IF px_oks_txn_inst_tbl.count > 0 THEN
3944: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3945: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3946: --
3947: IF p_txn_rec.transaction_type_id = 3 THEN
3948: l_batch_id := p_txn_rec.source_header_ref_id;
3941: END IF;
3942: -- End addition of changes for bug 3799694
3943: IF px_oks_txn_inst_tbl.count > 0 THEN
3944: csi_gen_utility_pvt.dump_oks_txn_inst_tbl(px_oks_txn_inst_tbl);
3945: csi_gen_utility_pvt.put_line('Calling OKS Core API...');
3946: --
3947: IF p_txn_rec.transaction_type_id = 3 THEN
3948: l_batch_id := p_txn_rec.source_header_ref_id;
3949: l_batch_type := p_txn_rec.source_group_ref;
3975: WHILE l_msg_count > 0 LOOP
3976: x_msg_data := FND_MSG_PUB.GET
3977: ( l_msg_index,
3978: FND_API.G_FALSE );
3979: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3980: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3981: l_msg_index := l_msg_index + 1;
3982: l_msg_count := l_msg_count - 1;
3983: END LOOP;
3976: x_msg_data := FND_MSG_PUB.GET
3977: ( l_msg_index,
3978: FND_API.G_FALSE );
3979: csi_gen_utility_pvt.put_line( 'Error from OKS_IBINT_PUB.IB_interface..');
3980: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
3981: l_msg_index := l_msg_index + 1;
3982: l_msg_count := l_msg_count - 1;
3983: END LOOP;
3984: RAISE FND_API.G_EXC_ERROR;
4002: p_data => x_msg_data );
4003: -- Call Post Vertical User Hook
4004: BEGIN
4005: IF JTF_USR_HKS.Ok_to_execute(G_PKG_NAME, l_api_name, 'A', 'V' ) THEN
4006: csi_gen_utility_pvt.put_line('Calling CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post ..');
4007: CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post
4008: (
4009: p_api_version => 1.0
4010: ,p_commit => fnd_api.g_false
4024: WHILE l_msg_count > 0 LOOP
4025: x_msg_data := FND_MSG_PUB.GET
4026: ( l_msg_index,
4027: FND_API.G_FALSE );
4028: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post API ');
4029: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4030: l_msg_index := l_msg_index + 1;
4031: l_msg_count := l_msg_count - 1;
4032: END LOOP;
4025: x_msg_data := FND_MSG_PUB.GET
4026: ( l_msg_index,
4027: FND_API.G_FALSE );
4028: csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_VUHK.Expire_Item_Instance_Post API ');
4029: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4030: l_msg_index := l_msg_index + 1;
4031: l_msg_count := l_msg_count - 1;
4032: END LOOP;
4033: RAISE FND_API.G_EXC_ERROR;
4034: END IF;
4035: END IF;
4036: EXCEPTION
4037: WHEN OTHERS THEN
4038: csi_gen_utility_pvt.put_line('ERROR FROM JTF_USR_HKS.Ok_to_execute API Expire Post Vertical');
4039: RAISE FND_API.G_EXC_ERROR;
4040: END;
4041: -- End of POST User Hooks
4042:
4150: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4151:
4152: -- If debug_level = 1 then dump the procedure name
4153: IF (l_debug_level > 0) THEN
4154: csi_gen_utility_pvt.put_line( 'get_item_instances');
4155: END IF;
4156:
4157: -- If the debug level = 2 then dump all the parameters values.
4158: IF (l_debug_level > 1) THEN
4155: END IF;
4156:
4157: -- If the debug level = 2 then dump all the parameters values.
4158: IF (l_debug_level > 1) THEN
4159: csi_gen_utility_pvt.put_line( 'get_item_instances' ||
4160: p_api_version ||'-'||
4161: p_commit ||'-'||
4162: p_init_msg_list ||'-'||
4163: p_validation_level );
4161: p_commit ||'-'||
4162: p_init_msg_list ||'-'||
4163: p_validation_level );
4164: --dump the query records into a log file
4165: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4166: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4167: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4168: END IF;
4169:
4162: p_init_msg_list ||'-'||
4163: p_validation_level );
4164: --dump the query records into a log file
4165: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4166: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4167: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4168: END IF;
4169:
4170: /***** srramakr commented for bug # 3304439
4163: p_validation_level );
4164: --dump the query records into a log file
4165: csi_gen_utility_pvt.dump_instance_query_rec(p_instance_query_rec);
4166: csi_gen_utility_pvt.dump_party_query_rec(p_party_query_rec);
4167: csi_gen_utility_pvt.dump_account_query_rec(p_account_query_rec);
4168: END IF;
4169:
4170: /***** srramakr commented for bug # 3304439
4171: -- Check for the profile option and enable trace
4168: END IF;
4169:
4170: /***** srramakr commented for bug # 3304439
4171: -- Check for the profile option and enable trace
4172: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
4173: -- End enable trace
4174: ****/
4175: -- Start API body
4176:
4479: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4480:
4481: -- If debug_level = 1 then dump the procedure name
4482: IF (l_debug_level > 0) THEN
4483: csi_gen_utility_pvt.put_line( 'get_item_instance_details');
4484: END IF;
4485:
4486: -- If the debug level = 2 then dump all the parameters values.
4487: IF (l_debug_level > 1) THEN
4484: END IF;
4485:
4486: -- If the debug level = 2 then dump all the parameters values.
4487: IF (l_debug_level > 1) THEN
4488: csi_gen_utility_pvt.put_line( 'get_item_instance_details:' ||
4489: p_api_version ||'-'||
4490: p_commit ||'-'||
4491: p_init_msg_list ||'-'||
4492: p_validation_level );
4490: p_commit ||'-'||
4491: p_init_msg_list ||'-'||
4492: p_validation_level );
4493: --dump the queried records into a log file
4494: csi_gen_utility_pvt.dump_instance_header_rec(p_instance_rec);
4495: END IF;
4496:
4497: /***** srramakr commented for bug # 3304439
4498: -- Check for the profile option and enable trace
4495: END IF;
4496:
4497: /***** srramakr commented for bug # 3304439
4498: -- Check for the profile option and enable trace
4499: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
4500: -- End enable trace
4501: ****/
4502: -- Start API body
4503:
4550: IF ((l_last_purge_date IS NOT NULL) AND (p_time_stamp <= l_last_purge_date))
4551: THEN
4552: -- If the user is requesting the instance history before the purge date
4553: -- then display a warning message
4554: csi_gen_utility_pvt.put_line('Warning! History for this entity has already been purged for the datetime stamp passed. ' ||
4555: 'Please provide a valid datetime stamp.');
4556: FND_MESSAGE.Set_Name('CSI', 'CSI_API_HIST_AFTER_PURGE_REQ');
4557: FND_MESSAGE.Set_Token('LAST_PURGE_DATE', l_last_purge_date);
4558: FND_MSG_PUB.ADD;
4608: WHILE l_msg_count > 0 LOOP
4609: x_msg_data := FND_MSG_PUB.GET
4610: ( l_msg_index,
4611: FND_API.G_FALSE );
4612: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_relationships.. ');
4613: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4614: l_msg_index := l_msg_index + 1;
4615: l_msg_count := l_msg_count - 1;
4616: END LOOP;
4609: x_msg_data := FND_MSG_PUB.GET
4610: ( l_msg_index,
4611: FND_API.G_FALSE );
4612: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_relationships.. ');
4613: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4614: l_msg_index := l_msg_index + 1;
4615: l_msg_count := l_msg_count - 1;
4616: END LOOP;
4617: RAISE FND_API.G_EXC_ERROR;
4646: WHILE l_msg_count > 0 LOOP
4647: x_msg_data := FND_MSG_PUB.GET
4648: ( l_msg_index,
4649: FND_API.G_FALSE );
4650: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_accounts.. ');
4651: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4652: l_msg_index := l_msg_index + 1;
4653: l_msg_count := l_msg_count - 1;
4654: END LOOP;
4647: x_msg_data := FND_MSG_PUB.GET
4648: ( l_msg_index,
4649: FND_API.G_FALSE );
4650: csi_gen_utility_pvt.put_line( ' Error from csi_party_relationships_pub.get_inst_party_accounts.. ');
4651: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4652: l_msg_index := l_msg_index + 1;
4653: l_msg_count := l_msg_count - 1;
4654: END LOOP;
4655: RAISE FND_API.G_EXC_ERROR;
4696: WHILE l_msg_count > 0 LOOP
4697: x_msg_data := FND_MSG_PUB.GET
4698: ( l_msg_index,
4699: FND_API.G_FALSE );
4700: csi_gen_utility_pvt.put_line( ' Error from csi_organization_unit_pub.get_organization_unit.. ');
4701: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4702: l_msg_index := l_msg_index + 1;
4703: l_msg_count := l_msg_count - 1;
4704: END LOOP;
4697: x_msg_data := FND_MSG_PUB.GET
4698: ( l_msg_index,
4699: FND_API.G_FALSE );
4700: csi_gen_utility_pvt.put_line( ' Error from csi_organization_unit_pub.get_organization_unit.. ');
4701: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4702: l_msg_index := l_msg_index + 1;
4703: l_msg_count := l_msg_count - 1;
4704: END LOOP;
4705: RAISE FND_API.G_EXC_ERROR;
4728: WHILE l_msg_count > 0 LOOP
4729: x_msg_data := FND_MSG_PUB.GET
4730: ( l_msg_index,
4731: FND_API.G_FALSE );
4732: csi_gen_utility_pvt.put_line( ' Error from csi_pricing_attribs_pub.get_pricing_attribs.. ');
4733: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4734: l_msg_index := l_msg_index + 1;
4735: l_msg_count := l_msg_count - 1;
4736: END LOOP;
4729: x_msg_data := FND_MSG_PUB.GET
4730: ( l_msg_index,
4731: FND_API.G_FALSE );
4732: csi_gen_utility_pvt.put_line( ' Error from csi_pricing_attribs_pub.get_pricing_attribs.. ');
4733: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4734: l_msg_index := l_msg_index + 1;
4735: l_msg_count := l_msg_count - 1;
4736: END LOOP;
4737: RAISE FND_API.G_EXC_ERROR;
4761: WHILE l_msg_count > 0 LOOP
4762: x_msg_data := FND_MSG_PUB.GET
4763: ( l_msg_index,
4764: FND_API.G_FALSE );
4765: csi_gen_utility_pvt.put_line( ' Error from get_extended_attrib_values.. ');
4766: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4767: l_msg_index := l_msg_index + 1;
4768: l_msg_count := l_msg_count - 1;
4769: END LOOP;
4762: x_msg_data := FND_MSG_PUB.GET
4763: ( l_msg_index,
4764: FND_API.G_FALSE );
4765: csi_gen_utility_pvt.put_line( ' Error from get_extended_attrib_values.. ');
4766: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4767: l_msg_index := l_msg_index + 1;
4768: l_msg_count := l_msg_count - 1;
4769: END LOOP;
4770: RAISE FND_API.G_EXC_ERROR;
4794: WHILE l_msg_count > 0 LOOP
4795: x_msg_data := FND_MSG_PUB.GET
4796: ( l_msg_index,
4797: FND_API.G_FALSE );
4798: csi_gen_utility_pvt.put_line( ' Error from csi_asset_pvt.get_instance_assets.. ');
4799: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4800: l_msg_index := l_msg_index + 1;
4801: l_msg_count := l_msg_count - 1;
4802: END LOOP;
4795: x_msg_data := FND_MSG_PUB.GET
4796: ( l_msg_index,
4797: FND_API.G_FALSE );
4798: csi_gen_utility_pvt.put_line( ' Error from csi_asset_pvt.get_instance_assets.. ');
4799: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
4800: l_msg_index := l_msg_index + 1;
4801: l_msg_count := l_msg_count - 1;
4802: END LOOP;
4803: RAISE FND_API.G_EXC_ERROR;
4928: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
4929:
4930: -- If debug_level = 1 then dump the procedure name
4931: IF (l_debug_level > 0) THEN
4932: csi_gen_utility_pvt.put_line( 'get_version_label');
4933: END IF;
4934:
4935: -- If the debug level = 2 then dump all the parameters values.
4936: IF (l_debug_level > 1) THEN
4933: END IF;
4934:
4935: -- If the debug level = 2 then dump all the parameters values.
4936: IF (l_debug_level > 1) THEN
4937: csi_gen_utility_pvt.put_line( 'get_version_label:' ||
4938: p_api_version ||'-'||
4939: p_commit ||'-'||
4940: p_init_msg_list ||'-'||
4941: p_validation_level );
4943: END IF;
4944:
4945: /***** srramakr commented for bug # 3304439
4946: -- Check for the profile option and enable trace
4947: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
4948: -- End enable trace
4949: ****/
4950:
4951: -- Start API body
5108: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5109:
5110: -- If debug_level = 1 then dump the procedure name
5111: IF (l_debug_level > 0) THEN
5112: csi_gen_utility_pvt.put_line( 'create_version_label');
5113: END IF;
5114:
5115:
5116: -- If the debug level = 2 then dump all the parameters values.
5114:
5115:
5116: -- If the debug level = 2 then dump all the parameters values.
5117: IF (l_debug_level > 1) THEN
5118: csi_gen_utility_pvt.put_line( 'create_version_label:'||
5119: p_api_version ||'-'||
5120: p_commit ||'-'||
5121: p_init_msg_list ||'-'||
5122: p_validation_level );
5121: p_init_msg_list ||'-'||
5122: p_validation_level );
5123:
5124: -- Dump the records in the log file
5125: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5126: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5127: END IF;
5128:
5129: /***** srramakr commented for bug # 3304439
5122: p_validation_level );
5123:
5124: -- Dump the records in the log file
5125: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5126: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5127: END IF;
5128:
5129: /***** srramakr commented for bug # 3304439
5130: -- Check for the profile option and enable trace
5127: END IF;
5128:
5129: /***** srramakr commented for bug # 3304439
5130: -- Check for the profile option and enable trace
5131: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5132: -- End enable trace
5133: ****/
5134:
5135: -- Start API body
5156: WHILE l_msg_count > 0 LOOP
5157: x_msg_data := FND_MSG_PUB.GET(
5158: l_msg_index,
5159: FND_API.G_FALSE);
5160: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5161: l_msg_index := l_msg_index + 1;
5162: l_msg_count := l_msg_count - 1;
5163: END LOOP;
5164: ROLLBACK TO create_version_label_pub;
5275: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5276:
5277: -- If debug_level = 1 then dump the procedure name
5278: IF (l_debug_level > 0) THEN
5279: csi_gen_utility_pvt.put_line( 'update_version_label');
5280: END IF;
5281:
5282:
5283: -- If the debug level = 2 then dump all the parameters values.
5281:
5282:
5283: -- If the debug level = 2 then dump all the parameters values.
5284: IF (l_debug_level > 1) THEN
5285: csi_gen_utility_pvt.put_line( 'update_version_label:'||
5286: p_api_version ||'-'||
5287: p_commit ||'-'||
5288: p_init_msg_list );
5289:
5287: p_commit ||'-'||
5288: p_init_msg_list );
5289:
5290: -- Dump the records in the log file
5291: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5292: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5293:
5294: END IF;
5295:
5288: p_init_msg_list );
5289:
5290: -- Dump the records in the log file
5291: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5292: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5293:
5294: END IF;
5295:
5296: /***** srramakr commented for bug # 3304439
5294: END IF;
5295:
5296: /***** srramakr commented for bug # 3304439
5297: -- Check for the profile option and enable trace
5298: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5299: -- End enable trace
5300: ****/
5301: -- Start API body
5302: --
5323: WHILE l_msg_count > 0 LOOP
5324: x_msg_data := FND_MSG_PUB.GET(
5325: l_msg_index,
5326: FND_API.G_FALSE );
5327: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5328: l_msg_index := l_msg_index + 1;
5329: l_msg_count := l_msg_count - 1;
5330: END LOOP;
5331: END IF;
5438: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5439:
5440: -- If debug_level = 1 then dump the procedure name
5441: IF (l_debug_level > 0) THEN
5442: csi_gen_utility_pvt.put_line( 'expire_version_label');
5443: END IF;
5444:
5445: -- If the debug level = 2 then dump all the parameters values.
5446: IF (l_debug_level > 1) THEN
5443: END IF;
5444:
5445: -- If the debug level = 2 then dump all the parameters values.
5446: IF (l_debug_level > 1) THEN
5447: csi_gen_utility_pvt.put_line( 'expire_version_label:'||
5448: p_api_version ||'-'||
5449: p_commit ||'-'||
5450: p_init_msg_list );
5451: -- Dump the records in the log file
5448: p_api_version ||'-'||
5449: p_commit ||'-'||
5450: p_init_msg_list );
5451: -- Dump the records in the log file
5452: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5453: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5454: END IF;
5455: /***** srramakr commented for bug # 3304439
5456: -- Check for the profile option and enable trace
5449: p_commit ||'-'||
5450: p_init_msg_list );
5451: -- Dump the records in the log file
5452: csi_gen_utility_pvt.dump_version_label_tbl(p_version_label_tbl);
5453: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5454: END IF;
5455: /***** srramakr commented for bug # 3304439
5456: -- Check for the profile option and enable trace
5457: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5453: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
5454: END IF;
5455: /***** srramakr commented for bug # 3304439
5456: -- Check for the profile option and enable trace
5457: l_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_flag);
5458: -- End enable trace
5459: ****/
5460: -- Start API body
5461: --
5481: WHILE l_msg_count > 0 LOOP
5482: x_msg_data := FND_MSG_PUB.GET(
5483: l_msg_index,
5484: FND_API.G_FALSE );
5485: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
5486: l_msg_index := l_msg_index + 1;
5487: l_msg_count := l_msg_count - 1;
5488: END LOOP;
5489: END IF;
5753: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
5754:
5755: -- If debug_level = 1 then dump the procedure name
5756: IF (l_debug_level > 0) THEN
5757: csi_gen_utility_pvt.put_line( 'get_extended_attrib_values');
5758: END IF;
5759:
5760:
5761: -- If the debug level = 2 then dump all the parameters values.
5759:
5760:
5761: -- If the debug level = 2 then dump all the parameters values.
5762: IF (l_debug_level > 1) THEN
5763: csi_gen_utility_pvt.put_line( p_api_version ||'-'
5764: || p_commit ||'-'
5765: || p_init_msg_list ||'-'
5766: || p_validation_level ||'-'
5767: || p_time_stamp);
5766: || p_validation_level ||'-'
5767: || p_time_stamp);
5768:
5769: -- Dump extended attribs
5770: csi_gen_utility_pvt.dump_ext_attrib_query_rec(p_ext_attribs_query_rec);
5771: END IF;
5772:
5773: /***** srramakr commented for bug # 3304439
5774: -- Check for the profile option and enable trace
5771: END IF;
5772:
5773: /***** srramakr commented for bug # 3304439
5774: -- Check for the profile option and enable trace
5775: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
5776: -- End enable trace
5777: ****/
5778:
5779: -- Start API body
6030: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6031:
6032: -- If debug_level = 1 then dump the procedure name
6033: IF (l_debug_level > 0) THEN
6034: csi_gen_utility_pvt.put_line( 'create_extended_attrib_values');
6035: END IF;
6036:
6037:
6038: -- If the debug level = 2 then dump all the parameters values.
6036:
6037:
6038: -- If the debug level = 2 then dump all the parameters values.
6039: IF (l_debug_level > 1) THEN
6040: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6041: || p_commit ||'-'
6042: || p_init_msg_list ||'-'
6043: || p_validation_level );
6044:
6042: || p_init_msg_list ||'-'
6043: || p_validation_level );
6044:
6045: -- Dump extended attribs tbl
6046: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6047: -- Dump txn_rec
6048: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6049:
6050: END IF;
6044:
6045: -- Dump extended attribs tbl
6046: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6047: -- Dump txn_rec
6048: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6049:
6050: END IF;
6051:
6052: /***** srramakr commented for bug # 3304439
6050: END IF;
6051:
6052: /***** srramakr commented for bug # 3304439
6053: -- Check for the profile option and enable trace
6054: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6055: -- End enable trace
6056: ****/
6057:
6058:
6085: x_msg_data := FND_MSG_PUB.GET
6086: (l_msg_index,
6087: FND_API.G_FALSE );
6088:
6089: csi_gen_utility_pvt.put_line( ' Failed Pub:create_extended_attrib_values..');
6090: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6091: l_msg_index := l_msg_index + 1;
6092: l_msg_count := l_msg_count - 1;
6093: END LOOP;
6086: (l_msg_index,
6087: FND_API.G_FALSE );
6088:
6089: csi_gen_utility_pvt.put_line( ' Failed Pub:create_extended_attrib_values..');
6090: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6091: l_msg_index := l_msg_index + 1;
6092: l_msg_count := l_msg_count - 1;
6093: END LOOP;
6094: RAISE FND_API.G_EXC_ERROR;
6222: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6223:
6224: -- If debug_level = 1 then dump the procedure name
6225: IF (l_debug_level > 0) THEN
6226: csi_gen_utility_pvt.put_line( 'update_extended_attrib_values');
6227: END IF;
6228:
6229:
6230: -- If the debug level = 2 then dump all the parameters values.
6228:
6229:
6230: -- If the debug level = 2 then dump all the parameters values.
6231: IF (l_debug_level > 1) THEN
6232: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6233: || p_commit ||'-'
6234: || p_init_msg_list ||'-'
6235: || p_validation_level );
6236:
6234: || p_init_msg_list ||'-'
6235: || p_validation_level );
6236:
6237: -- Dump extended attribs tbl
6238: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6239: -- Dump txn_rec
6240: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6241: END IF;
6242:
6236:
6237: -- Dump extended attribs tbl
6238: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6239: -- Dump txn_rec
6240: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6241: END IF;
6242:
6243: /***** srramakr commented for bug # 3304439
6244: -- Check for the profile option and enable trace
6241: END IF;
6242:
6243: /***** srramakr commented for bug # 3304439
6244: -- Check for the profile option and enable trace
6245: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6246: -- End enable trace
6247: ****/
6248:
6249:
6275: x_msg_data := FND_MSG_PUB.GET
6276: (l_msg_index,
6277: FND_API.G_FALSE );
6278:
6279: csi_gen_utility_pvt.put_line( ' Failed Pub:update_extended_attrib_values..');
6280: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6281: l_msg_index := l_msg_index + 1;
6282: l_msg_count := l_msg_count - 1;
6283: END LOOP;
6276: (l_msg_index,
6277: FND_API.G_FALSE );
6278:
6279: csi_gen_utility_pvt.put_line( ' Failed Pub:update_extended_attrib_values..');
6280: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6281: l_msg_index := l_msg_index + 1;
6282: l_msg_count := l_msg_count - 1;
6283: END LOOP;
6284: RAISE FND_API.G_EXC_ERROR;
6407: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6408:
6409: -- If debug_level = 1 then dump the procedure name
6410: IF (l_debug_level > 0) THEN
6411: csi_gen_utility_pvt.put_line( 'delete_extended_attrib_values');
6412: END IF;
6413:
6414:
6415: -- If the debug level = 2 then dump all the parameters values.
6413:
6414:
6415: -- If the debug level = 2 then dump all the parameters values.
6416: IF (l_debug_level > 1) THEN
6417: csi_gen_utility_pvt.put_line( p_api_version ||'-'
6418: || p_commit ||'-'
6419: || p_init_msg_list ||'-'
6420: || p_validation_level );
6421: -- Dump extended attribs tbl
6418: || p_commit ||'-'
6419: || p_init_msg_list ||'-'
6420: || p_validation_level );
6421: -- Dump extended attribs tbl
6422: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6423: -- Dump txn_rec
6424: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6425: END IF;
6426:
6420: || p_validation_level );
6421: -- Dump extended attribs tbl
6422: csi_gen_utility_pvt.dump_ext_attrib_values_tbl(p_ext_attrib_tbl);
6423: -- Dump txn_rec
6424: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6425: END IF;
6426:
6427: /***** srramakr commented for bug # 3304439
6428: -- Check for the profile option and enable trace
6425: END IF;
6426:
6427: /***** srramakr commented for bug # 3304439
6428: -- Check for the profile option and enable trace
6429: l_trace_enable_flag:=CSI_GEN_UTILITY_PVT.enable_trace(l_trace_flag => l_trace_enable_flag);
6430: -- End enable trace
6431: ****/
6432:
6433:
6457: x_msg_data := FND_MSG_PUB.GET
6458: (l_msg_index,
6459: FND_API.G_FALSE );
6460:
6461: csi_gen_utility_pvt.put_line( ' Failed Pub:expire_extended_attrib_values..');
6462: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6463: l_msg_index := l_msg_index + 1;
6464: l_msg_count := l_msg_count - 1;
6465: END LOOP;
6458: (l_msg_index,
6459: FND_API.G_FALSE );
6460:
6461: csi_gen_utility_pvt.put_line( ' Failed Pub:expire_extended_attrib_values..');
6462: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6463: l_msg_index := l_msg_index + 1;
6464: l_msg_count := l_msg_count - 1;
6465: END LOOP;
6466: RAISE FND_API.G_EXC_ERROR;
6600: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
6601:
6602: -- If debug_level = 1 then dump the procedure name
6603: IF (l_debug_level > 0) THEN
6604: csi_gen_utility_pvt.put_line('copy_item_instance ');
6605: END IF;
6606:
6607: -- If the debug level = 2 then dump all the parameters values.
6608: IF (l_debug_level > 1) THEN
6605: END IF;
6606:
6607: -- If the debug level = 2 then dump all the parameters values.
6608: IF (l_debug_level > 1) THEN
6609: csi_gen_utility_pvt.put_line('copy_item_instance '||
6610: p_api_version ||'-'
6611: || p_commit ||'-'
6612: || p_init_msg_list ||'-'
6613: || p_validation_level ||'-'
6620: || p_copy_pricing_attribs
6621: );
6622:
6623: -- Dump item instanc red
6624: csi_gen_utility_pvt.dump_instance_rec(p_source_instance_rec);
6625: -- Dump txn_rec
6626: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6627:
6628: END IF;
6622:
6623: -- Dump item instanc red
6624: csi_gen_utility_pvt.dump_instance_rec(p_source_instance_rec);
6625: -- Dump txn_rec
6626: csi_gen_utility_pvt.dump_txn_rec(p_txn_rec);
6627:
6628: END IF;
6629:
6630: -- Start API body
6657: p_encoded => 'F',
6658: p_data => x_msg_data,
6659: p_msg_index_out => x_msg_index_out );
6660:
6661: csi_gen_utility_pvt.put_line('message data = '||x_msg_data);
6662: End LOOP;
6663: RAISE fnd_api.g_exc_error;
6664: END IF;
6665:
6856: END IF;
6857:
6858: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
6859: THEN
6860: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
6861: l_msg_index := 1;
6862: l_msg_count := x_msg_count;
6863: WHILE l_msg_count > 0 LOOP
6864: x_msg_data := FND_MSG_PUB.GET
6864: x_msg_data := FND_MSG_PUB.GET
6865: ( l_msg_index,
6866: FND_API.G_FALSE
6867: );
6868: csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
6869: l_msg_index := l_msg_index + 1;
6870: l_msg_count := l_msg_count - 1;
6871: END LOOP;
6872: RAISE FND_API.G_EXC_ERROR;