[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: --
219: dummy varchar2(1);
220: startup_mode varchar2(10);
221: begin
222: -- set error tracking information
223: hr_utility.set_location('ffdict.is_used_in_formula',1);
224: --
225: -- get startup_mode based on current business group and legislation
226: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
227: --
225: -- get startup_mode based on current business group and legislation
226: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
227: --
228: -- set error tracking information
229: hr_utility.set_location('ffdict.is_used_in_formula',2);
230: -- Check if there any rows in FDIU for this item but take into account
231: -- the business group of the formula
232: select 'X' into dummy from dual where exists
233: (select null
285: ) return boolean is
286: dummy varchar2(1);
287: startup_mode varchar2(10);
288: begin
289: g_debug := hr_utility.debug_enabled;
290:
291: if g_debug then
292: hr_utility.set_location('ffdict.dbitl_used_in_formula',1);
293: end if;
288: begin
289: g_debug := hr_utility.debug_enabled;
290:
291: if g_debug then
292: hr_utility.set_location('ffdict.dbitl_used_in_formula',1);
293: end if;
294:
295: --
296: -- Get the startup mode based upon the business group and legislation.
299: fetch_ue_details(p_user_entity_id);
300: end if;
301:
302: if g_debug then
303: hr_utility.set_location('ffdict.dbitl_used_in_formula',2);
304: end if;
305:
306: startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
307:
346: )
347: );
348:
349: if g_debug then
350: hr_utility.set_location('ffdict.dbitl_used_in_formula',3);
351: end if;
352:
353: return TRUE;
354:
354:
355: exception
356: when no_data_found then
357: if g_debug then
358: hr_utility.set_location('ffdict.dbitl_used_in_formula',4);
359: end if;
360: return FALSE;
361:
362: end dbitl_used_in_formula;
468: ;
469: --
470: l_startup_mode varchar2(20);
471: begin
472: g_debug := hr_utility.debug_enabled;
473:
474: if g_debug then
475: hr_utility.set_location('ffdict.fetch_referencing_formulas',10);
476: end if;
471: begin
472: g_debug := hr_utility.debug_enabled;
473:
474: if g_debug then
475: hr_utility.set_location('ffdict.fetch_referencing_formulas',10);
476: end if;
477:
478: --
479: -- Get the startup mode based upon the business group and legislation.
484:
485: l_startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
486:
487: if g_debug then
488: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
489: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
490: hr_utility.trace('DBI: ' || p_tl_user_name);
491: hr_utility.trace('MODE: ' || l_startup_mode);
492: end if;
485: l_startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
486:
487: if g_debug then
488: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
489: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
490: hr_utility.trace('DBI: ' || p_tl_user_name);
491: hr_utility.trace('MODE: ' || l_startup_mode);
492: end if;
493:
486:
487: if g_debug then
488: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
489: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
490: hr_utility.trace('DBI: ' || p_tl_user_name);
491: hr_utility.trace('MODE: ' || l_startup_mode);
492: end if;
493:
494: open csr_ref_formulas
487: if g_debug then
488: hr_utility.set_location('ffdict.fetch_referencing_formulas',20);
489: hr_utility.trace('BG_ID: ' || tmp_bg_id || ' LEG_CODE: ' || tmp_leg_code);
490: hr_utility.trace('DBI: ' || p_tl_user_name);
491: hr_utility.trace('MODE: ' || l_startup_mode);
492: end if;
493:
494: open csr_ref_formulas
495: (p_tl_user_name => p_tl_user_name
509:
510: close csr_ref_formulas;
511:
512: if g_debug then
513: hr_utility.set_location('ffdict.fetch_referencing_formulas',30);
514: end if;
515:
516: exception
517: when others then
515:
516: exception
517: when others then
518: if g_debug then
519: hr_utility.set_location('ffdict.fetch_referencing_formulas',40);
520: end if;
521:
522: if csr_ref_formulas%isopen then
523: close csr_ref_formulas;
545: ) return boolean is
546: dummy varchar2(1);
547: startup_mode varchar2(10);
548: begin
549: g_debug := hr_utility.debug_enabled;
550:
551: if g_debug then
552: hr_utility.set_location('ffdict.dbi_used_in_formula',1);
553: end if;
548: begin
549: g_debug := hr_utility.debug_enabled;
550:
551: if g_debug then
552: hr_utility.set_location('ffdict.dbi_used_in_formula',1);
553: end if;
554:
555: --
556: -- Get the startup mode based upon the business group and legislation.
559: fetch_ue_details(p_user_entity_id);
560: end if;
561:
562: if g_debug then
563: hr_utility.set_location('ffdict.dbi_used_in_formula',2);
564: end if;
565:
566: startup_mode := ffstup.get_mode(tmp_bg_id, tmp_leg_code);
567:
606: )
607: );
608:
609: if g_debug then
610: hr_utility.set_location('ffdict.dbi_used_in_formula',3);
611: end if;
612:
613: return TRUE;
614:
614:
615: exception
616: when no_data_found then
617: if g_debug then
618: hr_utility.set_location('ffdict.dbi_used_in_formula',4);
619: end if;
620: return FALSE;
621: end dbi_used_in_formula;
622: --
648: ) return boolean is
649: dummy varchar2(1);
650: startup_mode varchar2(10);
651: begin
652: g_debug := hr_utility.debug_enabled;
653:
654: if g_debug then
655: hr_utility.set_location('ffdict.non_dbi_used_in_formula',1);
656: end if;
651: begin
652: g_debug := hr_utility.debug_enabled;
653:
654: if g_debug then
655: hr_utility.set_location('ffdict.non_dbi_used_in_formula',1);
656: end if;
657:
658: startup_mode := ffstup.get_mode(p_bus_grp, p_leg_code);
659:
699: )
700: );
701:
702: if g_debug then
703: hr_utility.set_location('ffdict.non_dbi_used_in_formula',2);
704: end if;
705:
706: return TRUE;
707:
707:
708: exception
709: when no_data_found then
710: if g_debug then
711: hr_utility.set_location('ffdict.non_dbi_used_in_formula',3);
712: end if;
713: return FALSE;
714:
715: end non_dbi_used_in_formula;
734: dummy varchar2(1);
735: startup_mode varchar2(10);
736: begin
737: -- set error tracking information
738: hr_utility.set_location('ffdict.will_clash_with_dbitem',1);
739: --
740: -- get startup_mode based on current business group and legislation
741: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
742:
847: ) return boolean is
848: dummy varchar2(1);
849: startup_mode varchar2(10);
850: begin
851: g_debug := hr_utility.debug_enabled;
852:
853: if g_debug then
854: hr_utility.set_location('ffdict.tl_dbi_will_clash',1);
855: end if;
850: begin
851: g_debug := hr_utility.debug_enabled;
852:
853: if g_debug then
854: hr_utility.set_location('ffdict.tl_dbi_will_clash',1);
855: end if;
856:
857: --
858: -- If p_user_name = p_tl_user_name then return FALSE as p_user_name
859: -- will already have been validated.
860: --
861: if p_user_name = p_tl_user_name then
862: if g_debug then
863: hr_utility.set_location('ffdict.tl_dbi_will_clash',2);
864: end if;
865: return FALSE;
866: end if;
867:
913: ));
914: exception
915: when no_data_found then
916: if g_debug then
917: hr_utility.set_location('ffdict.tl_dbi_will_clash',3);
918: end if;
919:
920: --
921: -- No clash against FF_DATABASE_ITEMS so check against FF_DATABASE_ITEMS_TL.
961: --
962: -- There is a clash.
963: --
964: if g_debug then
965: hr_utility.set_location('ffdict.tl_dbi_will_clash',4);
966: end if;
967:
968: return TRUE;
969: exception
968: return TRUE;
969: exception
970: when no_data_found then
971: if g_debug then
972: hr_utility.set_location('ffdict.tl_dbi_will_clash',5);
973: end if;
974: return FALSE;
975: end tl_dbi_will_clash;
976: --
994: dummy varchar2(1);
995: startup_mode varchar2(10);
996: begin
997: -- set error tracking information
998: hr_utility.set_location('ffdict.will_clash_with_global',1);
999: --
1000: -- get startup_mode based on current business group and legislation
1001: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1002: --
1096: p_bus_grp in number,
1097: p_leg_code in varchar2) return boolean is
1098: dummy varchar2(1);
1099: startup_mode varchar2(10);
1100: l_debug boolean := hr_utility.debug_enabled;
1101: begin
1102: -- set error tracking information
1103: if l_debug then
1104: hr_utility.set_location('ffdict.will_clash_with_global:2',1);
1100: l_debug boolean := hr_utility.debug_enabled;
1101: begin
1102: -- set error tracking information
1103: if l_debug then
1104: hr_utility.set_location('ffdict.will_clash_with_global:2',1);
1105: end if;
1106: --
1107: -- get startup_mode based on current business group and legislation
1108: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1212: dummy varchar2(1);
1213: startup_mode varchar2(10);
1214: begin
1215: -- set error tracking information
1216: hr_utility.set_location('ffdict.will_clash_with_entity',1);
1217: --
1218: -- get startup_mode based on current business group and legislation
1219: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1220: --
1282: dummy varchar2(1);
1283: startup_mode varchar2(10);
1284: begin
1285: -- set error tracking information
1286: hr_utility.set_location('ffdict.will_clash_with_function',1);
1287: --
1288: -- get startup_mode based on current business group and legislation
1289: startup_mode := ffstup.get_mode (p_bus_grp,p_leg_code);
1290: --
1349: function will_clash_with_context(p_item_name in varchar2) return boolean is
1350: dummy varchar2(1);
1351: begin
1352: -- set error tracking information
1353: hr_utility.set_location('ffdict.will_clash_with_context',1);
1354: -- Check if there any rows in FF_CONTEXTS for this name
1355: --
1356: select 'X' into dummy from dual where exists
1357: (select null from ff_contexts where context_name = upper(p_item_name));
1380: p_leg_code in varchar2) is
1381: rgeflg varchar2(1);
1382: begin
1383: -- set error tracking information
1384: hr_utility.set_location('ffdict.validate_formula',1);
1385: --
1386: begin
1387: -- Check if name legal format eg no spaces, or special characters
1388: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1387: -- Check if name legal format eg no spaces, or special characters
1388: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1389: null,null,'Y',rgeflg,null);
1390: exception
1391: when hr_utility.hr_error then
1392: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1393: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1394: hr_utility.raise_error;
1395: end;
1388: hr_chkfmt.checkformat (p_formula_name, 'DB_ITEM_NAME', p_formula_name,
1389: null,null,'Y',rgeflg,null);
1390: exception
1391: when hr_utility.hr_error then
1392: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1393: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1394: hr_utility.raise_error;
1395: end;
1396: --
1389: null,null,'Y',rgeflg,null);
1390: exception
1391: when hr_utility.hr_error then
1392: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1393: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1394: hr_utility.raise_error;
1395: end;
1396: --
1397: -- set error tracking information
1390: exception
1391: when hr_utility.hr_error then
1392: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1393: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1394: hr_utility.raise_error;
1395: end;
1396: --
1397: -- set error tracking information
1398: hr_utility.set_location('ffdict.validate_formula',2);
1394: hr_utility.raise_error;
1395: end;
1396: --
1397: -- set error tracking information
1398: hr_utility.set_location('ffdict.validate_formula',2);
1399: --
1400: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1401: p_bus_grp,p_leg_code)) then
1402: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1398: hr_utility.set_location('ffdict.validate_formula',2);
1399: --
1400: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1401: p_bus_grp,p_leg_code)) then
1402: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1403: hr_utility.set_message_token('1',p_formula_name);
1404: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1405: hr_utility.raise_error;
1406: end if;
1399: --
1400: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1401: p_bus_grp,p_leg_code)) then
1402: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1403: hr_utility.set_message_token('1',p_formula_name);
1404: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1405: hr_utility.raise_error;
1406: end if;
1407: end validate_formula;
1400: if (will_clash_with_formula(p_formula_name, p_formula_type_id,
1401: p_bus_grp,p_leg_code)) then
1402: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1403: hr_utility.set_message_token('1',p_formula_name);
1404: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1405: hr_utility.raise_error;
1406: end if;
1407: end validate_formula;
1408: --
1401: p_bus_grp,p_leg_code)) then
1402: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1403: hr_utility.set_message_token('1',p_formula_name);
1404: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1405: hr_utility.raise_error;
1406: end if;
1407: end validate_formula;
1408: --
1409: ------------------------------ validate_formula -------------------------------
1491: --
1492: begin
1493: --
1494: -- set error tracking information
1495: hr_utility.set_location('ffdict.validate_formula',1);
1496: --
1497: --
1498: begin
1499: --
1504: -- Allowing spaces in formula names(Bug Fix: 4768014)
1505: hr_chkfmt.checkformat (l_name,'PAY_NAME',l_pdummy, null, null, 'N', l_pdummy, null);
1506:
1507: exception
1508: when hr_utility.hr_error then
1509: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1510: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1511: hr_utility.raise_error;
1512: --
1505: hr_chkfmt.checkformat (l_name,'PAY_NAME',l_pdummy, null, null, 'N', l_pdummy, null);
1506:
1507: exception
1508: when hr_utility.hr_error then
1509: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1510: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1511: hr_utility.raise_error;
1512: --
1513: end;
1506:
1507: exception
1508: when hr_utility.hr_error then
1509: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1510: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1511: hr_utility.raise_error;
1512: --
1513: end;
1514: --
1507: exception
1508: when hr_utility.hr_error then
1509: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1510: hr_utility.set_message_token(802,'VALUE_NAME','FF93_FORMULA');
1511: hr_utility.raise_error;
1512: --
1513: end;
1514: --
1515: -- set error tracking information
1512: --
1513: end;
1514: --
1515: -- set error tracking information
1516: hr_utility.set_location('ffdict.validate_formula',2);
1517: --
1518: l_startup_mode := ffstup.get_mode(p_bus_grp,p_leg_code);
1519: --
1520: open csr_formula_clash(l_startup_mode);
1521: fetch csr_formula_clash into l_dummy;
1522: if csr_formula_clash%found then
1523: --
1524: close csr_formula_clash;
1525: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1526: hr_utility.set_message_token('1',p_formula_name);
1527: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1528: hr_utility.raise_error;
1529: --
1522: if csr_formula_clash%found then
1523: --
1524: close csr_formula_clash;
1525: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1526: hr_utility.set_message_token('1',p_formula_name);
1527: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1528: hr_utility.raise_error;
1529: --
1530: else
1523: --
1524: close csr_formula_clash;
1525: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1526: hr_utility.set_message_token('1',p_formula_name);
1527: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1528: hr_utility.raise_error;
1529: --
1530: else
1531: --
1524: close csr_formula_clash;
1525: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1526: hr_utility.set_message_token('1',p_formula_name);
1527: hr_utility.set_message_token(802,'2','FF93_FORMULA');
1528: hr_utility.raise_error;
1529: --
1530: else
1531: --
1532: close csr_formula_clash;
1565: leg_code varchar2(30);
1566: rgeflg varchar2(1);
1567: begin
1568: -- set error tracking information
1569: hr_utility.set_location('ffdict.validate_dbitem',1);
1570: --
1571: -- Check if name legal format eg no spaces, or special characters
1572: begin
1573: -- Check if name legal format eg no spaces, or special characters
1573: -- Check if name legal format eg no spaces, or special characters
1574: hr_chkfmt.checkformat (p_dbi_name, 'DB_ITEM_NAME', p_dbi_name,
1575: null,null,'Y',rgeflg,null);
1576: exception
1577: when hr_utility.hr_error then
1578: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1579: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1580: hr_utility.raise_error;
1581: end;
1574: hr_chkfmt.checkformat (p_dbi_name, 'DB_ITEM_NAME', p_dbi_name,
1575: null,null,'Y',rgeflg,null);
1576: exception
1577: when hr_utility.hr_error then
1578: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1579: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1580: hr_utility.raise_error;
1581: end;
1582: --
1575: null,null,'Y',rgeflg,null);
1576: exception
1577: when hr_utility.hr_error then
1578: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1579: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1580: hr_utility.raise_error;
1581: end;
1582: --
1583: -- set error tracking information
1576: exception
1577: when hr_utility.hr_error then
1578: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1579: hr_utility.set_message_token(802,'VALUE_NAME','FF91_DBITEM_NAME');
1580: hr_utility.raise_error;
1581: end;
1582: --
1583: -- set error tracking information
1584: hr_utility.set_location('ffdict.validate_dbitem',2);
1580: hr_utility.raise_error;
1581: end;
1582: --
1583: -- set error tracking information
1584: hr_utility.set_location('ffdict.validate_dbitem',2);
1585: --
1586: -- Fetch business group and legislation details for current user entity
1587: select business_group_id, legislation_code
1588: into bg_id, leg_code
1589: from ff_user_entities
1590: where user_entity_id = p_user_entity_id;
1591: --
1592: -- set error tracking information
1593: hr_utility.set_location('ffdict.validate_dbitem',3);
1594: --
1595: -- New DB item name cannot be same as existing database item visible from
1596: -- business group and legislation of current user_entity
1597: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1594: --
1595: -- New DB item name cannot be same as existing database item visible from
1596: -- business group and legislation of current user_entity
1597: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1598: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1599: hr_utility.set_message_token('1',p_dbi_name);
1600: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1601: hr_utility.raise_error;
1602: end if;
1595: -- New DB item name cannot be same as existing database item visible from
1596: -- business group and legislation of current user_entity
1597: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1598: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1599: hr_utility.set_message_token('1',p_dbi_name);
1600: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1601: hr_utility.raise_error;
1602: end if;
1603: -- set error tracking information
1596: -- business group and legislation of current user_entity
1597: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1598: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1599: hr_utility.set_message_token('1',p_dbi_name);
1600: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1601: hr_utility.raise_error;
1602: end if;
1603: -- set error tracking information
1604: hr_utility.set_location('ffdict.validate_dbitem',4);
1597: if (will_clash_with_dbitem(p_dbi_name, bg_id, leg_code)) then
1598: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1599: hr_utility.set_message_token('1',p_dbi_name);
1600: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1601: hr_utility.raise_error;
1602: end if;
1603: -- set error tracking information
1604: hr_utility.set_location('ffdict.validate_dbitem',4);
1605: --
1600: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1601: hr_utility.raise_error;
1602: end if;
1603: -- set error tracking information
1604: hr_utility.set_location('ffdict.validate_dbitem',4);
1605: --
1606: -- New DB item name cannot be same as existing item in any verified formula
1607: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1608: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1604: hr_utility.set_location('ffdict.validate_dbitem',4);
1605: --
1606: -- New DB item name cannot be same as existing item in any verified formula
1607: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1608: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1609: hr_utility.set_message_token('1',p_dbi_name);
1610: hr_utility.raise_error;
1611: end if;
1612: -- set error tracking information
1605: --
1606: -- New DB item name cannot be same as existing item in any verified formula
1607: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1608: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1609: hr_utility.set_message_token('1',p_dbi_name);
1610: hr_utility.raise_error;
1611: end if;
1612: -- set error tracking information
1613: hr_utility.set_location('ffdict.validate_dbitem',5);
1606: -- New DB item name cannot be same as existing item in any verified formula
1607: if (ffdict.non_dbi_used_in_formula(p_dbi_name, bg_id, leg_code)) then
1608: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1609: hr_utility.set_message_token('1',p_dbi_name);
1610: hr_utility.raise_error;
1611: end if;
1612: -- set error tracking information
1613: hr_utility.set_location('ffdict.validate_dbitem',5);
1614: --
1609: hr_utility.set_message_token('1',p_dbi_name);
1610: hr_utility.raise_error;
1611: end if;
1612: -- set error tracking information
1613: hr_utility.set_location('ffdict.validate_dbitem',5);
1614: --
1615: -- New DB item name cannot be same as existing context name
1616: if (ffdict.will_clash_with_context(p_dbi_name)) then
1617: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1613: hr_utility.set_location('ffdict.validate_dbitem',5);
1614: --
1615: -- New DB item name cannot be same as existing context name
1616: if (ffdict.will_clash_with_context(p_dbi_name)) then
1617: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1618: hr_utility.set_message_token('1',p_dbi_name);
1619: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1620: hr_utility.raise_error;
1621: end if;
1614: --
1615: -- New DB item name cannot be same as existing context name
1616: if (ffdict.will_clash_with_context(p_dbi_name)) then
1617: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1618: hr_utility.set_message_token('1',p_dbi_name);
1619: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1620: hr_utility.raise_error;
1621: end if;
1622: end validate_dbitem;
1615: -- New DB item name cannot be same as existing context name
1616: if (ffdict.will_clash_with_context(p_dbi_name)) then
1617: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1618: hr_utility.set_message_token('1',p_dbi_name);
1619: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1620: hr_utility.raise_error;
1621: end if;
1622: end validate_dbitem;
1623: --
1616: if (ffdict.will_clash_with_context(p_dbi_name)) then
1617: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1618: hr_utility.set_message_token('1',p_dbi_name);
1619: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1620: hr_utility.raise_error;
1621: end if;
1622: end validate_dbitem;
1623: --
1624: -------------------------- core_validate_tl_dbitem ---------------------------
1632: l_tl_user_name varchar2(2000);
1633: i binary_integer;
1634: j binary_integer;
1635: begin
1636: g_debug := hr_utility.debug_enabled;
1637:
1638: if g_debug then
1639: hr_utility.set_location('ffdict.core_validate_tl_dbi',1);
1640: end if;
1635: begin
1636: g_debug := hr_utility.debug_enabled;
1637:
1638: if g_debug then
1639: hr_utility.set_location('ffdict.core_validate_tl_dbi',1);
1640: end if;
1641:
1642: --
1643: -- Initialise outcome to SUCCESS.
1652: ff_dbi_utils_pkg.str2dbiname(p_str => p_tl_user_name);
1653: p_tl_user_name := l_tl_user_name;
1654:
1655: if g_debug then
1656: hr_utility.set_location('ffdict.core_validate_tl_dbi',2);
1657: end if;
1658:
1659: --
1660: -- Fetch business group and legislation details for current user entity.
1675: ,p_legislation_code => tmp_leg_code
1676: ) then
1677:
1678: if g_debug then
1679: hr_utility.set_location('ffdict.core_validate_tl_dbi',3);
1680: end if;
1681:
1682: p_outcome := 'D';
1683: return;
1683: return;
1684: end if;
1685:
1686: if g_debug then
1687: hr_utility.set_location('ffdict.core_validate_tl_dbi',4);
1688: end if;
1689:
1690: --
1691: -- New DB item name cannot be same as a Formula Context name.
1692: --
1693: if ffdict.will_clash_with_context(l_tl_user_name) then
1694:
1695: if g_debug then
1696: hr_utility.set_location('ffdict.core_validate_tl_dbi',5);
1697: end if;
1698:
1699: p_outcome := 'C';
1700: return;
1700: return;
1701: end if;
1702:
1703: if g_debug then
1704: hr_utility.set_location('ffdict.core_validate_tl_dbi',6);
1705: end if;
1706:
1707: --
1708: -- New DB item name cannot be same as existing item in any verified formula.
1714: ,p_bus_grp => tmp_bg_id
1715: ,p_leg_code => tmp_leg_code
1716: ) then
1717: if g_debug then
1718: hr_utility.set_location('ffdict.core_validate_tl_dbi',7);
1719: end if;
1720:
1721: p_outcome := 'F';
1722: return;
1722: return;
1723: end if;
1724:
1725: if g_debug then
1726: hr_utility.set_location('ffdict.core_validate_tl_dbi',8);
1727: end if;
1728:
1729: if g_debug then
1730: hr_utility.set_location('ffdict.core_validate_tl_dbi',9);
1726: hr_utility.set_location('ffdict.core_validate_tl_dbi',8);
1727: end if;
1728:
1729: if g_debug then
1730: hr_utility.set_location('ffdict.core_validate_tl_dbi',9);
1731: end if;
1732: end core_validate_tl_dbitem;
1733: --
1734: ------------------------------ validate_tl_dbi -------------------------------
1740: ) is
1741: l_tl_user_name varchar2(2000);
1742: l_outcome varchar2(10);
1743: begin
1744: g_debug := hr_utility.debug_enabled;
1745:
1746: if g_debug then
1747: hr_utility.set_location('ffdict.validate_tl_dbi',1);
1748: end if;
1743: begin
1744: g_debug := hr_utility.debug_enabled;
1745:
1746: if g_debug then
1747: hr_utility.set_location('ffdict.validate_tl_dbi',1);
1748: end if;
1749:
1750: l_tl_user_name := p_tl_user_name;
1751:
1749:
1750: l_tl_user_name := p_tl_user_name;
1751:
1752: if g_debug then
1753: hr_utility.set_location('ffdict.validate_tl_dbi',2);
1754: end if;
1755:
1756: core_validate_tl_dbitem
1757: (p_user_name => p_user_name
1760: ,p_outcome => l_outcome
1761: );
1762:
1763: if g_debug then
1764: hr_utility.set_location('ffdict.validate_tl_dbi',3);
1765: end if;
1766:
1767: --
1768: -- New DB item name cannot be same as existing database item visible from
1768: -- New DB item name cannot be same as existing database item visible from
1769: -- business group and legislation of current user_entity.
1770: --
1771: if l_outcome = 'D' then
1772: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1773: hr_utility.set_message_token('1', l_tl_user_name);
1774: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1775: hr_utility.raise_error;
1776: end if;
1769: -- business group and legislation of current user_entity.
1770: --
1771: if l_outcome = 'D' then
1772: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1773: hr_utility.set_message_token('1', l_tl_user_name);
1774: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1775: hr_utility.raise_error;
1776: end if;
1777:
1770: --
1771: if l_outcome = 'D' then
1772: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1773: hr_utility.set_message_token('1', l_tl_user_name);
1774: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1775: hr_utility.raise_error;
1776: end if;
1777:
1778: if g_debug then
1771: if l_outcome = 'D' then
1772: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1773: hr_utility.set_message_token('1', l_tl_user_name);
1774: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1775: hr_utility.raise_error;
1776: end if;
1777:
1778: if g_debug then
1779: hr_utility.set_location('ffdict.validate_tl_dbi',4);
1775: hr_utility.raise_error;
1776: end if;
1777:
1778: if g_debug then
1779: hr_utility.set_location('ffdict.validate_tl_dbi',4);
1780: end if;
1781:
1782: --
1783: -- New DB item name cannot be same as existing context name.
1782: --
1783: -- New DB item name cannot be same as existing context name.
1784: --
1785: if l_outcome = 'C' then
1786: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1787: hr_utility.set_message_token('1', l_tl_user_name);
1788: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1789: hr_utility.raise_error;
1790: end if;
1783: -- New DB item name cannot be same as existing context name.
1784: --
1785: if l_outcome = 'C' then
1786: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1787: hr_utility.set_message_token('1', l_tl_user_name);
1788: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1789: hr_utility.raise_error;
1790: end if;
1791:
1784: --
1785: if l_outcome = 'C' then
1786: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1787: hr_utility.set_message_token('1', l_tl_user_name);
1788: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1789: hr_utility.raise_error;
1790: end if;
1791:
1792: if g_debug then
1785: if l_outcome = 'C' then
1786: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1787: hr_utility.set_message_token('1', l_tl_user_name);
1788: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1789: hr_utility.raise_error;
1790: end if;
1791:
1792: if g_debug then
1793: hr_utility.set_location('ffdict.validate_tl_dbi',5);
1789: hr_utility.raise_error;
1790: end if;
1791:
1792: if g_debug then
1793: hr_utility.set_location('ffdict.validate_tl_dbi',5);
1794: end if;
1795:
1796: --
1797: -- New DB item name cannot be same as existing item in any verified
1798: -- formula. Need to ensure that there is no clash with non-DBI and
1799: -- Context item names used by the formula (inputs, outputs, locals).
1800: --
1801: if l_outcome = 'F' then
1802: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1803: hr_utility.set_message_token('1', l_tl_user_name);
1804: hr_utility.raise_error;
1805: end if;
1806:
1799: -- Context item names used by the formula (inputs, outputs, locals).
1800: --
1801: if l_outcome = 'F' then
1802: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1803: hr_utility.set_message_token('1', l_tl_user_name);
1804: hr_utility.raise_error;
1805: end if;
1806:
1807: p_tl_user_name := l_tl_user_name;
1800: --
1801: if l_outcome = 'F' then
1802: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1803: hr_utility.set_message_token('1', l_tl_user_name);
1804: hr_utility.raise_error;
1805: end if;
1806:
1807: p_tl_user_name := l_tl_user_name;
1808: end validate_tl_dbi;
1820: procedure validate_context(p_ctx_name in out nocopy varchar2) is
1821: rgeflg varchar2(1);
1822: begin
1823: -- set error tracking information
1824: hr_utility.set_location('ffdict.validate_context',1);
1825: --
1826: -- Check if name legal format eg no spaces, or special characters
1827: begin
1828: -- Check if name legal format eg no spaces, or special characters
1828: -- Check if name legal format eg no spaces, or special characters
1829: hr_chkfmt.checkformat (p_ctx_name, 'DB_ITEM_NAME', p_ctx_name,
1830: null,null,'Y',rgeflg,null);
1831: exception
1832: when hr_utility.hr_error then
1833: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1834: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1835: hr_utility.raise_error;
1836: end;
1829: hr_chkfmt.checkformat (p_ctx_name, 'DB_ITEM_NAME', p_ctx_name,
1830: null,null,'Y',rgeflg,null);
1831: exception
1832: when hr_utility.hr_error then
1833: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1834: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1835: hr_utility.raise_error;
1836: end;
1837: -- set error tracking information
1830: null,null,'Y',rgeflg,null);
1831: exception
1832: when hr_utility.hr_error then
1833: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1834: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1835: hr_utility.raise_error;
1836: end;
1837: -- set error tracking information
1838: hr_utility.set_location('ffdict.validate_context',2);
1831: exception
1832: when hr_utility.hr_error then
1833: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1834: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1835: hr_utility.raise_error;
1836: end;
1837: -- set error tracking information
1838: hr_utility.set_location('ffdict.validate_context',2);
1839: --
1834: hr_utility.set_message_token(802,'VALUE_NAME','FF92_CONTEXT');
1835: hr_utility.raise_error;
1836: end;
1837: -- set error tracking information
1838: hr_utility.set_location('ffdict.validate_context',2);
1839: --
1840: -- New DB item name cannot be same as existing context name
1841: if (ffdict.will_clash_with_context(p_ctx_name)) then
1842: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1838: hr_utility.set_location('ffdict.validate_context',2);
1839: --
1840: -- New DB item name cannot be same as existing context name
1841: if (ffdict.will_clash_with_context(p_ctx_name)) then
1842: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1843: hr_utility.set_message_token('1',p_ctx_name);
1844: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1845: hr_utility.raise_error;
1846: end if;
1839: --
1840: -- New DB item name cannot be same as existing context name
1841: if (ffdict.will_clash_with_context(p_ctx_name)) then
1842: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1843: hr_utility.set_message_token('1',p_ctx_name);
1844: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1845: hr_utility.raise_error;
1846: end if;
1847: -- set error tracking information
1840: -- New DB item name cannot be same as existing context name
1841: if (ffdict.will_clash_with_context(p_ctx_name)) then
1842: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1843: hr_utility.set_message_token('1',p_ctx_name);
1844: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1845: hr_utility.raise_error;
1846: end if;
1847: -- set error tracking information
1848: hr_utility.set_location('ffdict.validate_context',3);
1841: if (ffdict.will_clash_with_context(p_ctx_name)) then
1842: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1843: hr_utility.set_message_token('1',p_ctx_name);
1844: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1845: hr_utility.raise_error;
1846: end if;
1847: -- set error tracking information
1848: hr_utility.set_location('ffdict.validate_context',3);
1849: --
1844: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
1845: hr_utility.raise_error;
1846: end if;
1847: -- set error tracking information
1848: hr_utility.set_location('ffdict.validate_context',3);
1849: --
1850: -- Pass null so all formulae are considered
1851: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1852: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1848: hr_utility.set_location('ffdict.validate_context',3);
1849: --
1850: -- Pass null so all formulae are considered
1851: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1852: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1853: hr_utility.set_message_token('1',p_ctx_name);
1854: hr_utility.raise_error;
1855: end if;
1856: -- set error tracking information
1849: --
1850: -- Pass null so all formulae are considered
1851: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1852: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1853: hr_utility.set_message_token('1',p_ctx_name);
1854: hr_utility.raise_error;
1855: end if;
1856: -- set error tracking information
1857: hr_utility.set_location('ffdict.validate_context',4);
1850: -- Pass null so all formulae are considered
1851: if (ffdict.is_used_in_formula(p_ctx_name, null, null)) then
1852: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
1853: hr_utility.set_message_token('1',p_ctx_name);
1854: hr_utility.raise_error;
1855: end if;
1856: -- set error tracking information
1857: hr_utility.set_location('ffdict.validate_context',4);
1858: --
1853: hr_utility.set_message_token('1',p_ctx_name);
1854: hr_utility.raise_error;
1855: end if;
1856: -- set error tracking information
1857: hr_utility.set_location('ffdict.validate_context',4);
1858: --
1859: -- Pass null bus grp and leg code so all DB items are considered
1860: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1861: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1857: hr_utility.set_location('ffdict.validate_context',4);
1858: --
1859: -- Pass null bus grp and leg code so all DB items are considered
1860: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1861: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1862: hr_utility.set_message_token('1',p_ctx_name);
1863: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1864: hr_utility.raise_error;
1865: end if;
1858: --
1859: -- Pass null bus grp and leg code so all DB items are considered
1860: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1861: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1862: hr_utility.set_message_token('1',p_ctx_name);
1863: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1864: hr_utility.raise_error;
1865: end if;
1866: --
1859: -- Pass null bus grp and leg code so all DB items are considered
1860: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1861: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1862: hr_utility.set_message_token('1',p_ctx_name);
1863: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1864: hr_utility.raise_error;
1865: end if;
1866: --
1867: end validate_context;
1860: if (ffdict.will_clash_with_dbitem(p_ctx_name, null, null)) then
1861: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
1862: hr_utility.set_message_token('1',p_ctx_name);
1863: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
1864: hr_utility.raise_error;
1865: end if;
1866: --
1867: end validate_context;
1868: --
1881: p_leg_code in varchar2) is
1882: rgeflg varchar2(1);
1883: begin
1884: -- set error tracking information
1885: hr_utility.set_location('ffdict.validate_user_entity',1);
1886: --
1887: -- Check if name legal format eg no spaces, or special characters
1888: begin
1889: -- Check if name legal format eg no spaces, or special characters
1889: -- Check if name legal format eg no spaces, or special characters
1890: hr_chkfmt.checkformat (p_ue_name, 'DB_ITEM_NAME', p_ue_name,
1891: null,null,'Y',rgeflg,null);
1892: exception
1893: when hr_utility.hr_error then
1894: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1895: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1896: hr_utility.raise_error;
1897: end;
1890: hr_chkfmt.checkformat (p_ue_name, 'DB_ITEM_NAME', p_ue_name,
1891: null,null,'Y',rgeflg,null);
1892: exception
1893: when hr_utility.hr_error then
1894: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1895: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1896: hr_utility.raise_error;
1897: end;
1898: -- set error tracking information
1891: null,null,'Y',rgeflg,null);
1892: exception
1893: when hr_utility.hr_error then
1894: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1895: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1896: hr_utility.raise_error;
1897: end;
1898: -- set error tracking information
1899: hr_utility.set_location('ffdict.validate_user_entity',2);
1892: exception
1893: when hr_utility.hr_error then
1894: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1895: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1896: hr_utility.raise_error;
1897: end;
1898: -- set error tracking information
1899: hr_utility.set_location('ffdict.validate_user_entity',2);
1900: --
1895: hr_utility.set_message_token(802,'VALUE_NAME','FF94_USER_ENTITY');
1896: hr_utility.raise_error;
1897: end;
1898: -- set error tracking information
1899: hr_utility.set_location('ffdict.validate_user_entity',2);
1900: --
1901: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1902: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1903: hr_utility.set_message_token('1',p_ue_name);
1898: -- set error tracking information
1899: hr_utility.set_location('ffdict.validate_user_entity',2);
1900: --
1901: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1902: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1903: hr_utility.set_message_token('1',p_ue_name);
1904: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1905: hr_utility.raise_error;
1906: end if;
1899: hr_utility.set_location('ffdict.validate_user_entity',2);
1900: --
1901: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1902: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1903: hr_utility.set_message_token('1',p_ue_name);
1904: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1905: hr_utility.raise_error;
1906: end if;
1907: end validate_user_entity;
1900: --
1901: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1902: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1903: hr_utility.set_message_token('1',p_ue_name);
1904: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1905: hr_utility.raise_error;
1906: end if;
1907: end validate_user_entity;
1908: --
1901: if (will_clash_with_entity(p_ue_name,p_bus_grp,p_leg_code)) then
1902: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1903: hr_utility.set_message_token('1',p_ue_name);
1904: hr_utility.set_message_token(802,'2','FF94_USER_ENTITY');
1905: hr_utility.raise_error;
1906: end if;
1907: end validate_user_entity;
1908: --
1909: ----------------------------- validate_function ------------------------------
1923: p_leg_code in varchar2) is
1924: rgeflg varchar2(1);
1925: begin
1926: -- set error tracking information
1927: hr_utility.set_location('ffdict.validate_function',1);
1928: --
1929: -- Check if name legal format eg no spaces, or special characters
1930: begin
1931: -- Check if name legal format eg no spaces, or special characters
1931: -- Check if name legal format eg no spaces, or special characters
1932: hr_chkfmt.checkformat (p_func_name, 'DB_ITEM_NAME', p_func_name,
1933: null,null,'Y',rgeflg,null);
1934: exception
1935: when hr_utility.hr_error then
1936: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1937: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1938: hr_utility.raise_error;
1939: end;
1932: hr_chkfmt.checkformat (p_func_name, 'DB_ITEM_NAME', p_func_name,
1933: null,null,'Y',rgeflg,null);
1934: exception
1935: when hr_utility.hr_error then
1936: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1937: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1938: hr_utility.raise_error;
1939: end;
1940: -- set error tracking information
1933: null,null,'Y',rgeflg,null);
1934: exception
1935: when hr_utility.hr_error then
1936: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1937: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1938: hr_utility.raise_error;
1939: end;
1940: -- set error tracking information
1941: hr_utility.set_location('ffdict.validate_function',2);
1934: exception
1935: when hr_utility.hr_error then
1936: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1937: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1938: hr_utility.raise_error;
1939: end;
1940: -- set error tracking information
1941: hr_utility.set_location('ffdict.validate_function',2);
1942: --
1937: hr_utility.set_message_token(802,'VALUE_NAME','FF95_FUNCTION');
1938: hr_utility.raise_error;
1939: end;
1940: -- set error tracking information
1941: hr_utility.set_location('ffdict.validate_function',2);
1942: --
1943: -- Check function name
1944: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1945: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1941: hr_utility.set_location('ffdict.validate_function',2);
1942: --
1943: -- Check function name
1944: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1945: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1946: hr_utility.set_message_token('1',p_func_name);
1947: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1948: hr_utility.raise_error;
1949: end if;
1942: --
1943: -- Check function name
1944: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1945: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1946: hr_utility.set_message_token('1',p_func_name);
1947: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1948: hr_utility.raise_error;
1949: end if;
1950: -- set error tracking information
1943: -- Check function name
1944: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1945: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1946: hr_utility.set_message_token('1',p_func_name);
1947: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1948: hr_utility.raise_error;
1949: end if;
1950: -- set error tracking information
1951: hr_utility.set_location('ffdict.validate_function',3);
1944: if (will_clash_with_function(p_func_name,p_class, p_bus_grp,p_leg_code)) then
1945: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1946: hr_utility.set_message_token('1',p_func_name);
1947: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1948: hr_utility.raise_error;
1949: end if;
1950: -- set error tracking information
1951: hr_utility.set_location('ffdict.validate_function',3);
1952: --
1947: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1948: hr_utility.raise_error;
1949: end if;
1950: -- set error tracking information
1951: hr_utility.set_location('ffdict.validate_function',3);
1952: --
1953: -- Check alias - cannot be same as another alias or function name
1954: if (p_alias is not null) then
1955: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1952: --
1953: -- Check alias - cannot be same as another alias or function name
1954: if (p_alias is not null) then
1955: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1956: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1957: hr_utility.set_message_token('1',p_func_name);
1958: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1959: hr_utility.raise_error;
1960: end if;
1953: -- Check alias - cannot be same as another alias or function name
1954: if (p_alias is not null) then
1955: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1956: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1957: hr_utility.set_message_token('1',p_func_name);
1958: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1959: hr_utility.raise_error;
1960: end if;
1961: end if;
1954: if (p_alias is not null) then
1955: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1956: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1957: hr_utility.set_message_token('1',p_func_name);
1958: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1959: hr_utility.raise_error;
1960: end if;
1961: end if;
1962: end validate_function;
1955: if (will_clash_with_function(p_alias,p_class, p_bus_grp,p_leg_code)) then
1956: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1957: hr_utility.set_message_token('1',p_func_name);
1958: hr_utility.set_message_token(802,'2','FF95_FUNCTION');
1959: hr_utility.raise_error;
1960: end if;
1961: end if;
1962: end validate_function;
1963: --
1976: p_leg_code in varchar2) is
1977: rgeflg varchar2(1);
1978: begin
1979: -- set error tracking information
1980: hr_utility.set_location('ffdict.validate_global',1);
1981: --
1982: -- Check if name legal format eg no spaces, or special characters
1983: begin
1984: -- Check if name legal format eg no spaces, or special characters
1984: -- Check if name legal format eg no spaces, or special characters
1985: hr_chkfmt.checkformat (p_glob_name, 'DB_ITEM_NAME', p_glob_name,
1986: null,null,'Y',rgeflg,null);
1987: exception
1988: when hr_utility.hr_error then
1989: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1990: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1991: hr_utility.raise_error;
1992: end;
1985: hr_chkfmt.checkformat (p_glob_name, 'DB_ITEM_NAME', p_glob_name,
1986: null,null,'Y',rgeflg,null);
1987: exception
1988: when hr_utility.hr_error then
1989: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1990: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1991: hr_utility.raise_error;
1992: end;
1993:
1986: null,null,'Y',rgeflg,null);
1987: exception
1988: when hr_utility.hr_error then
1989: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1990: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1991: hr_utility.raise_error;
1992: end;
1993:
1994: -- set error tracking information
1987: exception
1988: when hr_utility.hr_error then
1989: hr_utility.set_message (802, 'FFHR_6016_ALL_RES_WORDS');
1990: hr_utility.set_message_token(802,'VALUE_NAME','FF90_GLOBAL_NAME');
1991: hr_utility.raise_error;
1992: end;
1993:
1994: -- set error tracking information
1995: hr_utility.set_location('ffdict.validate_global',2);
1991: hr_utility.raise_error;
1992: end;
1993:
1994: -- set error tracking information
1995: hr_utility.set_location('ffdict.validate_global',2);
1996: --
1997: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1998: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1999: hr_utility.set_message_token('1',p_glob_name);
1994: -- set error tracking information
1995: hr_utility.set_location('ffdict.validate_global',2);
1996: --
1997: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1998: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1999: hr_utility.set_message_token('1',p_glob_name);
2000: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2001: hr_utility.raise_error;
2002: end if;
1995: hr_utility.set_location('ffdict.validate_global',2);
1996: --
1997: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1998: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1999: hr_utility.set_message_token('1',p_glob_name);
2000: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2001: hr_utility.raise_error;
2002: end if;
2003: -- set error tracking information
1996: --
1997: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1998: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1999: hr_utility.set_message_token('1',p_glob_name);
2000: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2001: hr_utility.raise_error;
2002: end if;
2003: -- set error tracking information
2004: hr_utility.set_location('ffdict.validate_global',3);
1997: if (will_clash_with_global(p_glob_name,p_bus_grp,p_leg_code)) then
1998: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
1999: hr_utility.set_message_token('1',p_glob_name);
2000: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2001: hr_utility.raise_error;
2002: end if;
2003: -- set error tracking information
2004: hr_utility.set_location('ffdict.validate_global',3);
2005: --
2000: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2001: hr_utility.raise_error;
2002: end if;
2003: -- set error tracking information
2004: hr_utility.set_location('ffdict.validate_global',3);
2005: --
2006: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2007: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2008: hr_utility.set_message_token('1',p_glob_name);
2003: -- set error tracking information
2004: hr_utility.set_location('ffdict.validate_global',3);
2005: --
2006: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2007: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2008: hr_utility.set_message_token('1',p_glob_name);
2009: hr_utility.raise_error;
2010: end if;
2011: -- set error tracking information
2004: hr_utility.set_location('ffdict.validate_global',3);
2005: --
2006: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2007: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2008: hr_utility.set_message_token('1',p_glob_name);
2009: hr_utility.raise_error;
2010: end if;
2011: -- set error tracking information
2012: hr_utility.set_location('ffdict.validate_global',4);
2005: --
2006: if (is_used_in_formula(p_glob_name, p_bus_grp, p_leg_code)) then
2007: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2008: hr_utility.set_message_token('1',p_glob_name);
2009: hr_utility.raise_error;
2010: end if;
2011: -- set error tracking information
2012: hr_utility.set_location('ffdict.validate_global',4);
2013: --
2008: hr_utility.set_message_token('1',p_glob_name);
2009: hr_utility.raise_error;
2010: end if;
2011: -- set error tracking information
2012: hr_utility.set_location('ffdict.validate_global',4);
2013: --
2014: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2015: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2016: hr_utility.set_message_token('1',p_glob_name);
2011: -- set error tracking information
2012: hr_utility.set_location('ffdict.validate_global',4);
2013: --
2014: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2015: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2016: hr_utility.set_message_token('1',p_glob_name);
2017: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2018: hr_utility.raise_error;
2019: end if;
2012: hr_utility.set_location('ffdict.validate_global',4);
2013: --
2014: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2015: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2016: hr_utility.set_message_token('1',p_glob_name);
2017: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2018: hr_utility.raise_error;
2019: end if;
2020: -- set error tracking information
2013: --
2014: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2015: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2016: hr_utility.set_message_token('1',p_glob_name);
2017: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2018: hr_utility.raise_error;
2019: end if;
2020: -- set error tracking information
2021: hr_utility.set_location('ffdict.validate_global',5);
2014: if (will_clash_with_dbitem(p_glob_name, p_bus_grp, p_leg_code)) then
2015: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2016: hr_utility.set_message_token('1',p_glob_name);
2017: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2018: hr_utility.raise_error;
2019: end if;
2020: -- set error tracking information
2021: hr_utility.set_location('ffdict.validate_global',5);
2022: --
2017: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2018: hr_utility.raise_error;
2019: end if;
2020: -- set error tracking information
2021: hr_utility.set_location('ffdict.validate_global',5);
2022: --
2023: if (will_clash_with_context(p_glob_name)) then
2024: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2025: hr_utility.set_message_token('1',p_glob_name);
2020: -- set error tracking information
2021: hr_utility.set_location('ffdict.validate_global',5);
2022: --
2023: if (will_clash_with_context(p_glob_name)) then
2024: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2025: hr_utility.set_message_token('1',p_glob_name);
2026: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2027: hr_utility.raise_error;
2028: end if;
2021: hr_utility.set_location('ffdict.validate_global',5);
2022: --
2023: if (will_clash_with_context(p_glob_name)) then
2024: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2025: hr_utility.set_message_token('1',p_glob_name);
2026: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2027: hr_utility.raise_error;
2028: end if;
2029: end validate_global;
2022: --
2023: if (will_clash_with_context(p_glob_name)) then
2024: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2025: hr_utility.set_message_token('1',p_glob_name);
2026: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2027: hr_utility.raise_error;
2028: end if;
2029: end validate_global;
2030: --
2023: if (will_clash_with_context(p_glob_name)) then
2024: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2025: hr_utility.set_message_token('1',p_glob_name);
2026: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2027: hr_utility.raise_error;
2028: end if;
2029: end validate_global;
2030: --
2031: ---------------------------- validate_tl_global -------------------------------
2045: ,p_item_name => p_glob_name
2046: ,p_bus_grp => p_bus_grp
2047: ,p_leg_code => p_leg_code
2048: ) then
2049: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2050: hr_utility.set_message_token('1',p_glob_name);
2051: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2052: hr_utility.raise_error;
2053: end if;
2046: ,p_bus_grp => p_bus_grp
2047: ,p_leg_code => p_leg_code
2048: ) then
2049: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2050: hr_utility.set_message_token('1',p_glob_name);
2051: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2052: hr_utility.raise_error;
2053: end if;
2054:
2047: ,p_leg_code => p_leg_code
2048: ) then
2049: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2050: hr_utility.set_message_token('1',p_glob_name);
2051: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2052: hr_utility.raise_error;
2053: end if;
2054:
2055: if g_glb_id is null or g_glb_id <> p_global_id then
2048: ) then
2049: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2050: hr_utility.set_message_token('1',p_glob_name);
2051: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2052: hr_utility.raise_error;
2053: end if;
2054:
2055: if g_glb_id is null or g_glb_id <> p_global_id then
2056: set_global_dbi_details(global_id => p_global_id);
2075: if will_clash_with_global(p_item_name => p_glob_name
2076: ,p_bus_grp => p_bus_grp
2077: ,p_leg_code => p_leg_code
2078: ) then
2079: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2080: hr_utility.set_message_token('1',p_glob_name);
2081: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2082: hr_utility.raise_error;
2083: end if;
2076: ,p_bus_grp => p_bus_grp
2077: ,p_leg_code => p_leg_code
2078: ) then
2079: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2080: hr_utility.set_message_token('1',p_glob_name);
2081: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2082: hr_utility.raise_error;
2083: end if;
2084:
2077: ,p_leg_code => p_leg_code
2078: ) then
2079: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2080: hr_utility.set_message_token('1',p_glob_name);
2081: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2082: hr_utility.raise_error;
2083: end if;
2084:
2085: --
2078: ) then
2079: hr_utility.set_message(802,'FF52_NAME_ALREADY_USED');
2080: hr_utility.set_message_token('1',p_glob_name);
2081: hr_utility.set_message_token(802,'2','FF90_GLOBAL_NAME');
2082: hr_utility.raise_error;
2083: end if;
2084:
2085: --
2086: -- Now look at the generated database item name.
2087: --
2088: l_dbi := ff_dbi_utils_pkg.str2dbiname(p_str => l_glob_name);
2089:
2090: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2091: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2092: hr_utility.set_message_token('1',l_dbi);
2093: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2094: hr_utility.raise_error;
2095: end if;
2088: l_dbi := ff_dbi_utils_pkg.str2dbiname(p_str => l_glob_name);
2089:
2090: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2091: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2092: hr_utility.set_message_token('1',l_dbi);
2093: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2094: hr_utility.raise_error;
2095: end if;
2096:
2089:
2090: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2091: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2092: hr_utility.set_message_token('1',l_dbi);
2093: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2094: hr_utility.raise_error;
2095: end if;
2096:
2097: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2090: if (will_clash_with_dbitem(l_dbi, tmp_bg_id, tmp_leg_code)) then
2091: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2092: hr_utility.set_message_token('1',l_dbi);
2093: hr_utility.set_message_token(802,'2','FF91_DBITEM_NAME');
2094: hr_utility.raise_error;
2095: end if;
2096:
2097: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2098: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2094: hr_utility.raise_error;
2095: end if;
2096:
2097: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2098: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2099: hr_utility.set_message_token('1',l_dbi);
2100: hr_utility.raise_error;
2101: end if;
2102:
2095: end if;
2096:
2097: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2098: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2099: hr_utility.set_message_token('1',l_dbi);
2100: hr_utility.raise_error;
2101: end if;
2102:
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2096:
2097: if (ffdict.non_dbi_used_in_formula(l_dbi, tmp_bg_id, tmp_leg_code)) then
2098: hr_utility.set_message (802,'FF75_ITEM_USED_IN_FORMULA');
2099: hr_utility.set_message_token('1',l_dbi);
2100: hr_utility.raise_error;
2101: end if;
2102:
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2104: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2100: hr_utility.raise_error;
2101: end if;
2102:
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2104: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2105: hr_utility.set_message_token('1',l_dbi);
2106: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2107: hr_utility.raise_error;
2108: end if;
2101: end if;
2102:
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2104: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2105: hr_utility.set_message_token('1',l_dbi);
2106: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2107: hr_utility.raise_error;
2108: end if;
2109: end if;
2102:
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2104: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2105: hr_utility.set_message_token('1',l_dbi);
2106: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2107: hr_utility.raise_error;
2108: end if;
2109: end if;
2110: end validate_tl_global;
2103: if (ffdict.will_clash_with_context(l_dbi)) then
2104: hr_utility.set_message (802,'FF52_NAME_ALREADY_USED');
2105: hr_utility.set_message_token('1',l_dbi);
2106: hr_utility.set_message_token(802,'2','FF92_CONTEXT');
2107: hr_utility.raise_error;
2108: end if;
2109: end if;
2110: end validate_tl_global;
2111: --
2123: procedure validate_rcu(p_route_id in number) is
2124: dummy varchar2(1);
2125: begin
2126: -- set error tracking information
2127: hr_utility.set_location('ffdict.validate_rcu',1);
2128: --
2129: -- Look for any compiled formulas which use database items based on this
2130: -- route.
2131: select 'X' into dummy from dual
2145: and c.route_id = p_route_id
2146: );
2147: -- if select succeeds, then at least one compiled formula uses route
2148: -- so raise an error
2149: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2150: hr_utility.raise_error;
2151:
2152: exception
2153: -- route items not used, so succeed
2146: );
2147: -- if select succeeds, then at least one compiled formula uses route
2148: -- so raise an error
2149: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2150: hr_utility.raise_error;
2151:
2152: exception
2153: -- route items not used, so succeed
2154: when no_data_found then
2177: pragma exception_init (mutating_table, -4091);
2178: pragma exception_init (invalid_cursor, -1001);
2179: begin
2180: -- set error tracking information
2181: hr_utility.set_location('ffdict.validate_rpv',1);
2182: --
2183: -- attempt to get BG details from ff_user_entities, which might be mutating
2184: -- so trap error. If it is mutating, can skip validation because a cascade
2185: -- delete is in progress and the deletion will have been validated already
2189: from ff_user_entities
2190: where user_entity_id = p_user_entity_id;
2191: --
2192: -- set error tracking information
2193: hr_utility.set_location('ffdict.validate_rpv',2);
2194: -- get startup_mode based on current business group and legislation
2195: startup_mode := ffstup.get_mode (bg_id,leg_code);
2196: --
2197: -- set error tracking information
2194: -- get startup_mode based on current business group and legislation
2195: startup_mode := ffstup.get_mode (bg_id,leg_code);
2196: --
2197: -- set error tracking information
2198: hr_utility.set_location('ffdict.validate_rpv',3);
2199: -- Look for any compiled formulas which use database items based on this
2200: -- user entity. Need to consider business group and legislation
2201: select 'X' into dummy from dual
2202: where exists
2241: )
2242: );
2243: -- if select succeeds, then at least one compiled formula uses route
2244: -- so raise an error
2245: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2246: hr_utility.raise_error;
2247: exception
2248: -- route items not used, so succeed
2249: when no_data_found then
2242: );
2243: -- if select succeeds, then at least one compiled formula uses route
2244: -- so raise an error
2245: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2246: hr_utility.raise_error;
2247: exception
2248: -- route items not used, so succeed
2249: when no_data_found then
2250: -- set error tracking information
2247: exception
2248: -- route items not used, so succeed
2249: when no_data_found then
2250: -- set error tracking information
2251: hr_utility.set_location('ffdict.validate_rpv',4);
2252: when mutating_table then
2253: -- set error tracking information
2254: hr_utility.set_location('ffdict.validate_rpv',5);
2255: when invalid_cursor then
2250: -- set error tracking information
2251: hr_utility.set_location('ffdict.validate_rpv',4);
2252: when mutating_table then
2253: -- set error tracking information
2254: hr_utility.set_location('ffdict.validate_rpv',5);
2255: when invalid_cursor then
2256: hr_utility.set_location('ffdict.validate_rpv',6);
2257: end validate_rpv;
2258: --
2252: when mutating_table then
2253: -- set error tracking information
2254: hr_utility.set_location('ffdict.validate_rpv',5);
2255: when invalid_cursor then
2256: hr_utility.set_location('ffdict.validate_rpv',6);
2257: end validate_rpv;
2258: --
2259: ---------------------------- create_global_dbitem -----------------------------
2260: --
2277: l_route_parameter_id number;
2278: item_present exception;
2279: begin
2280: -- set error tracking information
2281: hr_utility.set_location('ffdict.create_global_dbitem',1);
2282: --
2283: -- Check whether DB item has already been created for this global
2284: begin
2285: select creator_id
2292: when no_data_found then
2293: null;
2294: end;
2295: -- set error tracking information
2296: hr_utility.set_location('ffdict.create_global_dbitem',2);
2297: --
2298: -- Get route id for globals route. If not exists, create new one.
2299: begin
2300: select route_id
2307: end;
2308: --
2309: if l_route_id is null then
2310: -- set error tracking information
2311: hr_utility.set_location('ffdict.create_global_dbitem',3);
2312: --
2313: insert into ff_routes
2314: (route_id,
2315: route_name,
2329: p_created_by,
2330: p_creation_date
2331: );
2332: -- set error tracking information
2333: hr_utility.set_location('ffdict.create_global_dbitem',4);
2334: --
2335: insert into ff_route_parameters
2336: (route_parameter_id,
2337: route_id,
2346: 'GLOBAL_ID',
2347: 1
2348: );
2349: -- set error tracking information
2350: hr_utility.set_location('ffdict.create_global_dbitem',5);
2351: --
2352: select ff_routes_s.currval, ff_route_parameters_s.currval
2353: into l_route_id, l_route_parameter_id
2354: from sys.dual;
2353: into l_route_id, l_route_parameter_id
2354: from sys.dual;
2355: else
2356: -- set error tracking information
2357: hr_utility.set_location('ffdict.create_global_dbitem',6);
2358: --
2359: -- Route exists so select parameter id (should only be one)
2360: select route_parameter_id
2361: into l_route_parameter_id
2363: where route_id = l_route_id;
2364: end if;
2365: --
2366: -- set error tracking information
2367: hr_utility.set_location('ffdict.create_global_dbitem',7);
2368: --
2369: -- Create user entity for this global
2370: insert into ff_user_entities
2371: (user_entity_id,
2393: p_created_by,
2394: p_creation_date
2395: );
2396: -- set error tracking information
2397: hr_utility.set_location('ffdict.create_global_dbitem',8);
2398: --
2399: -- insert parameter value for this user entity. Don't forget to add quotes
2400: -- for parameter value (global name)
2401: insert into ff_route_parameter_values
2412: p_created_by,
2413: p_creation_date
2414: );
2415: -- set error tracking information
2416: hr_utility.set_location('ffdict.create_global_dbitem',9);
2417: --
2418: insert into ff_database_items
2419: (user_name,
2420: user_entity_id,
2456: --
2457: procedure delete_global_dbitem(p_global_id in number) is
2458: begin
2459: -- set error tracking information
2460: hr_utility.set_location('ffdict.delete_global_dbitem',1);
2461: --
2462: -- Delete user entity created for this global with a cascade delete of
2463: -- child records in ff_database_items and ff_route_parameter_values
2464: --
2481: p_context_id in number) is
2482: dummy varchar2(1);
2483: begin
2484: -- set error tracking information
2485: hr_utility.set_location('ffdict.delete_ftcu_check',1);
2486: --
2487: -- Look for any compiled formulas belonging to the formula type passed
2488: -- which use the context
2489: select 'X' into dummy from dual
2499: and b.usage = 'U'
2500: );
2501: -- if select succeeds, then at least one compiled formula uses context
2502: -- so raise an error
2503: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2504: hr_utility.raise_error;
2505:
2506: exception
2507: -- route items not used, so succeed
2500: );
2501: -- if select succeeds, then at least one compiled formula uses context
2502: -- so raise an error
2503: hr_utility.set_message (802,'FF76_WILL_INVALIDATE_FORMULA');
2504: hr_utility.raise_error;
2505:
2506: exception
2507: -- route items not used, so succeed
2508: when no_data_found then
2523: p_business_group_id in number,
2524: p_legislation_code in varchar2) is
2525: begin
2526: -- set error tracking information
2527: hr_utility.set_location('ffdict.delete_dbitem_check(2)',1);
2528: --
2529: -- if database item used in a formula, fail
2530: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2531: p_legislation_code)) then
2528: --
2529: -- if database item used in a formula, fail
2530: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2531: p_legislation_code)) then
2532: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2533: hr_utility.set_message_token('1',p_item_name);
2534: hr_utility.raise_error;
2535: end if;
2536: end delete_dbitem_check;
2529: -- if database item used in a formula, fail
2530: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2531: p_legislation_code)) then
2532: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2533: hr_utility.set_message_token('1',p_item_name);
2534: hr_utility.raise_error;
2535: end if;
2536: end delete_dbitem_check;
2537: --
2530: if (ffdict.is_used_in_formula(p_item_name, p_business_group_id,
2531: p_legislation_code)) then
2532: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2533: hr_utility.set_message_token('1',p_item_name);
2534: hr_utility.raise_error;
2535: end if;
2536: end delete_dbitem_check;
2537: --
2538: ---------------------------- delete_dbitem_check -----------------------------
2547: procedure delete_dbitem_check(p_item_name in varchar2,
2548: p_user_entity_id in number) is
2549: begin
2550: -- set error tracking information
2551: hr_utility.set_location('ffdict.delete_dbitem_check',1);
2552:
2553: -- if database item used in a formula, fail
2554: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2555: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2551: hr_utility.set_location('ffdict.delete_dbitem_check',1);
2552:
2553: -- if database item used in a formula, fail
2554: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2555: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2556: hr_utility.set_message_token('1',p_item_name);
2557: hr_utility.raise_error;
2558: end if;
2559: end delete_dbitem_check;
2552:
2553: -- if database item used in a formula, fail
2554: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2555: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2556: hr_utility.set_message_token('1',p_item_name);
2557: hr_utility.raise_error;
2558: end if;
2559: end delete_dbitem_check;
2560: --
2553: -- if database item used in a formula, fail
2554: if ffdict.dbi_used_in_formula(p_item_name, p_user_entity_id) then
2555: hr_utility.set_message(802,'FF75_ITEM_USED_IN_FORMULA');
2556: hr_utility.set_message_token('1',p_item_name);
2557: hr_utility.raise_error;
2558: end if;
2559: end delete_dbitem_check;
2560: --
2561: ------------------------------- set_ue_details --------------------------------
2571: business_group_id in number,
2572: legislation_code in varchar2) is
2573: begin
2574: -- set error tracking information
2575: hr_utility.set_location('ffdict.set_ue_details',1);
2576: --
2577: tmp_ue_id := user_entity_id;
2578: tmp_bg_id := business_group_id;
2579: tmp_leg_code := legislation_code;
2590: --
2591: procedure clear_ue_details is
2592: begin
2593: -- set error tracking information
2594: hr_utility.set_location('ffdict.clear_ue_details',1);
2595: --
2596: tmp_ue_id := null;
2597: tmp_bg_id := null;
2598: tmp_leg_code := null;
2641: begin
2642:
2643: l_proc := 'pur_brd' ;
2644:
2645: hr_utility.set_location('Entering -'||l_proc ,05 ) ;
2646:
2647: l_count:= l_pur_del.count;
2648: l_pur_del(l_count+1).user_entity_id := p_ff_ue_id ;
2649: l_pur_del(l_count+1).business_group_id := p_bg_id ;
2648: l_pur_del(l_count+1).user_entity_id := p_ff_ue_id ;
2649: l_pur_del(l_count+1).business_group_id := p_bg_id ;
2650: l_pur_del(l_count+1).legislation_code := p_leg_code ;
2651:
2652: hr_utility.set_location('Leaving -'||l_proc,50 ) ;
2653:
2654: exception
2655: when others then
2656: hr_utility.set_location('Error -'||substr(sqlerrm,1,150),99 ) ;
2652: hr_utility.set_location('Leaving -'||l_proc,50 ) ;
2653:
2654: exception
2655: when others then
2656: hr_utility.set_location('Error -'||substr(sqlerrm,1,150),99 ) ;
2657: raise;
2658:
2659: end pur_brd;
2660:
2673: );
2674: rec_pur c_pur_del%rowtype;
2675:
2676: begin
2677: hr_utility.set_location('Entering -'||l_proc ,05 ) ;
2678: for i in 1..l_pur_del.count loop
2679: open c_pur_del(l_pur_del(i).user_entity_id) ;
2680: fetch c_pur_del into rec_pur ;
2681: if c_pur_del%found then
2688: close c_pur_del ;
2689: delete from ff_route_parameter_values where user_entity_id= l_pur_del(i).user_entity_id;
2690: end loop ;
2691: l_pur_del.delete;
2692: hr_utility.set_location('Leaving -'||l_proc,50 ) ;
2693: exception
2694: when others then
2695: hr_utility.set_location('Error -'||substr(sqlerrm,1,150),99 ) ;
2696: l_pur_del.delete;
2691: l_pur_del.delete;
2692: hr_utility.set_location('Leaving -'||l_proc,50 ) ;
2693: exception
2694: when others then
2695: hr_utility.set_location('Error -'||substr(sqlerrm,1,150),99 ) ;
2696: l_pur_del.delete;
2697: raise;
2698: end pur_asd;
2699: end ffdict;