The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure UPDATE_COMMUNICATION_A
(P_EFFECTIVE_DATE in DATE
,P_COMMUNICATION_PROPERTY_ID in NUMBER
,P_OBJECT_TYPE in VARCHAR2
,P_OBJECT_ID in NUMBER
,P_STATUS in VARCHAR2
,P_START_DATE in DATE
,P_END_DATE in DATE
,P_COMMUNICATION_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
)is
begin
hr_utility.set_location('Entering: IRC_COMMUNICATIONS_BK4.UPDATE_COMMUNICATION_A', 10);
hr_utility.set_location(' Leaving: IRC_COMMUNICATIONS_BK4.UPDATE_COMMUNICATION_A', 20);
end UPDATE_COMMUNICATION_A;
procedure UPDATE_COMMUNICATION_B
(P_EFFECTIVE_DATE in DATE
,P_COMMUNICATION_PROPERTY_ID in NUMBER
,P_OBJECT_TYPE in VARCHAR2
,P_OBJECT_ID in NUMBER
,P_STATUS in VARCHAR2
,P_START_DATE in DATE
,P_END_DATE in DATE
,P_COMMUNICATION_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
)is
begin
hr_utility.set_location('Entering: IRC_COMMUNICATIONS_BK4.UPDATE_COMMUNICATION_B', 10);
hr_utility.set_location(' Leaving: IRC_COMMUNICATIONS_BK4.UPDATE_COMMUNICATION_B', 20);
end UPDATE_COMMUNICATION_B;