DBA Data[Home] [Help]

APPS.HR_PERSON_FLEX_LOGIC dependencies on HR_PERSON_FLEX_LOGIC

Line 1: PACKAGE BODY HR_PERSON_FLEX_LOGIC AS

1: PACKAGE BODY HR_PERSON_FLEX_LOGIC AS
2: /* $Header: hrperlog.pkb 115.21 2003/07/07 18:21:17 asahay noship $ */
3:
4:
5: /************************************************************

Line 28: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 10');

24: l_outputs ff_exec.outputs_t;
25:
26: BEGIN
27:
28: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 10');
29:
30: -- Initialise the Inputs and Outputs tables
31:
32: FF_Exec.Init_Formula

Line 38: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 15');

34: , p_session_date
35: , l_inputs
36: , l_outputs );
37:
38: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 15');
39:
40: if (l_inputs.first is not null)
41: and (l_inputs.last is not null)
42: then

Line 50: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 20');

46: for i in l_inputs.first..l_inputs.last
47:
48: loop
49:
50: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 20');
51:
52: if l_inputs(i).name = 'DATE_EARNED' then
53:
54: l_inputs(i).value := FND_Date.Date_To_Canonical (p_effective_date);

Line 56: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 25');

52: if l_inputs(i).name = 'DATE_EARNED' then
53:
54: l_inputs(i).value := FND_Date.Date_To_Canonical (p_effective_date);
55:
56: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 25');
57:
58: elsif l_inputs(i).name = 'ASSIGNMENT_ID' then
59:
60: l_inputs(i).value := p_assignment_id;

Line 64: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 30');

60: l_inputs(i).value := p_assignment_id;
61:
62: end if;
63:
64: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 30');
65:
66: end loop;
67:
68: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 35');

Line 68: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 35');

64: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 30');
65:
66: end loop;
67:
68: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 35');
69:
70: end if;
71:
72: -- Run the formula

Line 78: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 40');

74: FF_Exec.Run_Formula (l_inputs, l_outputs);
75:
76: -- Get the result
77:
78: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 40');
79:
80: l_budget_value := to_number( l_outputs(l_outputs.first).value );
81:
82: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 45');

Line 82: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 45');

78: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 40');
79:
80: l_budget_value := to_number( l_outputs(l_outputs.first).value );
81:
82: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 45');
83:
84: return (l_budget_value);
85:
86: EXCEPTION

Line 116: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 50');

112: l_budget_value Number := null;
113:
114: BEGIN
115:
116: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 50');
117:
118: open c_budget_value;
119: fetch c_budget_value into l_budget_value;
120:

Line 121: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 55');

117:
118: open c_budget_value;
119: fetch c_budget_value into l_budget_value;
120:
121: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 55');
122:
123: if (c_budget_value%notfound)
124: then
125:

Line 126: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 60');

122:
123: if (c_budget_value%notfound)
124: then
125:
126: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 60');
127:
128: l_budget_value := null;
129:
130: end if;

Line 134: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 65');

130: end if;
131:
132: close c_budget_value;
133:
134: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 65');
135:
136: return l_budget_value;
137:
138: END GetABV;

Line 154: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 70');

150: l_ABV_formula_id Number;
151:
152: BEGIN
153:
154: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 70');
155:
156: -- First check Assignment Budget Values table
157:
158: l_metric_value := GetABV

Line 163: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 75');

159: ( p_ABV => p_ABV
160: , p_assignment_id => p_assignment_id
161: , p_session_date => p_effective_date );
162:
163: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 75');
164:
165: if (l_metric_value is null)
166: then
167:

Line 168: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 16 p_ABV_formula_id = '||p_ABV_formula_id);

164:
165: if (l_metric_value is null)
166: then
167:
168: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 16 p_ABV_formula_id = '||p_ABV_formula_id);
169: -- There is no ABV value in table, so try FastFormula
170:
171: if (p_ABV_formula_id is not null)
172: then

Line 174: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 17');

170:
171: if (p_ABV_formula_id is not null)
172: then
173:
174: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 17');
175:
176: -- Execute FastFormula
177:
178: l_metric_value := GetABV

Line 186: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 18');

182: ,p_session_date => p_session_date );
183:
184: else
185:
186: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 18');
187:
188: -- raise an exception and appropriate error message if
189: -- the fast formula does not exist, and no ABV exists for the assignment.
190:

Line 195: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 19');

191: Raise_FF_Not_exist( p_ABV );
192: end if;
193: end if;
194:
195: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetABV - 19');
196:
197: return l_metric_value;
198:
199: END GetABV;

Line 329: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC - 25');

325: l_job_category varchar2(1);
326:
327: begin
328:
329: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC - 25');
330:
331: open getjobcatg(p_job_id,p_job_category);
332:
333: fetch getjobcatg into l_job_category;

Line 339: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC - 26');

335: if getjobcatg%notfound then
336:
337: close getjobcatg;
338:
339: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC - 26');
340:
341: l_job_category := 'N';
342:
343: end if;

Line 443: -- dbms_output.put_line('Entering HR_PERSON_FLEX_LOGIC.GetTermType - 27');

439: l_inputs ff_exec.inputs_t;
440: l_outputs ff_exec.outputs_t;
441:
442: BEGIN
443: -- dbms_output.put_line('Entering HR_PERSON_FLEX_LOGIC.GetTermType - 27');
444: -- Initialise the Inputs and Outputs tables
445: FF_Exec.Init_Formula
446: ( p_term_formula_id
447: , p_session_date

Line 451: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 28');

447: , p_session_date
448: , l_inputs
449: , l_outputs );
450:
451: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 28');
452: if (l_inputs.first is not null)
453: and (l_inputs.last is not null)
454: then
455: -- Set up context values for the formula

Line 458: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 29');

454: then
455: -- Set up context values for the formula
456: for i in l_inputs.first..l_inputs.last loop
457:
458: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 29');
459: if l_inputs(i).name = 'LEAVING_REASON' then
460: l_inputs(i).value := p_leaving_reason;
461: end if;
462: end loop;

Line 466: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 30');

462: end loop;
463: end if;
464:
465: -- Run the formula
466: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 30');
467: FF_Exec.Run_Formula (l_inputs, l_outputs);
468:
469: -- Get the result
470: l_term_type := l_outputs(l_outputs.first).value ;

Line 472: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 31');

468:
469: -- Get the result
470: l_term_type := l_outputs(l_outputs.first).value ;
471:
472: -- dbms_output.put_line('HR_PERSON_FLEX_LOGIC.GetTermType - 31');
473: return (l_term_type);
474:
475: EXCEPTION
476: -- raises an exception and appropriate error message if

Line 969: = HR_PERSON_FLEX_LOGIC.GetFormulaTypeID(p_formula_type);

965: WHERE business_group_id+0 = p_business_group_id
966: AND SYSDATE BETWEEN effective_start_date AND effective_end_date
967: AND formula_name = p_formula_name
968: AND formula_type_id
969: = HR_PERSON_FLEX_LOGIC.GetFormulaTypeID(p_formula_type);
970:
971: CURSOR c_tmplt_formula
972: IS
973: SELECT formula_id

Line 979: = HR_PERSON_FLEX_LOGIC.GetFormulaTypeID(p_formula_type);

975: WHERE business_group_id+0 is null
976: AND SYSDATE BETWEEN effective_start_date AND effective_end_date
977: AND formula_name = p_formula_name||'_TEMPLATE'
978: AND formula_type_id
979: = HR_PERSON_FLEX_LOGIC.GetFormulaTypeID(p_formula_type);
980:
981: BEGIN
982:
983: -- Look for a customer formula

Line 1050: END HR_PERSON_FLEX_LOGIC;

1046:
1047: END HeadCountForCWK;
1048:
1049:
1050: END HR_PERSON_FLEX_LOGIC;