DBA Data[Home] [Help]

APPS.HZ_MATCH_RULE_COMPILE dependencies on HZ_GEN_PLSQL

Line 137: HZ_GEN_PLSQL.add_line(str);

133:
134: /*** Private procedure for inserting lines into generated packages **/
135: PROCEDURE l(str VARCHAR2) IS
136: BEGIN
137: HZ_GEN_PLSQL.add_line(str);
138: END;
139:
140: /*** Private procedure for inserting statement , procedure level debug lines into generated packages **/
141: PROCEDURE d(p_msg_level NUMBER,str VARCHAR2, val VARCHAR2 DEFAULT NULL, pad VARCHAR2 DEFAULT ' ') IS

Line 614: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE');

610: END IF;
611: CLOSE check_inactive;
612:
613: -- Generate and compile match rule package spec
614: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE');
615: gen_pkg_spec(l_package_name, l_rule_id);
616: HZ_GEN_PLSQL.compile_code;
617:
618: -- Generate the package body

Line 616: HZ_GEN_PLSQL.compile_code;

612:
613: -- Generate and compile match rule package spec
614: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE');
615: gen_pkg_spec(l_package_name, l_rule_id);
616: HZ_GEN_PLSQL.compile_code;
617:
618: -- Generate the package body
619: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE BODY');
620:

Line 619: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE BODY');

615: gen_pkg_spec(l_package_name, l_rule_id);
616: HZ_GEN_PLSQL.compile_code;
617:
618: -- Generate the package body
619: HZ_GEN_PLSQL.new(l_package_name, 'PACKAGE BODY');
620:
621: -- VJN: generate the body for HZ_MATCH_RULE_XXX depending on the rule purpose:
622: -- If rule purpose is Q, we would generate Bulk Match rules that use B-tree indexes
623: -- Else we would generate Match rules that use the regular intermedia text indexes

Line 637: HZ_GEN_PLSQL.compile_code;

633: gen_pkg_body(l_package_name, l_rule_id);
634: END IF;
635:
636: -- Compile the package body
637: HZ_GEN_PLSQL.compile_code;
638:
639:
640: IF p_skip_wrap IS NULL OR p_skip_wrap='N' THEN
641: -- Generate and compile API package body (Package HZ_PARTY_SEARCH)

Line 642: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');

638:
639:
640: IF p_skip_wrap IS NULL OR p_skip_wrap='N' THEN
641: -- Generate and compile API package body (Package HZ_PARTY_SEARCH)
642: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
643: gen_wrap_pkg_body(p_rule_id);
644: HZ_GEN_PLSQL.compile_code;
645: END IF;
646:

Line 644: HZ_GEN_PLSQL.compile_code;

640: IF p_skip_wrap IS NULL OR p_skip_wrap='N' THEN
641: -- Generate and compile API package body (Package HZ_PARTY_SEARCH)
642: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
643: gen_wrap_pkg_body(p_rule_id);
644: HZ_GEN_PLSQL.compile_code;
645: END IF;
646:
647: EXECUTE IMMEDIATE 'ALTER PACKAGE ' || l_package_name || ' COMPILE SPECIFICATION'; --bug 5622345
648:

Line 13767: HZ_GEN_PLSQL.add_line(' IF p_party_site_list(I).',false);

13763: AND nvl(p.FILTER_FLAG,'N') = 'N')
13764: LOOP
13765: IF PRIMATTRS.ENTITY_NAME = 'PARTY_SITES' THEN
13766: l(' FOR I IN 1..p_party_site_list.COUNT LOOP');
13767: HZ_GEN_PLSQL.add_line(' IF p_party_site_list(I).',false);
13768: ELSIF PRIMATTRS.ENTITY_NAME = 'CONTACTS' THEN
13769: l(' FOR I IN 1..p_contact_list.COUNT LOOP');
13770: HZ_GEN_PLSQL.add_line(' IF p_contact_list(I).',false);
13771: ELSIF PRIMATTRS.ENTITY_NAME = 'CONTACT_POINTS' THEN

Line 13770: HZ_GEN_PLSQL.add_line(' IF p_contact_list(I).',false);

13766: l(' FOR I IN 1..p_party_site_list.COUNT LOOP');
13767: HZ_GEN_PLSQL.add_line(' IF p_party_site_list(I).',false);
13768: ELSIF PRIMATTRS.ENTITY_NAME = 'CONTACTS' THEN
13769: l(' FOR I IN 1..p_contact_list.COUNT LOOP');
13770: HZ_GEN_PLSQL.add_line(' IF p_contact_list(I).',false);
13771: ELSIF PRIMATTRS.ENTITY_NAME = 'CONTACT_POINTS' THEN
13772: l(' FOR I IN 1..p_contact_point_list.COUNT LOOP');
13773: HZ_GEN_PLSQL.add_line(' IF p_contact_point_list(I).',false);
13774: END IF;

Line 13773: HZ_GEN_PLSQL.add_line(' IF p_contact_point_list(I).',false);

13769: l(' FOR I IN 1..p_contact_list.COUNT LOOP');
13770: HZ_GEN_PLSQL.add_line(' IF p_contact_list(I).',false);
13771: ELSIF PRIMATTRS.ENTITY_NAME = 'CONTACT_POINTS' THEN
13772: l(' FOR I IN 1..p_contact_point_list.COUNT LOOP');
13773: HZ_GEN_PLSQL.add_line(' IF p_contact_point_list(I).',false);
13774: END IF;
13775: l(PRIMATTRS.ATTRIBUTE_NAME||' IS NOT NULL THEN ');
13776: l(' RETURN TRUE;');
13777: l(' END IF;');

Line 15675: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');

15671: END LOOP;
15672:
15673: -- IF p_rule_purpose <> 'Q'
15674: -- THEN
15675: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
15676: gen_wrap_pkg_body(-1);
15677: HZ_GEN_PLSQL.compile_code;
15678: -- END IF;
15679:

Line 15677: HZ_GEN_PLSQL.compile_code;

15673: -- IF p_rule_purpose <> 'Q'
15674: -- THEN
15675: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
15676: gen_wrap_pkg_body(-1);
15677: HZ_GEN_PLSQL.compile_code;
15678: -- END IF;
15679:
15680: EXCEPTION
15681: WHEN OTHERS THEN

Line 15753: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');

15749: UPDATE HZ_MATCH_RULES_B SET COMPILATION_FLAG = 'U' WHERE MATCH_RULE_ID = l_match_rule_id;
15750: COMMIT;
15751: END;
15752: END LOOP;
15753: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
15754: gen_wrap_pkg_body(-1);
15755: HZ_GEN_PLSQL.compile_code;
15756:
15757: IF retcode = 1 THEN

Line 15755: HZ_GEN_PLSQL.compile_code;

15751: END;
15752: END LOOP;
15753: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
15754: gen_wrap_pkg_body(-1);
15755: HZ_GEN_PLSQL.compile_code;
15756:
15757: IF retcode = 1 THEN
15758: outandlog('One or More match rules compilation had errors. Please check the log file for details');
15759: END IF;

Line 16099: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');

16095: END;
16096: END LOOP;
16097: close c_rulesets_for_compile;
16098: IF NOT l_has_errors THEN
16099: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
16100: gen_wrap_pkg_body(-1);
16101: HZ_GEN_PLSQL.compile_code;
16102: END IF;
16103:

Line 16101: HZ_GEN_PLSQL.compile_code;

16097: close c_rulesets_for_compile;
16098: IF NOT l_has_errors THEN
16099: HZ_GEN_PLSQL.new('HZ_PARTY_SEARCH','PACKAGE BODY');
16100: gen_wrap_pkg_body(-1);
16101: HZ_GEN_PLSQL.compile_code;
16102: END IF;
16103:
16104: EXCEPTION
16105: WHEN OTHERS THEN