The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure DELETE_SHARED_TYPE_A
(P_SHARED_TYPE_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
,P_EFFECTIVE_DATE in DATE
)is
begin
hr_utility.set_location('Entering: PER_SHARED_TYPES_BK3.DELETE_SHARED_TYPE_A', 10);
hr_utility.set_location(' Leaving: PER_SHARED_TYPES_BK3.DELETE_SHARED_TYPE_A', 20);
end DELETE_SHARED_TYPE_A;
procedure DELETE_SHARED_TYPE_B
(P_SHARED_TYPE_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
,P_EFFECTIVE_DATE in DATE
)is
begin
hr_utility.set_location('Entering: PER_SHARED_TYPES_BK3.DELETE_SHARED_TYPE_B', 10);
hr_utility.set_location(' Leaving: PER_SHARED_TYPES_BK3.DELETE_SHARED_TYPE_B', 20);
end DELETE_SHARED_TYPE_B;