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 1048: hr_utility.set_location('Entering:'||l_proc, 10);

1044: i NUMBER(11) := 0;
1045: t_cagr_request request_table;
1046:
1047: BEGIN
1048: hr_utility.set_location('Entering:'||l_proc, 10);
1049: per_cagr_utility_pkg.put_log(' Preparing results cache',2);
1050:
1051: if p_switch = 'W' then
1052: -- we are 'updating' results for a specific item:

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

1150:
1151: end if;
1152: per_cagr_utility_pkg.put_log(' Completed preparing results cache.',2);
1153:
1154: hr_utility.set_location('Leaving:'||l_proc, 50);
1155:
1156: EXCEPTION
1157: WHEN e_resource_busy THEN
1158: -- raise resource busy message.

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

1203:
1204: pragma autonomous_transaction;
1205:
1206: BEGIN
1207: hr_utility.set_location('Entering:'||l_proc, 10);
1208:
1209: per_cagr_utility_pkg.put_log('Identified entitlement line records, calling benmngle at: '||fnd_date.date_to_canonical(sysdate));
1210: per_cagr_utility_pkg.put_log(' p_person_id: '|| to_char(p_person_id));
1211: per_cagr_utility_pkg.put_log(' p_effective_date: '|| to_char(p_effective_date,'DD-MON-YYYY'));

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

1239: fnd_date.date_to_canonical(sysdate)||' return code is :'||to_char(l_retcode));
1240: per_cagr_utility_pkg.put_log('benefit_action_id: '|| to_char(l_benefit_action_id));
1241: p_benefit_action_id := l_benefit_action_id;
1242:
1243: hr_utility.set_location('Leaving:'||l_proc, 30);
1244:
1245: EXCEPTION
1246: when others then
1247: Rollback;

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

1244:
1245: EXCEPTION
1246: when others then
1247: Rollback;
1248: hr_utility.set_location('Fatal Error: '||l_proc, 20);
1249: per_cagr_utility_pkg.put_log('ben_manage_life_events.process fatal error',1);
1250: per_cagr_utility_pkg.put_log('Error: '||sqlerrm,1);
1251: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
1252: raise;

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

1279:
1280: l_proc constant VARCHAR2(61) := g_pkg || '.' || 'get_BEN_eligibility_info';
1281:
1282: BEGIN
1283: hr_utility.set_location('Entering:'||l_proc, 10);
1284: p_counter := 0;
1285: if p_benefit_action_id is not null then
1286: -- create the structure which will be used by main code, to show eligibility result for
1287: -- an entitlement line...

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

1297: end loop;
1298: end if;
1299: per_cagr_utility_pkg.put_log('Benmngle created '||to_char(p_counter)||' positive eligibility records');
1300:
1301: hr_utility.set_location('Leaving:'||l_proc, 30);
1302:
1303: END get_BEN_eligibility_info;
1304:
1305:

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

1320: v_found BOOLEAN := FALSE;
1321: l_proc constant VARCHAR2(61) := g_pkg || '.' || 'check_entitlement_eligible';
1322:
1323: BEGIN
1324: hr_utility.set_location('Entering:'||l_proc, 10);
1325:
1326: if p_oipl_id is null then
1327: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1328: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');

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

1324: hr_utility.set_location('Entering:'||l_proc, 10);
1325:
1326: if p_oipl_id is null then
1327: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1328: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');
1329: hr_utility.raise_error;
1330: end if;
1331:
1332: if p_person_id is null then

Line 1329: hr_utility.raise_error;

1325:
1326: if p_oipl_id is null then
1327: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id is null for criteria line ',1);
1328: hr_utility.set_message(800, 'HR_289415_CAGR_OIPL_NULL');
1329: hr_utility.raise_error;
1330: end if;
1331:
1332: if p_person_id is null then
1333: -- reading table for SE or SA mode

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

1354: end if;
1355:
1356: if v_found = FALSE then
1357: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id does not exist ',1);
1358: hr_utility.set_message(800, 'HR_289416_CAGR_OIPL_NOT_FOUND');
1359: hr_utility.raise_error;
1360: end if;
1361:
1362: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);

Line 1359: hr_utility.raise_error;

1355:
1356: if v_found = FALSE then
1357: per_cagr_utility_pkg.put_log(' ERROR: Option in plan id does not exist ',1);
1358: hr_utility.set_message(800, 'HR_289416_CAGR_OIPL_NOT_FOUND');
1359: hr_utility.raise_error;
1360: end if;
1361:
1362: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);
1363: hr_utility.set_location('Leaving:'||l_proc, 50);

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

1359: hr_utility.raise_error;
1360: end if;
1361:
1362: per_cagr_utility_pkg.put_log(' The criteria eligibility profile is not satisfied.',1);
1363: hr_utility.set_location('Leaving:'||l_proc, 50);
1364: return FALSE;
1365:
1366: END check_entitlement_eligible;
1367:

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

1422: ,p_row out nocopy number) IS
1423: l_proc constant VARCHAR2(80) := g_pkg || '.do_date_beneficial';
1424: l_ben_val date;
1425: BEGIN
1426: hr_utility.set_location('Entering:'||l_proc, 10);
1427: for i in p_input_table.first..p_input_table.last loop
1428: if i = 1 then
1429: l_ben_val := p_input_table(i).date_col;
1430: p_row := i;

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

1445: end if;
1446: end if;
1447: end if;
1448: end loop;
1449: hr_utility.set_location('Leaving:'||l_proc, 20);
1450: END do_date_beneficial;
1451: --
1452: PROCEDURE do_num_beneficial (p_input_table in dyn_rec_table
1453: ,p_rule in varchar2

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

1454: ,p_row out nocopy number) IS
1455: l_proc constant VARCHAR2(80) := g_pkg || '.do_num_beneficial';
1456: l_ben_val number;
1457: BEGIN
1458: hr_utility.set_location('Entering:'||l_proc, 10);
1459: for i in p_input_table.first..p_input_table.last loop
1460: if i = 1 then
1461: l_ben_val := p_input_table(i).num_col;
1462: p_row := i;

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

1477: end if;
1478: end if;
1479: end if;
1480: end loop;
1481: hr_utility.set_location('Leaving:'||l_proc, 20);
1482: END do_num_beneficial;
1483: --
1484: PROCEDURE do_char_beneficial (p_input_table in dyn_rec_table
1485: ,p_rule in varchar2

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

1486: ,p_row out nocopy number) IS
1487: l_proc constant VARCHAR2(80) := g_pkg || '.do_char_beneficial';
1488: l_ben_val varchar2(30);
1489: BEGIN
1490: hr_utility.set_location('Entering:'||l_proc, 10);
1491: for i in p_input_table.first..p_input_table.last loop
1492: if i = 1 then
1493: l_ben_val := p_input_table(i).char_col;
1494: p_row := i;

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

1509: end if;
1510: end if;
1511: end if;
1512: end loop;
1513: hr_utility.set_location('Leaving:'||l_proc, 20);
1514: END do_char_beneficial;
1515:
1516: BEGIN
1517:

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

1514: END do_char_beneficial;
1515:
1516: BEGIN
1517:
1518: hr_utility.set_location('Entering:'||l_proc, 10);
1519: l_category := p_results_table(1).category_name;
1520: if p_ben_rule is not null then
1521: per_cagr_utility_pkg.put_log(' Evaluating '||p_ben_rule||' beneficial rule on '||p_results_table.last||' results for this entitlement item',1);
1522: else

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

1662: end if;
1663: end if;
1664:
1665: <>
1666: hr_utility.set_location('Leaving:'||l_proc, 50);
1667: END set_beneficial_value;
1668:
1669: -- ================================================================================================
1670: -- == **************** ADD_RELATED_RETAINED_RIGHTS ***************** ==

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

1755: l_proc constant VARCHAR2(80) := g_pkg || '.' || 'add_related_ret_rights';
1756:
1757: BEGIN
1758:
1759: hr_utility.set_location('Entering:'||l_proc, 10);
1760: per_cagr_utility_pkg.put_log(' Evaluating related Retained Rights for the item ',1);
1761: -- We are processing RR for a dataitem for an ASG
1762: open csr_cagr_retained_rights;
1763: LOOP

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

1999: end if;
2000: END LOOP;
2001: close csr_cagr_retained_rights;
2002: per_cagr_utility_pkg.put_log(' Completed related Retained Rights.',1);
2003: hr_utility.set_location('Leaving:'||l_proc, 50);
2004:
2005: END add_related_ret_rights;
2006:
2007: -- ================================================================================================

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

2114: l_proc constant VARCHAR2(80) := g_pkg || '.' || 'add_other_ret_rights';
2115:
2116: BEGIN
2117:
2118: hr_utility.set_location('Entering:'||l_proc, 10);
2119: per_cagr_utility_pkg.put_log(' Evaluating Retained Rights for other items',1);
2120: open csr_cagr_other_ret_rights;
2121: LOOP
2122: fetch csr_cagr_other_ret_rights into v_csr_rr_rec;

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

2355: t_results_table.delete;
2356: v_counter := 0;
2357: end if;
2358: per_cagr_utility_pkg.put_log(' Completed Retained Rights for other items.',1);
2359: hr_utility.set_location('Leaving:'||l_proc, 50);
2360:
2361: END add_other_ret_rights;
2362:
2363: -- ================================================================================================

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

2365: -- ================================================================================================
2366:
2367: BEGIN
2368:
2369: hr_utility.set_location('Entering:'||l_proc, 5);
2370: per_cagr_utility_pkg.put_log(g_separator,1);
2371: per_cagr_utility_pkg.put_log('Starting Evaluation Process ('||fnd_date.date_to_canonical(sysdate)||')',1);
2372: --
2373: -- choose which cursor to open,

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

3782: per_cagr_utility_pkg.put_log(' ',1);
3783: per_cagr_utility_pkg.put_log('Completed Evaluation Process ('||fnd_date.date_to_canonical(sysdate)||')',1);
3784: per_cagr_utility_pkg.put_log(' ',1);
3785: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
3786: hr_utility.set_location('Leaving:'||l_proc, 100);
3787:
3788:
3789: EXCEPTION
3790: WHEN OTHERS THEN

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

3817: p_params PER_CAGR_EVALUATION_PKG.control_structure;
3818: l_se_rec PER_CAGR_EVALUATION_PKG.cagr_SE_record;
3819: --
3820: BEGIN
3821: hr_utility.set_location('Entering:'||l_proc, 5);
3822:
3823: --
3824: -- store params and cagr return cagr_request_id for use in this run
3825: --

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

3997: -- complete logging
3998: per_cagr_utility_pkg.put_log(g_separator,1);
3999: per_cagr_utility_pkg.write_log_file(p_params.cagr_request_id);
4000:
4001: hr_utility.set_location('Leaving:'||l_proc, 50);
4002:
4003: END initialise;
4004:
4005: