[Home] [Help]
508: -- hr_entry.generate_run_result_id
509: --
510: -- DESCRIPTION
511: -- Generates then next sequence value for inserting a run result into the
512: -- PAY_RUN_RESULTS base table.
513: --
514: FUNCTION generate_run_result_id return number is
515: v_run_result_id number;
516: --
518: --
519: -- Select the next run_result_id unique primary key id
520: --
521: begin
522: SELECT PAY_RUN_RESULTS_S.NEXTVAL
523: INTO v_run_result_id
524: FROM SYS.DUAL;
525: exception
526: when NO_DATA_FOUND then
3776: -- DESCRIPTION
3777: -- This function is used for third party inserts into:
3778: -- PAY_ELEMENT_ENTRIES_F (If an abscence, or DT functions are being used).
3779: -- PAY_ELEMENT_ENTRY_VALUES_F (Entry Values are always inserted).
3780: -- PAY_RUN_RESULTS (If nonrecurring).
3781: -- PAY_RUN_RESULT_VBALUES (If nonrecurring).
3782: --
3783: --
3784: procedure ins_3p_ent_values
4058: end;
4059: --
4060: begin
4061: --
4062: insert into pay_run_results
4063: (run_result_id,
4064: element_type_id,
4065: assignment_action_id,
4066: entry_type,
4478: -- DESCRIPTION
4479: -- This procedure is used for third party deletes from:
4480: -- PAY_ELEMENT_ENTRIES_F (If an abscence, or DT functions are being used).
4481: -- PAY_ELEMENT_ENTRY_VALUES_F (Entry Values are always deleted).
4482: -- PAY_RUN_RESULTS (If nonrecurring, and exist).
4483: -- PAY_RUN_RESULT_VALUES (If nonrecurring, and exist).
4484: -- BEN_COVERED_DEPENDENTS_F (sic)
4485: -- BEN_BENEFICIARIES_F
4486: --
4663: begin
4664: delete from pay_run_result_values rrv
4665: where rrv.run_result_id =
4666: (select rr.run_result_id
4667: from pay_run_results rr
4668: where rr.element_type_id + 0 = p_element_type_id
4669: and rr.entry_type = p_entry_type
4670: and rr.source_id = p_element_entry_id
4671: and rr.source_type = 'E'
4679: if g_debug then
4680: hr_utility.set_location('hr_entry.del_3p_entry_values', 3);
4681: end if;
4682: begin
4683: delete from pay_run_results rr
4684: where rr.element_type_id + 0 = p_element_type_id
4685: and rr.entry_type = p_entry_type
4686: and rr.source_id = p_element_entry_id
4687: and rr.source_type = 'E'
4981: AND PEEV1.ELEMENT_ENTRY_ID = p_element_entry_id
4982: AND PEEV1.INPUT_VALUE_ID + 0 = PRRV1.INPUT_VALUE_ID)
4983: WHERE PRRV1.RUN_RESULT_ID =
4984: (SELECT PRR1.RUN_RESULT_ID
4985: FROM PAY_RUN_RESULTS PRR1
4986: WHERE PRR1.SOURCE_ID = p_element_entry_id
4987: AND PRR1.SOURCE_TYPE = 'E'
4988: AND PRR1.STATUS = 'U'
4989: AND PRR1.ELEMENT_TYPE_ID +0 = p_element_type_id);
5051: --
5052: -- DESCRIPTION
5053: -- This procedure is used for third party updates into:
5054: -- PAY_ELEMENT_ENTRY_VALUES_F
5055: -- PAY_RUN_RESULTS (If nonrecurring).
5056: -- PAY_RUN_RESULT_VALUES (If nonrecurring).
5057: --
5058: -- NB. this procedure is OVERLOADED !
5059: --
5130: --
5131: -- DESCRIPTION
5132: -- This procedure is used for third party updates into:
5133: -- PAY_ELEMENT_ENTRY_VALUES_F
5134: -- PAY_RUN_RESULTS (If nonrecurring).
5135: -- PAY_RUN_RESULT_VALUES (If nonrecurring).
5136: --
5137: -- NB. this Procedure is OVERLOADED !
5138: --
6096: if (l_payroll_id is not null) then
6097: begin
6098: select max(ppr.run_result_id)
6099: into l_run_result_id
6100: from pay_run_results ppr,
6101: pay_assignment_actions paa,
6102: pay_payroll_actions ppa,
6103: pay_action_classifications pac
6104: where ppr.source_id = p_element_entry_id
6144: end if;
6145: begin
6146: select prr.status
6147: into l_run_result_status
6148: from pay_run_results prr
6149: where prr.run_result_id = l_run_result_id;
6150: exception
6151: when NO_DATA_FOUND then
6152: l_run_result_status := 'UNKNOWN';