The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT NVL(MAX(payroll_group_id),0)+1
INTO V_COUNT FROM PAY_GB_PAYROLL_GROUPS;
SELECT PAY_FREQUENCY INTO G_FREQUENCY
FROM PAY_GB_PAYROLL_GROUPS WHERE
PAYROLL_GROUP_ID =P_PAYROLL_GROUP_ID;
SELECT distinct PERIOD_TYPE INTO P_FREQUENCY
FROM PAY_ALL_PAYROLLS_F WHERE
PAYROLL_ID=P_PAYROLL_ID;
SELECT PPA.PAYROLL_ACTION_ID INTO
V_PAY_ACTION_ID FROM PAY_PAYROLL_ACTIONS PPA
WHERE PPA.REQUEST_ID=P_REQUEST_ID;
SELECT PGPG.PAYROLL_GROUP_NAME INTO V_PAYROLL_GROUP_NAME
FROM PAY_GB_PAYROLL_GROUPS PGPG
WHERE PGPG.PAYROLL_GROUP_NAME=P_PAYROLL_GROUP_NAME
AND PGPG.BUSINESS_GROUP_ID=P_BUSINESS_GROUP_ID;
SELECT PGPGM.PAYROLL_ID INTO
V_PAYROLL_ID
FROM PAY_GB_PAYROLL_GROUP_MAPPINGS PGPGM
WHERE PGPGM.PAYROLL_ID=P_PAYROLL_ID
AND PGPGM.PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID;
SELECT CONCURRENT_REQUEST_ID
INTO V_CONC_ID
FROM PAY_GB_MP_MASTER_REQUEST_DET PGPMMRD
WHERE PGPMMRD.CONCURRENT_REQUEST_ID=P_CONCURRENT_REQUEST_ID
AND PGPMMRD.PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID;
SELECT PGMPCRD.CHILD_CONCURRENT_REQUEST_ID
INTO V_CONC_ID
FROM PAY_GB_MP_CHILD_REQUEST_DET PGMPCRD,
PAY_GB_MP_MASTER_REQUEST_DET PGMMRD
WHERE PGMPCRD.CHILD_CONCURRENT_REQUEST_ID=P_CHILD_CONCURRENT_REQUEST_ID
AND PGMPCRD.PARENT_CONCURRENT_REQUEST_ID=PGMMRD.CONCURRENT_REQUEST_ID
AND PGMMRD.CONCURRENT_REQUEST_ID=P_PARENT_CONC_REQUEST_ID;
INSERT INTO PAY_GB_PAYROLL_GROUPS
(
PAYROLL_GROUP_ID
,PAYROLL_GROUP_NAME
,PAY_FREQUENCY
,DESCRIPTION
,BUSINESS_GROUP_ID
,CREATION_DATE
,OBJECT_VERSION_NUMBER
)
VALUES
(
M_PAYROLL_GROUP_ID
,P_PAYROLL_GROUP_NAME
,P_FREQUENCY
,P_DESCRIPTION
,P_BUSINESS_GROUP_ID
,SYSDATE
,1
);
hr_utility.trace('Insert Over');
SELECT PAPF.PAYROLL_NAME INTO V_PAYROLL_NAME
FROM PAY_ALL_PAYROLLS_F PAPF
WHERE PAPF.PAYROLL_ID=P_PAYROLL_ID
AND SYSDATE BETWEEN PAPF.EFFECTIVE_START_DATE AND PAPF.EFFECTIVE_END_DATE
AND PAPF.BUSINESS_GROUP_ID=P_BUSINESS_GROUP_ID;
SELECT PGPG.PAYROLL_GROUP_NAME INTO V_PAYROLL_GROUP_NAME
FROM PAY_GB_PAYROLL_GROUPS PGPG
WHERE PGPG.PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID
AND PGPG.BUSINESS_GROUP_ID=P_BUSINESS_GROUP_ID;
INSERT INTO PAY_GB_PAYROLL_GROUP_MAPPINGS
(
PAYROLL_ID
,PAYROLL_NAME
,PAYROLL_GROUP_ID
,BUSINESS_GROUP_ID
,CREATION_DATE
,OBJECT_VERSION_NUMBER
)
VALUES
(
P_PAYROLL_ID
,V_PAYROLL_NAME
,P_PAYROLL_GROUP_ID
,P_BUSINESS_GROUP_ID
,SYSDATE
,1
);
hr_utility.trace('Insert over');
INSERT INTO PAY_GB_MP_MASTER_REQUEST_DET
(
CONCURRENT_REQUEST_ID
,PAYROLL_GROUP_ID
,PROCESS_NAME
,REQUEST_PARAMETERS
,REQUEST_SUBMISSION_DATE
,OBJECT_VERSION_NUMBER
,CREATION_DATE
)
VALUES
(
P_CONCURRENT_REQUEST_ID
,P_PAYROLL_GROUP_ID
,P_PROCESS_NAME
,P_REQUEST_PARAMETERS
,P_REQUEST_SUBMISSION_DATE
,1
,SYSDATE
);
INSERT INTO PAY_GB_MP_CHILD_REQUEST_DET
(
CHILD_CONCURRENT_REQUEST_ID
,PARENT_CONCURRENT_REQUEST_ID
,OBJECT_VERSION_NUMBER
,CREATION_DATE
)
VALUES
(
P_CHILD_CON_ID
,P_PARENT_CON_ID
,1
,SYSDATE
);
PAY_GB_MP_MASTER_REQUEST_DET table updated
*/
PROCEDURE UPDATE_MASTER_ROLLBACK_DETAILS
(
P_MASTER_REQUEST_ID IN NUMBER
,P_PAYROLL_GROUP_ID IN NUMBER
,P_ROLLBACK_REQUEST_ID IN NUMBER
)
IS
CURR_OBJ_VERS NUMBER;
SELECT OBJECT_VERSION_NUMBER INTO CURR_OBJ_VERS
FROM PAY_GB_MP_MASTER_REQUEST_DET
WHERE CONCURRENT_REQUEST_ID=P_MASTER_REQUEST_ID;
UPDATE PAY_GB_MP_MASTER_REQUEST_DET
SET
ROLLBACK_REQUEST_ID=P_ROLLBACK_REQUEST_ID
,LAST_UPDATE_DATE=SYSDATE
,OBJECT_VERSION_NUMBER=(CURR_OBJ_VERS+1)
WHERE CONCURRENT_REQUEST_ID=P_MASTER_REQUEST_ID;
END UPDATE_MASTER_ROLLBACK_DETAILS;
PROCEDURE UPDATE_CHILD_ROLLBACK_DETAILS
(
P_MASTER_REQUEST_ID IN NUMBER
,P_PAYROLL_GROUP_ID IN NUMBER
,P_ROLLBACK_REQUEST_ID IN NUMBER
,P_CHILD_REQUEST_ID IN NUMBER
)
IS
CURR_OBJ_VERS NUMBER;
SELECT OBJECT_VERSION_NUMBER INTO CURR_OBJ_VERS
FROM PAY_GB_MP_CHILD_REQUEST_DET
WHERE CHILD_CONCURRENT_REQUEST_ID=P_CHILD_REQUEST_ID
AND PARENT_CONCURRENT_REQUEST_ID=P_MASTER_REQUEST_ID;
UPDATE PAY_GB_MP_CHILD_REQUEST_DET
SET
ROLLBACK_REQUEST_ID=P_ROLLBACK_REQUEST_ID
,LAST_UPDATE_DATE=SYSDATE
,OBJECT_VERSION_NUMBER=(CURR_OBJ_VERS+1)
WHERE PARENT_CONCURRENT_REQUEST_ID=P_MASTER_REQUEST_ID
AND CHILD_CONCURRENT_REQUEST_ID=P_CHILD_REQUEST_ID;
END UPDATE_CHILD_ROLLBACK_DETAILS;
DELETE PAY_GB_PAYROLL_GROUP_MAPPINGS PGPGM
WHERE PGPGM.PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID
AND PGPGM.BUSINESS_GROUP_ID=P_BUSINESS_GROUP_ID;
DELETE PAY_GB_PAYROLL_GROUPS PGPG
WHERE PGPG.PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID
AND PGPG.BUSINESS_GROUP_ID=P_BUSINESS_GROUP_ID;
PROCEDURE DELETE_PAYROLL_FROM_GRP
(
P_PAYROLL_ID IN NUMBER
,P_PAYROLL_GROUP_ID IN NUMBER)
IS
BEGIN
DELETE PAY_GB_PAYROLL_GROUP_MAPPINGS
WHERE PAYROLL_ID=P_PAYROLL_ID
AND PAYROLL_GROUP_ID=P_PAYROLL_GROUP_ID;
END DELETE_PAYROLL_FROM_GRP;
PROCEDURE UPDATE_ALREADY_ROLLEDBACK
(P_REQUEST_ID IN NUMBER)
IS
BEGIN
UPDATE PAY_GB_MP_CHILD_REQUEST_DET
SET ROLLBACK_REQUEST_ID=-1
WHERE CHILD_CONCURRENT_REQUEST_ID=P_REQUEST_ID;
END UPDATE_ALREADY_ROLLEDBACK;