[Home] [Help]
655: -- Creates source code for one package procedure call.
656: --
657: -- Post Failure:
658: -- Details of any application errors and some Oracle errors are written
659: -- to the HR_API_HOOK_CALLS table.
660: --
661: -- Access Status:
662: -- Internal Development Use Only.
663: --
702: -- error for the call package
703: -- procedure.
704: l_encoded_err_text varchar2(2000); -- Set to the encoded error text
705: -- when an error is written to the
706: -- HR_API_HOOK_CALLS table.
707: l_call_code varchar2(32767) := null;
708: l_proc varchar2(72) := g_package||'make_procedure_call';
709: begin
710: hr_utility.set_location('Entering:'|| l_proc, 10);
862: if l_param_valid then
863: --
864: -- If the last parameter processed was valid then all the parameters must
865: -- be valid. Add the calling code which has been built-up to the rest of
866: -- the source code. Update the HR_API_HOOK_CALLS table to note that the
867: -- call has been successfully created.
868: --
869: add_to_source(l_call_code);
870: -- Change the following update statement to
868: --
869: add_to_source(l_call_code);
870: -- Change the following update statement to
871: -- call the row handler, when it is available.
872: update hr_api_hook_calls
873: set pre_processor_date = sysdate
874: , encoded_error = null
875: , status = 'V'
876: , object_version_number = object_version_number + 1
884: -- not complete and it should not be added to the rest of the source code.
885: -- Either this procedure (for a hr_general.describe_procedure error) or
886: -- the chk_param_in_hook_proc_call function (for a parameter error) has set
887: -- the AOL message stack will details of the error. The error details should
888: -- be written to the HR_API_HOOK_CALLS using the encoded format. Some comment
889: -- text and a 'null' statement should be added to the hook package body
890: -- source code to show there is a problem.
891: --
892: if l_describe_error or (not l_param_valid) then
895: --
896: l_encoded_err_text := fnd_message.get_encoded;
897: -- Change the following update DML statement to
898: -- call the API when it is available.
899: update hr_api_hook_calls
900: set pre_processor_date = sysdate
901: , encoded_error = l_encoded_err_text
902: , status = 'I'
903: , object_version_number = object_version_number + 1
912: add_to_source('-- Details of the error, in FND encoded format, can ');
913: add_to_source('be obtained' || c_new_line);
914: add_to_source('-- with the following sql statement:' || c_new_line);
915: add_to_source('-- select c.encoded_error' || c_new_line);
916: add_to_source('-- from hr_api_hook_calls c' || c_new_line);
917: add_to_source('-- where c.api_hook_call_id = ');
918: add_to_source(to_char(p_api_hook_call_id) || ';' || c_new_line);
919: add_to_source('null;' || c_new_line);
920: --
1555: -- Creates source code to carry out legislation specific hook calls.
1556: --
1557: -- Post Failure:
1558: -- Any application errors and some system errors are written to the
1559: -- corresponding row in the HR_API_HOOKS or HR_API_HOOK_CALLS tables.
1560: --
1561: -- Access Status:
1562: -- Internal Development Use Only.
1563: --
1580: , object_version_number
1581: , legislation_code
1582: , call_package
1583: , call_procedure
1584: from hr_api_hook_calls
1585: where legislation_code is not null
1586: and enabled_flag = 'Y'
1587: and api_hook_id = p_api_hook_id
1588: order by legislation_code, sequence;
1720: -- Creates source code to carry out application specific hook calls.
1721: --
1722: -- Post Failure:
1723: -- Any application errors and some system errors are written to the
1724: -- corresponding row in the HR_API_HOOKS or HR_API_HOOK_CALLS tables.
1725: --
1726: -- Access Status:
1727: -- Internal Development Use Only.
1728: --
1741: select ahc.api_hook_call_id
1742: , ahc.object_version_number
1743: , ahc.call_package
1744: , ahc.call_procedure
1745: from hr_api_hook_calls ahc
1746: , fnd_product_installations fpi
1747: where ahc.api_hook_id = p_api_hook_id
1748: and ahc.enabled_flag = 'Y'
1749: and ahc.application_id is not null
1815: -- greater than zero, lists the
1816: -- parameter data types.
1817: -- p_sequence_number_range Yes varchar2 Affects which rows are
1818: -- selected from the
1819: -- HR_API_HOOK_CALLS table.
1820: -- Must be set to 'LOW', 'HIGH'
1821: -- or 'ALL'.
1822: --
1823: -- Post Success:
1825: -- specified sequence number range.
1826: --
1827: -- Post Failure:
1828: -- Any application errors and some Oracle errors are written to the
1829: -- corresponding row in the HR_API_HOOK_CALLS table.
1830: --
1831: -- Access Status:
1832: -- Internal Development Use Only.
1833: --
1863: l_dynamic_sql := 'select api_hook_call_id' ||
1864: ' , object_version_number' ||
1865: ' , call_package' ||
1866: ' , call_procedure' ||
1867: ' from hr_api_hook_calls' ||
1868: ' where legislation_code is null' ||
1869: ' and application_id is null' ||
1870: ' and enabled_flag = ' || '''' || 'Y' || '''' ||
1871: ' and api_hook_id = :p_api_hook_id ' ||
1997: -- p_api_hook_id Yes number ID of the hook details from
1998: -- the HR_API_HOOKS table.
1999: --
2000: -- Post Success:
2001: -- Updates all the rows in the HR_API_HOOK_CALLS table which match the
2002: -- api_hook_id and the enabled_flag is 'N'. Customer and legislation
2003: -- hook calls are updated. The encoded_error, status and pre_processor_date
2004: -- columns are populated.
2005: --
2019: --
2020: cursor csr_disabled is
2021: select api_hook_call_id
2022: , object_version_number
2023: from hr_api_hook_calls
2024: where enabled_flag = 'N'
2025: and api_hook_id = p_api_hook_id;
2026: --
2027: l_proc varchar2(72) := g_package||'update_disabled_calls';
2032: --
2033: for l_disabled in csr_disabled loop
2034: -- Change the following update statement to
2035: -- call the row handler, when it is available.
2036: update hr_api_hook_calls
2037: set pre_processor_date = sysdate
2038: , encoded_error = null
2039: , status = 'V'
2040: , object_version_number = object_version_number + 1
2093: -- Creates source code for the hook procedure in the source store.
2094: --
2095: -- Post Failure:
2096: -- Most application and some Oracle errors are written to the corresponding
2097: -- rows in the HR_API_HOOKS or HR_API_HOOK_CALLS tables. Some application
2098: -- or Oracle errors are raised from this procedure as PL/SQL exceptions.
2099: --
2100: -- Access Status:
2101: -- Internal Development Use Only.
2120: -- hook calls exist for this hook.
2121: --
2122: cursor csr_cus_call_exist is
2123: select 1
2124: from hr_api_hook_calls
2125: where enabled_flag = 'Y'
2126: and legislation_code is null
2127: and application_id is null
2128: and api_hook_id = p_api_hook_id;
2131: -- hook calls exist for this hook.
2132: --
2133: cursor csr_leg_call_exist is
2134: select 1
2135: from hr_api_hook_calls
2136: where enabled_flag = 'Y'
2137: and legislation_code is not null
2138: and api_hook_id = p_api_hook_id;
2139: --
2142: -- install status for this hook.
2143: --
2144: cursor csr_app_call_exist is
2145: select 1
2146: from hr_api_hook_calls ahc
2147: , fnd_product_installations fpi
2148: where ahc.api_hook_id = p_api_hook_id
2149: and ahc.enabled_flag = 'Y'
2150: and ahc.application_id is not null
2159: -- hook.
2160: --
2161: cursor csr_ap_leg_call_exist is
2162: select 1
2163: from hr_api_hook_calls ahc
2164: , hr_api_hooks ahk_ap
2165: , hr_api_modules amk
2166: , hr_api_hooks ahk_bp
2167: where ahc.enabled_flag = 'Y'
2845: -- Creates source code for the hook procedure in the source store.
2846: --
2847: -- Post Failure:
2848: -- Most application and some Oracle errors are written to the corresponding
2849: -- rows in the HR_API_HOOKS or HR_API_HOOK_CALLS tables. Some application
2850: -- or Oracle errors are raised from this procedure as PL/SQL exceptions.
2851: --
2852: -- Access Status:
2853: -- Internal Development Use Only.
2962: -- those procedures which have been listed in the the HR_API_HOOKS table.
2963: --
2964: -- Post Failure:
2965: -- Most application and some Oracle errors are written to the corresponding
2966: -- rows in the HR_API_HOOKS or HR_API_HOOK_CALLS tables. Some application
2967: -- or Oracle errors are raised from this procedure as PL/SQL exceptions.
2968: --
2969: -- Access Status:
2970: -- Internal Development Use Only.