326: --
327: l_proc varchar2(72) := g_package||'loop_control';
328: --
329: l_continue_loop varchar2(1);
330: l_inputs ff_exec.inputs_t;
331: l_get_outputs ff_exec.outputs_t;
332: l_formula_id number;
333: --
334:
327: l_proc varchar2(72) := g_package||'loop_control';
328: --
329: l_continue_loop varchar2(1);
330: l_inputs ff_exec.inputs_t;
331: l_get_outputs ff_exec.outputs_t;
332: l_formula_id number;
333: --
334:
335: begin
423: ,p_accrual_plan_id number
424: ,p_formula_name varchar2) return number is
425: --
426: l_proc varchar2(72) := g_package||'call_formula';
427: l_inputs ff_exec.inputs_t;
428: l_get_outputs ff_exec.outputs_t;
429: --
430: begin
431: -----------------------------
424: ,p_formula_name varchar2) return number is
425: --
426: l_proc varchar2(72) := g_package||'call_formula';
427: l_inputs ff_exec.inputs_t;
428: l_get_outputs ff_exec.outputs_t;
429: --
430: begin
431: -----------------------------
432: -- Initialise the formula. --
466: procedure run_formula
467: (p_formula_name varchar2
468: ,p_business_group_id number
469: ,p_calculation_date date
470: ,p_inputs ff_exec.inputs_t
471: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
472: --
473: l_proc varchar2(72) := g_package||'run_formula';
474: l_inputs ff_exec.inputs_t;
467: (p_formula_name varchar2
468: ,p_business_group_id number
469: ,p_calculation_date date
470: ,p_inputs ff_exec.inputs_t
471: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
472: --
473: l_proc varchar2(72) := g_package||'run_formula';
474: l_inputs ff_exec.inputs_t;
475: l_outputs ff_exec.outputs_t;
470: ,p_inputs ff_exec.inputs_t
471: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
472: --
473: l_proc varchar2(72) := g_package||'run_formula';
474: l_inputs ff_exec.inputs_t;
475: l_outputs ff_exec.outputs_t;
476: l_formula_id number;
477:
478: begin
471: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
472: --
473: l_proc varchar2(72) := g_package||'run_formula';
474: l_inputs ff_exec.inputs_t;
475: l_outputs ff_exec.outputs_t;
476: l_formula_id number;
477:
478: begin
479:
512: ---------------------------------------------------------------------*/
513: procedure run_formula
514: (p_formula_id number
515: ,p_calculation_date date
516: ,p_inputs ff_exec.inputs_t
517: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
518: --
519:
520: /* Gets the FF name when a FF is not compiled. */
513: procedure run_formula
514: (p_formula_id number
515: ,p_calculation_date date
516: ,p_inputs ff_exec.inputs_t
517: ,p_outputs IN OUT NOCOPY ff_exec.outputs_t) is
518: --
519:
520: /* Gets the FF name when a FF is not compiled. */
521: cursor csr_get_ff_name is
526: ff.effective_start_date and ff.effective_end_date;
527:
528: l_formula_name ff_formulas_f.formula_name%TYPE;
529: l_proc varchar2(72) := g_package||'run_formula';
530: l_inputs ff_exec.inputs_t;
531: l_outputs ff_exec.outputs_t;
532: --
533: begin
534:
527:
528: l_formula_name ff_formulas_f.formula_name%TYPE;
529: l_proc varchar2(72) := g_package||'run_formula';
530: l_inputs ff_exec.inputs_t;
531: l_outputs ff_exec.outputs_t;
532: --
533: begin
534:
535: hr_utility.set_location('Entering '||l_proc, 5);
557: --
558: ----------------------------
559: -- Initialize the formula --
560: ----------------------------
561: ff_exec.init_formula(p_formula_id, p_calculation_date, l_inputs, l_outputs);
562: --
563: hr_utility.set_location('Handle inputs '||l_proc, 10);
564: -----------------------------
565: -- Set up the input values --
578: hr_utility.set_location('Run Formula '||l_proc, 15);
579: ---------------------
580: -- Run the formula --
581: ---------------------
582: ff_exec.run_formula(l_inputs,l_outputs);
583: --
584: hr_utility.set_location('Handle outputs '||l_proc, 20);
585: -------------------------------
586: -- Populate the output table --