The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT LONG_DESCRIPTION
INTO x_ext_description
FROM MTL_SYSTEM_ITEMS_TL
WHERE INVENTORY_ITEM_ID = p_item_id
AND ORGANIZATION_ID = p_org_id
AND language = userenv('LANG');
PROCEDURE delete_uda(p_auction_header_id IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_error_msg OUT NOCOPY VARCHAR2) IS
BEGIN
x_return_status := 'S';
delete from pon_auction_headers_ext_b where auction_header_id = p_auction_header_id;
END delete_uda;
select uda_template_id,nvl(amendment_flag,'N') into l_template_id,l_amd_flag from pon_auction_headers_all where auction_header_id = p_auction_header_id;
SELECT displayed_field
INTO l_AddTypeDispField
FROM po_lookup_codes
WHERE lookup_type = 'SOL_UDA_ADDRESS_TYPES'
AND lookup_code = p_HiddenAddType;
insert into vhk_dummy values (p_msg);
SELECT N_EXT_ATTR20 INTO x_total_amount
FROM pon_bid_item_prices_ext_b
WHERE bid_number=p_bid_number
AND line_number = p_line_number
AND ATTR_GROUP_ID = l_attr_grp_id; --Bug : 16838468 :Fetch for complex pricing attribute group