[Home] [Help]
331: l_hourly_rate_formula_const constant ff_formulas_f.formula_name%type := 'HOURLY_RATE_FORMULA' ;
332:
333: l_procedure_name varchar2(61) := 'pay_nz_leave_liability.hourly_rate' ;
334: l_hourly_rate number := null ;
335: l_business_group_id pay_au_modules.business_group_id%type ;
336: l_legislation_code pay_au_modules.legislation_code%type ;
337: l_formula_name ff_formulas_f.formula_name%type ;
338:
339: e_bad_module exception ;
332:
333: l_procedure_name varchar2(61) := 'pay_nz_leave_liability.hourly_rate' ;
334: l_hourly_rate number := null ;
335: l_business_group_id pay_au_modules.business_group_id%type ;
336: l_legislation_code pay_au_modules.legislation_code%type ;
337: l_formula_name ff_formulas_f.formula_name%type ;
338:
339: e_bad_module exception ;
340: e_bad_hourly_rate exception ;
341:
342: procedure execute_formula(p_formula_name varchar2) is
343:
344: l_procedure_name varchar2(61) := 'execute_formula' ;
345: l_module_id pay_au_modules.module_id%type ;
346:
347: cursor c_module(p_formula_name varchar2
348: ,p_business_group_id number
349: ,p_legislation_code varchar2) is
347: cursor c_module(p_formula_name varchar2
348: ,p_business_group_id number
349: ,p_legislation_code varchar2) is
350: select m.module_id
351: from pay_au_modules m
352: where m.formula_name = p_formula_name
353: and m.enabled_flag = 'Y'
354: and ((m.business_group_id is null
355: and m.legislation_code is null)
406: ,l_legislation_code) ;
407:
408: -- Execute the hourly rate formula.
409: -- (the hourly rate formula will be written by the implementation
410: -- team. We will ship the module definition in pay_au_modules
411: -- and define the specification of the formula).
412:
413: execute_formula(l_hourly_rate_formula_const) ;
414: