The following lines contain the word 'select', 'insert', 'update' or 'delete':
Build_Selection('POA_BIS_MEASURE',
'SELECT poc.lookup_code, poc.displayed_field
FROM po_lookup_codes poc
WHERE poc.lookup_type = ''POA BIS REPORT OPTION''
AND poc.lookup_code in (''DEFECTS'', ''EXCEPTIONS'', ''PRICE'', ''AMOUNT'', ''VOLUME'')
ORDER BY poc.displayed_field', p_param(p_index).Value);
Build_Selection('POA_BIS_SORT_CRITERIA',
'SELECT poc.lookup_code, poc.displayed_field
FROM po_lookup_codes poc
WHERE poc.lookup_type = ''POA BIS REPORT OPTION''
AND poc.lookup_code in (''HIGHEST'', ''LOWEST'')
ORDER BY poc.displayed_field', p_param(p_index).Action);
Build_Selection('POA_BIS_PERIOD_TYPE',
'SELECT distinct gpt.period_type, gpt.user_period_type
FROM gl_period_types gpt, gl_periods glp
WHERE glp.period_set_name = (SELECT sob.period_set_name
FROM gl_sets_of_books sob
WHERE sob.set_of_books_id =
to_number(fnd_profile.value_wnps(''GL_SET_OF_BKS_ID'')))
AND glp.period_type = gpt.period_type
AND glp.adjustment_period_flag = ''N''
order by gpt.user_period_type', p_param(p_index).Value);
Build_Selection('POA_BIS_PERIOD_TYPE2',
'SELECT FND_MESSAGE.get_string(''PO'',''POA_OPERATING_UNIT''),
FND_MESSAGE.get_string(''PO'',''POA_OPERATING_UNIT'')
FROM dual UNION ALL
SELECT FND_MESSAGE.get_string(''PO'',''POA_TIME''),
FND_MESSAGE.get_string(''PO'',''POA_TIME'') FROM dual',
p_param(p_index).Value);
Build_Selection('POA_BIS_VIEW_BY',
'select FND_MESSAGE.get_string(''PO'', ''POA_LEAKAGE_TREND''),
FND_MESSAGE.get_string(''PO'', ''POA_LEAKAGE_TREND'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_EPS''),
FND_MESSAGE.get_string(''PO'', ''POA_EPS'')from sys.dual',
p_param(p_index).Value);
Build_Selection('POA_BIS_VIEW_BY',
'select FND_MESSAGE.get_string(''PO'', ''POA_SUPPLIER''),
FND_MESSAGE.get_string(''PO'', ''POA_SUPPLIER'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_ORGANIZATION''),
FND_MESSAGE.get_string(''PO'', ''POA_ORGANIZATION'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_COMMODITY''),
FND_MESSAGE.get_string(''PO'', ''POA_COMMODITY'')from sys.dual',
p_param(p_index).Value);
Build_Selection('POA_BIS_VIEW_BY',
'select FND_MESSAGE.get_string(''PO'', ''POA_SUPPLIER''),
FND_MESSAGE.get_string(''PO'', ''POA_SUPPLIER'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_COMMODITY''),
FND_MESSAGE.get_string(''PO'', ''POA_COMMODITY'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_BUYER''),
FND_MESSAGE.get_string(''PO'', ''POA_BUYER'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_OPERATING_UNIT''),
FND_MESSAGE.get_string(''PO'', ''POA_OPERATING_UNIT'')from sys.dual
union select FND_MESSAGE.get_string(''PO'', ''POA_ITEM''),
FND_MESSAGE.get_string(''PO'', ''POA_ITEM'')from sys.dual',
p_param(p_index).Value);
PROCEDURE Build_Selection(p_name IN VARCHAR2,
p_select IN VARCHAR2, p_output IN OUT NOCOPY VARCHAR2) IS
l_cursor NUMBER;
dbms_sql.parse(l_cursor, p_select, DBMS_SQL.V7);
p_output := p_output || ' ' || htf.formSelectOpen(p_name);
htf.formSelectOption(l_display, 'YES', 'value="' || l_value || '"');
htf.formSelectOption(l_display, NULL, 'value="' || l_value || '"');
p_output := p_output || ' ' || htf.formSelectClose;
POA_LOG.put_line('Error in Build_Selection procedure:');
END Build_Selection;
SELECT to_char(add_months(sysdate, -12)+1, icx_sec.g_date_format)
INTO p_fdate
FROM SYS.DUAL;
SELECT to_char(sysdate, icx_sec.g_date_format)
INTO p_tdate
FROM SYS.DUAL;
SELECT to_char(to_date(p_fdate, icx_sec.g_date_format), 'DD-MON-YYYY')
INTO p_fdate
FROM SYS.DUAL;
SELECT to_char(to_date(p_tdate, icx_sec.g_date_format), 'DD-MON-YYYY')
INTO p_tdate
FROM SYS.DUAL;
SELECT msi.inventory_item_id
FROM mtl_system_items_kfv msi
where msi.concatenated_segments in (p_item_name) ;
SELECT pov.vendor_id
FROM po_vendors pov
where pov.vendor_name = p_pref_supp_name;
SELECT pov.vendor_id
FROM po_vendors pov
where pov.vendor_name = p_cons_supp_name;
SELECT b.person_id
FROM po_agents a, per_all_people_f b
WHERE a.agent_id = b.person_id
AND trunc(sysdate) between b.effective_start_date AND b.effective_end_date
AND b.full_name = p_buyer_name;
SELECT vendor_id
FROM po_vendors
WHERE vendor_name = p_supplier_name;
SELECT hr.organization_id
FROM hr_organization_units hr
WHERE hr.name = p_org_name;
SELECT hr.organization_id
FROM hr_organization_units hr
WHERE hr.name = p_org_name
AND (hr.organization_id IN
(SELECT organization_id FROM org_organization_definitions
WHERE set_of_books_id IN
(SELECT id
FROM bis_sets_of_books_v
WHERE responsibility_id IN
(SELECT responsibility_id
FROM fnd_user_resp_groups
WHERE user_id = FND_GLOBAL.user_id
AND sysdate BETWEEN start_date and nvl(end_date, sysdate+1)))));
SELECT category_id
FROM mtl_categories_kfv
WHERE concatenated_segments = p_commodity_name;
SELECT organization_id
FROM hr_operating_units
WHERE name = p_oper_unit_name;
SELECT organization_id
FROM hr_operating_units
WHERE name = p_oper_unit_name
and organization_id IN
(SELECT id from bis_operating_units_v
WHERE responsibility_id IN
(SELECT responsibility_id
FROM fnd_user_resp_groups
WHERE user_id = FND_GLOBAL.user_id
AND sysdate BETWEEN start_date and nvl(end_date, sysdate+1)));
SELECT organization_id
FROM hr_operating_units
WHERE name = p_oper_unit_name;
SELECT organization_id
FROM hr_operating_units
WHERE name = p_oper_unit_name
and organization_id IN
(SELECT id FROM bis_operating_units_v
WHERE responsibility_id IN
(SELECT responsibility_id
FROM fnd_user_resp_groups
WHERE user_id = FND_GLOBAL.user_id
AND sysdate between start_date and nvl(end_date, sysdate+1)));
SELECT user_id
INTO l_user_id
FROM fnd_user
WHERE user_name = p_user_name;
SELECT database_object_name
INTO l_database_object
FROM ak_regions
WHERE region_code = 'BIS_INV_ORGANIZATIONS';
|| ' UNION SELECT DISTINCT VALUE, ID '
|| ' FROM ' || l_database_object
|| ' WHERE ID IN '
|| ' (SELECT organization_id FROM org_organization_definitions '
|| ' WHERE set_of_books_id IN ( ';
SELECT id
FROM bis_sets_of_books_v
WHERE responsibility_id = p_resp_id;