168: IF l_exists_flag = 'N' THEN
169: CSI_ITEM_INSTANCE_PUB.COPY_ITEM_INSTANCE
170: (
171: p_api_version => 1.0
172: ,p_commit => fnd_api.g_false
173: ,p_init_msg_list => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
169: CSI_ITEM_INSTANCE_PUB.COPY_ITEM_INSTANCE
170: (
171: p_api_version => 1.0
172: ,p_commit => fnd_api.g_false
173: ,p_init_msg_list => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
170: (
171: p_api_version => 1.0
172: ,p_commit => fnd_api.g_false
173: ,p_init_msg_list => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
172: ,p_commit => fnd_api.g_false
173: ,p_init_msg_list => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
173: ,p_init_msg_list => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
174: ,p_validation_level => fnd_api.g_valid_level_full
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
182: ,p_copy_pricing_attribs => fnd_api.g_false
175: ,p_source_instance_rec => l_instance_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
182: ,p_copy_pricing_attribs => fnd_api.g_false
183: ,p_txn_rec => l_transaction_rec
176: ,p_copy_ext_attribs => fnd_api.g_false
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
182: ,p_copy_pricing_attribs => fnd_api.g_false
183: ,p_txn_rec => l_transaction_rec
184: ,x_new_instance_tbl => l_instance_tbl
177: ,p_copy_org_assignments => fnd_api.g_false
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
182: ,p_copy_pricing_attribs => fnd_api.g_false
183: ,p_txn_rec => l_transaction_rec
184: ,x_new_instance_tbl => l_instance_tbl
185: ,x_return_status => l_return_status
178: ,p_copy_parties => fnd_api.g_false
179: ,p_copy_party_contacts => fnd_api.g_false
180: ,p_copy_accounts => fnd_api.g_false
181: ,p_copy_asset_assignments => fnd_api.g_false
182: ,p_copy_pricing_attribs => fnd_api.g_false
183: ,p_txn_rec => l_transaction_rec
184: ,x_new_instance_tbl => l_instance_tbl
185: ,x_return_status => l_return_status
186: ,x_msg_count => l_msg_count
187: ,x_msg_data => l_msg_data
188: );
189:
190: l_parent_child_ids_tbl(l_instance_rec.INSTANCE_ID) := l_instance_tbl(1).INSTANCE_ID;
191: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
192: Raise FND_API.G_EXC_ERROR;
193: END IF;
194: END IF;
195: END LOOP ;
188: );
189:
190: l_parent_child_ids_tbl(l_instance_rec.INSTANCE_ID) := l_instance_tbl(1).INSTANCE_ID;
191: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
192: Raise FND_API.G_EXC_ERROR;
193: END IF;
194: END IF;
195: END LOOP ;
196:
202: IF l_exists_flag = 'N' THEN
203: CSI_II_RELATIONSHIPS_PUB.GET_RELATIONSHIPS
204: (
205: p_api_version => 1.0
206: ,p_commit => fnd_api.g_false
207: ,p_init_msg_list => fnd_api.g_false
208: ,p_validation_level => fnd_api.g_valid_level_full
209: ,p_relationship_query_rec => l_relationship_query_rec
210: ,p_depth => 1
203: CSI_II_RELATIONSHIPS_PUB.GET_RELATIONSHIPS
204: (
205: p_api_version => 1.0
206: ,p_commit => fnd_api.g_false
207: ,p_init_msg_list => fnd_api.g_false
208: ,p_validation_level => fnd_api.g_valid_level_full
209: ,p_relationship_query_rec => l_relationship_query_rec
210: ,p_depth => 1
211: ,p_time_stamp => SYSDATE
204: (
205: p_api_version => 1.0
206: ,p_commit => fnd_api.g_false
207: ,p_init_msg_list => fnd_api.g_false
208: ,p_validation_level => fnd_api.g_valid_level_full
209: ,p_relationship_query_rec => l_relationship_query_rec
210: ,p_depth => 1
211: ,p_time_stamp => SYSDATE
212: ,p_active_relationship_only => fnd_api.g_true
208: ,p_validation_level => fnd_api.g_valid_level_full
209: ,p_relationship_query_rec => l_relationship_query_rec
210: ,p_depth => 1
211: ,p_time_stamp => SYSDATE
212: ,p_active_relationship_only => fnd_api.g_true
213: ,x_relationship_tbl => l_ii_relationship_tbl
214: ,x_return_status => l_return_status
215: ,x_msg_count => l_msg_count
216: ,x_msg_data => l_msg_data
214: ,x_return_status => l_return_status
215: ,x_msg_count => l_msg_count
216: ,x_msg_data => l_msg_data
217: );
218: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
219: Raise FND_API.G_EXC_ERROR;
220: END IF;
221:
222: IF (l_ii_relationship_tbl.COUNT > 0) THEN
215: ,x_msg_count => l_msg_count
216: ,x_msg_data => l_msg_data
217: );
218: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
219: Raise FND_API.G_EXC_ERROR;
220: END IF;
221:
222: IF (l_ii_relationship_tbl.COUNT > 0) THEN
223: FOR i IN l_ii_relationship_tbl.FIRST..l_ii_relationship_tbl.LAST LOOP
233:
234: CSI_II_RELATIONSHIPS_PUB.CREATE_RELATIONSHIP
235: (
236: p_api_version => 1.0
237: ,p_commit => fnd_api.g_false
238: ,p_init_msg_list => fnd_api.g_false
239: ,p_validation_level => fnd_api.g_valid_level_full
240: ,p_relationship_tbl => l_ii_relationship_tbl
241: ,p_txn_rec => l_transaction_rec
234: CSI_II_RELATIONSHIPS_PUB.CREATE_RELATIONSHIP
235: (
236: p_api_version => 1.0
237: ,p_commit => fnd_api.g_false
238: ,p_init_msg_list => fnd_api.g_false
239: ,p_validation_level => fnd_api.g_valid_level_full
240: ,p_relationship_tbl => l_ii_relationship_tbl
241: ,p_txn_rec => l_transaction_rec
242: ,x_return_status => l_return_status
235: (
236: p_api_version => 1.0
237: ,p_commit => fnd_api.g_false
238: ,p_init_msg_list => fnd_api.g_false
239: ,p_validation_level => fnd_api.g_valid_level_full
240: ,p_relationship_tbl => l_ii_relationship_tbl
241: ,p_txn_rec => l_transaction_rec
242: ,x_return_status => l_return_status
243: ,x_msg_count => l_msg_count
242: ,x_return_status => l_return_status
243: ,x_msg_count => l_msg_count
244: ,x_msg_data => l_msg_data
245: );
246: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
247: Raise FND_API.G_EXC_ERROR;
248: END IF;
249: END IF;
250: END IF; -- end l_exists_flag IF condition
243: ,x_msg_count => l_msg_count
244: ,x_msg_data => l_msg_data
245: );
246: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
247: Raise FND_API.G_EXC_ERROR;
248: END IF;
249: END IF;
250: END IF; -- end l_exists_flag IF condition
251: END LOOP ; -- end SUBJECT_IDS_CUR cursor
256: COMMIT;
257: --END IF;
258:
259: EXCEPTION
260: WHEN FND_API.G_EXC_ERROR THEN
261: retcode := '1';
262: errbuf := SQLERRM;
263: ROLLBACK TO begin_create_assets;
264: WHEN OTHERS THEN
282: l_errbuf VARCHAR2(2000);
283: l_retcode VARCHAR2(2000);
284: BEGIN
285: x_msg_count := 0;
286: x_return_status := FND_API.G_RET_STS_SUCCESS;
287: l_conc_or_online := nvl(FND_PROFILE.VALUE('RRS_ASSET_CREATION_MODE'),'ONLINE') ;
288:
289:
290: IF l_conc_or_online = 'ONLINE' THEN
295: ,p_additional_instances => p_additional_instances
296: ,p_session_id => p_session_id
297: ) ;
298: IF l_retcode <> '0' THEN
299: Raise FND_API.G_EXC_ERROR;
300: END IF;
301: ELSE
302: CREATE_ASSET_INSTANCES_CONC
303: ( p_source_instance_id => p_source_instance_id
307: ,x_return_status => x_return_status
308: ,x_msg_count => x_msg_count
309: ,x_msg_data => x_msg_data
310: ) ;
311: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
312: Raise FND_API.G_EXC_ERROR;
313: END IF;
314: END IF;
315:
308: ,x_msg_count => x_msg_count
309: ,x_msg_data => x_msg_data
310: ) ;
311: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
312: Raise FND_API.G_EXC_ERROR;
313: END IF;
314: END IF;
315:
316: EXCEPTION
313: END IF;
314: END IF;
315:
316: EXCEPTION
317: WHEN FND_API.G_EXC_ERROR THEN
318: x_msg_count := FND_MSG_PUB.count_msg;
319: x_return_status := FND_API.G_RET_STS_ERROR;
320: WHEN OTHERS THEN
321: x_msg_count := FND_MSG_PUB.count_msg;
315:
316: EXCEPTION
317: WHEN FND_API.G_EXC_ERROR THEN
318: x_msg_count := FND_MSG_PUB.count_msg;
319: x_return_status := FND_API.G_RET_STS_ERROR;
320: WHEN OTHERS THEN
321: x_msg_count := FND_MSG_PUB.count_msg;
322: x_return_status := FND_API.G_RET_STS_ERROR;
323: END CREATE_ASSET_INSTANCES_WRP ;
318: x_msg_count := FND_MSG_PUB.count_msg;
319: x_return_status := FND_API.G_RET_STS_ERROR;
320: WHEN OTHERS THEN
321: x_msg_count := FND_MSG_PUB.count_msg;
322: x_return_status := FND_API.G_RET_STS_ERROR;
323: END CREATE_ASSET_INSTANCES_WRP ;
324:
325:
326: PROCEDURE CREATE_ASSET_INSTANCES_CONC
335: IS
336:
337: BEGIN
338: x_msg_count := 0 ;
339: x_return_status := FND_API.G_RET_STS_SUCCESS;
340:
341: x_request_id := FND_REQUEST.SUBMIT_REQUEST
342: (
343: application => 'RRS'
352:
353: IF x_request_id = 0 THEN
354: FND_MESSAGE.Set_Name('RRS','RRS_CON_REQUEST_FAILED');
355: FND_MSG_PUB.Add;
356: RAISE FND_API.G_EXC_ERROR;
357: END IF;
358: COMMIT ;
359: EXCEPTION
360: WHEN FND_API.G_EXC_ERROR THEN
356: RAISE FND_API.G_EXC_ERROR;
357: END IF;
358: COMMIT ;
359: EXCEPTION
360: WHEN FND_API.G_EXC_ERROR THEN
361: x_msg_count := FND_MSG_PUB.COUNT_MSG;
362: x_return_status := FND_API.G_RET_STS_ERROR;
363: WHEN OTHERS THEN
364: x_return_status := 'E' ;
358: COMMIT ;
359: EXCEPTION
360: WHEN FND_API.G_EXC_ERROR THEN
361: x_msg_count := FND_MSG_PUB.COUNT_MSG;
362: x_return_status := FND_API.G_RET_STS_ERROR;
363: WHEN OTHERS THEN
364: x_return_status := 'E' ;
365: x_msg_count := FND_MSG_PUB.COUNT_MSG;
366: END CREATE_ASSET_INSTANCES_CONC ;