The following lines contain the word 'select', 'insert', 'update' or 'delete':
** SELECT 'Y'
** INTO x_result
** FROM sys.dual
** WHERE EXISTS (SELECT 1
** FROM wsm_co_products bcp
** WHERE bcp.bill_sequence_id = x_bill_sequence_id
** AND sysdate >= bcp.effectivity_date
** AND (sysdate <= bcp.disable_date
** OR bcp.disable_date is NULL));
SELECT 'Y'
INTO x_result
FROM wsm_co_products bcp
WHERE bcp.bill_sequence_id = x_bill_sequence_id
AND sysdate >= bcp.effectivity_date
AND (sysdate <= bcp.disable_date
OR bcp.disable_date is NULL);
SELECT 1
INTO x_dummy
FROM sys.dual
WHERE NOT EXISTS (SELECT 1
FROM wsm_co_products bcp
WHERE bcp.co_product_group_id = x_co_product_group_id
AND bcp.co_product_id = x_co_product_id
AND ((rowid <> X_Rowid) OR (X_Rowid IS NULL)));
** SELECT 1
** INTO x_dummy
** FROM sys.dual
** WHERE NOT EXISTS (SELECT 1
** FROM wsm_co_prod_comp_substitutes bcs
** WHERE bcs.co_product_group_id = x_co_product_group_id
** AND bcs.substitute_component_id = x_co_product_id);
SELECT 1
INTO x1_dummy
FROM wsm_co_prod_comp_substitutes bcs
WHERE bcs.co_product_group_id = x_co_product_group_id
AND bcs.substitute_component_id = x_co_product_id;
** SELECT 1
** INTO x_dummy
** FROM sys.dual
** WHERE EXISTS (SELECT 1
** FROM wsm_co_products bcp
** WHERE bcp.co_product_group_id = x_co_product_group_id
** AND bcp.co_product_id = x_substitute_co_product_id);
SELECT 1
INTO x_dummy
FROM wsm_co_products bcp
WHERE bcp.co_product_group_id = x_co_product_group_id
AND bcp.co_product_id = x_substitute_co_product_id;
** SELECT 1
** INTO x_dummy
** FROM sys.dual
** WHERE EXISTS (SELECT 1
** FROM wsm_co_products bcp
** WHERE bcp.co_product_group_id = x_co_product_group_id
** AND bcp.primary_flag = 'Y'
** AND bcp.co_product_id is not NULL);
SELECT 1
INTO x_dummy
FROM wsm_co_products bcp
WHERE bcp.co_product_group_id = x_co_product_group_id
AND bcp.primary_flag = 'Y'
AND bcp.co_product_id is not NULL;
CURSOR c_total is select distinct effectivity_date
from WSM_COPRODUCT_SPLIT_PERC
where co_product_group_id=x_co_product_group_id;
/*SELECT sum (nvl(bcp.split,0))
INTO x_split_total
FROM wsm_co_products bcp
WHERE bcp.co_product_group_id = x_co_product_group_id
AND bcp.co_product_id is not NULL; */
SELECT sum (nvl(bcp.split,0))
INTO x_split_total
FROM wsm_coproduct_split_perc bcp
WHERE bcp.co_product_group_id = x_co_product_group_id
AND effectivity_date = e_rec.effectivity_date;
SELECT 1
FROM sys.dual
WHERE EXISTS (SELECT 1
FROM bom_inventory_components bic
WHERE bic.bill_sequence_id = x_bill_seq_id
AND ((x_disable_date is NULL)
OR (x_disable_date > bic.effectivity_date))
AND ((x_effectivity_date < bic.disable_date)
OR (bic.disable_date IS NULL))
);
SELECT count(1)
INTO x_active_link
FROM wsm_co_products bcp
WHERE bcp.bill_sequence_id = x_comm_bill_sequence_id
AND ( bcp.disable_date is NULL
OR bcp.disable_date > sysdate)
AND bcp.co_product_group_id <> x_co_product_group_id;
ELSE /* OK to update the common link */
/* -- Lock corresponding bill prior to update. */
WSMPPCPD.lock_bill (x_curr_bill_sequence_id,
x_error_code,
x_error_msg);
UPDATE bom_bill_of_materials
SET common_assembly_item_id = NULL,
common_organization_id = NULL,
common_bill_sequence_id = NULL
WHERE bill_sequence_id = x_curr_bill_sequence_id;
SELECT 1
INTO x_dummy
FROM wsm_co_products bcp
WHERE bcp.organization_id = x_org_id
AND bcp.component_id = x_component_id
AND (x_disable_date is NULL
OR (x_disable_date > bcp.effectivity_date))
AND ((x_effectivity_date < bcp.disable_date)
OR bcp.disable_date is NULL)
AND ((bcp.rowid <> X_rowid) OR (X_rowid is NULL))
AND bcp.co_product_id is NULL;