172: --
173: -- This procedure creates a new organization within a scope of existing
174: -- business group.
175: --
176: -- Organizations are stored on the HR_ALL_ORGANIZATION_UNITS table.
177: -- The translated columns are stored on the
178: -- HR_ALL_ORGANIZATION_UNITS_TL table.
179: --
180: -- Prerequisites:
174: -- business group.
175: --
176: -- Organizations are stored on the HR_ALL_ORGANIZATION_UNITS table.
177: -- The translated columns are stored on the
178: -- HR_ALL_ORGANIZATION_UNITS_TL table.
179: --
180: -- Prerequisites:
181: -- None
182: --
292: from per_security_profiles
293: where security_profile_id = p_security_profile_id;
294: --
295: l_proc varchar2(72) := g_package||'create_organization_internal';
296: l_organization_id hr_all_organization_units.organization_id%type;
297: l_object_version_number hr_all_organization_units.object_version_number%type;
298: l_language_code hr_all_organization_units_tl.language%type;
299: l_security_profile_id per_security_profiles.security_profile_id%type;
300: l_view_all_orgs per_security_profiles.view_all_organizations_flag%type;
293: where security_profile_id = p_security_profile_id;
294: --
295: l_proc varchar2(72) := g_package||'create_organization_internal';
296: l_organization_id hr_all_organization_units.organization_id%type;
297: l_object_version_number hr_all_organization_units.object_version_number%type;
298: l_language_code hr_all_organization_units_tl.language%type;
299: l_security_profile_id per_security_profiles.security_profile_id%type;
300: l_view_all_orgs per_security_profiles.view_all_organizations_flag%type;
301: --
294: --
295: l_proc varchar2(72) := g_package||'create_organization_internal';
296: l_organization_id hr_all_organization_units.organization_id%type;
297: l_object_version_number hr_all_organization_units.object_version_number%type;
298: l_language_code hr_all_organization_units_tl.language%type;
299: l_security_profile_id per_security_profiles.security_profile_id%type;
300: l_view_all_orgs per_security_profiles.view_all_organizations_flag%type;
301: --
302: BEGIN
313: hr_utility.set_location(l_proc, 20);
314: --
315: -- Process Logic
316: --
317: -- Insert non-translatable rows into HR_ALL_ORGANIZATION_UNITS first
318: hr_oru_ins.ins
319: ( p_effective_date => p_effective_date
320: ,p_business_group_id => p_business_group_id
321: ,p_date_from => p_date_from
363: ,p_organization_id => l_organization_id
364: ,p_object_version_number => l_object_version_number
365: ,p_duplicate_org_warning => p_duplicate_org_warning);
366: --
367: -- Now insert translatable rows in HR_ALL_ORGANIZATION_UNITS_TL table
368: --
369: hr_ort_ins.ins_tl
370: ( p_language_code => l_language_code,
371: p_organization_id => l_organization_id,
457: -- Declare local variables
458: --
459: l_flex_num fnd_id_flex_segments.id_flex_num%Type;
460: l_cost_name pay_cost_allocation_keyflex.concatenated_segments%Type;
461: l_cost_alloc_key_id hr_all_organization_units.cost_allocation_keyflex_id%Type;
462: l_date_from date;
463: l_effective_date date;
464: --
465: l_proc varchar2(72) := g_package||'CREATE_HR_ORGANIZATION';
1494: --
1495: -- Declare cursors and local variables
1496: --
1497: l_proc VARCHAR2(72) := g_package||'update_organization';
1498: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
1499: l_language_code hr_all_organization_units_tl.language%TYPE;
1500: l_date_from DATE;
1501: l_date_to DATE;
1502: l_duplicate_org_warning boolean;
1495: -- Declare cursors and local variables
1496: --
1497: l_proc VARCHAR2(72) := g_package||'update_organization';
1498: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
1499: l_language_code hr_all_organization_units_tl.language%TYPE;
1500: l_date_from DATE;
1501: l_date_to DATE;
1502: l_duplicate_org_warning boolean;
1503: l_temp_ovn number := p_object_version_number;
1507: --
1508: l_cost_null_ind number(1) := 0;
1509: l_api_updating boolean;
1510: l_flex_num fnd_id_flex_segments.id_flex_num%Type;
1511: l_cost_alloc_key_id hr_all_organization_units.cost_allocation_keyflex_id%Type
1512: := p_cost_allocation_keyflex_id;
1513: l_cost_name pay_cost_allocation_keyflex.concatenated_segments%Type;
1514: l_old_cost_name pay_cost_allocation_keyflex.concatenated_segments%Type;
1515: l_business_group_id per_all_assignments_f.business_group_id%Type;
1896: end if;
1897: --
1898:
1899: --
1900: -- Update non-translatable rows in HR_ALL_ORGANIZATION_UNITS Table
1901: --
1902: hr_oru_upd.upd
1903: ( p_effective_date => p_effective_date
1904: ,p_name => p_name
2102: -- ----------------------------------------------------------------------------
2103: --
2104: PROCEDURE delete_organization
2105: ( p_validate IN BOOLEAN
2106: ,p_organization_id IN hr_all_organization_units.organization_id%TYPE
2107: ,p_object_version_number IN hr_all_organization_units.object_version_number%TYPE )
2108:
2109: IS
2110: --
2103: --
2104: PROCEDURE delete_organization
2105: ( p_validate IN BOOLEAN
2106: ,p_organization_id IN hr_all_organization_units.organization_id%TYPE
2107: ,p_object_version_number IN hr_all_organization_units.object_version_number%TYPE )
2108:
2109: IS
2110: --
2111: --
2257: --
2258: cursor csr_get_leg_code is
2259: select legislation_code
2260: from per_business_groups pbg,
2261: hr_all_organization_units hou
2262: where hou.organization_id = p_organization_id
2263: and pbg.business_group_id = hou.business_group_id;
2264:
2265: l_proc VARCHAR2(72) := g_package||'chk_cls_mand';
3072: l_warning boolean;
3073: --
3074: cursor c1 is
3075: select business_group_id
3076: from hr_all_organization_units
3077: where organization_id = p_organization_id;
3078: --
3079: l_business_group_id number;
3080: --
3749: l_temp_ovn number := p_object_version_number;
3750: --
3751: cursor c1 is
3752: select business_group_id
3753: from hr_all_organization_units
3754: where organization_id = p_organization_id;
3755: --
3756: l_business_group_id number;
3757: --
4298: --
4299: -- Declare cursors and local variables
4300: --
4301: l_proc VARCHAR2(72) := g_package||'create_business_group';
4302: l_organization_id hr_all_organization_units.organization_id%TYPE;
4303: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4304: l_language_code hr_all_organization_units_tl.language%TYPE;
4305: l_org_information_id hr_organization_information.org_information_id%TYPE;
4306: l_date_from DATE;
4299: -- Declare cursors and local variables
4300: --
4301: l_proc VARCHAR2(72) := g_package||'create_business_group';
4302: l_organization_id hr_all_organization_units.organization_id%TYPE;
4303: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4304: l_language_code hr_all_organization_units_tl.language%TYPE;
4305: l_org_information_id hr_organization_information.org_information_id%TYPE;
4306: l_date_from DATE;
4307: l_ovn_bg hr_all_organization_units.object_version_number%TYPE;
4300: --
4301: l_proc VARCHAR2(72) := g_package||'create_business_group';
4302: l_organization_id hr_all_organization_units.organization_id%TYPE;
4303: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4304: l_language_code hr_all_organization_units_tl.language%TYPE;
4305: l_org_information_id hr_organization_information.org_information_id%TYPE;
4306: l_date_from DATE;
4307: l_ovn_bg hr_all_organization_units.object_version_number%TYPE;
4308: --
4303: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4304: l_language_code hr_all_organization_units_tl.language%TYPE;
4305: l_org_information_id hr_organization_information.org_information_id%TYPE;
4306: l_date_from DATE;
4307: l_ovn_bg hr_all_organization_units.object_version_number%TYPE;
4308: --
4309: BEGIN
4310: --
4311: hr_utility.set_location('Entering:'|| l_proc, 10);
4389: ,p_object_version_number => l_object_version_number);
4390: --
4391: hr_utility.set_location(l_proc, 60);
4392: --
4393: update hr_all_organization_units
4394: set business_group_id = l_organization_id
4395: where organization_id = l_organization_id;
4396: --
4397: hr_utility.set_location(l_proc, 70);
4612: --
4613: -- Declare cursors and local variables
4614: --
4615: l_proc VARCHAR2(72) := g_package||'create_operating_unit';
4616: l_organization_id hr_all_organization_units.organization_id%TYPE;
4617: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4618: l_language_code hr_all_organization_units_tl.language%TYPE;
4619: l_org_information_id hr_organization_information.org_information_id%TYPE;
4620: l_date_from DATE;
4613: -- Declare cursors and local variables
4614: --
4615: l_proc VARCHAR2(72) := g_package||'create_operating_unit';
4616: l_organization_id hr_all_organization_units.organization_id%TYPE;
4617: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4618: l_language_code hr_all_organization_units_tl.language%TYPE;
4619: l_org_information_id hr_organization_information.org_information_id%TYPE;
4620: l_date_from DATE;
4621: --
4614: --
4615: l_proc VARCHAR2(72) := g_package||'create_operating_unit';
4616: l_organization_id hr_all_organization_units.organization_id%TYPE;
4617: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4618: l_language_code hr_all_organization_units_tl.language%TYPE;
4619: l_org_information_id hr_organization_information.org_information_id%TYPE;
4620: l_date_from DATE;
4621: --
4622: BEGIN
4795: l_update_prim_ledger_warning boolean;
4796: l_org_information_id hr_organization_information.org_information_id%TYPE;
4797: l_new_org_information_id hr_organization_information.org_information_id%TYPE;
4798: l_new_ovn hr_organization_information.object_version_number%type;
4799: l_organization_id hr_all_organization_units.organization_id%TYPE;
4800: l_duplicate_org_warning boolean;
4801:
4802:
4803: cursor csr_check_update (p_organization_id number)
4953: --
4954: -- Declare cursors and local variables
4955: --
4956: l_proc VARCHAR2(72) := g_package||'create_legal_entity';
4957: l_organization_id hr_all_organization_units.organization_id%TYPE;
4958: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4959: l_language_code hr_all_organization_units_tl.language%TYPE;
4960: l_org_information_id hr_organization_information.org_information_id%TYPE;
4961: l_date_from DATE;
4954: -- Declare cursors and local variables
4955: --
4956: l_proc VARCHAR2(72) := g_package||'create_legal_entity';
4957: l_organization_id hr_all_organization_units.organization_id%TYPE;
4958: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4959: l_language_code hr_all_organization_units_tl.language%TYPE;
4960: l_org_information_id hr_organization_information.org_information_id%TYPE;
4961: l_date_from DATE;
4962: --
4955: --
4956: l_proc VARCHAR2(72) := g_package||'create_legal_entity';
4957: l_organization_id hr_all_organization_units.organization_id%TYPE;
4958: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
4959: l_language_code hr_all_organization_units_tl.language%TYPE;
4960: l_org_information_id hr_organization_information.org_information_id%TYPE;
4961: l_date_from DATE;
4962: --
4963: BEGIN
5105: --
5106: -- {End Of Comments}
5107: --
5108: PROCEDURE chk_bgr_id
5109: ( p_bgr_id IN hr_all_organization_units.business_group_id%TYPE)
5110: IS
5111: l_proc VARCHAR2(72) := g_package||'chk_bgr_id';
5112: l_exists VARCHAR2(1) := 'N';
5113: --
5157: --
5158: -- Declare cursors and local variables
5159: --
5160: l_proc VARCHAR2(72) := g_package||'create_bgr_classif';
5161: l_organization_id hr_all_organization_units.organization_id%TYPE;
5162: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5163: l_org_information_id hr_organization_information.org_information_id%TYPE;
5164: --
5165: BEGIN
5158: -- Declare cursors and local variables
5159: --
5160: l_proc VARCHAR2(72) := g_package||'create_bgr_classif';
5161: l_organization_id hr_all_organization_units.organization_id%TYPE;
5162: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5163: l_org_information_id hr_organization_information.org_information_id%TYPE;
5164: --
5165: BEGIN
5166: --
5256: -- ----------------------------------------------------------------------------
5257: --
5258: -- Description:
5259: -- Validates that organization_id of organization unit is present in
5260: -- HR_ALL_ORGANIZATION_UNITS table and valid.
5261: --
5262: -- Pre-conditions:
5263: -- None.
5264: --
5300: INTO l_exists
5301: FROM sys.dual
5302: WHERE EXISTS
5303: (SELECT null
5304: FROM hr_all_organization_units
5305: WHERE organization_id = p_organization_id);
5306: EXCEPTION
5307: WHEN NO_DATA_FOUND THEN NULL;
5308: END;
5334: --
5335: -- Declare cursors and local variables
5336: --
5337: l_proc VARCHAR2(72) := g_package||'create_legal_entity_classif';
5338: l_organization_id hr_all_organization_units.organization_id%TYPE;
5339: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5340: l_org_information_id hr_organization_information.org_information_id%TYPE;
5341: --
5342: BEGIN
5335: -- Declare cursors and local variables
5336: --
5337: l_proc VARCHAR2(72) := g_package||'create_legal_entity_classif';
5338: l_organization_id hr_all_organization_units.organization_id%TYPE;
5339: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5340: l_org_information_id hr_organization_information.org_information_id%TYPE;
5341: --
5342: BEGIN
5343: --
5425: --
5426: -- Declare cursors and local variables
5427: --
5428: l_proc VARCHAR2(72) := g_package||'create_oper_unit_classif';
5429: l_organization_id hr_all_organization_units.organization_id%TYPE;
5430: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5431: l_org_information_id hr_organization_information.org_information_id%TYPE;
5432: --
5433: BEGIN
5426: -- Declare cursors and local variables
5427: --
5428: l_proc VARCHAR2(72) := g_package||'create_oper_unit_classif';
5429: l_organization_id hr_all_organization_units.organization_id%TYPE;
5430: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5431: l_org_information_id hr_organization_information.org_information_id%TYPE;
5432: --
5433: BEGIN
5434: --
5519: --
5520: -- Declare cursors and local variables
5521: --
5522: l_proc VARCHAR2(72) := g_package||'trans_org_name';
5523: l_organization_id hr_all_organization_units.organization_id%TYPE;
5524: l_language_code hr_all_organization_units_tl.language%TYPE;
5525: --
5526: BEGIN
5527: --
5520: -- Declare cursors and local variables
5521: --
5522: l_proc VARCHAR2(72) := g_package||'trans_org_name';
5523: l_organization_id hr_all_organization_units.organization_id%TYPE;
5524: l_language_code hr_all_organization_units_tl.language%TYPE;
5525: --
5526: BEGIN
5527: --
5528: hr_utility.set_location('Entering:'|| l_proc, 10);
5807: --
5808: -- Declare cursors and local variables
5809: --
5810: l_proc VARCHAR2(72) := g_package||'create_not_usable_ou_internal';
5811: l_organization_id hr_all_organization_units.organization_id%TYPE;
5812: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5813: l_language_code hr_all_organization_units_tl.language%TYPE;
5814: l_org_information_id hr_organization_information.org_information_id%TYPE;
5815: l_date_from DATE;
5808: -- Declare cursors and local variables
5809: --
5810: l_proc VARCHAR2(72) := g_package||'create_not_usable_ou_internal';
5811: l_organization_id hr_all_organization_units.organization_id%TYPE;
5812: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5813: l_language_code hr_all_organization_units_tl.language%TYPE;
5814: l_org_information_id hr_organization_information.org_information_id%TYPE;
5815: l_date_from DATE;
5816: --
5809: --
5810: l_proc VARCHAR2(72) := g_package||'create_not_usable_ou_internal';
5811: l_organization_id hr_all_organization_units.organization_id%TYPE;
5812: l_object_version_number hr_all_organization_units.object_version_number%TYPE;
5813: l_language_code hr_all_organization_units_tl.language%TYPE;
5814: l_org_information_id hr_organization_information.org_information_id%TYPE;
5815: l_date_from DATE;
5816: --
5817: BEGIN