150: BEGIN
151:
152: -- Standard Start of API savepoint
153: SAVEPOINT Copy_Tasks_int;
154: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
155: -- Standard call to check for call compatibility.
156: IF NOT FND_API.Compatible_API_Call(
157: L_API_VERSION,
158: p_api_version,
169: END IF;
170:
171: -- Initialize API return status to success
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
170:
171: -- Initialize API return status to success
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
171: -- Initialize API return status to success
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
180: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: quote_version_flag: ' || p_quote_version_flag, 1, 'N');
173: IF aso_debug_pub.g_debug_flag = 'Y' THEN
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
180: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: quote_version_flag: ' || p_quote_version_flag, 1, 'N');
181: END IF;
174: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: Begin Copy_Tasks()', 1, 'Y');
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
180: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: quote_version_flag: ' || p_quote_version_flag, 1, 'N');
181: END IF;
182:
175: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_id: ' || p_old_object_id, 1, 'N');
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
180: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: quote_version_flag: ' || p_quote_version_flag, 1, 'N');
181: END IF;
182:
183: -- API body
176: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
177: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_id: ' || p_new_object_id, 1, 'N');
178: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
179: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: new_object_name: ' || p_new_object_name, 1, 'N');
180: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: quote_version_flag: ' || p_quote_version_flag, 1, 'N');
181: END IF;
182:
183: -- API body
184:
183: -- API body
184:
185: FOR l_reftask_rec IN l_reftask_csr(p_old_object_id, p_old_object_type_code) LOOP
186:
187: IF aso_debug_pub.g_debug_flag = 'Y' THEN
188:
189: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: l_reftask_rec.task_id: ' || l_reftask_rec.task_id, 1, 'N');
190: END IF;
191: /*Changes for Copy Quote Version We shouldn't create new task for a new version of quote */
185: FOR l_reftask_rec IN l_reftask_csr(p_old_object_id, p_old_object_type_code) LOOP
186:
187: IF aso_debug_pub.g_debug_flag = 'Y' THEN
188:
189: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: l_reftask_rec.task_id: ' || l_reftask_rec.task_id, 1, 'N');
190: END IF;
191: /*Changes for Copy Quote Version We shouldn't create new task for a new version of quote */
192: IF p_quote_version_flag = FND_API.G_TRUE THEN
193: jtf_task_references_pub.create_references (
203: x_msg_count => x_msg_count,
204: x_task_reference_id => l_task_reference_id
205:
206: );
207: IF aso_debug_pub.g_debug_flag = 'Y' THEN
208: aso_debug_pub.add('ASO_TASK_INT: After Copy_Tasks: create_references ref_id' || l_task_reference_id, 1, 'N');
209: END IF;
210:
211: IF ( x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
204: x_task_reference_id => l_task_reference_id
205:
206: );
207: IF aso_debug_pub.g_debug_flag = 'Y' THEN
208: aso_debug_pub.add('ASO_TASK_INT: After Copy_Tasks: create_references ref_id' || l_task_reference_id, 1, 'N');
209: END IF;
210:
211: IF ( x_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
221: ELSE
222:
223: open l_task_csr(l_reftask_rec.task_id);
224:
225: IF aso_debug_pub.g_debug_flag = 'Y' THEN
226: aso_debug_pub.add('ASO_TASK_INT: Copy Task for new quote:', 1, 'N');
227: END IF;
228:
229: fetch l_task_csr into l_task_rec;
222:
223: open l_task_csr(l_reftask_rec.task_id);
224:
225: IF aso_debug_pub.g_debug_flag = 'Y' THEN
226: aso_debug_pub.add('ASO_TASK_INT: Copy Task for new quote:', 1, 'N');
227: END IF;
228:
229: fetch l_task_csr into l_task_rec;
230:
227: END IF;
228:
229: fetch l_task_csr into l_task_rec;
230:
231: IF aso_debug_pub.g_debug_flag = 'Y' THEN
232: aso_debug_pub.add('ASO_TASK_INT: Copy Task for new quote: l_task_rec.task_id' || l_task_rec.task_id, 1, 'N');
233: END IF;
234:
235: close l_task_csr;
228:
229: fetch l_task_csr into l_task_rec;
230:
231: IF aso_debug_pub.g_debug_flag = 'Y' THEN
232: aso_debug_pub.add('ASO_TASK_INT: Copy Task for new quote: l_task_rec.task_id' || l_task_rec.task_id, 1, 'N');
233: END IF;
234:
235: close l_task_csr;
236:
319: p_attribute_category => l_task_rec.attribute_category ,
320: x_task_id => l_task_id
321: );
322:
323: IF aso_debug_pub.g_debug_flag = 'Y' THEN
324: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: l_task_id: ' || l_task_id, 1, 'N');
325: END IF;
326: END IF;
327: END LOOP;
320: x_task_id => l_task_id
321: );
322:
323: IF aso_debug_pub.g_debug_flag = 'Y' THEN
324: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: l_task_id: ' || l_task_id, 1, 'N');
325: END IF;
326: END IF;
327: END LOOP;
328:
326: END IF;
327: END LOOP;
328:
329: -- End of API body.
330: IF aso_debug_pub.g_debug_flag = 'Y' THEN
331: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: End Copy_Tasks()', 1, 'Y');
332: END IF;
333:
334: -- Standard check of p_commit.
327: END LOOP;
328:
329: -- End of API body.
330: IF aso_debug_pub.g_debug_flag = 'Y' THEN
331: aso_debug_pub.add('ASO_TASK_INT: Copy_Tasks: End Copy_Tasks()', 1, 'Y');
332: END IF;
333:
334: -- Standard check of p_commit.
335: IF FND_API.To_Boolean(p_commit) THEN
513: BEGIN
514:
515: -- Standard Start of API savepoint
516: SAVEPOINT Copy_Opp_Tasks_To_Qte_int;
517: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
518: -- Standard call to check for call compatibility.
519: IF NOT FND_API.Compatible_API_Call(
520: L_API_VERSION,
521: p_api_version,
532: END IF;
533:
534: -- Initialize API return status to success
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536: IF aso_debug_pub.g_debug_flag = 'Y' THEN
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
533:
534: -- Initialize API return status to success
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536: IF aso_debug_pub.g_debug_flag = 'Y' THEN
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
534: -- Initialize API return status to success
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536: IF aso_debug_pub.g_debug_flag = 'Y' THEN
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
542: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_name: ' || p_new_object_name, 1, 'N');
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536: IF aso_debug_pub.g_debug_flag = 'Y' THEN
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
542: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_name: ' || p_new_object_name, 1, 'N');
543: END IF;
536: IF aso_debug_pub.g_debug_flag = 'Y' THEN
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
542: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_name: ' || p_new_object_name, 1, 'N');
543: END IF;
544:
537: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: Begin Copy_Opp_Tasks_To_Qte()', 1, 'Y');
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
542: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_name: ' || p_new_object_name, 1, 'N');
543: END IF;
544:
545: -- API body
538: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_id: ' || p_old_object_id, 1, 'N');
539: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: old_object_type_code: ' || p_old_object_type_code, 1, 'N');
540: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_id: ' || p_new_object_id, 1, 'N');
541: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_type_code: ' || p_new_object_type_code, 1, 'N');
542: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: new_object_name: ' || p_new_object_name, 1, 'N');
543: END IF;
544:
545: -- API body
546:
545: -- API body
546:
547: FOR l_task_rec IN l_task_csr(p_old_object_id, p_old_object_type_code) LOOP
548:
549: IF aso_debug_pub.g_debug_flag = 'Y' THEN
550:
551: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: l_task_rec.task_id: ' || l_task_rec.task_id, 1, 'N');
552: END IF;
553:
547: FOR l_task_rec IN l_task_csr(p_old_object_id, p_old_object_type_code) LOOP
548:
549: IF aso_debug_pub.g_debug_flag = 'Y' THEN
550:
551: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: l_task_rec.task_id: ' || l_task_rec.task_id, 1, 'N');
552: END IF;
553:
554: JTF_Tasks_Pub.Create_Task(
555: p_api_version => 1.0 ,
635: p_attribute_category => l_task_rec.attribute_category ,
636: x_task_id => l_task_id
637: );
638:
639: IF aso_debug_pub.g_debug_flag = 'Y' THEN
640: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: l_task_id: ' || l_task_id, 1, 'N');
641: END IF;
642:
643: END LOOP;
636: x_task_id => l_task_id
637: );
638:
639: IF aso_debug_pub.g_debug_flag = 'Y' THEN
640: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: l_task_id: ' || l_task_id, 1, 'N');
641: END IF;
642:
643: END LOOP;
644:
642:
643: END LOOP;
644:
645: -- End of API body.
646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
647: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: End Copy_Opp_Tasks_To_Qte()', 1, 'Y');
648: END IF;
649:
650: -- Standard check of p_commit.
643: END LOOP;
644:
645: -- End of API body.
646: IF aso_debug_pub.g_debug_flag = 'Y' THEN
647: aso_debug_pub.add('ASO_TASK_INT: Copy_Opp_Tasks_To_Qte: End Copy_Opp_Tasks_To_Qte()', 1, 'Y');
648: END IF;
649:
650: -- Standard check of p_commit.
651: IF FND_API.To_Boolean(p_commit) THEN