The following lines contain the word 'select', 'insert', 'update' or 'delete':
select c.company_name, c.company_id
into v_company_name, v_company_id
from
MSC_COMPANY_USERS uc,
msc_companies c
where
uc.user_id = FND_GLOBAL.USER_ID
and c.company_id = uc.company_id;
select
rule.privilege
from
msc_sup_dem_entries supdem,
MSC_X_SECURITY_RULES rule
where
sysdate between nvl(rule.EFFECTIVE_FROM_DATE, sysdate-1) and nvl(rule.EFFECTIVE_TO_DATE, sysdate +1)
and nvl(rule.company_id, supdem.PUBLISHER_ID) = supdem.PUBLISHER_ID
and nvl(rule.order_type, supdem.publisher_order_type) = supdem.publisher_order_type
and nvl(rule.item_id, supdem.inventory_item_id) = supdem.inventory_item_id
and nvl(rule.customer_id, nvl(supdem.customer_id, -1)) = nvl(supdem.customer_id, -1)
and nvl(rule.supplier_id, nvl(supdem.supplier_id, -1)) = nvl(supdem.supplier_id, -1)
and nvl(rule.customer_site_id, nvl(supdem.customer_site_id, -1)) = nvl(supdem.customer_site_id, -1)
and nvl(rule.supplier_site_id, nvl(supdem.supplier_site_id, -1)) = nvl(supdem.supplier_site_id, -1)
and nvl(rule.org_id, supdem.PUBLISHER_SITE_ID) = supdem.PUBLISHER_SITE_ID
and nvl(rule.order_number, nvl(supdem.order_number, -1)) = nvl(supdem.order_number, -1)
and (rule.grantee_key = decode(upper(rule.grantee_type), 'USER', FND_GLOBAL.USER_ID, 'COMPANY', sys_context('MSC', 'COMPANY_ID'))
or upper(rule.grantee_type) = 'DOCUMENT OWNER' and supdem.publisher_id = sys_context('MSC', 'COMPANY_ID')
or upper(rule.grantee_type) = 'TRADING PARTNER' and nvl(supdem.customer_id, supdem.supplier_id) = sys_context('MSC', 'COMPANY_ID')
or decode(upper(rule.grantee_type),'RESPONSIBILITY', rule.grantee_key) = fnd_global.resp_id
or (upper(rule.grantee_key) = 'GLOBAL')
)
and supdem.transaction_id = transaction_id
) loop
if (v_privilege is null or v_privilege = 'VIEW') then
v_privilege := upper(rec.privilege);