The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW( X_ROWID IN OUT VARCHAR2,
X_FUND_ID IN OUT NUMBER,
X_BUSINESS_GROUP_ID NUMBER,
X_CARRIER_ID NUMBER,
X_LOCATION_ID NUMBER,
X_STATE_CODE VARCHAR2,
X_CALCULATION_METHOD VARCHAR2,
X_CALCULATION_METHOD2 VARCHAR2,
X_CALCULATION_METHOD3 VARCHAR2) IS
BEGIN
hr_utility.set_location('pywcdcr.insert_row', 0);
SELECT PAY_WC_FUNDS_S.NEXTVAL
INTO X_FUND_ID
FROM DUAL;
hr_utility.set_location('pywcdcr.insert_row', 1);
hr_utility.set_location('pywcdcr.insert_row', 2);
INSERT INTO PAY_WC_FUNDS
(FUND_ID, BUSINESS_GROUP_ID, CARRIER_ID, LOCATION_ID,
STATE_CODE, CALCULATION_METHOD, CALCULATION_METHOD2, CALCULATION_METHOD3)
VALUES
(X_FUND_ID, X_BUSINESS_GROUP_ID, X_CARRIER_ID, X_LOCATION_ID,
X_STATE_CODE, X_CALCULATION_METHOD, X_CALCULATION_METHOD2, X_CALCULATION_METHOD3);
hr_utility.set_location('pywcdcr.insert_row', 3);
SELECT ROWID
INTO X_ROWID
FROM PAY_WC_FUNDS
WHERE FUND_ID = X_FUND_ID;
hr_utility.set_location('pywcdcr.insert_row', 4);
END INSERT_ROW;
PROCEDURE UPDATE_ROW( X_ROWID VARCHAR2,
X_FUND_ID NUMBER,
X_BUSINESS_GROUP_ID NUMBER,
X_CARRIER_ID NUMBER,
X_LOCATION_ID NUMBER,
X_STATE_CODE VARCHAR2,
X_CALCULATION_METHOD VARCHAR2,
X_CALCULATION_METHOD2 VARCHAR2,
X_CALCULATION_METHOD3 VARCHAR2) IS
BEGIN
hr_utility.set_location('pywcdcr.update_row', 0);
UPDATE PAY_WC_FUNDS
SET FUND_ID = X_FUND_ID
, BUSINESS_GROUP_ID = X_BUSINESS_GROUP_ID
, CARRIER_ID = X_CARRIER_ID
, LOCATION_ID = X_LOCATION_ID
, STATE_CODE = X_STATE_CODE
, CALCULATION_METHOD = X_CALCULATION_METHOD
, CALCULATION_METHOD2 = X_CALCULATION_METHOD2
, CALCULATION_METHOD3 = X_CALCULATION_METHOD3
WHERE ROWID = X_ROWID;
hr_utility.set_location('pywcdcr.update_row', 1);
hr_utility.set_location('pywcdcr.update_row', 2);
END UPDATE_ROW;
PROCEDURE DELETE_ROW( X_ROWID VARCHAR2,
X_FUND_ID NUMBER,
X_BUSINESS_GROUP_ID NUMBER,
X_CARRIER_ID NUMBER,
X_LOCATION_ID NUMBER,
X_STATE_CODE VARCHAR2,
X_CALCULATION_METHOD VARCHAR2,
X_CALCULATION_METHOD2 VARCHAR2,
X_CALCULATION_METHOD3 VARCHAR2) IS
BEGIN
hr_utility.set_location('pywcdcr.delete_row', 0);
DELETE FROM PAY_WC_FUNDS
WHERE ROWID = X_ROWID;
hr_utility.set_location('pywcdcr.delete_row', 1);
hr_utility.set_location('pywcdcr.delete_row', 2);
END DELETE_ROW;
SELECT *
FROM PAY_WC_FUNDS
WHERE ROWID = X_ROWID
FOR UPDATE OF FUND_ID NOWAIT;
SELECT 'Y'
FROM PAY_WC_FUNDS
WHERE CARRIER_ID = P_CARRIER_ID
AND STATE_CODE = P_STATE_CODE
AND ((LOCATION_ID = P_LOCATION_ID
AND P_LOCATION_ID IS NOT NULL)
OR (LOCATION_ID IS NULL
AND P_LOCATION_ID IS NULL))
AND ((ROWID <> P_ROWID
AND P_ROWID IS NOT NULL)
OR
(P_ROWID IS NULL));
SELECT 'Y'
FROM PAY_WC_RATES
WHERE FUND_ID = P_FUND_ID
AND WC_CODE = P_WC_CODE
AND ((ROWID <> P_ROWID
AND P_ROWID IS NOT NULL)
OR
(P_ROWID IS NULL));
SELECT 'Y'
FROM PAY_WC_RATES
WHERE FUND_ID = P_FUND_ID;
SELECT 'Y'
FROM PAY_WC_FUNDS WCF
WHERE WCF.STATE_CODE = P_STATE_CODE
AND WCF.ROWID <> P_ROWID
AND EXISTS (
SELECT 1
FROM PAY_WC_RATES WCR
WHERE WCR.FUND_ID = WCF.FUND_ID
AND WCR.WC_CODE = P_WC_CODE);
SELECT 'Y'
FROM PAY_JOB_WC_CODE_USAGES
WHERE STATE_CODE = P_STATE_CODE
AND WC_CODE = P_WC_CODE
AND BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID;
SELECT 'Y'
FROM HR_ORGANIZATION_INFORMATION ORG
, PAY_US_EMP_FED_TAX_RULES_F EFT
, PER_ALL_ASSIGNMENTS_F ASS
, HR_SOFT_CODING_KEYFLEX SCF
, FND_ID_FLEX_STRUCTURES_VL IFS
WHERE ORG.ORG_INFORMATION8 = P_CARRIER_ID
AND ORG.ORG_INFORMATION1 = P_STATE_CODE
AND ORG.ORG_INFORMATION_CONTEXT = 'State Tax Rules'
AND ORG.ORGANIZATION_ID = SCF.SEGMENT1
AND EFT.SUI_STATE_CODE = P_STATE_CODE
AND EFT.ASSIGNMENT_ID = ASS.ASSIGNMENT_ID
AND ASS.BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID
AND ASS.SOFT_CODING_KEYFLEX_ID = SCF.SOFT_CODING_KEYFLEX_ID
AND SCF.SEGMENT8 = TO_CHAR(P_WC_CODE)
AND SCF.ID_FLEX_NUM = IFS.ID_FLEX_NUM
AND IFS.ID_FLEX_STRUCTURE_NAME = 'GREs and other data';
SELECT 'Y'
FROM HR_ORGANIZATION_INFORMATION ORG
, PAY_US_EMP_FED_TAX_RULES_F EFT
, PER_ALL_ASSIGNMENTS_F ASS
, HR_SOFT_CODING_KEYFLEX SCF
, FND_ID_FLEX_STRUCTURES_VL IFS
WHERE ORG.ORG_INFORMATION8 = P_CARRIER_ID
AND ORG.ORG_INFORMATION1 = P_STATE_CODE
AND ORG.ORG_INFORMATION_CONTEXT = 'State Tax Rules'
AND ORG.ORGANIZATION_ID = SCF.SEGMENT1
AND EFT.SUI_STATE_CODE = P_STATE_CODE
AND EFT.ASSIGNMENT_ID = ASS.ASSIGNMENT_ID
AND ASS.BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID
AND ASS.SOFT_CODING_KEYFLEX_ID = SCF.SOFT_CODING_KEYFLEX_ID
AND SCF.SEGMENT8 = TO_CHAR(P_WC_CODE)
AND SCF.ID_FLEX_NUM = IFS.ID_FLEX_NUM
AND IFS.ID_FLEX_STRUCTURE_NAME = 'GREs and other data'
AND NOT EXISTS (
SELECT 1
FROM PAY_WC_FUNDS WCF
WHERE WCF.CARRIER_ID = P_CARRIER_ID
AND WCF.STATE_CODE = P_STATE_CODE
AND WCF.ROWID <> P_ROWID
AND ((WCF.LOCATION_ID IS NULL)
OR (WCF.LOCATION_ID = P_LOCATION_ID
AND WCF.LOCATION_ID IS NOT NULL
AND P_LOCATION_ID IS NOT NULL)));