23: TYPE g_estab_typ IS TABLE OF g_estab_rec Index by BINARY_INTEGER;
24: g_estab_tbl g_estab_typ;
25: --
26: g_org_id hr_all_organization_units.organization_id%TYPE;
27: g_org_class hr_organization_information.org_information1%TYPE;
28:
29: -- end of private globals for caching used by get_payers_id and valid_org
30:
31:
47: 'FR_ETABLISSEMENT', ori_info.org_information2) -- SIRET
48: into g_org_id,
49: g_org_class,
50: L_payers_id
51: From hr_organization_information ori_opm,
52: hr_organization_information ori_class,
53: hr_organization_information ori_info,
54: hr_all_organization_units org
55: Where ori_opm.org_information1 = L_opm_id_chr
48: into g_org_id,
49: g_org_class,
50: L_payers_id
51: From hr_organization_information ori_opm,
52: hr_organization_information ori_class,
53: hr_organization_information ori_info,
54: hr_all_organization_units org
55: Where ori_opm.org_information1 = L_opm_id_chr
56: And ori_opm.org_information_context = 'FR_DYN_PAYMETH_MAPPING_INFO'
49: g_org_class,
50: L_payers_id
51: From hr_organization_information ori_opm,
52: hr_organization_information ori_class,
53: hr_organization_information ori_info,
54: hr_all_organization_units org
55: Where ori_opm.org_information1 = L_opm_id_chr
56: And ori_opm.org_information_context = 'FR_DYN_PAYMETH_MAPPING_INFO'
57: And ori_class.organization_id = ori_opm.organization_id
83: L_estab_tbl_ind BINARY_INTEGER;
84: --
85: cursor csr_get_company is
86: select fnd_number.canonical_to_number(hoi.ORG_INFORMATION1)
87: from hr_organization_information hoi
88: where hoi.organization_id = p_estab_id
89: AND hoi.org_information_context = 'FR_ESTAB_INFO';
90: BEGIN
91: If g_org_class = 'FR_ETABLISSEMENT' THEN