[Home] [Help]
279: x_return_status := FND_API.G_RET_STS_SUCCESS;
280: x_msg_count := 0;
281: x_msg_data := NULL;
282:
283: PO_R12_CAT_UPG_PVT.get_distinct_orgs(
284: p_batch_id => p_batch_id
285: , p_batch_size => p_batch_size
286: , p_validate_only_mode => p_validate_only_mode
287: , x_org_id_list => l_org_id_list);
293: l_progress := '050';
294: -- Set the org_id in g_job structure. It will be used while stamping the
295: -- processing_id for rows that have this org_id. Only those lines that are
296: -- stamped with a processing_id are picked up for migration.
297: PO_R12_CAT_UPG_PVT.g_job.org_id := l_org_id_list(i);
298:
299: -- Set the org contetxt. Some of the defaulting/validation code uses
300: -- org-striped views. Moreover, some of the other product API's may
301: -- be using the org context, such as Tax/MRC/FV(JFMIP vendor validation)
300: -- org-striped views. Moreover, some of the other product API's may
301: -- be using the org context, such as Tax/MRC/FV(JFMIP vendor validation)
302: -- /GL Rate API's, etc.
303: /*PO_UC9+10*/
304: --FND_CLIENT_INFO.set_org_context(PO_R12_CAT_UPG_PVT.g_job.org_id);
305: /*/PO_UC9+10*/
306: -- For Release 12, use the following API.
307: /*PO_UC12*/
308: mo_global.set_policy_context('S', PO_R12_CAT_UPG_PVT.g_job.org_id); -- Bug#5259328
304: --FND_CLIENT_INFO.set_org_context(PO_R12_CAT_UPG_PVT.g_job.org_id);
305: /*/PO_UC9+10*/
306: -- For Release 12, use the following API.
307: /*PO_UC12*/
308: mo_global.set_policy_context('S', PO_R12_CAT_UPG_PVT.g_job.org_id); -- Bug#5259328
309: /*/PO_UC12*/
310:
311: IF g_debug THEN PO_R12_CAT_UPG_DEBUG.log_stmt(l_module,l_progress,'Migration for org='||PO_R12_CAT_UPG_PVT.g_job.org_id); END IF;
312:
307: /*PO_UC12*/
308: mo_global.set_policy_context('S', PO_R12_CAT_UPG_PVT.g_job.org_id); -- Bug#5259328
309: /*/PO_UC12*/
310:
311: IF g_debug THEN PO_R12_CAT_UPG_DEBUG.log_stmt(l_module,l_progress,'Migration for org='||PO_R12_CAT_UPG_PVT.g_job.org_id); END IF;
312:
313: l_progress := '060';
314: -- Migrate GBPA, BPA, Quotation (Headers and Lines) from interface tables
315: PO_R12_CAT_UPG_PVT.migrate_documents
311: IF g_debug THEN PO_R12_CAT_UPG_DEBUG.log_stmt(l_module,l_progress,'Migration for org='||PO_R12_CAT_UPG_PVT.g_job.org_id); END IF;
312:
313: l_progress := '060';
314: -- Migrate GBPA, BPA, Quotation (Headers and Lines) from interface tables
315: PO_R12_CAT_UPG_PVT.migrate_documents
316: ( p_batch_id => p_batch_id
317: , p_batch_size => p_batch_size
318: , p_commit => p_commit
319: , p_validate_only_mode => p_validate_only_mode
329:
330: l_progress := '070';
331: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
332: -- Migrate Attribute data for GBPA, BPA, Quotation and ReqTemplates
333: PO_R12_CAT_UPG_PVT.migrate_attributes(p_validate_only_mode => p_validate_only_mode);
334: END IF; -- IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
335:
336: l_progress := '080';
337: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
335:
336: l_progress := '080';
337: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
338: -- Migrate TLP data for GBPA, BPA, Quotation and ReqTemplates
339: PO_R12_CAT_UPG_PVT.migrate_attributes_tlp(p_validate_only_mode => p_validate_only_mode);
340: END IF; -- IF (l_return_status = FND_API.G_RET_STS_SUCCESS)
341:
342: l_progress := '090';
343: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
341:
342: l_progress := '090';
343: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
344: -- Migrate the data for ReqTemplates
345: PO_R12_CAT_UPG_PVT.update_req_templates
346: ( p_batch_size => p_batch_size
347: , p_validate_only_mode => p_validate_only_mode
348: , x_return_status => l_return_status);
349:
357: l_progress := '100';
358:
359: -- If all lines for a header have errors, then do not create the header.
360: -- Clean up the header from the txn table.
361: PO_R12_CAT_UPG_PVT.cleanup_err_docs;
362:
363: END LOOP; -- end of loop to handle data from multiple orgs
364:
365: l_progress := '110';