The following lines contain the word 'select', 'insert', 'update' or 'delete':
sql_stmt := 'SELECT SECONDARY_INVENTORY_NAME, DESCRIPTION '
|| ' FROM MTL_SECONDARY_INVENTORIES '
|| ' WHERE Organization_id = :parameter.org_id '
|| ' And nvl(disable_date, sysdate+1) > sysdate '
|| ' order by secondary_inventory_name';
sql_stmt := 'Select Customer_name, customer_Number '
|| ' From qa_customers_lov_v '
|| ' where status = ''A'' and '
|| ' nvl(customer_prospect_code, ''CUSTOMER'') = ''CUSTOMER'' order by '
|| ' customer_number';
sql_stmt := 'Select department_code department, description '
|| ' From bom_departments_val_v '
|| ' where organization_id = :parameter.org_id '
|| ' order by department_code';
sql_stmt := 'SELECT wl.line_code, wl.description '
|| ' From wip_lines_val_v wl '
|| ' where wl.organization_id = :parameter.org_id '
|| ' order by wl.line_code';
sql_stmt := 'Select segment1, type_name '
|| ' From po_pos_val_v '
|| ' order by segment1';
mtl_project_v changed to pjm_projects_all_v (selects from both pjm enabled and
non-pjm enabled orgs).
rkaza, 11/10/2001.
*/
-- Bug 5003509. SQL Repository Fix. Obsoleted the function
/*
sql_stmt := 'SELECT project_number, project_name '
|| ' FROM pjm_projects_all_v '
|| ' Order By project_number ';
'SELECT DISTINCT RCVSH.RECEIPT_NUM, POV.VENDOR_NAME
FROM RCV_SHIPMENT_HEADERS RCVSH, PO_VENDORS POV, RCV_TRANSACTIONS RT
WHERE RCVSH.RECEIPT_SOURCE_CODE = ''VENDOR'' AND
RCVSH.VENDOR_ID = POV.VENDOR_ID AND
RT.SHIPMENT_HEADER_ID = RCVSH.SHIPMENT_HEADER_ID';
sql_stmt := 'SELECT resource_code Resource, description Description '
|| ' From BOM_Resources_Val_V '
|| ' Where organization_id = :parameter.org_id '
|| ' Order by resource_code ';
sql_stmt := 'SELECT to_char(SH.ORDER_NUMBER), SOT.NAME '
|| ' FROM SO_ORDER_TYPES SOT, OE_ORDER_HEADERS SH, '
|| ' QA_CUSTOMERS_LOV_V RC '
|| ' WHERE sh.order_type_id = sot.order_type_id and '
|| ' sh.sold_to_org_id = rc.customer_id and '
|| ' sh.order_category_code in (''RETURN'',''MIXED'') ';
sql_stmt := 'SELECT to_char(SH.ORDER_NUMBER), SOT.NAME '
|| ' FROM SO_ORDER_TYPES SOT, OE_ORDER_HEADERS SH, '
|| ' QA_CUSTOMERS_LOV_V RC '
|| ' WHERE sh.order_type_id = sot.order_type_id and '
|| ' sh.sold_to_org_id = rc.customer_id and '
|| ' sh.order_category_code in (''ORDER'',''MIXED'') ';
sql_stmt := 'SELECT Secondary_Inventory_Name, Description '
|| ' FROM mtl_secondary_inventories '
|| ' WHERE organization_id = :parameter.org_id '
|| ' AND NVL(disable_date, sysdate+1) > sysdate '
|| ' ORDER BY SECONDARY_INVENTORY_NAME ';
sql_stmt := 'SELECT vendor_name, segment1 '
|| ' FROM po_vendors '
|| ' order by vendor_name ';
sql_stmt := 'SELECT wip_entity_name, description '
|| ' From wip_discrete_jobs_all_v '
|| ' where organization_id = :parameter.org_id '
|| ' order by wip_entity_name ';
sql_stmt := 'SELECT concatenated_segments, description '
|| ' From mtl_system_items_b_kfv '
|| ' where organization_id = :parameter.org_id '
|| ' order by concatenated_segments ';
SELECT Prompt into V_Prompt
From QA_CHARS
Where char_id = vchar_id;
htp.p(' ');
htp.p('
');
sbox VARCHAR2(20); -- New (for select box)
select sql_validation_string
into sql_val_str
from qa_chars
where char_id = vchar_id; -- THIS has to be changed to vchar_id later. DONE now
select qpc.values_exist_flag into vef
from qa_plan_chars qpc
where char_id = vchar_id
and plan_id = plan_id_i;
sql_val_str := 'SELECT short_code, description from qa_plan_char_value_lookups '
|| ' where char_id = '||vchar_id
|| ' and plan_id = ' ||plan_id_i;
sql_val_str := 'SELECT CODE, DESCRIPTION FROM (' ||
'SELECT ''1'' AS CODE, ''1'' AS DESCRIPTION ' ||
'FROM DUAL WHERE 1=2 ' ||
'UNION ALL (' ||
sql_val_str ||
') )
WHERE CODE '||where_cond|| '''' || f_str || '''
ORDER BY CODE';
sbox := 'selectbox[' || rnumb || ']';
htp.p('------------'); -- Dont delete this is a spacer
select qpc.char_id
from qa_plan_chars qpc
where qpc.plan_id = x_plan_id
and qpc.enabled_flag = 1
ORDER BY qpc.prompt_sequence;
select qc.fk_table_name, qc.pk_id, qc.fk_meaning
INTO x_fk_table_name, x_pk_id, x_fk_meaning
FROM qa_chars qc
WHERE qc.char_id = charid;