The following lines contain the word 'select', 'insert', 'update' or 'delete':
IF p_record_status IN ('NEW', 'INSERT')
THEN
l_sub_component_tbl(1).transaction_type := 'CREATE';
l_sub_component_tbl(1).transaction_type := 'UPDATE';
ELSIF p_record_status = 'DELETE'
THEN
l_sub_component_tbl(1).transaction_type := 'DELETE';
PROCEDURE Delete_Row
( p_SBC_controller_rec IN Controller_SBC_Rec_Type
, p_control_rec IN BOM_BO_PUB.Control_Rec_Type
, x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
, x_return_status OUT NOCOPY VARCHAR2
)
IS
l_control_rec BOM_BO_PUB.Control_Rec_Type := p_control_rec;
l_sub_component_tbl(1).transaction_type := 'DELETE';
END Delete_Row;
IF p_record_status IN ('NEW', 'INSERT')
THEN
l_sub_component_tbl(1).transaction_type := 'CREATE';
l_sub_component_tbl(1).transaction_type := 'UPDATE';
ELSIF p_record_status = 'DELETE'
THEN
l_sub_component_tbl(1).transaction_type := 'DELETE';