The following lines contain the word 'select', 'insert', 'update' or 'delete':
** Proc : delete_items_in_category
** Procedure called when a category is deleted from ecmanager.
** Desc : Deletes the items and prices in the category id specified
** Deletes the category related info from icx_cat_browse_trees,
** icx_por_category_data_sources, icx_por_category_order_map
**/
PROCEDURE delete_items_in_category (
errbuf OUT NOCOPY VARCHAR2,
retcode OUT NOCOPY VARCHAR2,
p_rt_category_id IN NUMBER,
p_category_key IN VARCHAR2)
IS
BEGIN
retcode := 0;
delete_items_in_category(p_rt_category_id, p_category_key);
END delete_items_in_category;
** Proc : delete_items_in_category
** Procedure called when a category is deleted from ecmanager.
** Desc : Deletes the items and prices in the category id specified
** Deletes the category related info from icx_cat_browse_trees,
** icx_por_category_data_sources, icx_por_category_order_map
**/
PROCEDURE delete_items_in_category (p_rt_category_id IN NUMBER,
p_category_key IN VARCHAR2)
IS
--TYPE CursorType IS REF CURSOR;
SELECT rt_item_id
FROM icx_cat_category_items
WHERE rt_category_id = c_rt_category_id;
deleteCommonTables(l_rt_item_ids, CATITEM_TABLE_LAST);
l_rt_item_ids.DELETE;
'ICX_POR_DELETE_CATALOG.delete_items_in_category(' || xErrLoc|| ')'|| ', sqlerrm:' ||sqlerrm ||
'; so close the cursor and reopen the cursor-');
deleteCategoryRelatedInfo(p_rt_category_id, p_category_key);
'ICX_POR_DELETE_CATALOG.delete_items_in_category(' ||
xErrLoc|| '): '||sqlerrm;
END delete_items_in_category;
** Proc : delete_items_in_catalog
** Desc : Deletes the items and prices in the catalog name specified
**/
PROCEDURE delete_items_in_catalog (p_catalog_name IN VARCHAR2)
IS
--TYPE CursorType IS REF CURSOR;
SELECT rt_item_id
FROM icx_cat_items_b
WHERE catalog_name = c_catalog_name
AND extractor_updated_flag = 'N';
deleteCommonTables(l_rt_item_ids);
l_rt_item_ids.DELETE;
'ICX_POR_DELETE_CATALOG.delete_items_in_catalog(' || xErrLoc|| ')'||
', sqlerrm:' ||sqlerrm ||
'; so close the cursor and reopen the cursor-');
'ICX_POR_DELETE_CATALOG.delete_items_in_catalog(' ||
xErrLoc|| '): '||sqlerrm;
END delete_items_in_catalog;
** Proc : delete_supplier_catalog_opUnit
** Desc : Deletes the catalog for the supplier and Operating Unit specified.
**/
PROCEDURE delete_supplier_catalog_opUnit (p_supplier IN VARCHAR2,
p_operating_unit_id IN NUMBER DEFAULT -2)
IS
--TYPE CursorType IS REF CURSOR;
SELECT rt_item_id
FROM icx_cat_items_b
WHERE supplier = c_supplier
AND org_id = c_operating_unit_id
AND extractor_updated_flag = 'N';
deleteCommonTables(l_rt_item_ids);
l_rt_item_ids.DELETE;
'ICX_POR_DELETE_CATALOG.delete_supplier_catalog_opUnit(' || xErrLoc|| ')'|| ', sqlerrm:' ||sqlerrm ||
'; so close the cursor and reopen the cursor-');
'ICX_POR_DELETE_CATALOG.delete_supplier_catalog_opUnit(' ||
xErrLoc|| '): '||sqlerrm;
END delete_supplier_catalog_opUnit;
** Desc : Deletes the data from ICX_CAT_PRICE_HISTORY
**/
PROCEDURE delPriceHistory(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_PRICE_HISTORY');
DELETE FROM icx_cat_price_history
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delPriceHistory-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delPriceHistory(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_ITEMS_TLP
**/
PROCEDURE delItemsTLP(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_ITEMS_TLP');
DELETE FROM icx_cat_items_tlp
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delItemsTLP-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delItemsTLP(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_EXT_ITEMS_TLP
**/
PROCEDURE delExtItemsTLP(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_EXT_ITEMS_TLP');
DELETE FROM icx_cat_ext_items_tlp
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delExtItemsTLP-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delExtItemsTLP(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_ITEMS_CTX_TLP
**/
PROCEDURE delItemsCtxTLP(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_ITEMS_CTX_TLP');
DELETE FROM icx_cat_items_ctx_tlp
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delItemsCtxTLP-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delItemsCtxTLP(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from POR_FAVORITE_LIST_LINES
**/
PROCEDURE delFavoriteList(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from POR_FAVORITE_LIST_LINES');
DELETE FROM por_favorite_list_lines
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delFavoriteList-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delFavoriteList(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_CATEGORY_ITEMS
**/
PROCEDURE delCategoryItems(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_CATEGORY_ITEMS');
DELETE FROM icx_cat_category_items
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize ;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delCategoryItems-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delCategoryItems(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_PRICE_LISTS
**/
PROCEDURE delPriceLists(pPriceListIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_PRICE_LISTS');
DELETE FROM icx_cat_price_lists pl
WHERE pl.price_list_id = pPriceListIds(i)
AND NOT EXISTS (SELECT 'price line'
FROM icx_cat_item_prices p
WHERE p.price_list_id = pl.price_list_id);
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delPriceLists-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delPriceLists(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_ITEM_PRICES
**/
PROCEDURE delItemPrices(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_ITEM_PRICES');
xPriceListIds.DELETE;
DELETE FROM icx_cat_item_prices
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize
RETURNING price_list_id BULK COLLECT INTO xPriceListIds;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delItemPrices-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delItemPrices(' ||
xErrLoc|| '): '||sqlerrm;
** Desc : Deletes the data from ICX_CAT_ITEMS_B
**/
PROCEDURE delItemsB(pRtItemIds IN DBMS_SQL.NUMBER_TABLE)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_ITEMS_B');
DELETE FROM icx_cat_items_b
WHERE rt_item_id = pRtItemIds(i)
AND rownum <= gCommitSize;
ICX_POR_EXT_UTL.pushError('ICX_POR_DELETE_CATALOG.delItemsB-'||
xErrLoc||' '||SQLERRM);
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.delItemsB(' ||
xErrLoc|| '): '||sqlerrm;
** Proc : deleteCommonTables
** Desc : Deletes the data from common tables used by Extractor and DeleteCatalog
**/
PROCEDURE deleteCommonTables(pRtItemIds IN dbms_sql.number_table,
pDeleteOrder IN PLS_INTEGER DEFAULT ITEM_TABLE_LAST)
IS
xErrLoc PLS_INTEGER := 0;
IF (pDeleteOrder = ITEM_TABLE_LAST) THEN
xErrLoc := 200;
ELSIF (pDeleteOrder = CATITEM_TABLE_LAST) THEN
xErrLoc := 300;
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.deleteCommonTables(' ||
xErrLoc||'): '||sqlerrm;
END deleteCommonTables;
** Proc : deleteCategoryRelatedInfo
** Desc : Deletes the data from ICX_CAT_BROWSE_TREES,
** ICX_POR_CATEGORY_ORDER_MAP, ICX_POR_CATEGORY_DATA_SOURCES
**/
PROCEDURE deleteCategoryRelatedInfo(pRtCategoryId IN NUMBER,
pCategoryKey IN VARCHAR2)
IS
xErrLoc PLS_INTEGER := 0;
ICX_POR_EXT_UTL.debug('Delete from ICX_CAT_BROWSE_TREES');
DELETE FROM icx_cat_browse_trees
WHERE child_category_id = pRtCategoryId;
ICX_POR_EXT_UTL.debug('Delete from ICX_POR_CATEGORY_ORDER_MAP');
DELETE FROM icx_por_category_order_map
WHERE rt_category_id = pRtCategoryId;
ICX_POR_EXT_UTL.debug('Delete from ICX_POR_CATEGORY_DATA_SOURCES');
DELETE FROM icx_por_category_data_sources
WHERE category_key = pCategoryKey;
gReturnError := gReturnError || 'ICX_POR_DELETE_CATALOG.deleteCategoryRelatedInfo(' ||
xErrLoc|| '): '||sqlerrm;
END deleteCategoryRelatedInfo;