The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure DELETE_PAYROLL_A
(P_EFFECTIVE_DATE in DATE
,P_DATETRACK_MODE in VARCHAR2
,P_PAYROLL_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
,P_EFFECTIVE_START_DATE in DATE
,P_EFFECTIVE_END_DATE in DATE
)is
begin
hr_utility.set_location('Entering: PAY_PAYROLL_BK3.DELETE_PAYROLL_A', 10);
hr_utility.set_location(' Leaving: PAY_PAYROLL_BK3.DELETE_PAYROLL_A', 20);
end DELETE_PAYROLL_A;
procedure DELETE_PAYROLL_B
(P_EFFECTIVE_DATE in DATE
,P_DATETRACK_MODE in VARCHAR2
,P_PAYROLL_ID in NUMBER
,P_OBJECT_VERSION_NUMBER in NUMBER
)is
l_commit_unit_number number;
hr_utility.set_location('Entering: PAY_PAYROLL_BK3.DELETE_PAYROLL_B', 10);
PAY_GB_PAYROLL_RULES.VALIDATE_DELETE
(P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
,P_DATETRACK_MODE => P_DATETRACK_MODE
,P_PAYROLL_ID => P_PAYROLL_ID
);
hr_api.validate_commit_unit(l_commit_unit_number, 'DELETE_PAYROLL', 'BP');
hr_utility.set_location(' Leaving: PAY_PAYROLL_BK3.DELETE_PAYROLL_B', 20);
end DELETE_PAYROLL_B;