28: --
29: -- private globals used for caching in get_dynamic_org_meth
30: TYPE g_org_meth_map_rec IS RECORD (
31: estab_id pay_assignment_actions.tax_unit_id%TYPE,
32: gen_org_paymeth_id pay_org_payment_methods_f.ORG_PAYMENT_METHOD_ID%TYPE,
33: new_org_paymeth_id pay_org_payment_methods_f.ORG_PAYMENT_METHOD_ID%TYPE,
34: err_name fnd_new_messages.MESSAGE_NAME%TYPE,
35: opm_name_token varchar2(80),
36: org_name_token varchar2(60),
29: -- private globals used for caching in get_dynamic_org_meth
30: TYPE g_org_meth_map_rec IS RECORD (
31: estab_id pay_assignment_actions.tax_unit_id%TYPE,
32: gen_org_paymeth_id pay_org_payment_methods_f.ORG_PAYMENT_METHOD_ID%TYPE,
33: new_org_paymeth_id pay_org_payment_methods_f.ORG_PAYMENT_METHOD_ID%TYPE,
34: err_name fnd_new_messages.MESSAGE_NAME%TYPE,
35: opm_name_token varchar2(80),
36: org_name_token varchar2(60),
37: org_type_token varchar2(20));
191: ,p_org_method_id out nocopy number) -- replacement org meth
192: IS
193: l_gen_org_method_id_chr varchar2(60);
194: l_map_tbl_ind BINARY_INTEGER;
195: l_dummy_opm_id pay_org_payment_methods_f.ORG_PAYMENT_METHOD_ID%TYPE;
196: l_company_id hr_all_organization_units.ORGANIZATION_ID%TYPE;
197: --
198: cursor csr_get_estab is
199: select tax_unit_id
207: AND hoi.org_information_context = 'FR_ESTAB_INFO';
208: --
209: cursor csr_check_opm_effective(p_opm_id in number, p_date in date) is
210: select ORG_PAYMENT_METHOD_ID
211: from pay_org_payment_methods_f
212: where ORG_PAYMENT_METHOD_ID = p_opm_id
213: and p_date between effective_start_date and effective_end_date;
214: --
215: PROCEDURE cache_tokens(p_opm_id in number, p_org_id in number) is
214: --
215: PROCEDURE cache_tokens(p_opm_id in number, p_org_id in number) is
216: cursor csr_get_opm_name is
217: select substrb(ORG_PAYMENT_METHOD_NAME,1,80)
218: from pay_org_payment_methods_f_tl
219: where ORG_PAYMENT_METHOD_ID = p_opm_id
220: and language = userenv('LANG');
221: --
222: cursor csr_get_org_info is