[Home] [Help]
370: l_new_val NUMBER;
371: l_dummy NUMBER;
372: begin
373: hr_utility.TRACE(' p_variable_value '|| p_variable_value);
374: l_present_val := per_formula_functions.get_number(p_varable_name);
375: hr_utility.TRACE(' l_present_val '|| l_present_val);
376: if l_present_val is null
377: then
378: if p_variable_value is null
385: else
386: l_new_val := l_present_val + nvl(to_number(p_variable_value), 0);
387: hr_utility.TRACE(' l_new_val '|| l_new_val);
388: end if;
389: l_dummy := per_formula_functions.set_number(p_varable_name, l_new_val);
390: hr_utility.TRACE(' l_dummy '|| l_dummy);
391: return l_new_val;
392: end;
393:
405: -- rates remain same for a vehicle type
406: -- !! the above statm is not true as second assignment (multi)
407: -- might not have this benefit type hence it will be zero,
408: -- so we don't want to store zero.
409: if nvl(per_formula_functions.get_number(p_variable_name),0) < nvl(to_number(p_variable_value),0) then
410: l_dummy := per_formula_functions.set_number(p_variable_name, p_variable_value);
411: end if;
412: end if;
413: if p_variable_datatype = 'T' then
406: -- !! the above statm is not true as second assignment (multi)
407: -- might not have this benefit type hence it will be zero,
408: -- so we don't want to store zero.
409: if nvl(per_formula_functions.get_number(p_variable_name),0) < nvl(to_number(p_variable_value),0) then
410: l_dummy := per_formula_functions.set_number(p_variable_name, p_variable_value);
411: end if;
412: end if;
413: if p_variable_datatype = 'T' then
414: -- we need to store the Y value
412: end if;
413: if p_variable_datatype = 'T' then
414: -- we need to store the Y value
415: -- as this will be called only when the value is Y
416: l_dummy := per_formula_functions.set_text(p_variable_name, p_variable_value);
417: end if;
418: if p_variable_datatype = 'D' then
419: -- this is for date, we need to store the max date
420: -- this is used for date free fuel withdrawn
418: if p_variable_datatype = 'D' then
419: -- this is for date, we need to store the max date
420: -- this is used for date free fuel withdrawn
421: -- if p_variable_value is null or zero this won't be called
422: l_present_val := per_formula_functions.get_text(p_variable_name);
423: hr_utility.TRACE(' l_present_val '|| l_present_val);
424: if l_present_val is null
425: then
426: l_dummy := per_formula_functions.set_text(p_variable_name, p_variable_value);
422: l_present_val := per_formula_functions.get_text(p_variable_name);
423: hr_utility.TRACE(' l_present_val '|| l_present_val);
424: if l_present_val is null
425: then
426: l_dummy := per_formula_functions.set_text(p_variable_name, p_variable_value);
427: else
428: if fnd_date.canonical_to_date(l_present_val) <>
429: fnd_date.canonical_to_date(p_variable_value)
430: then
431: l_warnmsg := '1';
432: if fnd_date.canonical_to_date(l_present_val) <
433: fnd_date.canonical_to_date(p_variable_value)
434: then
435: l_dummy := per_formula_functions.set_text(p_variable_name, p_variable_value);
436: end if;
437: end if;
438: end if;
439: end if;
473: l_dummy NUMBER;
474: begin
475: hr_utility.TRACE('.. p_varable_name ...'|| p_varable_name);
476: hr_utility.TRACE('.. p_variable_value ...'|| p_variable_value);
477: l_present_val := per_formula_functions.get_text(p_varable_name);
478: hr_utility.TRACE('..l_present_val.. '|| l_present_val);
479: if p_lookup_type is null
480: then
481: if l_present_val is null
480: then
481: if l_present_val is null
482: then
483: l_new_val := p_variable_value;
484: l_dummy := per_formula_functions.set_text(p_varable_name, l_new_val);
485: else
486: hr_utility.TRACE('..Checking present Value with variable value '|| l_present_val);
487: if l_present_val <> nvl(p_variable_value, l_present_val)
488: then
486: hr_utility.TRACE('..Checking present Value with variable value '|| l_present_val);
487: if l_present_val <> nvl(p_variable_value, l_present_val)
488: then
489: l_new_val := 'Multiple';
490: l_dummy := per_formula_functions.set_text(p_varable_name, l_new_val);
491: end if;
492: end if;
493: else
494: l_new_val := get_lookup_desc (p_lookup_type,
496: p_effective_date || ' 00:00:00'); -- since it accepts date in canonical format
497: if l_present_val is null
498: then
499: hr_utility.trace('New vale ' || l_new_val);
500: l_dummy := per_formula_functions.set_text(p_varable_name, l_new_val);
501: else
502: hr_utility.TRACE('..Checking present Value with variable value '|| l_present_val);
503: if l_present_val <> nvl(l_new_val, l_present_val)
504: then
502: hr_utility.TRACE('..Checking present Value with variable value '|| l_present_val);
503: if l_present_val <> nvl(l_new_val, l_present_val)
504: then
505: l_new_val := 'Multiple';
506: l_dummy := per_formula_functions.set_text(p_varable_name, l_new_val);
507: end if;
508: end if;
509: end if;
510: return l_dummy;