[Home] [Help]
6: g_warning_no number(10) := 0;
7: g_next_warning_no number(10) := 0;
8: g_warnings_table warnings_tab;
9: --
10: g_rule_level_cd pqh_rule_sets.rule_level_cd%type;
11: --
12: g_package varchar2(33) := ' pqh_utility'; -- Global package name
13: --
14: g_query_date date := null;
72: --
73: l_proc varchar2(72) := g_package||'get_message_level_cd';
74: --
75: l_rule_set_id pqh_rules.rule_set_id%type;
76: l_rule_level_cd pqh_rule_sets.rule_level_cd%type;
77: l_business_group_id hr_all_organization_units.business_group_id%type;
78: l_record_found BOOLEAN := FALSE;
79: l_no_rule_sets number(10);
80: --
338: p_starting_organization_id in number,
339: p_referenced_rule_set_id in number,
340: p_business_group_id in number) is
341: Select rule_level_cd
342: From pqh_rule_sets
343: Where business_group_id = p_business_group_id
344: AND referenced_rule_set_id = p_referenced_rule_set_id
345: and starting_organization_id = P_STARTING_ORGANIZATION_ID
346: and organization_structure_id = p_organization_structure_id;
362: p_organization_id IN number,
363: p_rule_level_cd OUT nocopy varchar2)
364: RETURN BOOLEAN is
365: --
366: l_organization_structure_id pqh_rule_sets.organization_structure_id%type;
367: l_org_structure_version_id per_org_structure_versions.org_structure_version_id%type;
368: --
369: l_hierarchy_level number(10);
370: l_parent_node pqh_rule_sets.organization_id%type;
366: l_organization_structure_id pqh_rule_sets.organization_structure_id%type;
367: l_org_structure_version_id per_org_structure_versions.org_structure_version_id%type;
368: --
369: l_hierarchy_level number(10);
370: l_parent_node pqh_rule_sets.organization_id%type;
371: --
372: Cursor csr_bg_config is
373: Select a.rule_level_cd
374: From pqh_rule_sets a
370: l_parent_node pqh_rule_sets.organization_id%type;
371: --
372: Cursor csr_bg_config is
373: Select a.rule_level_cd
374: From pqh_rule_sets a
375: Where a.business_group_id = p_business_group_id
376: AND a.referenced_rule_set_id = p_ref_rule_set_id
377: AND a.organization_id is null
378: AND a.organization_structure_id IS NULL;
381: -- alone
382: --
383: Cursor csr_org_config is
384: Select a.rule_level_cd
385: From pqh_rule_sets a
386: Where a.business_group_id = p_business_group_id
387: AND a.referenced_rule_set_id = p_ref_rule_set_id
388: AND a.organization_id = p_organization_id
389: AND a.organization_structure_id IS NULL;
394: -- We do not want to select configuartions made for induvidual organizations.
395: --
396: Cursor csr_org_struct is
397: Select distinct a.organization_structure_id
398: From pqh_rule_sets a
399: Where a.business_group_id = p_business_group_id
400: AND a.referenced_rule_set_id = p_ref_rule_set_id
401: and a.organization_structure_id IS NOT NULL;
402: --
588: p_rule_level_cd OUT nocopy varchar2) is
589: --
590: Cursor c1 is
591: Select rule_level_cd
592: From pqh_rule_sets a
593: Where a.rule_set_id = p_rule_set_id;
594: --
595: l_proc varchar2(72) := g_package||'get_rule_set_level_cd';
596: --
835: Procedure set_message (applid in number,
836: l_message_name in varchar2,
837: l_organization_id in number default NULL) is
838: --
839: l_rule_level_cd pqh_rule_sets.rule_level_cd%type;
840: --
841: --
842: l_proc varchar2(72) := g_package||'set_message';
843: --
2097: --
2098: l_rule_set_name varchar2(240);
2099: begin
2100: if p_rule_set_id is not null then
2101: select rule_set_name into l_rule_set_name from pqh_rule_sets_vl
2102: where rule_set_id = p_rule_set_id;
2103: end if;
2104: return l_rule_set_name;
2105: exception when others then