[Home] [Help]
1063: l_api_name CONSTANT VARCHAR2(30) := 'getNextFavListLineIdFromSeq';
1064: l_err_loc PLS_INTEGER;
1065: BEGIN
1066: l_err_loc := 100;
1067: SELECT por_favorite_list_lines_s.NEXTVAL
1068: INTO l_favorite_list_line_id
1069: FROM DUAL;
1070:
1071: l_err_loc := 110;
1926: NVL(fav.template_name, '-2') req_template_name,
1927: NVL(fav.template_line_num, -2) req_template_line_num,
1928: gIFLCOrgIdTbl(i), gIFLCLanguageTbl(i),
1929: gIFLCSourceTypeTbl(i)
1930: FROM por_favorite_list_lines fav
1931: WHERE favorite_list_line_id = gIFLCOldFavoriteListLineIdTbl(i)
1932: AND favorite_list_id = gIFLCFavoriteListIdTbl(i);
1933:
1934: l_err_loc := 360;
2006: gIFLOOrgIdTbl(i), gIFLOLanguageTbl(i),
2007: NVL(fav.item_type, 'NONCATALOG') source_type,
2008: DECODE(NVL(line_types.order_type_lookup_code, 'QUANTITY'),
2009: 'QUANTITY', NULL, fav.unit_price) amount
2010: FROM por_favorite_list_lines fav, po_line_types_b line_types,
2011: financials_system_params_all fsp, gl_sets_of_books gsob
2012: WHERE favorite_list_line_id = gIFLOOldFavoriteListLineIdTbl(i)
2013: AND favorite_list_id = gIFLOFavoriteListIdTbl(i)
2014: AND fav.line_type_id = line_types.line_type_id (+)
6349: END upgradeFavoriteListHdrs;
6350:
6351: PROCEDURE upgradeFavoriteListLines
6352: IS
6353: -- Update the source_doc_line_id in por_favorite_list_lines
6354: -- for items that were bulkloaded in prior releases.
6355: CURSOR updSrcDocIdsInOldFavLinesCsr IS
6356: SELECT fav.rowid, upg.po_line_id
6357: FROM por_favorite_list_lines fav,
6353: -- Update the source_doc_line_id in por_favorite_list_lines
6354: -- for items that were bulkloaded in prior releases.
6355: CURSOR updSrcDocIdsInOldFavLinesCsr IS
6356: SELECT fav.rowid, upg.po_line_id
6357: FROM por_favorite_list_lines fav,
6358: icx_cat_item_prices price,
6359: icx_cat_r12_upgrade upg
6360: WHERE fav.rt_item_id IS NOT NULL
6361: AND fav.price_list_id IS NOT NULL
6368: AND price.currency = upg.currency
6369: AND price.contract_id = upg.price_contract_id
6370: AND upg.po_line_id IS NOT NULL;
6371:
6372: -- Update ItemType in por_favorite_list_lines
6373: CURSOR updItemTypeInOldFavLinesCsr IS
6374: SELECT favorite_list_line_id, source_doc_line_id, template_name,
6375: template_line_num, item_id, asl_id, rt_item_id
6376: FROM por_favorite_list_lines
6372: -- Update ItemType in por_favorite_list_lines
6373: CURSOR updItemTypeInOldFavLinesCsr IS
6374: SELECT favorite_list_line_id, source_doc_line_id, template_name,
6375: template_line_num, item_id, asl_id, rt_item_id
6376: FROM por_favorite_list_lines
6377: WHERE duplicate_in_r12 IS NULL
6378: AND item_type IS NULL
6379: OR (item_type = 'CATALOG'
6380: AND (source_doc_line_id IS NULL
6391: FROM
6392: ( SELECT favorite_list_id, item_id, duplicate_in_r12, COUNT(*)
6393: FROM
6394: ( SELECT favorite_list_id, item_id, duplicate_in_r12
6395: FROM por_favorite_list_lines fav_out
6396: WHERE fav_out.item_type = 'CATALOG'
6397: AND asl_id <> -2
6398: UNION ALL
6399: SELECT favorite_list_id, item_id, duplicate_in_r12
6396: WHERE fav_out.item_type = 'CATALOG'
6397: AND asl_id <> -2
6398: UNION ALL
6399: SELECT favorite_list_id, item_id, duplicate_in_r12
6400: FROM por_favorite_list_lines fav_out
6401: WHERE item_type = 'CATALOG'
6402: AND asl_id = -2 AND source_doc_line_id = -2 AND template_name = '-2'
6403: AND EXISTS (SELECT 'x' FROM por_favorite_list_lines fav_in
6404: WHERE asl_id <> -2 AND item_type = 'CATALOG'
6399: SELECT favorite_list_id, item_id, duplicate_in_r12
6400: FROM por_favorite_list_lines fav_out
6401: WHERE item_type = 'CATALOG'
6402: AND asl_id = -2 AND source_doc_line_id = -2 AND template_name = '-2'
6403: AND EXISTS (SELECT 'x' FROM por_favorite_list_lines fav_in
6404: WHERE asl_id <> -2 AND item_type = 'CATALOG'
6405: AND fav_in.item_id = fav_out.item_id
6406: AND fav_in.favorite_list_id = fav_out.favorite_list_id)
6407: )
6406: AND fav_in.favorite_list_id = fav_out.favorite_list_id)
6407: )
6408: GROUP BY favorite_list_id, item_id, duplicate_in_r12
6409: HAVING COUNT(*) > 1
6410: ) dupe, por_favorite_list_lines fav
6411: WHERE fav.favorite_list_id = dupe.favorite_list_id
6412: AND fav.item_id = dupe.item_id
6413: ORDER BY fav.favorite_list_id, fav.item_id;
6414:
6417: SELECT favorite_list_id, favorite_list_line_id,
6418: fav.source_doc_line_id, fav.template_name,
6419: fav.template_line_num, fav.item_id,
6420: items.source_type, items.language, items.org_id
6421: FROM por_favorite_list_lines fav, icx_cat_items_ctx_hdrs_tlp items
6422: WHERE fav.item_type = 'CATALOG'
6423: AND fav.duplicate_in_r12 IS NULL
6424: AND fav.source_doc_line_id = items.po_line_id
6425: AND fav.template_name = items.req_template_name
6437: CURSOR otherItemUpgradeCsr (p_profile_option_id NUMBER) IS
6438: SELECT fav_hdrs.favorite_list_id, fav_hdrs.employee_id, users.user_id,
6439: prf_vals.profile_option_value, COUNT(*)
6440: FROM por_favorite_list_headers fav_hdrs, fnd_user users,
6441: fnd_profile_option_values prf_vals, por_favorite_list_lines fav_lines
6442: WHERE fav_hdrs.favorite_list_id = fav_lines.favorite_list_id
6443: AND fav_lines.item_type <> 'CATALOG'
6444: AND fav_hdrs.employee_id = users.employee_id (+)
6445: AND users.user_id = prf_vals.level_value (+)
6474: ORDER BY 1;
6475:
6476: CURSOR getOtherFavLinesForHdrCsr (p_favorite_list_id NUMBER) IS
6477: SELECT favorite_list_line_id
6478: FROM por_favorite_list_lines fav_lines
6479: WHERE fav_lines.favorite_list_id = p_favorite_list_id
6480: AND fav_lines.item_type <> 'CATALOG';
6481:
6482: ----- Start of declaring columns selected in the cursor -----
6536: 'Started at:' || TO_CHAR(l_start_date, 'DD-MON-YYYY HH24:MI:SS') );
6537: END IF;
6538:
6539: l_err_loc := 150;
6540: -- Update the source_doc_line_id in por_favorite_list_lines
6541: -- for items that were bulkloaded in prior releases.
6542: l_batch_count := 0;
6543: OPEN updSrcDocIdsInOldFavLinesCsr;
6544:
6559: l_batch_count := l_batch_count + 1;
6560:
6561: l_err_loc := 350;
6562: FORALL i in 1..l_rowid_tbl.COUNT
6563: UPDATE por_favorite_list_lines
6564: SET source_doc_line_id = l_po_line_id_tbl(i)
6565: WHERE rowid = l_rowid_tbl(i);
6566:
6567: l_err_loc := 400;
6568: IF (l_rowid_tbl.COUNT > 0) THEN
6569: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6570: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
6571: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
6572: 'No: of rows updated in por_favorite_list_lines for bulk loaded items:' ||SQL%ROWCOUNT);
6573: END IF;
6574: END IF;
6575:
6576: l_err_loc := 450;
6595: CLOSE updSrcDocIdsInOldFavLinesCsr;
6596: END IF;
6597:
6598: l_err_loc := 600;
6599: -- Update ItemType in por_favorite_list_lines
6600: l_batch_count := 0;
6601: OPEN updItemTypeInOldFavLinesCsr;
6602:
6603: LOOP
6645: END LOOP;
6646:
6647: l_err_loc := 1200;
6648: FORALL i in 1..l_favorite_list_line_id_tbl.COUNT
6649: UPDATE por_favorite_list_lines
6650: SET item_type = l_item_type_tbl(i),
6651: source_doc_line_id = l_po_line_id_tbl(i),
6652: template_name = l_req_template_name_tbl(i),
6653: template_line_num = l_req_template_line_num_tbl(i),
6659: IF (l_favorite_list_line_id_tbl.COUNT > 0) THEN
6660: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6661: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
6662: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
6663: 'No: of rows updated in por_favorite_list_lines for item_type:' ||SQL%ROWCOUNT);
6664: END IF;
6665: END IF;
6666:
6667: l_err_loc := 1400;
6752: END LOOP;
6753:
6754: l_err_loc := 2600;
6755: FORALL i in 1..l_dupe_fav_list_line_id_tbl.COUNT
6756: UPDATE por_favorite_list_lines
6757: SET duplicate_in_r12 = 'Y'
6758: WHERE favorite_list_line_id = l_dupe_fav_list_line_id_tbl(i);
6759:
6760: l_err_loc := 2700;
6761: IF (l_favorite_list_line_id_tbl.COUNT > 0) THEN
6762: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6763: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,
6764: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
6765: 'No: of rows updated in por_favorite_list_lines for duplicates:' ||SQL%ROWCOUNT);
6766: END IF;
6767: END IF;
6768:
6769: l_err_loc := 2800;