[Home] [Help]
471: -- hr_entry.generate_run_result_id
472: --
473: -- DESCRIPTION
474: -- Generates then next sequence value for inserting a run result into the
475: -- PAY_RUN_RESULTS base table.
476: --
477: FUNCTION generate_run_result_id return number is
478: v_run_result_id number;
479: --
481: --
482: -- Select the next run_result_id unique primary key id
483: --
484: begin
485: SELECT PAY_RUN_RESULTS_S.NEXTVAL
486: INTO v_run_result_id
487: FROM SYS.DUAL;
488: exception
489: when NO_DATA_FOUND then
3400: -- DESCRIPTION
3401: -- This function is used for third party inserts into:
3402: -- PAY_ELEMENT_ENTRIES_F (If an abscence, or DT functions are being used).
3403: -- PAY_ELEMENT_ENTRY_VALUES_F (Entry Values are always inserted).
3404: -- PAY_RUN_RESULTS (If nonrecurring).
3405: -- PAY_RUN_RESULT_VBALUES (If nonrecurring).
3406: --
3407: --
3408: procedure ins_3p_ent_values
3682: end;
3683: --
3684: begin
3685: --
3686: insert into pay_run_results
3687: (run_result_id,
3688: element_type_id,
3689: assignment_action_id,
3690: entry_type,
4102: -- DESCRIPTION
4103: -- This procedure is used for third party deletes from:
4104: -- PAY_ELEMENT_ENTRIES_F (If an abscence, or DT functions are being used).
4105: -- PAY_ELEMENT_ENTRY_VALUES_F (Entry Values are always deleted).
4106: -- PAY_RUN_RESULTS (If nonrecurring, and exist).
4107: -- PAY_RUN_RESULT_VALUES (If nonrecurring, and exist).
4108: -- BEN_COVERED_DEPENDENTS_F (sic)
4109: -- BEN_BENEFICIARIES_F
4110: --
4287: begin
4288: delete from pay_run_result_values rrv
4289: where rrv.run_result_id =
4290: (select rr.run_result_id
4291: from pay_run_results rr
4292: where rr.element_type_id + 0 = p_element_type_id
4293: and rr.entry_type = p_entry_type
4294: and rr.source_id = p_element_entry_id
4295: and rr.source_type = 'E'
4303: if g_debug then
4304: hr_utility.set_location('hr_entry.del_3p_entry_values', 3);
4305: end if;
4306: begin
4307: delete from pay_run_results rr
4308: where rr.element_type_id + 0 = p_element_type_id
4309: and rr.entry_type = p_entry_type
4310: and rr.source_id = p_element_entry_id
4311: and rr.source_type = 'E'
4605: AND PEEV1.ELEMENT_ENTRY_ID = p_element_entry_id
4606: AND PEEV1.INPUT_VALUE_ID + 0 = PRRV1.INPUT_VALUE_ID)
4607: WHERE PRRV1.RUN_RESULT_ID =
4608: (SELECT PRR1.RUN_RESULT_ID
4609: FROM PAY_RUN_RESULTS PRR1
4610: WHERE PRR1.SOURCE_ID = p_element_entry_id
4611: AND PRR1.SOURCE_TYPE = 'E'
4612: AND PRR1.STATUS = 'U'
4613: AND PRR1.ELEMENT_TYPE_ID +0 = p_element_type_id);
4675: --
4676: -- DESCRIPTION
4677: -- This procedure is used for third party updates into:
4678: -- PAY_ELEMENT_ENTRY_VALUES_F
4679: -- PAY_RUN_RESULTS (If nonrecurring).
4680: -- PAY_RUN_RESULT_VALUES (If nonrecurring).
4681: --
4682: -- NB. this procedure is OVERLOADED !
4683: --
4754: --
4755: -- DESCRIPTION
4756: -- This procedure is used for third party updates into:
4757: -- PAY_ELEMENT_ENTRY_VALUES_F
4758: -- PAY_RUN_RESULTS (If nonrecurring).
4759: -- PAY_RUN_RESULT_VALUES (If nonrecurring).
4760: --
4761: -- NB. this Procedure is OVERLOADED !
4762: --
5707: if (l_payroll_id is not null) then
5708: begin
5709: select max(ppr.run_result_id)
5710: into l_run_result_id
5711: from pay_run_results ppr,
5712: pay_assignment_actions paa,
5713: pay_payroll_actions ppa,
5714: pay_action_classifications pac
5715: where ppr.source_id = p_element_entry_id
5755: end if;
5756: begin
5757: select prr.status
5758: into l_run_result_status
5759: from pay_run_results prr
5760: where prr.run_result_id = l_run_result_id;
5761: exception
5762: when NO_DATA_FOUND then
5763: l_run_result_status := 'UNKNOWN';