DBA Data[Home] [Help]

APPS.PER_CAGR_EVALUATION_PKG dependencies on HR_UTILITY

Line 91: hr_utility.set_location('Entering:'||l_proc, 5);

87: l_proc constant varchar2(80) := g_pkg || '.get_entitlement_value';
88: l_cagr_request_id number(15);
89:
90: BEGIN
91: hr_utility.set_location('Entering:'||l_proc, 5);
92: -- nullify global structure
93: g_output_structure := NULL;
94:
95: initialise (p_process_date => p_process_date

Line 109: hr_utility.set_location('Leaving:'||l_proc, 20);

105: -- return contents of package global structure, set by initialise
106: p_output_structure := g_output_structure;
107: p_output_structure.request_id := l_cagr_request_id;
108: --
109: hr_utility.set_location('Leaving:'||l_proc, 20);
110: --
111: END get_entitlement_value;
112:
113: -- ----------------------------------------------------------------------------

Line 167: hr_utility.set_location('Entering:'||l_proc, 5);

163: l_counter number(15) := 0;
164: l_rec cagr_BE_record;
165:
166: BEGIN
167: hr_utility.set_location('Entering:'||l_proc, 5);
168:
169: initialise (p_process_date => p_process_date
170: ,p_operation_mode => 'BE'
171: ,p_business_group_id => p_business_group_id

Line 178: hr_utility.set_location('Entering:'||l_proc, 10);

174: ,p_collective_agreement_set_id => NULL
175: ,p_commit_flag => p_commit_flag
176: ,p_cagr_request_id => l_cagr_request_id);
177:
178: hr_utility.set_location('Entering:'||l_proc, 10);
179:
180: --
181: -- return request_id and pl/sql table of required results
182: --

Line 193: hr_utility.set_location('Leaving:'||l_proc, 20);

189: p_output_structure(l_counter) := l_rec;
190: end loop;
191: close csr_get_results;
192: --
193: hr_utility.set_location('Leaving:'||l_proc, 20);
194: --
195: END get_mass_entitlement;
196:
197: --

Line 627: hr_utility.set_location('Entering:'||l_proc, 10);

623: l_proc constant VARCHAR2(81) := g_pkg || '.store_chosen_results';
624: t_chosen_table chosen_table;
625:
626: BEGIN
627: hr_utility.set_location('Entering:'||l_proc, 10);
628:
629: -- load index by table.
630: FOR v_chosen IN csr_chosen_results LOOP
631: t_chosen_table(csr_chosen_results%rowcount) := v_chosen;

Line 636: hr_utility.set_location('Leaving:'||l_proc, 40);

632: END LOOP;
633:
634: per_cagr_utility_pkg.put_log(' Stored '||t_chosen_table.count||' chosen results');
635:
636: hr_utility.set_location('Leaving:'||l_proc, 40);
637: RETURN t_chosen_table;
638:
639: END store_chosen_results;
640:

Line 659: hr_utility.set_location('Entering:'||l_proc, 10);

655: l_chosen number(10) := NULL;
656: l_chosen_rec chosen_rec;
657:
658: BEGIN
659: hr_utility.set_location('Entering:'||l_proc, 10);
660:
661: if p_commit_flag = 'Y' and p_results.count > 0 and p_chosen_results.count > 0 then
662:
663: FOR j in p_chosen_results.first .. p_chosen_results.last LOOP

Line 671: hr_utility.set_location(l_proc, 20);

667: exit;
668: end if;
669: END LOOP;
670:
671: hr_utility.set_location(l_proc, 20);
672:
673: if l_chosen_rec.cagr_entitlement_item_id is not null then
674: -- look for a matching entitlement
675: FOR i in p_results.FIRST .. p_results.LAST LOOP

Line 712: hr_utility.set_location('Leaving:'||l_proc, 40);

708:
709: end if;
710: end if;
711:
712: hr_utility.set_location('Leaving:'||l_proc, 40);
713:
714: END apply_chosen_result;
715:
716:

Line 756: hr_utility.set_location('Entering:'||l_proc, 10);

752: l_proc constant VARCHAR2(61) := g_pkg || '.check_cache';
753:
754: BEGIN
755:
756: hr_utility.set_location('Entering:'||l_proc, 10);
757:
758: -- query result record from cache for the entitlement item
759: -- into the return SE structure
760: open csr_get_results;

Line 791: hr_utility.set_location('Leaving:'||l_proc, 50);

787: end if;
788: end if;
789: per_cagr_utility_pkg.put_log(' check_cache reports: '||nvl(l_rec.error,'RESULTS EXIST'));
790:
791: hr_utility.set_location('Leaving:'||l_proc, 50);
792: RETURN l_rec;
793:
794: END check_cache;
795:

Line 817: hr_utility.set_location('Entering:'||l_proc, 10);

813: l_grade_id per_grade_spines_f.grade_id%TYPE := NULL;
814:
815: BEGIN
816:
817: hr_utility.set_location('Entering:'||l_proc, 10);
818: open csr_grade_spines;
819: fetch csr_grade_spines into l_grade_id;
820: close csr_grade_spines;
821:

Line 822: hr_utility.set_location('Leaving:'||l_proc, 50);

818: open csr_grade_spines;
819: fetch csr_grade_spines into l_grade_id;
820: close csr_grade_spines;
821:
822: hr_utility.set_location('Leaving:'||l_proc, 50);
823: RETURN l_grade_id;
824:
825: END get_PYS_grade_id;
826:

Line 848: hr_utility.set_location('Entering:'||l_proc, 10);

844: l_ovn NUMBER(11) := 1; -- default to 1
845:
846: BEGIN
847:
848: hr_utility.set_location('Entering:'||l_proc, 10);
849:
850: FOR i in p_structure.FIRST..p_structure.LAST LOOP
851: -- write detail records to table
852: INSERT INTO per_cagr_entitlement_results(CAGR_ENTITLEMENT_RESULT_ID

Line 927: hr_utility.set_location('Leaving:'||l_proc, 30);

923: END LOOP;
924: per_cagr_utility_pkg.put_log(' Created '||l_num||' entitlement result records for the item ',1);
925: per_cagr_utility_pkg.put_log(' item_id : ' ||p_structure(1).CAGR_ENTITLEMENT_ITEM_ID);
926:
927: hr_utility.set_location('Leaving:'||l_proc, 30);
928:
929: EXCEPTION
930: WHEN OTHERS THEN
931: per_cagr_utility_pkg.put_log(' Failed to write result record',1);

Line 966: hr_utility.set_location('Entering:'||l_proc, 10);

962: v_end_date DATE := NULL;
963:
964:
965: BEGIN
966: hr_utility.set_location('Entering:'||l_proc, 10);
967: per_cagr_utility_pkg.put_log(' Executing insert_result_set');
968:
969: open csr_future_results;
970: fetch csr_future_results into v_future_start_date;

Line 981: hr_utility.set_location('Leaving:'||l_proc, 30);

977:
978: write_results(p_structure,p_params.cagr_request_id,p_params.effective_date,v_end_date);
979:
980: per_cagr_utility_pkg.put_log(' Completed insert_result_set');
981: hr_utility.set_location('Leaving:'||l_proc, 30);
982:
983: END insert_result_set;
984:
985: -- ================================================================================================

Line 1067: hr_utility.set_location('Entering:'||l_proc, 10);

1063: i NUMBER(11) := 0;
1064: t_cagr_request request_table;
1065:
1066: BEGIN
1067: hr_utility.set_location('Entering:'||l_proc, 10);
1068: per_cagr_utility_pkg.put_log(' Preparing results cache',2);
1069:
1070: if p_switch = 'W' then
1071: -- we are 'updating' results for a specific item:

Line 1189: hr_utility.set_location('Leaving:'||l_proc, 50);

1185:
1186: end if;
1187: per_cagr_utility_pkg.put_log(' Completed preparing results cache.',2);
1188:
1189: hr_utility.set_location('Leaving:'||l_proc, 50);
1190:
1191: EXCEPTION
1192: WHEN e_resource_busy THEN
1193: -- raise resource busy message.

Line 1242: hr_utility.set_location('Entering:'||l_proc, 10);

1238:
1239: pragma autonomous_transaction;
1240:
1241: BEGIN
1242: hr_utility.set_location('Entering:'||l_proc, 10);
1243:
1244: per_cagr_utility_pkg.put_log('Identified entitlement line records, calling benmngle at: '||fnd_date.date_to_canonical(sysdate));
1245: per_cagr_utility_pkg.put_log(' p_person_id: '|| to_char(p_person_id));
1246: per_cagr_utility_pkg.put_log(' p_effective_date: '|| to_char(p_effective_date,'DD-MON-YYYY'));

Line 1278: hr_utility.set_location('Leaving:'||l_proc, 30);

1274: fnd_date.date_to_canonical(sysdate)||' return code is :'||to_char(l_retcode));
1275: per_cagr_utility_pkg.put_log('benefit_action_id: '|| to_char(l_benefit_action_id));
1276: p_benefit_action_id := l_benefit_action_id;
1277:
1278: hr_utility.set_location('Leaving:'||l_proc, 30);
1279:
1280: EXCEPTION
1281: when others then
1282: Rollback;

Line 1283: hr_utility.set_location('Fatal Error: '||l_proc, 20);

1279:
1280: EXCEPTION
1281: when others then
1282: Rollback;
1283: hr_utility.set_location('Fatal Error: '||l_proc, 20);
1284: per_cagr_utility_pkg.put_log('ben_manage_life_events.process fatal error',1);
1285: per_cagr_utility_pkg.put_log('Error: '||sqlerrm,1);
1286: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
1287: raise;

Line 1318: hr_utility.set_location('Entering:'||l_proc, 10);

1314:
1315: l_proc constant VARCHAR2(61) := g_pkg || '.' || 'get_BEN_eligibility_info';
1316:
1317: BEGIN
1318: hr_utility.set_location('Entering:'||l_proc, 10);
1319: p_counter := 0;
1320: if p_benefit_action_id is not null then
1321: -- create the structure which will be used by main code, to show eligibility result for
1322: -- an entitlement line...

Line 1336: hr_utility.set_location('Leaving:'||l_proc, 30);

1332: end loop;
1333: end if;
1334: per_cagr_utility_pkg.put_log('Benmngle created '||to_char(p_counter)||' positive eligibility records');
1335:
1336: hr_utility.set_location('Leaving:'||l_proc, 30);
1337:
1338: END get_BEN_eligibility_info;
1339:
1340:

Line 1378: hr_utility.set_location('Entering:'||l_proc, 10);

1374: AND oipl_id = p_oipl_id
1375: AND oipl_id IS NOT NULL;
1376:
1377: BEGIN
1378: hr_utility.set_location('Entering:'||l_proc, 10);
1379:
1380: if p_oipl_id is null then
1381: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1382: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');

Line 1382: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');

1378: hr_utility.set_location('Entering:'||l_proc, 10);
1379:
1380: if p_oipl_id is null then
1381: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1382: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');
1383: hr_utility.raise_error;
1384: end if;
1385:
1386: if p_person_id is null then

Line 1383: hr_utility.raise_error;

1379:
1380: if p_oipl_id is null then
1381: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1382: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');
1383: hr_utility.raise_error;
1384: end if;
1385:
1386: if p_person_id is null then
1387: -- reading table for SE or SA mode

Line 1430: hr_utility.set_message(800, 'HR_289416_CAGR_OIPL_NOT_FOUND');

1426: end if;
1427:
1428: if v_found = FALSE then
1429: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id does not exist ',1);
1430: hr_utility.set_message(800, 'HR_289416_CAGR_OIPL_NOT_FOUND');
1431: hr_utility.raise_error;
1432: end if;
1433:
1434: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);

Line 1431: hr_utility.raise_error;

1427:
1428: if v_found = FALSE then
1429: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id does not exist ',1);
1430: hr_utility.set_message(800, 'HR_289416_CAGR_OIPL_NOT_FOUND');
1431: hr_utility.raise_error;
1432: end if;
1433:
1434: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);
1435: hr_utility.set_location('Leaving:'||l_proc, 50);

Line 1435: hr_utility.set_location('Leaving:'||l_proc, 50);

1431: hr_utility.raise_error;
1432: end if;
1433:
1434: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);
1435: hr_utility.set_location('Leaving:'||l_proc, 50);
1436: return FALSE;
1437:
1438: END check_entitlement_eligible;
1439:

Line 1498: hr_utility.set_location('Entering:'||l_proc, 10);

1494: ,p_row out nocopy number) IS
1495: l_proc constant VARCHAR2(80) := g_pkg || '.do_date_beneficial';
1496: l_ben_val date;
1497: BEGIN
1498: hr_utility.set_location('Entering:'||l_proc, 10);
1499: for i in p_input_table.first..p_input_table.last loop
1500: if i = 1 then
1501: l_ben_val := p_input_table(i).date_col;
1502: p_row := i;

Line 1521: hr_utility.set_location('Leaving:'||l_proc, 20);

1517: end if;
1518: end if;
1519: end if;
1520: end loop;
1521: hr_utility.set_location('Leaving:'||l_proc, 20);
1522: END do_date_beneficial;
1523: --
1524: PROCEDURE do_num_beneficial (p_input_table in dyn_rec_table
1525: ,p_rule in varchar2

Line 1530: hr_utility.set_location('Entering:'||l_proc, 10);

1526: ,p_row out nocopy number) IS
1527: l_proc constant VARCHAR2(80) := g_pkg || '.do_num_beneficial';
1528: l_ben_val number;
1529: BEGIN
1530: hr_utility.set_location('Entering:'||l_proc, 10);
1531: for i in p_input_table.first..p_input_table.last loop
1532: if i = 1 then
1533: l_ben_val := p_input_table(i).num_col;
1534: p_row := i;

Line 1553: hr_utility.set_location('Leaving:'||l_proc, 20);

1549: end if;
1550: end if;
1551: end if;
1552: end loop;
1553: hr_utility.set_location('Leaving:'||l_proc, 20);
1554: END do_num_beneficial;
1555: --
1556: PROCEDURE do_char_beneficial (p_input_table in dyn_rec_table
1557: ,p_rule in varchar2

Line 1562: hr_utility.set_location('Entering:'||l_proc, 10);

1558: ,p_row out nocopy number) IS
1559: l_proc constant VARCHAR2(80) := g_pkg || '.do_char_beneficial';
1560: l_ben_val varchar2(30);
1561: BEGIN
1562: hr_utility.set_location('Entering:'||l_proc, 10);
1563: for i in p_input_table.first..p_input_table.last loop
1564: if i = 1 then
1565: l_ben_val := p_input_table(i).char_col;
1566: p_row := i;

Line 1585: hr_utility.set_location('Leaving:'||l_proc, 20);

1581: end if;
1582: end if;
1583: end if;
1584: end loop;
1585: hr_utility.set_location('Leaving:'||l_proc, 20);
1586: END do_char_beneficial;
1587:
1588: BEGIN
1589:

Line 1590: hr_utility.set_location('Entering:'||l_proc, 10);

1586: END do_char_beneficial;
1587:
1588: BEGIN
1589:
1590: hr_utility.set_location('Entering:'||l_proc, 10);
1591: l_category := p_results_table(1).category_name;
1592: if p_ben_rule is not null then
1593: per_cagr_utility_pkg.put_log(' Evaluating '||p_ben_rule||' beneficial rule on '||p_results_table.last||' results for this entitlement item',1);
1594: else

Line 1738: hr_utility.set_location('Leaving:'||l_proc, 50);

1734: end if;
1735: end if;
1736:
1737: <>
1738: hr_utility.set_location('Leaving:'||l_proc, 50);
1739: END set_beneficial_value;
1740:
1741: -- ================================================================================================
1742: -- == **************** ADD_RELATED_RETAINED_RIGHTS ***************** ==

Line 1831: hr_utility.set_location('Entering:'||l_proc, 10);

1827: l_proc constant VARCHAR2(80) := g_pkg || '.' || 'add_related_ret_rights';
1828:
1829: BEGIN
1830:
1831: hr_utility.set_location('Entering:'||l_proc, 10);
1832: per_cagr_utility_pkg.put_log(' Evaluating related Retained Rights for the item ',1);
1833: -- We are processing RR for a dataitem for an ASG
1834: open csr_cagr_retained_rights;
1835: LOOP

Line 2075: hr_utility.set_location('Leaving:'||l_proc, 50);

2071: end if;
2072: END LOOP;
2073: close csr_cagr_retained_rights;
2074: per_cagr_utility_pkg.put_log(' Completed related Retained Rights.',1);
2075: hr_utility.set_location('Leaving:'||l_proc, 50);
2076:
2077: END add_related_ret_rights;
2078:
2079: -- ================================================================================================

Line 2190: hr_utility.set_location('Entering:'||l_proc, 10);

2186: l_proc constant VARCHAR2(80) := g_pkg || '.' || 'add_other_ret_rights';
2187:
2188: BEGIN
2189:
2190: hr_utility.set_location('Entering:'||l_proc, 10);
2191: per_cagr_utility_pkg.put_log(' Evaluating Retained Rights for other items',1);
2192: open csr_cagr_other_ret_rights;
2193: LOOP
2194: fetch csr_cagr_other_ret_rights into v_csr_rr_rec;

Line 2431: hr_utility.set_location('Leaving:'||l_proc, 50);

2427: t_results_table.delete;
2428: v_counter := 0;
2429: end if;
2430: per_cagr_utility_pkg.put_log(' Completed Retained Rights for other items.',1);
2431: hr_utility.set_location('Leaving:'||l_proc, 50);
2432:
2433: END add_other_ret_rights;
2434:
2435: -- ================================================================================================

Line 2441: hr_utility.set_location('Entering:'||l_proc, 5);

2437: -- ================================================================================================
2438:
2439: BEGIN
2440:
2441: hr_utility.set_location('Entering:'||l_proc, 5);
2442: per_cagr_utility_pkg.put_log(g_separator,1);
2443: per_cagr_utility_pkg.put_log('Starting Evaluation Process ('||fnd_date.date_to_canonical(sysdate)||')',1);
2444: --
2445: -- choose which cursor to open,

Line 3859: hr_utility.set_location('Leaving:'||l_proc, 100);

3855: per_cagr_utility_pkg.put_log(' ',1);
3856: per_cagr_utility_pkg.put_log('Completed Evaluation Process ('||fnd_date.date_to_canonical(sysdate)||')',1);
3857: per_cagr_utility_pkg.put_log(' ',1);
3858: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
3859: hr_utility.set_location('Leaving:'||l_proc, 100);
3860:
3861:
3862: EXCEPTION
3863: WHEN OTHERS THEN

Line 3894: hr_utility.set_location('Entering:'||l_proc, 5);

3890: p_params PER_CAGR_EVALUATION_PKG.control_structure;
3891: l_se_rec PER_CAGR_EVALUATION_PKG.cagr_SE_record;
3892: --
3893: BEGIN
3894: hr_utility.set_location('Entering:'||l_proc, 5);
3895:
3896: --
3897: -- store params and cagr return cagr_request_id for use in this run
3898: --

Line 4074: hr_utility.set_location('Leaving:'||l_proc, 50);

4070: -- complete logging
4071: per_cagr_utility_pkg.put_log(g_separator,1);
4072: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
4073:
4074: hr_utility.set_location('Leaving:'||l_proc, 50);
4075:
4076: END initialise;
4077:
4078: