The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_PoLineIdTab.Delete;
Select Po_Line_Id
Into L_Po_Line_Id
From Po_Distributions_All
Where Po_Distribution_id = P_Po_Distribution_Id;
G_IsRbLineTab.Delete;
G_ExCwkRbTCOrgIdTab.Delete;
Select 'Y'
Into L_Exists
From Dual
Where Exists (Select 1
From Pa_Projects_All P,
Po_Distributions_All Po
Where nvl(P.Org_Id, -99) = nvl(P_Org_Id, -99)
And P.Project_Id = Po.Project_Id
And PA_PJC_CWK_UTILS.is_rate_based_line (
Po.Po_Line_Id,
Po.Po_Distribution_Id) = 'Y'
);
G_CwkTCXfaceAllowedTab.Delete;
Select I.Xface_Cwk_Timecards_Flag
Into L_Allowed
From Pa_Projects_All P,
Pa_Implementations_All I
Where P.Project_Id = P_Project_Id
AND p.org_id = i.org_id; -- bug 5365269