[Home] [Help]
13: g_glb_id ff_globals_f.global_id%TYPE;
14: g_glb_ueid ff_user_entities.user_entity_id%TYPE;
15: g_glb_dbi ff_database_items.user_name%TYPE;
16: --
17: g_debug boolean := hr_utility.debug_enabled;
18: ------------------------------ fetch_ue_details -------------------------------
19: --
20: -- NAME
21: -- fetch_ue_details
28: procedure fetch_ue_details(p_user_entity_id in number) is
29: l_business_group_id number;
30: l_legislation_code varchar2(30);
31: begin
32: g_debug := hr_utility.debug_enabled;
33: if g_debug then
34: hr_utility.set_location('ffdict.fetch_ue_details',1);
35: end if;
36: --
30: l_legislation_code varchar2(30);
31: begin
32: g_debug := hr_utility.debug_enabled;
33: if g_debug then
34: hr_utility.set_location('ffdict.fetch_ue_details',1);
35: end if;
36: --
37: if tmp_ue_id is null or tmp_ue_id <> p_user_entity_id then
38: begin
47: ;
48: exception
49: when no_data_found then
50: if g_debug then
51: hr_utility.set_location('ffdict.fetch_ue_details',2);
52: end if;
53: --
54: hr_utility.set_message (802, 'FF_33021_ORPHANED_DBITEMS');
55: hr_utility.raise_error;
50: if g_debug then
51: hr_utility.set_location('ffdict.fetch_ue_details',2);
52: end if;
53: --
54: hr_utility.set_message (802, 'FF_33021_ORPHANED_DBITEMS');
55: hr_utility.raise_error;
56: end;
57: --
58: set_ue_details
51: hr_utility.set_location('ffdict.fetch_ue_details',2);
52: end if;
53: --
54: hr_utility.set_message (802, 'FF_33021_ORPHANED_DBITEMS');
55: hr_utility.raise_error;
56: end;
57: --
58: set_ue_details
59: (user_entity_id => p_user_entity_id
62: );
63: end if;
64: --
65: if g_debug then
66: hr_utility.set_location('ffdict.fetch_ue_details',3);
67: end if;
68: end fetch_ue_details;
69: --
70: --------------------------- set_global_dbi_details ----------------------------
89: l_glb_dbi varchar2(2000);
90: l_glb_ueid number;
91: l_debug boolean;
92: begin
93: l_debug := hr_utility.debug_enabled;
94: if l_debug then
95: hr_utility.set_location('ffdict.set_global_dbi_details',1);
96: end if;
97:
91: l_debug boolean;
92: begin
93: l_debug := hr_utility.debug_enabled;
94: if l_debug then
95: hr_utility.set_location('ffdict.set_global_dbi_details',1);
96: end if;
97:
98: --
99: -- Only fetch the details if necessary.
109: g_glb_ueid := l_glb_ueid;
110: g_glb_dbi := l_glb_dbi;
111: else
112: if l_debug then
113: hr_utility.set_location('ffdict.set_global_dbi_details',2);
114: end if;
115: end if;
116: close csr_ueid;
117: end if;
162: dummy varchar2(1);
163: startup_mode varchar2(10);
164: begin
165: -- set error tracking information
166: hr_utility.set_location('ffdict.will_clash_with_formula',1);
167: --
168: -- get startup_mode based on current business group and legislation
169: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
170: --
218: dummy varchar2(1);
219: startup_mode varchar2(10);
220: begin
221: -- set error tracking information
222: hr_utility.set_location('ffdict.is_used_in_formula',1);
223: --
224: -- get startup_mode based on current business group and legislation
225: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
226: --
224: -- get startup_mode based on current business group and legislation
225: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
226: --
227: -- set error tracking information
228: hr_utility.set_location('ffdict.is_used_in_formula',2);
229: -- Check if there any rows in FDIU for this item but take into account
230: -- the business group of the formula
231: select 'X' into dummy from dual where exists
232: (select null
284: ) return boolean is
285: dummy varchar2(1);
286: startup_mode varchar2(10);
287: begin
288: g_debug := hr_utility.debug_enabled;
289:
290: if g_debug then
291: hr_utility.set_location('ffdict.dbitl_used_in_formula',1);
292: end if;
287: begin
288: g_debug := hr_utility.debug_enabled;
289:
290: if g_debug then
291: hr_utility.set_location('ffdict.dbitl_used_in_formula',1);
292: end if;
293:
294: --
295: -- Get the startup mode based upon the business group and legislation.
298: fetch_ue_details(p_user_entity_id);
299: end if;
300:
301: if g_debug then
302: hr_utility.set_location('ffdict.dbitl_used_in_formula',2);
303: end if;
304:
305: startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
306:
345: )
346: );
347:
348: if g_debug then
349: hr_utility.set_location('ffdict.dbitl_used_in_formula',3);
350: end if;
351:
352: return TRUE;
353:
353:
354: exception
355: when no_data_found then
356: if g_debug then
357: hr_utility.set_location('ffdict.dbitl_used_in_formula',4);
358: end if;
359: return FALSE;
360:
361: end dbitl_used_in_formula;
467: ;
468: --
469: l_startup_mode varchar2(20);
470: begin
471: g_debug := hr_utility.debug_enabled;
472:
473: if g_debug then
474: hr_utility.set_location('ffdict.fetch_referencing_formulas',10);
475: end if;
470: begin
471: g_debug := hr_utility.debug_enabled;
472:
473: if g_debug then
474: hr_utility.set_location('ffdict.fetch_referencing_formulas',10);
475: end if;
476:
477: --
478: -- Get the startup mode based upon the business group and legislation.
483:
484: l_startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
485:
486: if g_debug then
487: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
488: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
489: hr_utility.trace('DBI: ' || p_tl_user_name);
490: hr_utility.trace('MODE: ' || l_startup_mode);
491: end if;
484: l_startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
485:
486: if g_debug then
487: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
488: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
489: hr_utility.trace('DBI: ' || p_tl_user_name);
490: hr_utility.trace('MODE: ' || l_startup_mode);
491: end if;
492:
485:
486: if g_debug then
487: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
488: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
489: hr_utility.trace('DBI: ' || p_tl_user_name);
490: hr_utility.trace('MODE: ' || l_startup_mode);
491: end if;
492:
493: open csr_ref_formulas
486: if g_debug then
487: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
488: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
489: hr_utility.trace('DBI: ' || p_tl_user_name);
490: hr_utility.trace('MODE: ' || l_startup_mode);
491: end if;
492:
493: open csr_ref_formulas
494: (p_tl_user_name => p_tl_user_name
508:
509: close csr_ref_formulas;
510:
511: if g_debug then
512: hr_utility.set_location('ffdict.fetch_referencing_formulas',30);
513: end if;
514:
515: exception
516: when others then
514:
515: exception
516: when others then
517: if g_debug then
518: hr_utility.set_location('ffdict.fetch_referencing_formulas',40);
519: end if;
520:
521: if csr_ref_formulas%isopen then
522: close csr_ref_formulas;
544: ) return boolean is
545: dummy varchar2(1);
546: startup_mode varchar2(10);
547: begin
548: g_debug := hr_utility.debug_enabled;
549:
550: if g_debug then
551: hr_utility.set_location('ffdict.dbi_used_in_formula',1);
552: end if;
547: begin
548: g_debug := hr_utility.debug_enabled;
549:
550: if g_debug then
551: hr_utility.set_location('ffdict.dbi_used_in_formula',1);
552: end if;
553:
554: --
555: -- Get the startup mode based upon the business group and legislation.
558: fetch_ue_details(p_user_entity_id);
559: end if;
560:
561: if g_debug then
562: hr_utility.set_location('ffdict.dbi_used_in_formula',2);
563: end if;
564:
565: startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
566:
605: )
606: );
607:
608: if g_debug then
609: hr_utility.set_location('ffdict.dbi_used_in_formula',3);
610: end if;
611:
612: return TRUE;
613:
613:
614: exception
615: when no_data_found then
616: if g_debug then
617: hr_utility.set_location('ffdict.dbi_used_in_formula',4);
618: end if;
619: return FALSE;
620: end dbi_used_in_formula;
621: --
647: ) return boolean is
648: dummy varchar2(1);
649: startup_mode varchar2(10);
650: begin
651: g_debug := hr_utility.debug_enabled;
652:
653: if g_debug then
654: hr_utility.set_location('ffdict.non_dbi_used_in_formula',1);
655: end if;
650: begin
651: g_debug := hr_utility.debug_enabled;
652:
653: if g_debug then
654: hr_utility.set_location('ffdict.non_dbi_used_in_formula',1);
655: end if;
656:
657: startup_mode := ffstup.get_mode(p_bus_grp, p_leg_code);
658:
698: )
699: );
700:
701: if g_debug then
702: hr_utility.set_location('ffdict.non_dbi_used_in_formula',2);
703: end if;
704:
705: return TRUE;
706:
706:
707: exception
708: when no_data_found then
709: if g_debug then
710: hr_utility.set_location('ffdict.non_dbi_used_in_formula',3);
711: end if;
712: return FALSE;
713:
714: end non_dbi_used_in_formula;
733: dummy varchar2(1);
734: startup_mode varchar2(10);
735: begin
736: -- set error tracking information
737: hr_utility.set_location('ffdict.will_clash_with_dbitem',1);
738: --
739: -- get startup_mode based on current business group and legislation
740: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
741:
846: ) return boolean is
847: dummy varchar2(1);
848: startup_mode varchar2(10);
849: begin
850: g_debug := hr_utility.debug_enabled;
851:
852: if g_debug then
853: hr_utility.set_location('ffdict.tl_dbi_will_clash',1);
854: end if;
849: begin
850: g_debug := hr_utility.debug_enabled;
851:
852: if g_debug then
853: hr_utility.set_location('ffdict.tl_dbi_will_clash',1);
854: end if;
855:
856: --
857: -- If p_user_name = p_tl_user_name then return FALSE as p_user_name
858: -- will already have been validated.
859: --
860: if p_user_name = p_tl_user_name then
861: if g_debug then
862: hr_utility.set_location('ffdict.tl_dbi_will_clash',2);
863: end if;
864: return FALSE;
865: end if;
866:
912: ));
913: exception
914: when no_data_found then
915: if g_debug then
916: hr_utility.set_location('ffdict.tl_dbi_will_clash',3);
917: end if;
918:
919: --
920: -- No clash against FF_DATABASE_ITEMS so check against FF_DATABASE_ITEMS_TL.
960: --
961: -- There is a clash.
962: --
963: if g_debug then
964: hr_utility.set_location('ffdict.tl_dbi_will_clash',4);
965: end if;
966:
967: return TRUE;
968: exception
967: return TRUE;
968: exception
969: when no_data_found then
970: if g_debug then
971: hr_utility.set_location('ffdict.tl_dbi_will_clash',5);
972: end if;
973: return FALSE;
974: end tl_dbi_will_clash;
975: --
993: dummy varchar2(1);
994: startup_mode varchar2(10);
995: begin
996: -- set error tracking information
997: hr_utility.set_location('ffdict.will_clash_with_global',1);
998: --
999: -- get startup_mode based on current business group and legislation
1000: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1001: --
1095: p_bus_grp in number,
1096: p_leg_code in varchar2) return boolean is
1097: dummy varchar2(1);
1098: startup_mode varchar2(10);
1099: l_debug boolean := hr_utility.debug_enabled;
1100: begin
1101: -- set error tracking information
1102: if l_debug then
1103: hr_utility.set_location('ffdict.will_clash_with_global:2',1);
1099: l_debug boolean := hr_utility.debug_enabled;
1100: begin
1101: -- set error tracking information
1102: if l_debug then
1103: hr_utility.set_location('ffdict.will_clash_with_global:2',1);
1104: end if;
1105: --
1106: -- get startup_mode based on current business group and legislation
1107: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1211: dummy varchar2(1);
1212: startup_mode varchar2(10);
1213: begin
1214: -- set error tracking information
1215: hr_utility.set_location('ffdict.will_clash_with_entity',1);
1216: --
1217: -- get startup_mode based on current business group and legislation
1218: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1219: --
1281: dummy varchar2(1);
1282: startup_mode varchar2(10);
1283: begin
1284: -- set error tracking information
1285: hr_utility.set_location('ffdict.will_clash_with_function',1);
1286: --
1287: -- get startup_mode based on current business group and legislation
1288: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1289: --
1348: function will_clash_with_context(p_item_name in varchar2) return boolean is
1349: dummy varchar2(1);
1350: begin
1351: -- set error tracking information
1352: hr_utility.set_location('ffdict.will_clash_with_context',1);
1353: -- Check if there any rows in FF_CONTEXTS for this name
1354: --
1355: select 'X' into dummy from dual where exists
1356: (select null from ff_contexts where context_name = upper(p_item_name));
1379: p_leg_code in varchar2) is
1380: rgeflg varchar2(1);
1381: begin
1382: -- set error tracking information
1383: hr_utility.set_location('ffdict.validate_formula',1);
1384: --
1385: begin
1386: -- Check if name legal format eg no spaces, or special characters
1387: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1386: -- Check if name legal format eg no spaces, or special characters
1387: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1388: null,null,'Y',rgeflg,null);
1389: exception
1390: when hr_utility.hr_error then
1391: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1392: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1393: hr_utility.raise_error;
1394: end;
1387: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1388: null,null,'Y',rgeflg,null);
1389: exception
1390: when hr_utility.hr_error then
1391: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1392: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1393: hr_utility.raise_error;
1394: end;
1395: --
1388: null,null,'Y',rgeflg,null);
1389: exception
1390: when hr_utility.hr_error then
1391: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1392: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1393: hr_utility.raise_error;
1394: end;
1395: --
1396: -- set error tracking information
1389: exception
1390: when hr_utility.hr_error then
1391: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1392: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1393: hr_utility.raise_error;
1394: end;
1395: --
1396: -- set error tracking information
1397: hr_utility.set_location('ffdict.validate_formula',2);
1393: hr_utility.raise_error;
1394: end;
1395: --
1396: -- set error tracking information
1397: hr_utility.set_location('ffdict.validate_formula',2);
1398: --
1399: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1400: p_bus_grp,p_leg_code)) then
1401: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1397: hr_utility.set_location('ffdict.validate_formula',2);
1398: --
1399: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1400: p_bus_grp,p_leg_code)) then
1401: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1402: hr_utility.set_message_token('1',p_formula_name);
1403: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1404: hr_utility.raise_error;
1405: end if;
1398: --
1399: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1400: p_bus_grp,p_leg_code)) then
1401: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1402: hr_utility.set_message_token('1',p_formula_name);
1403: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1404: hr_utility.raise_error;
1405: end if;
1406: end validate_formula;
1399: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1400: p_bus_grp,p_leg_code)) then
1401: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1402: hr_utility.set_message_token('1',p_formula_name);
1403: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1404: hr_utility.raise_error;
1405: end if;
1406: end validate_formula;
1407: --
1400: p_bus_grp,p_leg_code)) then
1401: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1402: hr_utility.set_message_token('1',p_formula_name);
1403: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1404: hr_utility.raise_error;
1405: end if;
1406: end validate_formula;
1407: --
1408: ------------------------------ validate_formula -------------------------------
1489: --
1490: begin
1491: --
1492: -- set error tracking information
1493: hr_utility.set_location('ffdict.validate_formula',1);
1494: --
1495: begin
1496: --
1497: -- Check if name legal format eg no spaces, or special characters
1501: -- Allowing spaces in formula names(Bug Fix: 4768014)
1502: hr_chkfmt.checkformat (l_name,'PAY_NAME',l_pdummy, null, null, 'N', l_pdummy, null);
1503:
1504: exception
1505: when hr_utility.hr_error then
1506: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1507: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1508: hr_utility.raise_error;
1509: --
1502: hr_chkfmt.checkformat (l_name,'PAY_NAME',l_pdummy, null, null, 'N', l_pdummy, null);
1503:
1504: exception
1505: when hr_utility.hr_error then
1506: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1507: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1508: hr_utility.raise_error;
1509: --
1510: end;
1503:
1504: exception
1505: when hr_utility.hr_error then
1506: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1507: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1508: hr_utility.raise_error;
1509: --
1510: end;
1511: --
1504: exception
1505: when hr_utility.hr_error then
1506: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1507: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1508: hr_utility.raise_error;
1509: --
1510: end;
1511: --
1512: -- set error tracking information
1509: --
1510: end;
1511: --
1512: -- set error tracking information
1513: hr_utility.set_location('ffdict.validate_formula',2);
1514: --
1515: l_startup_mode := ffstup.get_mode(p_bus_grp,p_leg_code);
1516: --
1517: open csr_formula_clash(l_startup_mode);
1518: fetch csr_formula_clash into l_dummy;
1519: if csr_formula_clash%found then
1520: --
1521: close csr_formula_clash;
1522: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1523: hr_utility.set_message_token('1',p_formula_name);
1524: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1525: hr_utility.raise_error;
1526: --
1519: if csr_formula_clash%found then
1520: --
1521: close csr_formula_clash;
1522: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1523: hr_utility.set_message_token('1',p_formula_name);
1524: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1525: hr_utility.raise_error;
1526: --
1527: else
1520: --
1521: close csr_formula_clash;
1522: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1523: hr_utility.set_message_token('1',p_formula_name);
1524: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1525: hr_utility.raise_error;
1526: --
1527: else
1528: --
1521: close csr_formula_clash;
1522: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1523: hr_utility.set_message_token('1',p_formula_name);
1524: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1525: hr_utility.raise_error;
1526: --
1527: else
1528: --
1529: close csr_formula_clash;
1562: leg_code varchar2(30);
1563: rgeflg varchar2(1);
1564: begin
1565: -- set error tracking information
1566: hr_utility.set_location('ffdict.validate_dbitem',1);
1567: --
1568: -- Check if name legal format eg no spaces, or special characters
1569: begin
1570: -- Check if name legal format eg no spaces, or special characters
1570: -- Check if name legal format eg no spaces, or special characters
1571: hr_chkfmt.checkformat (p_dbi_name, 'DB_ITEM_NAME', p_dbi_name,
1572: null,null,'Y',rgeflg,null);
1573: exception
1574: when hr_utility.hr_error then
1575: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1576: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1577: hr_utility.raise_error;
1578: end;
1571: hr_chkfmt.checkformat (p_dbi_name, 'DB_ITEM_NAME', p_dbi_name,
1572: null,null,'Y',rgeflg,null);
1573: exception
1574: when hr_utility.hr_error then
1575: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1576: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1577: hr_utility.raise_error;
1578: end;
1579: --
1572: null,null,'Y',rgeflg,null);
1573: exception
1574: when hr_utility.hr_error then
1575: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1576: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1577: hr_utility.raise_error;
1578: end;
1579: --
1580: -- set error tracking information
1573: exception
1574: when hr_utility.hr_error then
1575: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1576: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1577: hr_utility.raise_error;
1578: end;
1579: --
1580: -- set error tracking information
1581: hr_utility.set_location('ffdict.validate_dbitem',2);
1577: hr_utility.raise_error;
1578: end;
1579: --
1580: -- set error tracking information
1581: hr_utility.set_location('ffdict.validate_dbitem',2);
1582: --
1583: -- Fetch business group and legislation details for current user entity
1584: select business_group_id, legislation_code
1585: into bg_id, leg_code
1586: from ff_user_entities
1587: where user_entity_id = p_user_entity_id;
1588: --
1589: -- set error tracking information
1590: hr_utility.set_location('ffdict.validate_dbitem',3);
1591: --
1592: -- New DB item name cannot be same as existing database item visible from
1593: -- business group and legislation of current user_entity
1594: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1591: --
1592: -- New DB item name cannot be same as existing database item visible from
1593: -- business group and legislation of current user_entity
1594: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1595: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1596: hr_utility.set_message_token('1',p_dbi_name);
1597: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1598: hr_utility.raise_error;
1599: end if;
1592: -- New DB item name cannot be same as existing database item visible from
1593: -- business group and legislation of current user_entity
1594: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1595: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1596: hr_utility.set_message_token('1',p_dbi_name);
1597: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1598: hr_utility.raise_error;
1599: end if;
1600: -- set error tracking information
1593: -- business group and legislation of current user_entity
1594: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1595: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1596: hr_utility.set_message_token('1',p_dbi_name);
1597: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1598: hr_utility.raise_error;
1599: end if;
1600: -- set error tracking information
1601: hr_utility.set_location('ffdict.validate_dbitem',4);
1594: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1595: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1596: hr_utility.set_message_token('1',p_dbi_name);
1597: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1598: hr_utility.raise_error;
1599: end if;
1600: -- set error tracking information
1601: hr_utility.set_location('ffdict.validate_dbitem',4);
1602: --
1597: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1598: hr_utility.raise_error;
1599: end if;
1600: -- set error tracking information
1601: hr_utility.set_location('ffdict.validate_dbitem',4);
1602: --
1603: -- New DB item name cannot be same as existing item in any verified formula
1604: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1605: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1601: hr_utility.set_location('ffdict.validate_dbitem',4);
1602: --
1603: -- New DB item name cannot be same as existing item in any verified formula
1604: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1605: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1606: hr_utility.set_message_token('1',p_dbi_name);
1607: hr_utility.raise_error;
1608: end if;
1609: -- set error tracking information
1602: --
1603: -- New DB item name cannot be same as existing item in any verified formula
1604: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1605: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1606: hr_utility.set_message_token('1',p_dbi_name);
1607: hr_utility.raise_error;
1608: end if;
1609: -- set error tracking information
1610: hr_utility.set_location('ffdict.validate_dbitem',5);
1603: -- New DB item name cannot be same as existing item in any verified formula
1604: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1605: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1606: hr_utility.set_message_token('1',p_dbi_name);
1607: hr_utility.raise_error;
1608: end if;
1609: -- set error tracking information
1610: hr_utility.set_location('ffdict.validate_dbitem',5);
1611: --
1606: hr_utility.set_message_token('1',p_dbi_name);
1607: hr_utility.raise_error;
1608: end if;
1609: -- set error tracking information
1610: hr_utility.set_location('ffdict.validate_dbitem',5);
1611: --
1612: -- New DB item name cannot be same as existing context name
1613: if (ffdict.will_clash_with_context(p_dbi_name)) then
1614: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1610: hr_utility.set_location('ffdict.validate_dbitem',5);
1611: --
1612: -- New DB item name cannot be same as existing context name
1613: if (ffdict.will_clash_with_context(p_dbi_name)) then
1614: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1615: hr_utility.set_message_token('1',p_dbi_name);
1616: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1617: hr_utility.raise_error;
1618: end if;
1611: --
1612: -- New DB item name cannot be same as existing context name
1613: if (ffdict.will_clash_with_context(p_dbi_name)) then
1614: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1615: hr_utility.set_message_token('1',p_dbi_name);
1616: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1617: hr_utility.raise_error;
1618: end if;
1619: end validate_dbitem;
1612: -- New DB item name cannot be same as existing context name
1613: if (ffdict.will_clash_with_context(p_dbi_name)) then
1614: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1615: hr_utility.set_message_token('1',p_dbi_name);
1616: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1617: hr_utility.raise_error;
1618: end if;
1619: end validate_dbitem;
1620: --
1613: if (ffdict.will_clash_with_context(p_dbi_name)) then
1614: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1615: hr_utility.set_message_token('1',p_dbi_name);
1616: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1617: hr_utility.raise_error;
1618: end if;
1619: end validate_dbitem;
1620: --
1621: -------------------------- core_validate_tl_dbitem ---------------------------
1629: l_tl_user_name varchar2(2000);
1630: i binary_integer;
1631: j binary_integer;
1632: begin
1633: g_debug := hr_utility.debug_enabled;
1634:
1635: if g_debug then
1636: hr_utility.set_location('ffdict.core_validate_tl_dbi',1);
1637: end if;
1632: begin
1633: g_debug := hr_utility.debug_enabled;
1634:
1635: if g_debug then
1636: hr_utility.set_location('ffdict.core_validate_tl_dbi',1);
1637: end if;
1638:
1639: --
1640: -- Initialise outcome to SUCCESS.
1649: ff_dbi_utils_pkg.str2dbiname(p_str => p_tl_user_name);
1650: p_tl_user_name := l_tl_user_name;
1651:
1652: if g_debug then
1653: hr_utility.set_location('ffdict.core_validate_tl_dbi',2);
1654: end if;
1655:
1656: --
1657: -- Fetch business group and legislation details for current user entity.
1672: ,p_legislation_code => tmp_leg_code
1673: ) then
1674:
1675: if g_debug then
1676: hr_utility.set_location('ffdict.core_validate_tl_dbi',3);
1677: end if;
1678:
1679: p_outcome := 'D';
1680: return;
1680: return;
1681: end if;
1682:
1683: if g_debug then
1684: hr_utility.set_location('ffdict.core_validate_tl_dbi',4);
1685: end if;
1686:
1687: --
1688: -- New DB item name cannot be same as a Formula Context name.
1689: --
1690: if ffdict.will_clash_with_context(l_tl_user_name) then
1691:
1692: if g_debug then
1693: hr_utility.set_location('ffdict.core_validate_tl_dbi',5);
1694: end if;
1695:
1696: p_outcome := 'C';
1697: return;
1697: return;
1698: end if;
1699:
1700: if g_debug then
1701: hr_utility.set_location('ffdict.core_validate_tl_dbi',6);
1702: end if;
1703:
1704: --
1705: -- New DB item name cannot be same as existing item in any verified formula.
1711: ,p_bus_grp => tmp_bg_id
1712: ,p_leg_code => tmp_leg_code
1713: ) then
1714: if g_debug then
1715: hr_utility.set_location('ffdict.core_validate_tl_dbi',7);
1716: end if;
1717:
1718: p_outcome := 'F';
1719: return;
1719: return;
1720: end if;
1721:
1722: if g_debug then
1723: hr_utility.set_location('ffdict.core_validate_tl_dbi',8);
1724: end if;
1725:
1726: if g_debug then
1727: hr_utility.set_location('ffdict.core_validate_tl_dbi',9);
1723: hr_utility.set_location('ffdict.core_validate_tl_dbi',8);
1724: end if;
1725:
1726: if g_debug then
1727: hr_utility.set_location('ffdict.core_validate_tl_dbi',9);
1728: end if;
1729: end core_validate_tl_dbitem;
1730: --
1731: ------------------------------ validate_tl_dbi -------------------------------
1737: ) is
1738: l_tl_user_name varchar2(2000);
1739: l_outcome varchar2(10);
1740: begin
1741: g_debug := hr_utility.debug_enabled;
1742:
1743: if g_debug then
1744: hr_utility.set_location('ffdict.validate_tl_dbi',1);
1745: end if;
1740: begin
1741: g_debug := hr_utility.debug_enabled;
1742:
1743: if g_debug then
1744: hr_utility.set_location('ffdict.validate_tl_dbi',1);
1745: end if;
1746:
1747: l_tl_user_name := p_tl_user_name;
1748:
1746:
1747: l_tl_user_name := p_tl_user_name;
1748:
1749: if g_debug then
1750: hr_utility.set_location('ffdict.validate_tl_dbi',2);
1751: end if;
1752:
1753: core_validate_tl_dbitem
1754: (p_user_name => p_user_name
1757: ,p_outcome => l_outcome
1758: );
1759:
1760: if g_debug then
1761: hr_utility.set_location('ffdict.validate_tl_dbi',3);
1762: end if;
1763:
1764: --
1765: -- New DB item name cannot be same as existing database item visible from
1765: -- New DB item name cannot be same as existing database item visible from
1766: -- business group and legislation of current user_entity.
1767: --
1768: if l_outcome = 'D' then
1769: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1770: hr_utility.set_message_token('1', l_tl_user_name);
1771: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1772: hr_utility.raise_error;
1773: end if;
1766: -- business group and legislation of current user_entity.
1767: --
1768: if l_outcome = 'D' then
1769: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1770: hr_utility.set_message_token('1', l_tl_user_name);
1771: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1772: hr_utility.raise_error;
1773: end if;
1774:
1767: --
1768: if l_outcome = 'D' then
1769: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1770: hr_utility.set_message_token('1', l_tl_user_name);
1771: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1772: hr_utility.raise_error;
1773: end if;
1774:
1775: if g_debug then
1768: if l_outcome = 'D' then
1769: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1770: hr_utility.set_message_token('1', l_tl_user_name);
1771: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1772: hr_utility.raise_error;
1773: end if;
1774:
1775: if g_debug then
1776: hr_utility.set_location('ffdict.validate_tl_dbi',4);
1772: hr_utility.raise_error;
1773: end if;
1774:
1775: if g_debug then
1776: hr_utility.set_location('ffdict.validate_tl_dbi',4);
1777: end if;
1778:
1779: --
1780: -- New DB item name cannot be same as existing context name.
1779: --
1780: -- New DB item name cannot be same as existing context name.
1781: --
1782: if l_outcome = 'C' then
1783: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1784: hr_utility.set_message_token('1', l_tl_user_name);
1785: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1786: hr_utility.raise_error;
1787: end if;
1780: -- New DB item name cannot be same as existing context name.
1781: --
1782: if l_outcome = 'C' then
1783: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1784: hr_utility.set_message_token('1', l_tl_user_name);
1785: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1786: hr_utility.raise_error;
1787: end if;
1788:
1781: --
1782: if l_outcome = 'C' then
1783: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1784: hr_utility.set_message_token('1', l_tl_user_name);
1785: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1786: hr_utility.raise_error;
1787: end if;
1788:
1789: if g_debug then
1782: if l_outcome = 'C' then
1783: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1784: hr_utility.set_message_token('1', l_tl_user_name);
1785: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1786: hr_utility.raise_error;
1787: end if;
1788:
1789: if g_debug then
1790: hr_utility.set_location('ffdict.validate_tl_dbi',5);
1786: hr_utility.raise_error;
1787: end if;
1788:
1789: if g_debug then
1790: hr_utility.set_location('ffdict.validate_tl_dbi',5);
1791: end if;
1792:
1793: --
1794: -- New DB item name cannot be same as existing item in any verified
1795: -- formula. Need to ensure that there is no clash with non-DBI and
1796: -- Context item names used by the formula (inputs, outputs, locals).
1797: --
1798: if l_outcome = 'F' then
1799: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1800: hr_utility.set_message_token('1', l_tl_user_name);
1801: hr_utility.raise_error;
1802: end if;
1803:
1796: -- Context item names used by the formula (inputs, outputs, locals).
1797: --
1798: if l_outcome = 'F' then
1799: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1800: hr_utility.set_message_token('1', l_tl_user_name);
1801: hr_utility.raise_error;
1802: end if;
1803:
1804: p_tl_user_name := l_tl_user_name;
1797: --
1798: if l_outcome = 'F' then
1799: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1800: hr_utility.set_message_token('1', l_tl_user_name);
1801: hr_utility.raise_error;
1802: end if;
1803:
1804: p_tl_user_name := l_tl_user_name;
1805: end validate_tl_dbi;
1817: procedure validate_context(p_ctx_name in out nocopy varchar2) is
1818: rgeflg varchar2(1);
1819: begin
1820: -- set error tracking information
1821: hr_utility.set_location('ffdict.validate_context',1);
1822: --
1823: -- Check if name legal format eg no spaces, or special characters
1824: begin
1825: -- Check if name legal format eg no spaces, or special characters
1825: -- Check if name legal format eg no spaces, or special characters
1826: hr_chkfmt.checkformat (p_ctx_name, 'DB_ITEM_NAME', p_ctx_name,
1827: null,null,'Y',rgeflg,null);
1828: exception
1829: when hr_utility.hr_error then
1830: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1831: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1832: hr_utility.raise_error;
1833: end;
1826: hr_chkfmt.checkformat (p_ctx_name, 'DB_ITEM_NAME', p_ctx_name,
1827: null,null,'Y',rgeflg,null);
1828: exception
1829: when hr_utility.hr_error then
1830: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1831: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1832: hr_utility.raise_error;
1833: end;
1834: -- set error tracking information
1827: null,null,'Y',rgeflg,null);
1828: exception
1829: when hr_utility.hr_error then
1830: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1831: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1832: hr_utility.raise_error;
1833: end;
1834: -- set error tracking information
1835: hr_utility.set_location('ffdict.validate_context',2);
1828: exception
1829: when hr_utility.hr_error then
1830: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1831: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1832: hr_utility.raise_error;
1833: end;
1834: -- set error tracking information
1835: hr_utility.set_location('ffdict.validate_context',2);
1836: --
1831: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1832: hr_utility.raise_error;
1833: end;
1834: -- set error tracking information
1835: hr_utility.set_location('ffdict.validate_context',2);
1836: --
1837: -- New DB item name cannot be same as existing context name
1838: if (ffdict.will_clash_with_context(p_ctx_name)) then
1839: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1835: hr_utility.set_location('ffdict.validate_context',2);
1836: --
1837: -- New DB item name cannot be same as existing context name
1838: if (ffdict.will_clash_with_context(p_ctx_name)) then
1839: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1840: hr_utility.set_message_token('1',p_ctx_name);
1841: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1842: hr_utility.raise_error;
1843: end if;
1836: --
1837: -- New DB item name cannot be same as existing context name
1838: if (ffdict.will_clash_with_context(p_ctx_name)) then
1839: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1840: hr_utility.set_message_token('1',p_ctx_name);
1841: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1842: hr_utility.raise_error;
1843: end if;
1844: -- set error tracking information
1837: -- New DB item name cannot be same as existing context name
1838: if (ffdict.will_clash_with_context(p_ctx_name)) then
1839: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1840: hr_utility.set_message_token('1',p_ctx_name);
1841: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1842: hr_utility.raise_error;
1843: end if;
1844: -- set error tracking information
1845: hr_utility.set_location('ffdict.validate_context',3);
1838: if (ffdict.will_clash_with_context(p_ctx_name)) then
1839: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1840: hr_utility.set_message_token('1',p_ctx_name);
1841: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1842: hr_utility.raise_error;
1843: end if;
1844: -- set error tracking information
1845: hr_utility.set_location('ffdict.validate_context',3);
1846: --
1841: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1842: hr_utility.raise_error;
1843: end if;
1844: -- set error tracking information
1845: hr_utility.set_location('ffdict.validate_context',3);
1846: --
1847: -- Pass null so all formulae are considered
1848: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1849: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1845: hr_utility.set_location('ffdict.validate_context',3);
1846: --
1847: -- Pass null so all formulae are considered
1848: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1849: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1850: hr_utility.set_message_token('1',p_ctx_name);
1851: hr_utility.raise_error;
1852: end if;
1853: -- set error tracking information
1846: --
1847: -- Pass null so all formulae are considered
1848: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1849: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1850: hr_utility.set_message_token('1',p_ctx_name);
1851: hr_utility.raise_error;
1852: end if;
1853: -- set error tracking information
1854: hr_utility.set_location('ffdict.validate_context',4);
1847: -- Pass null so all formulae are considered
1848: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1849: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1850: hr_utility.set_message_token('1',p_ctx_name);
1851: hr_utility.raise_error;
1852: end if;
1853: -- set error tracking information
1854: hr_utility.set_location('ffdict.validate_context',4);
1855: --
1850: hr_utility.set_message_token('1',p_ctx_name);
1851: hr_utility.raise_error;
1852: end if;
1853: -- set error tracking information
1854: hr_utility.set_location('ffdict.validate_context',4);
1855: --
1856: -- Pass null bus grp and leg code so all DB items are considered
1857: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1858: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1854: hr_utility.set_location('ffdict.validate_context',4);
1855: --
1856: -- Pass null bus grp and leg code so all DB items are considered
1857: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1858: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1859: hr_utility.set_message_token('1',p_ctx_name);
1860: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1861: hr_utility.raise_error;
1862: end if;
1855: --
1856: -- Pass null bus grp and leg code so all DB items are considered
1857: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1858: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1859: hr_utility.set_message_token('1',p_ctx_name);
1860: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1861: hr_utility.raise_error;
1862: end if;
1863: --
1856: -- Pass null bus grp and leg code so all DB items are considered
1857: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1858: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1859: hr_utility.set_message_token('1',p_ctx_name);
1860: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1861: hr_utility.raise_error;
1862: end if;
1863: --
1864: end validate_context;
1857: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1858: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1859: hr_utility.set_message_token('1',p_ctx_name);
1860: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1861: hr_utility.raise_error;
1862: end if;
1863: --
1864: end validate_context;
1865: --
1878: p_leg_code in varchar2) is
1879: rgeflg varchar2(1);
1880: begin
1881: -- set error tracking information
1882: hr_utility.set_location('ffdict.validate_user_entity',1);
1883: --
1884: -- Check if name legal format eg no spaces, or special characters
1885: begin
1886: -- Check if name legal format eg no spaces, or special characters
1886: -- Check if name legal format eg no spaces, or special characters
1887: hr_chkfmt.checkformat (p_ue_name, 'DB_ITEM_NAME', p_ue_name,
1888: null,null,'Y',rgeflg,null);
1889: exception
1890: when hr_utility.hr_error then
1891: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1892: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1893: hr_utility.raise_error;
1894: end;
1887: hr_chkfmt.checkformat (p_ue_name, 'DB_ITEM_NAME', p_ue_name,
1888: null,null,'Y',rgeflg,null);
1889: exception
1890: when hr_utility.hr_error then
1891: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1892: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1893: hr_utility.raise_error;
1894: end;
1895: -- set error tracking information
1888: null,null,'Y',rgeflg,null);
1889: exception
1890: when hr_utility.hr_error then
1891: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1892: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1893: hr_utility.raise_error;
1894: end;
1895: -- set error tracking information
1896: hr_utility.set_location('ffdict.validate_user_entity',2);
1889: exception
1890: when hr_utility.hr_error then
1891: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1892: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1893: hr_utility.raise_error;
1894: end;
1895: -- set error tracking information
1896: hr_utility.set_location('ffdict.validate_user_entity',2);
1897: --
1892: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1893: hr_utility.raise_error;
1894: end;
1895: -- set error tracking information
1896: hr_utility.set_location('ffdict.validate_user_entity',2);
1897: --
1898: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1899: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1900: hr_utility.set_message_token('1',p_ue_name);
1895: -- set error tracking information
1896: hr_utility.set_location('ffdict.validate_user_entity',2);
1897: --
1898: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1899: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1900: hr_utility.set_message_token('1',p_ue_name);
1901: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1902: hr_utility.raise_error;
1903: end if;
1896: hr_utility.set_location('ffdict.validate_user_entity',2);
1897: --
1898: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1899: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1900: hr_utility.set_message_token('1',p_ue_name);
1901: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1902: hr_utility.raise_error;
1903: end if;
1904: end validate_user_entity;
1897: --
1898: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1899: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1900: hr_utility.set_message_token('1',p_ue_name);
1901: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1902: hr_utility.raise_error;
1903: end if;
1904: end validate_user_entity;
1905: --
1898: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1899: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1900: hr_utility.set_message_token('1',p_ue_name);
1901: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1902: hr_utility.raise_error;
1903: end if;
1904: end validate_user_entity;
1905: --
1906: ----------------------------- validate_function ------------------------------
1920: p_leg_code in varchar2) is
1921: rgeflg varchar2(1);
1922: begin
1923: -- set error tracking information
1924: hr_utility.set_location('ffdict.validate_function',1);
1925: --
1926: -- Check if name legal format eg no spaces, or special characters
1927: begin
1928: -- Check if name legal format eg no spaces, or special characters
1928: -- Check if name legal format eg no spaces, or special characters
1929: hr_chkfmt.checkformat (p_func_name, 'DB_ITEM_NAME', p_func_name,
1930: null,null,'Y',rgeflg,null);
1931: exception
1932: when hr_utility.hr_error then
1933: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1934: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1935: hr_utility.raise_error;
1936: end;
1929: hr_chkfmt.checkformat (p_func_name, 'DB_ITEM_NAME', p_func_name,
1930: null,null,'Y',rgeflg,null);
1931: exception
1932: when hr_utility.hr_error then
1933: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1934: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1935: hr_utility.raise_error;
1936: end;
1937: -- set error tracking information
1930: null,null,'Y',rgeflg,null);
1931: exception
1932: when hr_utility.hr_error then
1933: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1934: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1935: hr_utility.raise_error;
1936: end;
1937: -- set error tracking information
1938: hr_utility.set_location('ffdict.validate_function',2);
1931: exception
1932: when hr_utility.hr_error then
1933: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1934: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1935: hr_utility.raise_error;
1936: end;
1937: -- set error tracking information
1938: hr_utility.set_location('ffdict.validate_function',2);
1939: --
1934: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1935: hr_utility.raise_error;
1936: end;
1937: -- set error tracking information
1938: hr_utility.set_location('ffdict.validate_function',2);
1939: --
1940: -- Check function name
1941: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1942: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1938: hr_utility.set_location('ffdict.validate_function',2);
1939: --
1940: -- Check function name
1941: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1942: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1943: hr_utility.set_message_token('1',p_func_name);
1944: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1945: hr_utility.raise_error;
1946: end if;
1939: --
1940: -- Check function name
1941: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1942: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1943: hr_utility.set_message_token('1',p_func_name);
1944: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1945: hr_utility.raise_error;
1946: end if;
1947: -- set error tracking information
1940: -- Check function name
1941: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1942: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1943: hr_utility.set_message_token('1',p_func_name);
1944: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1945: hr_utility.raise_error;
1946: end if;
1947: -- set error tracking information
1948: hr_utility.set_location('ffdict.validate_function',3);
1941: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1942: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1943: hr_utility.set_message_token('1',p_func_name);
1944: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1945: hr_utility.raise_error;
1946: end if;
1947: -- set error tracking information
1948: hr_utility.set_location('ffdict.validate_function',3);
1949: --
1944: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1945: hr_utility.raise_error;
1946: end if;
1947: -- set error tracking information
1948: hr_utility.set_location('ffdict.validate_function',3);
1949: --
1950: -- Check alias - cannot be same as another alias or function name
1951: if (p_alias is not null) then
1952: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1949: --
1950: -- Check alias - cannot be same as another alias or function name
1951: if (p_alias is not null) then
1952: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1953: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1954: hr_utility.set_message_token('1',p_func_name);
1955: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1956: hr_utility.raise_error;
1957: end if;
1950: -- Check alias - cannot be same as another alias or function name
1951: if (p_alias is not null) then
1952: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1953: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1954: hr_utility.set_message_token('1',p_func_name);
1955: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1956: hr_utility.raise_error;
1957: end if;
1958: end if;
1951: if (p_alias is not null) then
1952: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1953: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1954: hr_utility.set_message_token('1',p_func_name);
1955: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1956: hr_utility.raise_error;
1957: end if;
1958: end if;
1959: end validate_function;
1952: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1953: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1954: hr_utility.set_message_token('1',p_func_name);
1955: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1956: hr_utility.raise_error;
1957: end if;
1958: end if;
1959: end validate_function;
1960: --
1973: p_leg_code in varchar2) is
1974: rgeflg varchar2(1);
1975: begin
1976: -- set error tracking information
1977: hr_utility.set_location('ffdict.validate_global',1);
1978: --
1979: -- Check if name legal format eg no spaces, or special characters
1980: begin
1981: -- Check if name legal format eg no spaces, or special characters
1981: -- Check if name legal format eg no spaces, or special characters
1982: hr_chkfmt.checkformat (p_glob_name, 'DB_ITEM_NAME', p_glob_name,
1983: null,null,'Y',rgeflg,null);
1984: exception
1985: when hr_utility.hr_error then
1986: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1987: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1988: hr_utility.raise_error;
1989: end;
1982: hr_chkfmt.checkformat (p_glob_name, 'DB_ITEM_NAME', p_glob_name,
1983: null,null,'Y',rgeflg,null);
1984: exception
1985: when hr_utility.hr_error then
1986: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1987: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1988: hr_utility.raise_error;
1989: end;
1990:
1983: null,null,'Y',rgeflg,null);
1984: exception
1985: when hr_utility.hr_error then
1986: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1987: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1988: hr_utility.raise_error;
1989: end;
1990:
1991: -- set error tracking information
1984: exception
1985: when hr_utility.hr_error then
1986: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1987: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1988: hr_utility.raise_error;
1989: end;
1990:
1991: -- set error tracking information
1992: hr_utility.set_location('ffdict.validate_global',2);
1988: hr_utility.raise_error;
1989: end;
1990:
1991: -- set error tracking information
1992: hr_utility.set_location('ffdict.validate_global',2);
1993: --
1994: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1995: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1996: hr_utility.set_message_token('1',p_glob_name);
1991: -- set error tracking information
1992: hr_utility.set_location('ffdict.validate_global',2);
1993: --
1994: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1995: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1996: hr_utility.set_message_token('1',p_glob_name);
1997: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
1998: hr_utility.raise_error;
1999: end if;
1992: hr_utility.set_location('ffdict.validate_global',2);
1993: --
1994: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1995: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1996: hr_utility.set_message_token('1',p_glob_name);
1997: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
1998: hr_utility.raise_error;
1999: end if;
2000: -- set error tracking information
1993: --
1994: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1995: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1996: hr_utility.set_message_token('1',p_glob_name);
1997: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
1998: hr_utility.raise_error;
1999: end if;
2000: -- set error tracking information
2001: hr_utility.set_location('ffdict.validate_global',3);
1994: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1995: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1996: hr_utility.set_message_token('1',p_glob_name);
1997: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
1998: hr_utility.raise_error;
1999: end if;
2000: -- set error tracking information
2001: hr_utility.set_location('ffdict.validate_global',3);
2002: --
1997: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
1998: hr_utility.raise_error;
1999: end if;
2000: -- set error tracking information
2001: hr_utility.set_location('ffdict.validate_global',3);
2002: --
2003: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2004: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2005: hr_utility.set_message_token('1',p_glob_name);
2000: -- set error tracking information
2001: hr_utility.set_location('ffdict.validate_global',3);
2002: --
2003: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2004: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2005: hr_utility.set_message_token('1',p_glob_name);
2006: hr_utility.raise_error;
2007: end if;
2008: -- set error tracking information
2001: hr_utility.set_location('ffdict.validate_global',3);
2002: --
2003: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2004: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2005: hr_utility.set_message_token('1',p_glob_name);
2006: hr_utility.raise_error;
2007: end if;
2008: -- set error tracking information
2009: hr_utility.set_location('ffdict.validate_global',4);
2002: --
2003: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2004: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2005: hr_utility.set_message_token('1',p_glob_name);
2006: hr_utility.raise_error;
2007: end if;
2008: -- set error tracking information
2009: hr_utility.set_location('ffdict.validate_global',4);
2010: --
2005: hr_utility.set_message_token('1',p_glob_name);
2006: hr_utility.raise_error;
2007: end if;
2008: -- set error tracking information
2009: hr_utility.set_location('ffdict.validate_global',4);
2010: --
2011: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2012: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2013: hr_utility.set_message_token('1',p_glob_name);
2008: -- set error tracking information
2009: hr_utility.set_location('ffdict.validate_global',4);
2010: --
2011: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2012: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2013: hr_utility.set_message_token('1',p_glob_name);
2014: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2015: hr_utility.raise_error;
2016: end if;
2009: hr_utility.set_location('ffdict.validate_global',4);
2010: --
2011: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2012: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2013: hr_utility.set_message_token('1',p_glob_name);
2014: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2015: hr_utility.raise_error;
2016: end if;
2017: -- set error tracking information
2010: --
2011: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2012: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2013: hr_utility.set_message_token('1',p_glob_name);
2014: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2015: hr_utility.raise_error;
2016: end if;
2017: -- set error tracking information
2018: hr_utility.set_location('ffdict.validate_global',5);
2011: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2012: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2013: hr_utility.set_message_token('1',p_glob_name);
2014: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2015: hr_utility.raise_error;
2016: end if;
2017: -- set error tracking information
2018: hr_utility.set_location('ffdict.validate_global',5);
2019: --
2014: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2015: hr_utility.raise_error;
2016: end if;
2017: -- set error tracking information
2018: hr_utility.set_location('ffdict.validate_global',5);
2019: --
2020: if (will_clash_with_context(p_glob_name)) then
2021: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2022: hr_utility.set_message_token('1',p_glob_name);
2017: -- set error tracking information
2018: hr_utility.set_location('ffdict.validate_global',5);
2019: --
2020: if (will_clash_with_context(p_glob_name)) then
2021: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2022: hr_utility.set_message_token('1',p_glob_name);
2023: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2024: hr_utility.raise_error;
2025: end if;
2018: hr_utility.set_location('ffdict.validate_global',5);
2019: --
2020: if (will_clash_with_context(p_glob_name)) then
2021: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2022: hr_utility.set_message_token('1',p_glob_name);
2023: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2024: hr_utility.raise_error;
2025: end if;
2026: end validate_global;
2019: --
2020: if (will_clash_with_context(p_glob_name)) then
2021: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2022: hr_utility.set_message_token('1',p_glob_name);
2023: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2024: hr_utility.raise_error;
2025: end if;
2026: end validate_global;
2027: --
2020: if (will_clash_with_context(p_glob_name)) then
2021: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2022: hr_utility.set_message_token('1',p_glob_name);
2023: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2024: hr_utility.raise_error;
2025: end if;
2026: end validate_global;
2027: --
2028: ---------------------------- validate_tl_global -------------------------------
2042: ,p_item_name => p_glob_name
2043: ,p_bus_grp => p_bus_grp
2044: ,p_leg_code => p_leg_code
2045: ) then
2046: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2047: hr_utility.set_message_token('1',p_glob_name);
2048: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2049: hr_utility.raise_error;
2050: end if;
2043: ,p_bus_grp => p_bus_grp
2044: ,p_leg_code => p_leg_code
2045: ) then
2046: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2047: hr_utility.set_message_token('1',p_glob_name);
2048: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2049: hr_utility.raise_error;
2050: end if;
2051:
2044: ,p_leg_code => p_leg_code
2045: ) then
2046: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2047: hr_utility.set_message_token('1',p_glob_name);
2048: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2049: hr_utility.raise_error;
2050: end if;
2051:
2052: if g_glb_id is null or g_glb_id <> p_global_id then
2045: ) then
2046: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2047: hr_utility.set_message_token('1',p_glob_name);
2048: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2049: hr_utility.raise_error;
2050: end if;
2051:
2052: if g_glb_id is null or g_glb_id <> p_global_id then
2053: set_global_dbi_details(global_id => p_global_id);
2072: if will_clash_with_global(p_item_name => p_glob_name
2073: ,p_bus_grp => p_bus_grp
2074: ,p_leg_code => p_leg_code
2075: ) then
2076: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2077: hr_utility.set_message_token('1',p_glob_name);
2078: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2079: hr_utility.raise_error;
2080: end if;
2073: ,p_bus_grp => p_bus_grp
2074: ,p_leg_code => p_leg_code
2075: ) then
2076: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2077: hr_utility.set_message_token('1',p_glob_name);
2078: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2079: hr_utility.raise_error;
2080: end if;
2081:
2074: ,p_leg_code => p_leg_code
2075: ) then
2076: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2077: hr_utility.set_message_token('1',p_glob_name);
2078: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2079: hr_utility.raise_error;
2080: end if;
2081:
2082: --
2075: ) then
2076: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2077: hr_utility.set_message_token('1',p_glob_name);
2078: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2079: hr_utility.raise_error;
2080: end if;
2081:
2082: --
2083: -- Now look at the generated database item name.
2084: --
2085: l_dbi := ff_dbi_utils_pkg.str2dbiname(p_str => l_glob_name);
2086:
2087: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2088: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2089: hr_utility.set_message_token('1',l_dbi);
2090: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2091: hr_utility.raise_error;
2092: end if;
2085: l_dbi := ff_dbi_utils_pkg.str2dbiname(p_str => l_glob_name);
2086:
2087: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2088: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2089: hr_utility.set_message_token('1',l_dbi);
2090: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2091: hr_utility.raise_error;
2092: end if;
2093:
2086:
2087: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2088: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2089: hr_utility.set_message_token('1',l_dbi);
2090: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2091: hr_utility.raise_error;
2092: end if;
2093:
2094: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2087: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2088: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2089: hr_utility.set_message_token('1',l_dbi);
2090: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2091: hr_utility.raise_error;
2092: end if;
2093:
2094: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2095: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2091: hr_utility.raise_error;
2092: end if;
2093:
2094: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2095: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2096: hr_utility.set_message_token('1',l_dbi);
2097: hr_utility.raise_error;
2098: end if;
2099:
2092: end if;
2093:
2094: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2095: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2096: hr_utility.set_message_token('1',l_dbi);
2097: hr_utility.raise_error;
2098: end if;
2099:
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2093:
2094: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2095: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2096: hr_utility.set_message_token('1',l_dbi);
2097: hr_utility.raise_error;
2098: end if;
2099:
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2101: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2097: hr_utility.raise_error;
2098: end if;
2099:
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2101: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2102: hr_utility.set_message_token('1',l_dbi);
2103: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2104: hr_utility.raise_error;
2105: end if;
2098: end if;
2099:
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2101: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2102: hr_utility.set_message_token('1',l_dbi);
2103: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2104: hr_utility.raise_error;
2105: end if;
2106: end if;
2099:
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2101: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2102: hr_utility.set_message_token('1',l_dbi);
2103: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2104: hr_utility.raise_error;
2105: end if;
2106: end if;
2107: end validate_tl_global;
2100: if (ffdict.will_clash_with_context(l_dbi)) then
2101: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2102: hr_utility.set_message_token('1',l_dbi);
2103: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2104: hr_utility.raise_error;
2105: end if;
2106: end if;
2107: end validate_tl_global;
2108: --
2120: procedure validate_rcu(p_route_id in number) is
2121: dummy varchar2(1);
2122: begin
2123: -- set error tracking information
2124: hr_utility.set_location('ffdict.validate_rcu',1);
2125: --
2126: -- Look for any compiled formulas which use database items based on this
2127: -- route.
2128: select 'X' into dummy from dual
2142: and c.route_id = p_route_id
2143: );
2144: -- if select succeeds, then at least one compiled formula uses route
2145: -- so raise an error
2146: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2147: hr_utility.raise_error;
2148:
2149: exception
2150: -- route items not used, so succeed
2143: );
2144: -- if select succeeds, then at least one compiled formula uses route
2145: -- so raise an error
2146: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2147: hr_utility.raise_error;
2148:
2149: exception
2150: -- route items not used, so succeed
2151: when no_data_found then
2174: pragma exception_init (mutating_table, -4091);
2175: pragma exception_init (invalid_cursor, -1001);
2176: begin
2177: -- set error tracking information
2178: hr_utility.set_location('ffdict.validate_rpv',1);
2179: --
2180: -- attempt to get BG details from ff_user_entities, which might be mutating
2181: -- so trap error. If it is mutating, can skip validation because a cascade
2182: -- delete is in progress and the deletion will have been validated already
2186: from ff_user_entities
2187: where user_entity_id = p_user_entity_id;
2188: --
2189: -- set error tracking information
2190: hr_utility.set_location('ffdict.validate_rpv',2);
2191: -- get startup_mode based on current business group and legislation
2192: startup_mode := ffstup.get_mode (bg_id,leg_code);
2193: --
2194: -- set error tracking information
2191: -- get startup_mode based on current business group and legislation
2192: startup_mode := ffstup.get_mode (bg_id,leg_code);
2193: --
2194: -- set error tracking information
2195: hr_utility.set_location('ffdict.validate_rpv',3);
2196: -- Look for any compiled formulas which use database items based on this
2197: -- user entity. Need to consider business group and legislation
2198: select 'X' into dummy from dual
2199: where exists
2238: )
2239: );
2240: -- if select succeeds, then at least one compiled formula uses route
2241: -- so raise an error
2242: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2243: hr_utility.raise_error;
2244: exception
2245: -- route items not used, so succeed
2246: when no_data_found then
2239: );
2240: -- if select succeeds, then at least one compiled formula uses route
2241: -- so raise an error
2242: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2243: hr_utility.raise_error;
2244: exception
2245: -- route items not used, so succeed
2246: when no_data_found then
2247: -- set error tracking information
2244: exception
2245: -- route items not used, so succeed
2246: when no_data_found then
2247: -- set error tracking information
2248: hr_utility.set_location('ffdict.validate_rpv',4);
2249: when mutating_table then
2250: -- set error tracking information
2251: hr_utility.set_location('ffdict.validate_rpv',5);
2252: when invalid_cursor then
2247: -- set error tracking information
2248: hr_utility.set_location('ffdict.validate_rpv',4);
2249: when mutating_table then
2250: -- set error tracking information
2251: hr_utility.set_location('ffdict.validate_rpv',5);
2252: when invalid_cursor then
2253: hr_utility.set_location('ffdict.validate_rpv',6);
2254: end validate_rpv;
2255: --
2249: when mutating_table then
2250: -- set error tracking information
2251: hr_utility.set_location('ffdict.validate_rpv',5);
2252: when invalid_cursor then
2253: hr_utility.set_location('ffdict.validate_rpv',6);
2254: end validate_rpv;
2255: --
2256: ---------------------------- create_global_dbitem -----------------------------
2257: --
2274: l_route_parameter_id number;
2275: item_present exception;
2276: begin
2277: -- set error tracking information
2278: hr_utility.set_location('ffdict.create_global_dbitem',1);
2279: --
2280: -- Check whether DB item has already been created for this global
2281: begin
2282: select creator_id
2289: when no_data_found then
2290: null;
2291: end;
2292: -- set error tracking information
2293: hr_utility.set_location('ffdict.create_global_dbitem',2);
2294: --
2295: -- Get route id for globals route. If not exists, create new one.
2296: begin
2297: select route_id
2304: end;
2305: --
2306: if l_route_id is null then
2307: -- set error tracking information
2308: hr_utility.set_location('ffdict.create_global_dbitem',3);
2309: --
2310: insert into ff_routes
2311: (route_id,
2312: route_name,
2326: p_created_by,
2327: p_creation_date
2328: );
2329: -- set error tracking information
2330: hr_utility.set_location('ffdict.create_global_dbitem',4);
2331: --
2332: insert into ff_route_parameters
2333: (route_parameter_id,
2334: route_id,
2343: 'GLOBAL_ID',
2344: 1
2345: );
2346: -- set error tracking information
2347: hr_utility.set_location('ffdict.create_global_dbitem',5);
2348: --
2349: select ff_routes_s.currval, ff_route_parameters_s.currval
2350: into l_route_id, l_route_parameter_id
2351: from sys.dual;
2350: into l_route_id, l_route_parameter_id
2351: from sys.dual;
2352: else
2353: -- set error tracking information
2354: hr_utility.set_location('ffdict.create_global_dbitem',6);
2355: --
2356: -- Route exists so select parameter id (should only be one)
2357: select route_parameter_id
2358: into l_route_parameter_id
2360: where route_id = l_route_id;
2361: end if;
2362: --
2363: -- set error tracking information
2364: hr_utility.set_location('ffdict.create_global_dbitem',7);
2365: --
2366: -- Create user entity for this global
2367: insert into ff_user_entities
2368: (user_entity_id,
2390: p_created_by,
2391: p_creation_date
2392: );
2393: -- set error tracking information
2394: hr_utility.set_location('ffdict.create_global_dbitem',8);
2395: --
2396: -- insert parameter value for this user entity. Don't forget to add quotes
2397: -- for parameter value (global name)
2398: insert into ff_route_parameter_values
2409: p_created_by,
2410: p_creation_date
2411: );
2412: -- set error tracking information
2413: hr_utility.set_location('ffdict.create_global_dbitem',9);
2414: --
2415: insert into ff_database_items
2416: (user_name,
2417: user_entity_id,
2453: --
2454: procedure delete_global_dbitem(p_global_id in number) is
2455: begin
2456: -- set error tracking information
2457: hr_utility.set_location('ffdict.delete_global_dbitem',1);
2458: --
2459: -- Delete user entity created for this global with a cascade delete of
2460: -- child records in ff_database_items and ff_route_parameter_values
2461: --
2478: p_context_id in number) is
2479: dummy varchar2(1);
2480: begin
2481: -- set error tracking information
2482: hr_utility.set_location('ffdict.delete_ftcu_check',1);
2483: --
2484: -- Look for any compiled formulas belonging to the formula type passed
2485: -- which use the context
2486: select 'X' into dummy from dual
2496: and b.usage = 'U'
2497: );
2498: -- if select succeeds, then at least one compiled formula uses context
2499: -- so raise an error
2500: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2501: hr_utility.raise_error;
2502:
2503: exception
2504: -- route items not used, so succeed
2497: );
2498: -- if select succeeds, then at least one compiled formula uses context
2499: -- so raise an error
2500: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2501: hr_utility.raise_error;
2502:
2503: exception
2504: -- route items not used, so succeed
2505: when no_data_found then
2520: p_business_group_id in number,
2521: p_legislation_code in varchar2) is
2522: begin
2523: -- set error tracking information
2524: hr_utility.set_location('ffdict.delete_dbitem_check(2)',1);
2525: --
2526: -- if database item used in a formula, fail
2527: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2528: p_legislation_code)) then
2525: --
2526: -- if database item used in a formula, fail
2527: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2528: p_legislation_code)) then
2529: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2530: hr_utility.set_message_token('1',p_item_name);
2531: hr_utility.raise_error;
2532: end if;
2533: end delete_dbitem_check;
2526: -- if database item used in a formula, fail
2527: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2528: p_legislation_code)) then
2529: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2530: hr_utility.set_message_token('1',p_item_name);
2531: hr_utility.raise_error;
2532: end if;
2533: end delete_dbitem_check;
2534: --
2527: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2528: p_legislation_code)) then
2529: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2530: hr_utility.set_message_token('1',p_item_name);
2531: hr_utility.raise_error;
2532: end if;
2533: end delete_dbitem_check;
2534: --
2535: ---------------------------- delete_dbitem_check -----------------------------
2544: procedure delete_dbitem_check(p_item_name in varchar2,
2545: p_user_entity_id in number) is
2546: begin
2547: -- set error tracking information
2548: hr_utility.set_location('ffdict.delete_dbitem_check',1);
2549:
2550: -- if database item used in a formula, fail
2551: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2552: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2548: hr_utility.set_location('ffdict.delete_dbitem_check',1);
2549:
2550: -- if database item used in a formula, fail
2551: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2552: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2553: hr_utility.set_message_token('1',p_item_name);
2554: hr_utility.raise_error;
2555: end if;
2556: end delete_dbitem_check;
2549:
2550: -- if database item used in a formula, fail
2551: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2552: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2553: hr_utility.set_message_token('1',p_item_name);
2554: hr_utility.raise_error;
2555: end if;
2556: end delete_dbitem_check;
2557: --
2550: -- if database item used in a formula, fail
2551: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2552: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2553: hr_utility.set_message_token('1',p_item_name);
2554: hr_utility.raise_error;
2555: end if;
2556: end delete_dbitem_check;
2557: --
2558: ------------------------------- set_ue_details --------------------------------
2568: business_group_id in number,
2569: legislation_code in varchar2) is
2570: begin
2571: -- set error tracking information
2572: hr_utility.set_location('ffdict.set_ue_details',1);
2573: --
2574: tmp_ue_id := user_entity_id;
2575: tmp_bg_id := business_group_id;
2576: tmp_leg_code := legislation_code;
2587: --
2588: procedure clear_ue_details is
2589: begin
2590: -- set error tracking information
2591: hr_utility.set_location('ffdict.clear_ue_details',1);
2592: --
2593: tmp_ue_id := null;
2594: tmp_bg_id := null;
2595: tmp_leg_code := null;