73: l_exists varchar2(30);
74: l_proc varchar2(72) := g_package||'update_cost_concat_segs_auto';
75: --
76: begin
77: hr_utility.set_location('Entering:'|| l_proc, 10);
78: --
79: -- The outer procedure has already establish that an update is
80: -- required. This sub-procedure uses an autonomous transaction
81: -- to ensure that any commits do not impact the main transaction.
94: open csr_cost_lock;
95: fetch csr_cost_lock into l_exists;
96: if csr_cost_lock%found then
97: close csr_cost_lock;
98: hr_utility.set_location(l_proc, 20);
99: --
100: -- Lock obtained by this transaction, updating the concatenated
101: -- segment string should be performed.
102: --
118: close csr_cost_lock;
119: rollback; -- Added for bug 3578845.
120: end if;
121: --
122: hr_utility.set_location('Leaving:'|| l_proc, 30);
123: --
124: Exception
125: When HR_Api.Object_Locked then
126: --
129: -- row and is performing the update. Hence the error can
130: -- be suppressed without raising it to the end user.
131: --
132: rollback; -- Added for bug 3578845.
133: hr_utility.set_location('Leaving:'|| l_proc, 40);
134: --
135: end update_cost_concat_segs_auto;
136: begin
137: --
134: --
135: end update_cost_concat_segs_auto;
136: begin
137: --
138: hr_utility.set_location('Entering:'|| l_proc, 10);
139: --
140: -- First find out if it is necessary to update the concatenated
141: -- segment string column. This select is being done to avoid the
142: -- performance unnecessary overhead of set-up an autonomous
154: else
155: close csr_chk_cost;
156: end if;
157: --
158: hr_utility.set_location('Leaving:'|| l_proc, 40);
159: --
160: end update_cost_concat_segs;
161: -- End of fix 3309164
162: --
300: l_view_all_orgs per_security_profiles.view_all_organizations_flag%type;
301: --
302: BEGIN
303: --
304: hr_utility.set_location('Entering:'|| l_proc, 10);
305: --
306: -- Validate the language parameter. l_language_code should be passed to functions
307: -- instead of p_language_code from now on, to allow an IN OUT parameter to
308: -- be passed through.
309: --
310: l_language_code := p_language_code;
311: hr_api.validate_language_code(p_language_code => l_language_code);
312: --
313: hr_utility.set_location(l_proc, 20);
314: --
315: -- Process Logic
316: --
317: -- Insert non-translatable rows into HR_ALL_ORGANIZATION_UNITS first
371: p_organization_id => l_organization_id,
372: p_name => p_name
373: );
374: --
375: hr_utility.set_location(l_proc, 30);
376: --
377: l_security_profile_id := fnd_profile.value('PER_SECURITY_PROFILE_ID');
378: -- Bug fix 4329807
379: /* open csr_sec_profile( l_security_profile_id );
387: );
388: end if;
389: */
390: --
391: hr_utility.set_location(l_proc, 40);
392: --
393: -- Set all output arguments
394: --
395: p_organization_id := l_organization_id;
394: --
395: p_organization_id := l_organization_id;
396: p_object_version_number := l_object_version_number;
397: --
398: hr_utility.set_location(' Leaving:'||l_proc, 50);
399: --
400: END create_organization_internal;
401: --
402: -- --------------------------------------------------------------------------
475: where bus.business_group_id = p_business_group_id;
476: --
477: begin
478: --
479: hr_utility.set_location('Entering:'|| l_proc, 10);
480: --
481: -- Issue a savepoint
482: --
483: savepoint create_hr_organization;
540: ,p_hook_type => 'BP'
541: );
542: end;
543: --
544: hr_utility.set_location(l_proc, 20);
545: --
546: -- Getting the structure number for Cost Allocation Flexfield
547: --
548: open csr_cost_idsel;
551: if csr_cost_idsel%notfound then
552: --
553: close csr_cost_idsel;
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','5');
558: hr_utility.raise_error;
559: --
552: --
553: close csr_cost_idsel;
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','5');
558: hr_utility.raise_error;
559: --
560: end if;
553: close csr_cost_idsel;
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','5');
558: hr_utility.raise_error;
559: --
560: end if;
561: --
554: --
555: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
556: hr_utility.set_message_token('PROCEDURE', l_proc);
557: hr_utility.set_message_token('STEP','5');
558: hr_utility.raise_error;
559: --
560: end if;
561: --
562: close csr_cost_idsel;
560: end if;
561: --
562: close csr_cost_idsel;
563: --
564: hr_utility.set_location(l_proc, 30);
565: --
566: -- Dterminine the Cost Allocation definition by calling ins_or_sel
567: --
568: hr_kflex_utility.ins_or_sel_keyflex_comb
602: ,p_concat_segments_in => p_concat_segments
603: ,p_ccid => l_cost_alloc_key_id
604: ,p_concat_segments_out => l_cost_name);
605: --
606: hr_utility.set_location(l_proc, 40);
607: hr_utility.set_location(l_proc ||'l_cost_alloc_key_id '||l_cost_alloc_key_id, 61);
608: hr_utility.set_location(l_proc ||'l_cost_name '||l_cost_name, 62);
609: --
610: update_cost_concat_segs (p_cost_allocation_keyflex_id => l_cost_alloc_key_id
603: ,p_ccid => l_cost_alloc_key_id
604: ,p_concat_segments_out => l_cost_name);
605: --
606: hr_utility.set_location(l_proc, 40);
607: hr_utility.set_location(l_proc ||'l_cost_alloc_key_id '||l_cost_alloc_key_id, 61);
608: hr_utility.set_location(l_proc ||'l_cost_name '||l_cost_name, 62);
609: --
610: update_cost_concat_segs (p_cost_allocation_keyflex_id => l_cost_alloc_key_id
611: ,p_cost_name => l_cost_name);
604: ,p_concat_segments_out => l_cost_name);
605: --
606: hr_utility.set_location(l_proc, 40);
607: hr_utility.set_location(l_proc ||'l_cost_alloc_key_id '||l_cost_alloc_key_id, 61);
608: hr_utility.set_location(l_proc ||'l_cost_name '||l_cost_name, 62);
609: --
610: update_cost_concat_segs (p_cost_allocation_keyflex_id => l_cost_alloc_key_id
611: ,p_cost_name => l_cost_name);
612: --
609: --
610: update_cost_concat_segs (p_cost_allocation_keyflex_id => l_cost_alloc_key_id
611: ,p_cost_name => l_cost_name);
612: --
613: hr_utility.set_location(l_proc, 50);
614: --
615: create_organization_internal
616: (p_effective_date => p_effective_date
617: ,p_language_code => p_language_code
660: ,p_organization_id => p_organization_id
661: ,p_object_version_number => p_object_version_number_org
662: ,p_duplicate_org_warning => p_duplicate_org_warning);
663: --
664: hr_utility.set_location(l_proc, 60);
665: --
666: hr_organization_api.create_org_information
667: ( p_effective_date => p_effective_date
668: ,p_organization_id => p_organization_id
711: ,p_org_information_id => p_org_information_id
712: ,p_object_version_number => p_object_version_number_inf
713: );
714: --
715: hr_utility.set_location(l_proc, 70);
716: --
717: begin
718: hr_organization_bk9.create_hr_organization_a
719: (p_effective_date => l_effective_date
771: ,p_hook_type => 'AP'
772: );
773: end;
774: --
775: hr_utility.set_location(l_proc, 80);
776: --
777: -- When in validation only mode raise the Validate_Enabled exception
778: --
779: if p_validate then
779: if p_validate then
780: raise hr_api.validate_enabled;
781: end if;
782: --
783: hr_utility.set_location(' Leaving:'||l_proc, 99);
784: --
785: EXCEPTION
786:
787: WHEN hr_api.validate_enabled THEN
788: --
789: -- As the Validate_Enabled exception has been raised
790: -- we must rollback to the savepoint
791: --
792: hr_utility.set_location(' Leaving:'||l_proc, 99);
793:
794: ROLLBACK TO create_hr_organization;
795: --
796: -- Only set output warning arguments
800: p_object_version_number_inf := NULL;
801: p_object_version_number_org := NULL;
802: p_organization_id := NULL;
803: p_org_information_id := NULL;
804: hr_utility.set_location(' Leaving:'||l_proc, 99);
805:
806: WHEN OTHERS THEN
807: --
808: -- A validation or unexpected error has occurred
812: p_object_version_number_org := NULL;
813: p_organization_id := NULL;
814: p_org_information_id := NULL;
815: p_duplicate_org_warning := NULL;
816: hr_utility.set_location(' Leaving:'||l_proc, 99);
817: RAISE;
818:
819: hr_utility.set_location(' Leaving:'||l_proc, 99);
820:
815: p_duplicate_org_warning := NULL;
816: hr_utility.set_location(' Leaving:'||l_proc, 99);
817: RAISE;
818:
819: hr_utility.set_location(' Leaving:'||l_proc, 99);
820:
821: end create_hr_organization;
822: --
823: -- ----------------------------------------------------------------------------
994: l_proc varchar2(72) := g_package||'create_organization';
995: --
996: BEGIN
997: --
998: hr_utility.set_location('Entering:'|| l_proc, 10);
999: --
1000: -- Issue a savepoint
1001: --
1002: savepoint create_organization;
1061: );
1062: end;
1063:
1064: --
1065: hr_utility.set_location(l_proc, 15);
1066: --
1067: create_organization_internal
1068: ( p_effective_date => p_effective_date
1069: ,p_language_code => p_language_code
1112: ,p_organization_id => p_organization_id
1113: ,p_object_version_number => p_object_version_number
1114: ,p_duplicate_org_warning => p_duplicate_org_warning);
1115: --
1116: hr_utility.set_location(l_proc, 20);
1117: --
1118:
1119: begin
1120: hr_organization_bk3.create_organization_a
1179: if p_validate then
1180: raise hr_api.validate_enabled;
1181: end if;
1182: --
1183: hr_utility.set_location(' Leaving:'||l_proc, 30);
1184: --
1185:
1186: EXCEPTION
1187: --
1198: --
1199: p_organization_id := NULL;
1200: p_object_version_number := NULL;
1201: p_duplicate_org_warning := l_duplicate_org_warning;
1202: hr_utility.set_location(' Leaving:'||l_proc, 80);
1203: WHEN OTHERS THEN
1204: --
1205: -- A validation or unexpected error has occurred
1206: ROLLBACK TO create_organization;
1207: -- Set OUT parameters.
1208: p_organization_id := NULL;
1209: p_object_version_number := NULL;
1210: p_duplicate_org_warning := NULL;
1211: hr_utility.set_location(' Leaving:'||l_proc, 90);
1212: RAISE;
1213: --
1214: END create_organization;
1215: --
1597:
1598: -- Bug 3039046 - if p_cost_allocation_keyflex_id enters with
1599: -- a value then get segment values from pay_cost_allocation_keyflex.
1600: --
1601: hr_utility.set_location(l_proc, 1);
1602:
1603: l_old_cost_name := p_concat_segments;
1604: --
1605: if nvl(l_cost_alloc_key_id, hr_api.g_number) = hr_api.g_number then -- Bug 3187772
1741: ,p_hook_type => 'BP'
1742: );
1743: end;
1744: --
1745: hr_utility.set_location('Entering:'|| l_proc, 10);
1746: --
1747: -- All date input parameters must be truncated to remove time elements
1748: --
1749: --
1752: -- passed through.
1753: --
1754: l_language_code := p_language_code;
1755: hr_api.validate_language_code(p_language_code => l_language_code);
1756: hr_utility.set_location(l_proc, 20);
1757: --
1758: --
1759: -- Process Logic
1760: --
1761: l_object_version_number := p_object_version_number;
1762: --
1763: -- Bug 3039046
1764: -- Retrieve current organization details from database.
1765: hr_utility.set_location(l_proc, 21);
1766: l_api_updating := hr_oru_shd.api_updating
1767: (p_organization_id => p_organization_id
1768: ,p_object_version_number => l_object_version_number);
1769:
1772: -- Only call the flex code if a non-default value(includng null) is passed
1773: -- to the procedure.
1774: --
1775: --
1776: hr_utility.set_location(l_proc, 22);
1777:
1778: if not l_api_updating then
1779: hr_utility.set_location(l_proc, 23);
1780: --
1775: --
1776: hr_utility.set_location(l_proc, 22);
1777:
1778: if not l_api_updating then
1779: hr_utility.set_location(l_proc, 23);
1780: --
1781: -- As this is an updating API, the organization should already exist.
1782: --
1783: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1779: hr_utility.set_location(l_proc, 23);
1780: --
1781: -- As this is an updating API, the organization should already exist.
1782: --
1783: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1784: hr_utility.raise_error;
1785: end if;
1786:
1787: -- Populate l_business_group_id from g_old_rec for cursor csr_cost_idsel
1780: --
1781: -- As this is an updating API, the organization should already exist.
1782: --
1783: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
1784: hr_utility.raise_error;
1785: end if;
1786:
1787: -- Populate l_business_group_id from g_old_rec for cursor csr_cost_idsel
1788: l_business_group_id := hr_oru_shd.g_old_rec.business_group_id;
1789: open csr_cost_idsel;
1790: fetch csr_cost_idsel into l_flex_num;
1791: if csr_cost_idsel%NOTFOUND then
1792: close csr_cost_idsel;
1793: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1794: hr_utility.set_message_token('PROCEDURE', l_proc);
1795: hr_utility.set_message_token('STEP','5');
1796: hr_utility.raise_error;
1797: end if;
1790: fetch csr_cost_idsel into l_flex_num;
1791: if csr_cost_idsel%NOTFOUND then
1792: close csr_cost_idsel;
1793: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1794: hr_utility.set_message_token('PROCEDURE', l_proc);
1795: hr_utility.set_message_token('STEP','5');
1796: hr_utility.raise_error;
1797: end if;
1798: close csr_cost_idsel;
1791: if csr_cost_idsel%NOTFOUND then
1792: close csr_cost_idsel;
1793: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1794: hr_utility.set_message_token('PROCEDURE', l_proc);
1795: hr_utility.set_message_token('STEP','5');
1796: hr_utility.raise_error;
1797: end if;
1798: close csr_cost_idsel;
1799:
1792: close csr_cost_idsel;
1793: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1794: hr_utility.set_message_token('PROCEDURE', l_proc);
1795: hr_utility.set_message_token('STEP','5');
1796: hr_utility.raise_error;
1797: end if;
1798: close csr_cost_idsel;
1799:
1800: hr_utility.set_location(l_proc, 24);
1796: hr_utility.raise_error;
1797: end if;
1798: close csr_cost_idsel;
1799:
1800: hr_utility.set_location(l_proc, 24);
1801:
1802: if l_cost_null_ind = 0 then
1803: --
1804: l_cost_alloc_key_id := hr_oru_shd.g_old_rec.cost_allocation_keyflex_id;
1881: ,p_ccid => l_cost_alloc_key_id
1882: ,p_concat_segments_out => l_cost_name
1883: );
1884: --
1885: hr_utility.set_location(l_proc, 25);
1886: --
1887: -- update the combinations column
1888: -- Start of 3187772
1889: update_cost_concat_segs (p_cost_allocation_keyflex_id => l_cost_alloc_key_id
1890: ,p_cost_name => l_cost_name);
1891: -- End of 3187772
1892: end if;
1893: --
1894: hr_utility.set_location(l_proc, 26);
1895: --
1896: end if;
1897: --
1898:
1949: ,p_object_version_number => l_object_version_number
1950: ,p_duplicate_org_warning => p_duplicate_org_warning
1951: );
1952: --
1953: hr_utility.set_location(l_proc, 55);
1954: --
1955: -- update the TL table
1956: hr_ort_upd.upd_tl(
1957: p_language_code => p_language_code,
1958: p_organization_id => p_organization_id,
1959: p_name => p_name);
1960: --
1961: --
1962: hr_utility.set_location(l_proc, 60);
1963: --
1964: -- When in validation only mode raise the Validate_Enabled exception
1965: --
1966: IF p_validate THEN
1971: -- never reached, so p_object_version_number is passed back unchanged.
1972: --
1973: p_object_version_number := l_object_version_number;
1974: --
1975: hr_utility.set_location(' Leaving:'||l_proc, 70);
1976: --
1977:
1978: begin
1979: hr_organization_bk4.update_organization_a
2083: -- when validation only mode is being used.)
2084: -- Set IN OUT and OUT parameters.
2085: p_object_version_number := l_temp_ovn;
2086: p_duplicate_org_warning := l_duplicate_org_warning;
2087: hr_utility.set_location(' Leaving:'||l_proc, 80);
2088: WHEN OTHERS THEN
2089: --
2090: -- A validation or unexpected error has occurred
2091: ROLLBACK TO update_organization;
2091: ROLLBACK TO update_organization;
2092: -- Set IN OUT and OUT parameters.
2093: p_object_version_number := l_temp_ovn;
2094: p_duplicate_org_warning := null;
2095: hr_utility.set_location(' Leaving:'||l_proc, 90);
2096: RAISE;
2097: --
2098: --
2099: END update_organization;
2139: -- =============
2140: --
2141: -- Need to lock main table to maintain the locking ladder order
2142: --
2143: hr_utility.set_location( l_proc, 30);
2144: hr_oru_shd.lck ( p_organization_id => p_organization_id,
2145: p_object_version_number => p_object_version_number );
2146: --
2147: -- Remove all matching translation rows
2145: p_object_version_number => p_object_version_number );
2146: --
2147: -- Remove all matching translation rows
2148: --
2149: hr_utility.set_location( l_proc, 35);
2150: hr_ort_del.del_tl ( p_organization_id => p_organization_id );
2151: --
2152: -- Remove non-translated data row
2153: --
2150: hr_ort_del.del_tl ( p_organization_id => p_organization_id );
2151: --
2152: -- Remove non-translated data row
2153: --
2154: hr_utility.set_location( l_proc, 40);
2155:
2156: -- bug fix 3571140.Record for the organization deleted from PER_ORGANIZATION_LIST
2157: -- table.
2158:
2158:
2159: delete from per_organization_list
2160: where organization_id = p_organization_id;
2161:
2162: hr_utility.set_location( l_proc, 45);
2163:
2164: -- bug fix 3571140 ends here.
2165:
2166: hr_oru_del.del ( p_organization_id => p_organization_id,
2166: hr_oru_del.del ( p_organization_id => p_organization_id,
2167: p_object_version_number => p_object_version_number );
2168: --
2169: --
2170: hr_utility.set_location(' Leaving:'||l_proc, 60);
2171: --
2172: -- When in validation only mode raise the Validate_Enabled exception
2173: --
2174: IF p_validate THEN
2203: -- Only set output warning arguments
2204: -- (Any key or derived arguments must be set to null
2205: -- when validation only mode is being used.)
2206: --
2207: hr_utility.set_location(' Leaving:'||l_proc, 80);
2208: WHEN OTHERS THEN
2209: --
2210: -- A validation or unexpected error has occurred
2211: ROLLBACK TO delete_organization;
2208: WHEN OTHERS THEN
2209: --
2210: -- A validation or unexpected error has occurred
2211: ROLLBACK TO delete_organization;
2212: hr_utility.set_location(' Leaving:'||l_proc, 90);
2213: RAISE;
2214: --
2215: END delete_organization;
2216: --
2267: l_legislation_code VARCHAR2(5);
2268: --
2269: BEGIN
2270: --
2271: hr_utility.set_location('Entering:'|| l_proc, 10);
2272: --
2273: open csr_get_leg_code;
2274: fetch csr_get_leg_code into l_legislation_code;
2275: close csr_get_leg_code;
2293: EXCEPTION
2294: WHEN NO_DATA_FOUND THEN null;
2295: END;
2296: --
2297: hr_utility.set_location(l_proc, 20);
2298: --
2299: IF l_exists = 'Y'
2300: AND p_parent_call = 'REGULAR' THEN
2301: hr_utility.set_message(800, 'HR_289000_CLSF_MAND_INFO_TYPE');
2297: hr_utility.set_location(l_proc, 20);
2298: --
2299: IF l_exists = 'Y'
2300: AND p_parent_call = 'REGULAR' THEN
2301: hr_utility.set_message(800, 'HR_289000_CLSF_MAND_INFO_TYPE');
2302: hr_utility.raise_error;
2303: END IF;
2304: /*
2305: What does this do, it makes no sense.
2298: --
2299: IF l_exists = 'Y'
2300: AND p_parent_call = 'REGULAR' THEN
2301: hr_utility.set_message(800, 'HR_289000_CLSF_MAND_INFO_TYPE');
2302: hr_utility.raise_error;
2303: END IF;
2304: /*
2305: What does this do, it makes no sense.
2306: WWBUG 2557238
2305: What does this do, it makes no sense.
2306: WWBUG 2557238
2307: IF l_exists = 'N'
2308: AND p_parent_call = 'INTERNAL' THEN
2309: hr_utility.set_message(800, 'HR_289001_CLSF_NO_MAND_INFO');
2310: hr_utility.raise_error;
2311: END IF;
2312: */
2313: --
2306: WWBUG 2557238
2307: IF l_exists = 'N'
2308: AND p_parent_call = 'INTERNAL' THEN
2309: hr_utility.set_message(800, 'HR_289001_CLSF_NO_MAND_INFO');
2310: hr_utility.raise_error;
2311: END IF;
2312: */
2313: --
2314: --
2311: END IF;
2312: */
2313: --
2314: --
2315: hr_utility.set_location('Leaving:'||l_proc, 30);
2316: --
2317: END chk_cls_mand;
2318: --
2319: --
2340: l_org_information_id hr_organization_information.org_information_id%TYPE;
2341: l_object_version_number hr_organization_information.object_version_number%TYPE;
2342: --
2343: BEGIN
2344: hr_utility.set_location('Entering:'|| l_proc, 10);
2345: --
2346: -- Issue a savepoint
2347: --
2348: savepoint create_org_classification;
2346: -- Issue a savepoint
2347: --
2348: savepoint create_org_classification;
2349: --
2350: hr_utility.set_location(l_proc, 15);
2351: begin
2352: hr_organization_bk6.create_org_classification_b
2353: (p_effective_date => p_effective_date
2354: ,p_organization_id => p_organization_id
2367: ,p_argument => 'ORGANIZATION_ID'
2368: ,p_argument_value => p_organization_id );
2369:
2370: --
2371: hr_utility.set_location(l_proc, 20);
2372: --
2373: -- Process Logic
2374: --
2375: -- Check if it is proper classification first
2379: p_org_classif_code => p_org_classif_code,
2380: p_parent_call => 'REGULAR',
2381: p_organization_id => p_organization_id);
2382: --
2383: hr_utility.set_location(l_proc, 30);
2384: --
2385: hr_ori_ins.ins(
2386: p_effective_date => p_effective_date,
2387: p_org_information_context => 'CLASS',
2391: p_org_information_id => l_org_information_id,
2392: p_object_version_number => l_object_version_number
2393: );
2394: --
2395: hr_utility.set_location(l_proc, 60);
2396: --
2397: -- When in validation only mode raise the Validate_Enabled exception
2398: --
2399: IF p_validate THEN
2404: --
2405: p_org_information_id := l_org_information_id;
2406: p_object_version_number := l_object_version_number;
2407: --
2408: hr_utility.set_location(' Leaving:'||l_proc, 70);
2409: --
2410: begin
2411:
2412: hr_organization_bk6.create_org_classification_a
2436: -- when validation only mode is being used.)
2437: --
2438: p_org_information_id := NULL;
2439: p_object_version_number := NULL;
2440: hr_utility.set_location(' Leaving:'||l_proc, 80);
2441: WHEN OTHERS THEN
2442: --
2443: -- A validation or unexpected error has occurred
2444: ROLLBACK TO create_org_classification;
2444: ROLLBACK TO create_org_classification;
2445: -- Set OUT parameters.
2446: p_org_information_id := NULL;
2447: p_object_version_number := NULL;
2448: hr_utility.set_location(' Leaving:'||l_proc, 90);
2449: RAISE;
2450: --
2451: END create_org_classification;
2452: --
2489: l_context VARCHAR2(40);
2490: --
2491: BEGIN
2492: --
2493: hr_utility.set_location('Entering:'|| l_proc, 10);
2494: --
2495: --
2496: -- Check classification with mandatory info types presence
2497: --
2503: EXCEPTION
2504: WHEN NO_DATA_FOUND THEN null;
2505: END;
2506: --
2507: hr_utility.set_location(l_proc, 20);
2508: --
2509: IF l_context IS NULL OR
2510: (l_context IS NOT NULL AND l_context <> 'CLASS') THEN
2511: hr_utility.set_message(800, 'HR_52762_NOT_CLSF_ROW');
2507: hr_utility.set_location(l_proc, 20);
2508: --
2509: IF l_context IS NULL OR
2510: (l_context IS NOT NULL AND l_context <> 'CLASS') THEN
2511: hr_utility.set_message(800, 'HR_52762_NOT_CLSF_ROW');
2512: hr_utility.raise_error;
2513: END IF;
2514: --
2515: --
2508: --
2509: IF l_context IS NULL OR
2510: (l_context IS NOT NULL AND l_context <> 'CLASS') THEN
2511: hr_utility.set_message(800, 'HR_52762_NOT_CLSF_ROW');
2512: hr_utility.raise_error;
2513: END IF;
2514: --
2515: --
2516: hr_utility.set_location('Leaving:'||l_proc, 30);
2512: hr_utility.raise_error;
2513: END IF;
2514: --
2515: --
2516: hr_utility.set_location('Leaving:'||l_proc, 30);
2517: --
2518: END chk_cls_row;
2519: --
2520: -- ----------------------------------------------------------------------------
2537: l_temp_ovn number := p_object_version_number;
2538: --
2539: BEGIN
2540: --
2541: hr_utility.set_location('Entering:'|| l_proc, 10);
2542: --
2543: -- Issue a savepoint.
2544: --
2545: savepoint enable_org_classification;
2543: -- Issue a savepoint.
2544: --
2545: savepoint enable_org_classification;
2546: --
2547: hr_utility.set_location(l_proc, 20);
2548: --
2549: -- Check that row has org_information_context as 'CLASS'
2550: --
2551: chk_cls_row(p_org_information_id => p_org_information_id);
2568: --
2569: --
2570: --
2571: --
2572: hr_utility.set_location(l_proc, 60);
2573: --
2574: -- When in validation only mode raise the Validate_Enabled exception
2575: --
2576: IF p_validate THEN
2581: -- never reached, so p_object_version_number is passed back unchanged.
2582: --
2583: p_object_version_number := l_object_version_number;
2584: --
2585: hr_utility.set_location(' Leaving:'||l_proc, 70);
2586: --
2587: EXCEPTION
2588: --
2589: WHEN hr_api.validate_enabled THEN
2596: -- Only set output warning arguments
2597: -- (Any key or derived arguments must be set to null
2598: -- when validation only mode is being used.)
2599: p_object_version_number := l_temp_ovn;
2600: hr_utility.set_location(' Leaving:'||l_proc, 80);
2601: WHEN OTHERS THEN
2602: --
2603: -- A validation or unexpected error has occurred
2604: ROLLBACK TO enable_org_classification;
2603: -- A validation or unexpected error has occurred
2604: ROLLBACK TO enable_org_classification;
2605: -- Reset IN OUT parameters.
2606: p_object_version_number := l_temp_ovn;
2607: hr_utility.set_location(' Leaving:'||l_proc, 90);
2608: RAISE;
2609: --
2610: --
2611: END enable_org_classification;
2631: l_temp_ovn number := p_object_version_number;
2632: --
2633: BEGIN
2634: --
2635: hr_utility.set_location('Entering:'|| l_proc, 10);
2636: --
2637: -- Issue a savepoint.
2638: --
2639: savepoint disable_org_classification;
2637: -- Issue a savepoint.
2638: --
2639: savepoint disable_org_classification;
2640: --
2641: hr_utility.set_location(l_proc, 20);
2642: --
2643: -- Check that row has org_information_context as 'CLASS'
2644: --
2645: chk_cls_row(p_org_information_id => p_org_information_id);
2662: --
2663: --
2664: --
2665: --
2666: hr_utility.set_location(l_proc, 60);
2667: --
2668: -- When in validation only mode raise the Validate_Enabled exception
2669: --
2670: IF p_validate THEN
2675: -- never reached, so p_object_version_number is passed back unchanged.
2676: --
2677: p_object_version_number := l_object_version_number;
2678: --
2679: hr_utility.set_location(' Leaving:'||l_proc, 70);
2680: --
2681: EXCEPTION
2682: --
2683: WHEN hr_api.validate_enabled THEN
2691: -- (Any key or derived arguments must be set to null
2692: -- when validation only mode is being used.)
2693: -- Reset IN OUT parameters.
2694: p_object_version_number := l_temp_ovn;
2695: hr_utility.set_location(' Leaving:'||l_proc, 80);
2696: WHEN OTHERS THEN
2697: --
2698: -- A validation or unexpected error has occurred
2699: ROLLBACK TO disable_org_classification;
2698: -- A validation or unexpected error has occurred
2699: ROLLBACK TO disable_org_classification;
2700: -- Reset IN OUT parameters.
2701: p_object_version_number := l_temp_ovn;
2702: hr_utility.set_location(' Leaving:'||l_proc, 90);
2703: RAISE;
2704: --
2705: --
2706: END disable_org_classification;
2769: l_effective_date date;
2770: --
2771: BEGIN
2772: --
2773: hr_utility.set_location('Entering:'|| l_proc, 10);
2774: --
2775: -- Issue a savepoint
2776: --
2777: savepoint create_org_information;
2775: -- Issue a savepoint
2776: --
2777: savepoint create_org_information;
2778: --
2779: hr_utility.set_location(l_proc, 20);
2780:
2781: l_effective_date := trunc(p_effective_date);
2782:
2783: --
2837: ,p_hook_type => 'BP'
2838: );
2839: end;
2840: --
2841: hr_utility.set_location(l_proc, 30);
2842:
2843: -- Insert the effective date into fnd_sessions for the flexfield
2844: -- validation to work (Bug#3286325)
2845:
2897: p_org_information_id => l_org_information_id,
2898: p_object_version_number => l_object_version_number
2899: );
2900: --
2901: hr_utility.set_location(l_proc, 40);
2902: --
2903: -- Call After Process User Hook
2904: --
2905: begin
2957: ,p_hook_type => 'AP'
2958: );
2959: end;
2960: --
2961: hr_utility.set_location(l_proc, 50);
2962: --
2963: -- When in validation only mode raise the Validate_Enabled exception
2964: --
2965: IF p_validate THEN
2965: IF p_validate THEN
2966: RAISE hr_api.validate_enabled;
2967: END IF;
2968: --
2969: hr_utility.set_location(l_proc, 60);
2970: --
2971: -- Set all output arguments
2972: --
2973: p_org_information_id := l_org_information_id;
2978: --
2979: hr_kflex_utility.unset_session_date
2980: (p_session_id => l_session_id);
2981: --
2982: hr_utility.set_location(' Leaving:'||l_proc, 70);
2983: --
2984: EXCEPTION
2985: --
2986: WHEN hr_api.validate_enabled THEN
2995: -- when validation only mode is being used.)
2996: --
2997: p_org_information_id := NULL;
2998: p_object_version_number := NULL;
2999: hr_utility.set_location(' Leaving:'||l_proc, 80);
3000: WHEN OTHERS THEN
3001: --
3002: -- A validation or unexpected error has occurred
3003: ROLLBACK TO create_org_information;
3003: ROLLBACK TO create_org_information;
3004: -- Set OUT parameters
3005: p_org_information_id := NULL;
3006: p_object_version_number := NULL;
3007: hr_utility.set_location(' Leaving:'||l_proc, 90);
3008: RAISE;
3009: --
3010: END create_org_information;
3011: --
3079: l_business_group_id number;
3080: --
3081: BEGIN
3082: --
3083: hr_utility.set_location('Entering:'|| l_proc, 10);
3084: --
3085: open c1;
3086: --
3087: fetch c1 into l_business_group_id;
3096: -- Issue a savepoint
3097: --
3098: savepoint create_org_information;
3099: --
3100: hr_utility.set_location(l_proc, 20);
3101: --
3102: -- Call Before Process User Hook
3103: --
3104: if p_org_info_type_code <> 'Business Group Information' then
3160: --
3161: end;
3162: end if;
3163: --
3164: hr_utility.set_location(l_proc, 30);
3165: --
3166: -- Process Logic
3167: --
3168: hr_ori_ins.ins
3235: end if;
3236: --
3237: end if;
3238: --
3239: hr_utility.set_location(l_proc, 40);
3240: --
3241: -- Bug 3617238 START
3242: --
3243: IF p_org_info_type_code = 'Business Group Information' THEN
3247: );
3248: --
3249: END IF;
3250: --
3251: hr_utility.set_location(l_proc, 45);
3252: --
3253: -- Bug 3617238 END
3254: --
3255: --
3313: ,p_hook_type => 'AP');
3314: --
3315: end;
3316: --
3317: hr_utility.set_location(l_proc, 50);
3318: --
3319: -- When in validation only mode raise the Validate_Enabled exception
3320: --
3321: IF p_validate THEN
3321: IF p_validate THEN
3322: RAISE hr_api.validate_enabled;
3323: END IF;
3324: --
3325: hr_utility.set_location(l_proc, 60);
3326: --
3327: -- Set all output arguments
3328: --
3329: p_org_information_id := l_org_information_id;
3329: p_org_information_id := l_org_information_id;
3330: p_object_version_number := l_object_version_number;
3331: p_warning := l_warning;
3332: --
3333: hr_utility.set_location(' Leaving:'||l_proc, 70);
3334: --
3335: EXCEPTION
3336: --
3337: WHEN hr_api.validate_enabled THEN
3347: --
3348: p_org_information_id := NULL;
3349: p_object_version_number := NULL;
3350: p_warning := NULL;
3351: hr_utility.set_location(' Leaving:'||l_proc, 80);
3352: --
3353: WHEN OTHERS THEN
3354: --
3355: -- A validation or unexpected error has occurred
3357: --
3358: p_org_information_id := NULL;
3359: p_object_version_number := NULL;
3360: p_warning := NULL;
3361: hr_utility.set_location(' Leaving:'||l_proc, 90);
3362: RAISE;
3363: --
3364: end create_org_manager;
3365: --
3429: where hoi.org_information_id = p_org_information_id
3430: and hoi.org_information_context = p_org_info_type_code;
3431: BEGIN
3432: --
3433: hr_utility.set_location('Entering:'|| l_proc, 10);
3434: --
3435: -- Issue a savepoint.
3436: --
3437: savepoint update_org_information;
3435: -- Issue a savepoint.
3436: --
3437: savepoint update_org_information;
3438: --
3439: hr_utility.set_location(l_proc, 20);
3440: --
3441: -- Check that mandatory info types cannot be updated after
3442: -- they were created
3443: --
3445: -- OR p_org_info_type_code = 'Operating Unit Information'
3446: OR p_org_info_type_code = 'Canada Employer Identification'
3447: OR p_org_info_type_code = 'FPT_BRANCH_INFO'
3448: OR p_org_info_type_code = 'FPT_BANK_INFO' THEN
3449: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3450: hr_utility.raise_error;
3451: END IF;
3452: --
3453: open csr_check_ou;
3446: OR p_org_info_type_code = 'Canada Employer Identification'
3447: OR p_org_info_type_code = 'FPT_BRANCH_INFO'
3448: OR p_org_info_type_code = 'FPT_BANK_INFO' THEN
3449: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3450: hr_utility.raise_error;
3451: END IF;
3452: --
3453: open csr_check_ou;
3454: IF csr_check_ou%notfound then
3451: END IF;
3452: --
3453: open csr_check_ou;
3454: IF csr_check_ou%notfound then
3455: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3456: hr_utility.raise_error;
3457: END IF;
3458:
3459: hr_utility.set_location(l_proc, 30);
3452: --
3453: open csr_check_ou;
3454: IF csr_check_ou%notfound then
3455: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3456: hr_utility.raise_error;
3457: END IF;
3458:
3459: hr_utility.set_location(l_proc, 30);
3460: --
3455: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3456: hr_utility.raise_error;
3457: END IF;
3458:
3459: hr_utility.set_location(l_proc, 30);
3460: --
3461: -- Call Before Process User Hook
3462: --
3463: begin
3514: ,p_hook_type => 'BP'
3515: );
3516: end;
3517: --
3518: hr_utility.set_location(l_proc, 40);
3519: --
3520: -- Update row in HR_ORGANIZATION_INFORMATION Table
3521: --
3522: hr_ori_upd.upd(
3566: p_attribute20 => p_attribute20,
3567: p_object_version_number => l_object_version_number
3568: );
3569: --
3570: hr_utility.set_location(l_proc, 50);
3571: --
3572: -- Call After Process User Hook
3573: --
3574: begin
3625: ,p_hook_type => 'AP'
3626: );
3627: end;
3628: --
3629: hr_utility.set_location(l_proc, 60);
3630: --
3631: -- When in validation only mode raise the Validate_Enabled exception
3632: --
3633: IF p_validate THEN
3633: IF p_validate THEN
3634: RAISE hr_api.validate_enabled;
3635: END IF;
3636: --
3637: hr_utility.set_location(l_proc, 70);
3638: --
3639: -- Set all output arguments. If p_validate was TRUE, this bit is
3640: -- never reached, so p_object_version_number is passed back unchanged.
3641: --
3640: -- never reached, so p_object_version_number is passed back unchanged.
3641: --
3642: p_object_version_number := l_object_version_number;
3643: --
3644: hr_utility.set_location(' Leaving:'||l_proc, 80);
3645: --
3646: EXCEPTION
3647: --
3648: WHEN hr_api.validate_enabled THEN
3656: -- (Any key or derived arguments must be set to null
3657: -- when validation only mode is being used.)
3658: -- Reset IN OUT parameters.
3659: p_object_version_number := l_temp_ovn;
3660: hr_utility.set_location(' Leaving:'||l_proc, 80);
3661: WHEN OTHERS THEN
3662: --
3663: -- A validation or unexpected error has occurred
3664: ROLLBACK TO update_org_information;
3663: -- A validation or unexpected error has occurred
3664: ROLLBACK TO update_org_information;
3665: -- Reset IN OUT parameters.
3666: p_object_version_number := l_temp_ovn;
3667: hr_utility.set_location(' Leaving:'||l_proc, 90);
3668: RAISE;
3669: --
3670: --
3671: END update_org_information;
3740: l_business_group_id number;
3741: --
3742: BEGIN
3743: --
3744: hr_utility.set_location('Entering:'|| l_proc, 10);
3745: --
3746: -- Issue a savepoint.
3747: --
3748: open c1;
3757: close c1;
3758: --
3759: savepoint update_org_information;
3760: --
3761: hr_utility.set_location(l_proc, 20);
3762: --
3763: -- Call Before Process User Hook
3764: --
3765: begin
3820: ,p_hook_type => 'BP'
3821: );
3822: end;
3823: --
3824: hr_utility.set_location(l_proc, 40);
3825: --
3826: -- Update row in HR_ORGANIZATION_INFORMATION Table
3827: --
3828: hr_ori_upd.upd
3871: ,p_attribute19 => p_attribute19
3872: ,p_attribute20 => p_attribute20
3873: ,p_object_version_number => l_object_version_number);
3874: --
3875: hr_utility.set_location(l_proc, 50);
3876: --
3877: -- Set the warning parameter if a gap occurred
3878: --
3879: l_warning := false;
3957: ,p_hook_type => 'AP');
3958: --
3959: end;
3960: --
3961: hr_utility.set_location(l_proc, 60);
3962: --
3963: -- When in validation only mode raise the Validate_Enabled exception
3964: --
3965: IF p_validate THEN
3965: IF p_validate THEN
3966: RAISE hr_api.validate_enabled;
3967: END IF;
3968: --
3969: hr_utility.set_location(l_proc, 70);
3970: --
3971: -- Set all output arguments. If p_validate was TRUE, this bit is
3972: -- never reached, so p_object_version_number is passed back unchanged.
3973: --
3973: --
3974: p_object_version_number := l_object_version_number;
3975: p_warning := l_warning;
3976: --
3977: hr_utility.set_location(' Leaving:'||l_proc, 80);
3978: --
3979: EXCEPTION
3980: --
3981: WHEN hr_api.validate_enabled THEN
3989: -- (Any key or derived arguments must be set to null
3990: -- when validation only mode is being used.)
3991: p_object_version_number := l_temp_ovn;
3992: p_warning := l_warning;
3993: hr_utility.set_location(' Leaving:'||l_proc, 80);
3994: WHEN OTHERS THEN
3995: --
3996: -- A validation or unexpected error has occurred
3997: ROLLBACK TO update_org_information;
3996: -- A validation or unexpected error has occurred
3997: ROLLBACK TO update_org_information;
3998: p_object_version_number := l_temp_ovn;
3999: p_warning := null;
4000: hr_utility.set_location(' Leaving:'||l_proc, 90);
4001: RAISE;
4002: --
4003: END update_org_manager;
4004: --
4018: l_temp_ovn number := p_object_version_number;
4019: --
4020: begin
4021: --
4022: hr_utility.set_location('Entering:'|| l_proc, 10);
4023: --
4024: -- Issue a savepoint if operating in validation only mode
4025: --
4026: savepoint delete_org_manager;
4024: -- Issue a savepoint if operating in validation only mode
4025: --
4026: savepoint delete_org_manager;
4027: --
4028: hr_utility.set_location(l_proc, 20);
4029: --
4030: -- Process Logic
4031: --
4032: l_object_version_number := p_object_version_number;
4075: -- End of API User Hook for the after hook of delete_org_manager
4076: --
4077: end;
4078: --
4079: hr_utility.set_location(l_proc, 60);
4080: --
4081: -- When in validation only mode raise the Validate_Enabled exception
4082: --
4083: if p_validate then
4083: if p_validate then
4084: raise hr_api.validate_enabled;
4085: end if;
4086: --
4087: hr_utility.set_location(' Leaving:'||l_proc, 70);
4088: --
4089: exception
4090: --
4091: when hr_api.validate_enabled then
4133: l_object_version_number hr_organization_information.object_version_number%TYPE;
4134: --
4135: BEGIN
4136: --
4137: hr_utility.set_location('Entering:'|| l_proc, 10);
4138: --
4139: -- Issue a savepoint
4140: --
4141: savepoint create_org_class_internal;
4139: -- Issue a savepoint
4140: --
4141: savepoint create_org_class_internal;
4142: --
4143: hr_utility.set_location(l_proc, 15);
4144: --
4145: --
4146: hr_utility.set_location(l_proc, 20);
4147: --
4142: --
4143: hr_utility.set_location(l_proc, 15);
4144: --
4145: --
4146: hr_utility.set_location(l_proc, 20);
4147: --
4148: -- Process Logic
4149: --
4150: -- Check if it is proper classification first
4154: p_org_classif_code => p_org_classif_code,
4155: p_parent_call => 'INTERNAL',
4156: p_organization_id => p_organization_id);
4157: --
4158: hr_utility.set_location(l_proc, 30);
4159: --
4160: hr_ori_ins.ins(
4161: p_effective_date => p_effective_date,
4162: p_org_information_context => 'CLASS',
4166: p_org_information_id => l_org_information_id,
4167: p_object_version_number => l_object_version_number
4168: );
4169: --
4170: hr_utility.set_location(l_proc, 60);
4171: --
4172: -- When in validation only mode raise the Validate_Enabled exception
4173: --
4174: IF p_validate THEN
4179: --
4180: p_org_information_id := l_org_information_id;
4181: p_object_version_number := l_object_version_number;
4182: --
4183: hr_utility.set_location(' Leaving:'||l_proc, 70);
4184: --
4185: EXCEPTION
4186: --
4187: WHEN hr_api.validate_enabled THEN
4196: -- when validation only mode is being used.)
4197: --
4198: p_org_information_id := NULL;
4199: p_object_version_number := NULL;
4200: hr_utility.set_location(' Leaving:'||l_proc, 80);
4201: WHEN OTHERS THEN
4202: --
4203: -- A validation or unexpected error has occurred
4204: ROLLBACK TO create_org_class_internal;
4201: WHEN OTHERS THEN
4202: --
4203: -- A validation or unexpected error has occurred
4204: ROLLBACK TO create_org_class_internal;
4205: hr_utility.set_location(' Leaving:'||l_proc, 90);
4206: RAISE;
4207: --
4208: END create_org_class_internal;
4209: --
4253: l_ovn_bg hr_all_organization_units.object_version_number%TYPE;
4254: --
4255: BEGIN
4256: --
4257: hr_utility.set_location('Entering:'|| l_proc, 10);
4258: --
4259: -- Issue a savepoint
4260: --
4261: savepoint create_business_group;
4259: -- Issue a savepoint
4260: --
4261: savepoint create_business_group;
4262: --
4263: hr_utility.set_location(l_proc, 15);
4264: --
4265: -- All date input parameters must be truncated to remove time elements
4266: --
4267: l_date_from := trunc (p_date_from);
4273: --
4274: l_language_code := p_language_code;
4275: hr_api.validate_language_code(p_language_code => l_language_code);
4276: --
4277: hr_utility.set_location(l_proc, 20);
4278: --
4279: -- Process Logic
4280: --
4281: --
4333: ,p_org_information16 => p_cwk_gen_method
4334: ,p_org_information_id => l_org_information_id
4335: ,p_object_version_number => l_object_version_number);
4336: --
4337: hr_utility.set_location(l_proc, 60);
4338: --
4339: update hr_all_organization_units
4340: set business_group_id = l_organization_id
4341: where organization_id = l_organization_id;
4339: update hr_all_organization_units
4340: set business_group_id = l_organization_id
4341: where organization_id = l_organization_id;
4342: --
4343: hr_utility.set_location(l_proc, 70);
4344: --
4345: -- When in validation only mode raise the Validate_Enabled exception
4346: --
4347: IF p_validate THEN
4352: --
4353: p_organization_id := l_organization_id;
4354: p_object_version_number := l_ovn_bg + 1;
4355: --
4356: hr_utility.set_location(' Leaving:'||l_proc, 80);
4357: --
4358: EXCEPTION
4359: --
4360: WHEN hr_api.validate_enabled THEN
4369: -- when validation only mode is being used.)
4370: --
4371: p_organization_id := NULL;
4372: p_object_version_number := NULL;
4373: hr_utility.set_location(' Leaving:'||l_proc, 80);
4374: WHEN OTHERS THEN
4375: --
4376: -- A validation or unexpected error has occurred
4377: ROLLBACK TO create_business_group;
4377: ROLLBACK TO create_business_group;
4378: -- Set OUT parameters
4379: p_organization_id := NULL;
4380: p_object_version_number := NULL;
4381: hr_utility.set_location(' Leaving:'||l_proc, 90);
4382: RAISE;
4383: --
4384: END create_business_group;
4385: --
4432: --
4433:
4434: BEGIN
4435:
4436: hr_utility.set_location(' Entering:'||l_proc, 10);
4437:
4438: --TO CHECK IF NONE OF THE IN PARAMETERS ARE ENTERED
4439:
4440: if (p_person_id is null
4440: if (p_person_id is null
4441: and p_assignment_id is null
4442: and p_organization_id is null) then
4443:
4444: hr_utility.set_message(800,'PER_449733_MUST_ENTR_ONE_PAR');
4445: hr_utility.raise_error;
4446:
4447: end if;
4448:
4441: and p_assignment_id is null
4442: and p_organization_id is null) then
4443:
4444: hr_utility.set_message(800,'PER_449733_MUST_ENTR_ONE_PAR');
4445: hr_utility.raise_error;
4446:
4447: end if;
4448:
4449: hr_utility.set_location(l_proc, 20);
4445: hr_utility.raise_error;
4446:
4447: end if;
4448:
4449: hr_utility.set_location(l_proc, 20);
4450:
4451: --TO CHECK IF MORE THAN ONE PARAMETER HAS BEEN ENTERED
4452:
4453: if (p_person_id is not null
4455: or p_person_id is not null
4456: and p_organization_id is not null
4457: or p_assignment_id is not null
4458: and p_organization_id is not null) then
4459: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4460: hr_utility.raise_error;
4461: end if;
4462:
4463: hr_utility.set_location(l_proc, 30);
4456: and p_organization_id is not null
4457: or p_assignment_id is not null
4458: and p_organization_id is not null) then
4459: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4460: hr_utility.raise_error;
4461: end if;
4462:
4463: hr_utility.set_location(l_proc, 30);
4464:
4459: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4460: hr_utility.raise_error;
4461: end if;
4462:
4463: hr_utility.set_location(l_proc, 30);
4464:
4465: if p_person_id is not null then
4466:
4467: hr_utility.set_location(l_proc, 40);
4463: hr_utility.set_location(l_proc, 30);
4464:
4465: if p_person_id is not null then
4466:
4467: hr_utility.set_location(l_proc, 40);
4468:
4469: open ou_person;
4470: fetch ou_person into l_operating_unit_id;
4471: if ou_person%notfound then
4469: open ou_person;
4470: fetch ou_person into l_operating_unit_id;
4471: if ou_person%notfound then
4472:
4473: hr_utility.set_location(l_proc, 50);
4474:
4475: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4476:
4477: end if;
4476:
4477: end if;
4478: close ou_person;
4479:
4480: hr_utility.set_location(l_proc, 60);
4481:
4482: elsif p_assignment_id is not null then
4483:
4484: hr_utility.set_location(l_proc, 70);
4480: hr_utility.set_location(l_proc, 60);
4481:
4482: elsif p_assignment_id is not null then
4483:
4484: hr_utility.set_location(l_proc, 70);
4485:
4486: open ou_assignment;
4487: fetch ou_assignment into l_operating_unit_id;
4488: if ou_assignment%notfound then
4486: open ou_assignment;
4487: fetch ou_assignment into l_operating_unit_id;
4488: if ou_assignment%notfound then
4489:
4490: hr_utility.set_location(l_proc, 80);
4491:
4492: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4493:
4494: end if;
4493:
4494: end if;
4495: close ou_assignment;
4496:
4497: hr_utility.set_location(l_proc, 90);
4498: else
4499:
4500: open ou_organization;
4501: fetch ou_organization into l_operating_unit_id;
4500: open ou_organization;
4501: fetch ou_organization into l_operating_unit_id;
4502: if ou_organization%notfound then
4503:
4504: hr_utility.set_location(l_proc, 100);
4505:
4506: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4507:
4508: end if;
4507:
4508: end if;
4509: close ou_organization;
4510:
4511: hr_utility.set_location(l_proc, 110);
4512: end if;
4513:
4514: hr_utility.set_location(l_proc, 120);
4515:
4510:
4511: hr_utility.set_location(l_proc, 110);
4512: end if;
4513:
4514: hr_utility.set_location(l_proc, 120);
4515:
4516: if nvl(l_operating_unit_id,-99) <> -99 then
4517:
4518: hr_utility.set_location(l_proc, 130);
4514: hr_utility.set_location(l_proc, 120);
4515:
4516: if nvl(l_operating_unit_id,-99) <> -99 then
4517:
4518: hr_utility.set_location(l_proc, 130);
4519:
4520: return l_operating_unit_id;
4521:
4522: else
4520: return l_operating_unit_id;
4521:
4522: else
4523:
4524: hr_utility.set_message(800,'PER_449732_UNABLE_TO_DERI_OU');
4525: hr_utility.raise_error;
4526:
4527: end if;
4528:
4521:
4522: else
4523:
4524: hr_utility.set_message(800,'PER_449732_UNABLE_TO_DERI_OU');
4525: hr_utility.raise_error;
4526:
4527: end if;
4528:
4529: hr_utility.set_location(' Leaving:'||l_proc, 140);
4525: hr_utility.raise_error;
4526:
4527: end if;
4528:
4529: hr_utility.set_location(' Leaving:'||l_proc, 140);
4530:
4531: return l_operating_unit_id;
4532:
4533: END get_operating_unit;
4566: l_date_from DATE;
4567: --
4568: BEGIN
4569: --
4570: hr_utility.set_location('Entering:'|| l_proc, 10);
4571: --
4572: -- Issue a savepoint
4573: --
4574: savepoint create_operating_unit;
4572: -- Issue a savepoint
4573: --
4574: savepoint create_operating_unit;
4575: --
4576: hr_utility.set_location(l_proc, 15);
4577: --
4578: -- All date input parameters must be truncated to remove time elements
4579: --
4580: l_date_from := trunc (p_date_from);
4586: --
4587: l_language_code := p_language_code;
4588: hr_api.validate_language_code(p_language_code => l_language_code);
4589: --
4590: hr_utility.set_location(l_proc, 20);
4591: --
4592: -- Process Logic
4593: --
4594: --
4659: ,p_org_information_id => l_org_information_id
4660: ,p_object_version_number => l_object_version_number);
4661: --
4662: --
4663: hr_utility.set_location(l_proc, 70);
4664: --
4665: -- When in validation only mode raise the Validate_Enabled exception
4666: --
4667: IF p_validate THEN
4674: -- Changed for the bug 5446483 - Start
4675: --p_object_version_number := l_object_version_number;
4676: -- Changed for the bug 5446483 - end
4677: --
4678: hr_utility.set_location(' Leaving:'||l_proc, 80);
4679: --
4680: EXCEPTION
4681: --
4682: WHEN hr_api.validate_enabled THEN
4691: -- when validation only mode is being used.)
4692: --
4693: p_organization_id := NULL;
4694: p_object_version_number := NULL;
4695: hr_utility.set_location(' Leaving:'||l_proc, 80);
4696: WHEN OTHERS THEN
4697: --
4698: -- A validation or unexpected error has occurred
4699: ROLLBACK TO create_operating_unit;
4699: ROLLBACK TO create_operating_unit;
4700: -- Set OUT parameters
4701: p_organization_id := NULL;
4702: p_object_version_number := NULL;
4703: hr_utility.set_location(' Leaving:'||l_proc, 90);
4704: RAISE;
4705: --
4706: END create_operating_unit;
4707: --
4754: and organization_id = p_organization_id;
4755:
4756: BEGIN
4757: --
4758: hr_utility.set_location('Entering:'|| l_proc, 10);
4759: --
4760: -- Issue a savepoint
4761: --
4762: savepoint update_operating_unit;
4823: end if;
4824:
4825: close csr_check_update;
4826:
4827: hr_utility.set_location(l_proc, 20);
4828: --
4829: -- When in validation only mode raise the Validate_Enabled exception
4830: --
4831: IF p_validate THEN
4841:
4842:
4843: p_update_prim_ledger_warning := l_update_prim_ledger_warning;
4844: --
4845: hr_utility.set_location(' Leaving:'||l_proc, 30);
4846: --
4847: EXCEPTION
4848: --
4849: WHEN hr_api.validate_enabled THEN
4858: -- when validation only mode is being used.)
4859: -- Reset IN OUT parameters.
4860: p_object_version_number := l_object_version_number;
4861: p_update_prim_ledger_warning :=false;
4862: hr_utility.set_location(' Leaving:'||l_proc, 40);
4863: WHEN OTHERS THEN
4864: --
4865: -- A validation or unexpected error has occurred
4866: ROLLBACK TO update_operating_unit;
4867: -- Set OUT parameters
4868: -- Reset IN OUT parameters.
4869: p_object_version_number := l_object_version_number;
4870: p_update_prim_ledger_warning :=false;
4871: hr_utility.set_location(' Leaving:'||l_proc, 50);
4872: RAISE;
4873: --
4874:
4875: END update_operating_unit;
4907: l_date_from DATE;
4908: --
4909: BEGIN
4910: --
4911: hr_utility.set_location('Entering:'|| l_proc, 10);
4912:
4913: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4914: hr_utility.raise_error;
4915: /*
4909: BEGIN
4910: --
4911: hr_utility.set_location('Entering:'|| l_proc, 10);
4912:
4913: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4914: hr_utility.raise_error;
4915: /*
4916: --
4917: -- Issue a savepoint
4910: --
4911: hr_utility.set_location('Entering:'|| l_proc, 10);
4912:
4913: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4914: hr_utility.raise_error;
4915: /*
4916: --
4917: -- Issue a savepoint
4918: --
4917: -- Issue a savepoint
4918: --
4919: savepoint create_legal_entity;
4920: --
4921: hr_utility.set_location(l_proc, 15);
4922: --
4923: -- All date input parameters must be truncated to remove time elements
4924: --
4925: l_date_from := trunc (p_date_from);
4931: --
4932: l_language_code := p_language_code;
4933: hr_api.validate_language_code(p_language_code => l_language_code);
4934: --
4935: hr_utility.set_location(l_proc, 20);
4936: --
4937: -- Process Logic
4938: --
4939: --
4975: ,p_org_information_id => l_org_information_id
4976: ,p_object_version_number => l_object_version_number);
4977: --
4978: --
4979: hr_utility.set_location(l_proc, 70);
4980: --
4981: -- When in validation only mode raise the Validate_Enabled exception
4982: --
4983: IF p_validate THEN
4988: --
4989: p_organization_id := l_organization_id;
4990: p_object_version_number := l_object_version_number;
4991: --
4992: hr_utility.set_location(' Leaving:'||l_proc, 80);
4993: --
4994: EXCEPTION
4995: --
4996: WHEN hr_api.validate_enabled THEN
5005: -- when validation only mode is being used.)
5006: --
5007: p_organization_id := NULL;
5008: p_object_version_number := NULL;
5009: hr_utility.set_location(' Leaving:'||l_proc, 80);
5010: WHEN OTHERS THEN
5011: --
5012: -- A validation or unexpected error has occurred
5013: ROLLBACK TO create_legal_entity;
5013: ROLLBACK TO create_legal_entity;
5014: -- Set OUT parameters
5015: p_organization_id := NULL;
5016: p_object_version_number := NULL;
5017: hr_utility.set_location(' Leaving:'||l_proc, 90);
5018: RAISE;
5019: --
5020: */
5021: END create_legal_entity;
5058: l_exists VARCHAR2(1) := 'N';
5059: --
5060: BEGIN
5061: --
5062: hr_utility.set_location('Entering:'|| l_proc, 10);
5063: --
5064: --
5065: -- Check business_group_id presence
5066: --
5075: EXCEPTION
5076: WHEN NO_DATA_FOUND THEN NULL;
5077: END;
5078: --
5079: hr_utility.set_location(l_proc, 20);
5080: --
5081: IF l_exists = 'N' THEN
5082: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5083: hr_utility.raise_error;
5078: --
5079: hr_utility.set_location(l_proc, 20);
5080: --
5081: IF l_exists = 'N' THEN
5082: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5083: hr_utility.raise_error;
5084: END IF;
5085: --
5086: --
5079: hr_utility.set_location(l_proc, 20);
5080: --
5081: IF l_exists = 'N' THEN
5082: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5083: hr_utility.raise_error;
5084: END IF;
5085: --
5086: --
5087: hr_utility.set_location('Leaving:'||l_proc, 30);
5083: hr_utility.raise_error;
5084: END IF;
5085: --
5086: --
5087: hr_utility.set_location('Leaving:'||l_proc, 30);
5088: --
5089: END chk_bgr_id;
5090: --
5091: --
5109: l_org_information_id hr_organization_information.org_information_id%TYPE;
5110: --
5111: BEGIN
5112: --
5113: hr_utility.set_location('Entering:'|| l_proc, 10);
5114: --
5115: -- Issue a savepoint
5116: --
5117: savepoint create_bgr_classif;
5120: --
5121: chk_bgr_id(p_business_group_id);
5122: --
5123: --
5124: hr_utility.set_location(l_proc, 20);
5125: --
5126: -- Process Logic
5127: --
5128: create_org_class_internal(
5162: ,p_org_information_id => l_org_information_id
5163: ,p_object_version_number => l_object_version_number);
5164: --
5165: --
5166: hr_utility.set_location(l_proc, 70);
5167: --
5168: -- When in validation only mode raise the Validate_Enabled exception
5169: --
5170: IF p_validate THEN
5171: RAISE hr_api.validate_enabled;
5172: END IF;
5173: --
5174: --
5175: hr_utility.set_location(' Leaving:'||l_proc, 80);
5176: --
5177: EXCEPTION
5178: --
5179: WHEN hr_api.validate_enabled THEN
5186: -- Only set output warning arguments
5187: -- (Any key or derived arguments must be set to null
5188: -- when validation only mode is being used.)
5189: --
5190: hr_utility.set_location(' Leaving:'||l_proc, 80);
5191: WHEN OTHERS THEN
5192: --
5193: -- A validation or unexpected error has occurred
5194: ROLLBACK TO create_bgr_classif;
5191: WHEN OTHERS THEN
5192: --
5193: -- A validation or unexpected error has occurred
5194: ROLLBACK TO create_bgr_classif;
5195: hr_utility.set_location(' Leaving:'||l_proc, 90);
5196: RAISE;
5197: --
5198: END create_bgr_classif;
5199: --
5235: l_exists VARCHAR2(1) := 'N';
5236: --
5237: BEGIN
5238: --
5239: hr_utility.set_location('Entering:'|| l_proc, 10);
5240: --
5241: --
5242: -- Check organization_id presence
5243: --
5252: EXCEPTION
5253: WHEN NO_DATA_FOUND THEN NULL;
5254: END;
5255: --
5256: hr_utility.set_location(l_proc, 20);
5257: --
5258: IF l_exists = 'N' THEN
5259: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5260: hr_utility.raise_error;
5255: --
5256: hr_utility.set_location(l_proc, 20);
5257: --
5258: IF l_exists = 'N' THEN
5259: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5260: hr_utility.raise_error;
5261: END IF;
5262: --
5263: --
5256: hr_utility.set_location(l_proc, 20);
5257: --
5258: IF l_exists = 'N' THEN
5259: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5260: hr_utility.raise_error;
5261: END IF;
5262: --
5263: --
5264: hr_utility.set_location('Leaving:'||l_proc, 30);
5260: hr_utility.raise_error;
5261: END IF;
5262: --
5263: --
5264: hr_utility.set_location('Leaving:'||l_proc, 30);
5265: --
5266: END chk_organization_id;
5267: --
5268: --
5286: l_org_information_id hr_organization_information.org_information_id%TYPE;
5287: --
5288: BEGIN
5289: --
5290: hr_utility.set_location('Entering:'|| l_proc, 10);
5291: --
5292: -- Issue a savepoint
5293: --
5294: savepoint create_legal_entity_classif;
5297: --
5298: chk_organization_id(p_organization_id);
5299: --
5300: --
5301: hr_utility.set_location(l_proc, 20);
5302: --
5303: -- Process Logic
5304: --
5305: create_org_class_internal(
5319: ,p_org_information1 => p_set_of_books_id
5320: ,p_org_information_id => l_org_information_id
5321: ,p_object_version_number => l_object_version_number);
5322: --
5323: hr_utility.set_location(l_proc, 70);
5324: --
5325: -- When in validation only mode raise the Validate_Enabled exception
5326: --
5327: IF p_validate THEN
5328: RAISE hr_api.validate_enabled;
5329: END IF;
5330: --
5331: --
5332: hr_utility.set_location(' Leaving:'||l_proc, 80);
5333: --
5334: EXCEPTION
5335: --
5336: WHEN hr_api.validate_enabled THEN
5343: -- Only set output warning arguments
5344: -- (Any key or derived arguments must be set to null
5345: -- when validation only mode is being used.)
5346: --
5347: hr_utility.set_location(' Leaving:'||l_proc, 80);
5348: WHEN OTHERS THEN
5349: --
5350: -- A validation or unexpected error has occurred
5351: ROLLBACK TO create_legal_entity_classif;
5348: WHEN OTHERS THEN
5349: --
5350: -- A validation or unexpected error has occurred
5351: ROLLBACK TO create_legal_entity_classif;
5352: hr_utility.set_location(' Leaving:'||l_proc, 90);
5353: RAISE;
5354: --
5355: END create_legal_entity_classif;
5356: --
5377: l_org_information_id hr_organization_information.org_information_id%TYPE;
5378: --
5379: BEGIN
5380: --
5381: hr_utility.set_location('Entering:'|| l_proc, 10);
5382: --
5383: -- Issue a savepoint
5384: --
5385: savepoint create_oper_unit_classif;
5388: --
5389: chk_organization_id(p_organization_id);
5390: --
5391: --
5392: hr_utility.set_location(l_proc, 20);
5393: --
5394: -- Process Logic
5395: --
5396: create_org_class_internal(
5413: ,p_org_information_id => l_org_information_id
5414: ,p_object_version_number => l_object_version_number);
5415: --
5416: --
5417: hr_utility.set_location(l_proc, 70);
5418: --
5419: -- When in validation only mode raise the Validate_Enabled exception
5420: --
5421: IF p_validate THEN
5422: RAISE hr_api.validate_enabled;
5423: END IF;
5424: --
5425: --
5426: hr_utility.set_location(' Leaving:'||l_proc, 80);
5427: --
5428: EXCEPTION
5429: --
5430: WHEN hr_api.validate_enabled THEN
5437: -- Only set output warning arguments
5438: -- (Any key or derived arguments must be set to null
5439: -- when validation only mode is being used.)
5440: --
5441: hr_utility.set_location(' Leaving:'||l_proc, 80);
5442: WHEN OTHERS THEN
5443: --
5444: -- A validation or unexpected error has occurred
5445: ROLLBACK TO create_oper_unit_classif;
5442: WHEN OTHERS THEN
5443: --
5444: -- A validation or unexpected error has occurred
5445: ROLLBACK TO create_oper_unit_classif;
5446: hr_utility.set_location(' Leaving:'||l_proc, 90);
5447: RAISE;
5448: --
5449: END create_oper_unit_classif;
5450: --
5470: l_language_code hr_all_organization_units_tl.language%TYPE;
5471: --
5472: BEGIN
5473: --
5474: hr_utility.set_location('Entering:'|| l_proc, 10);
5475: --
5476: -- Issue a savepoint
5477: --
5478: savepoint trans_org_name;
5476: -- Issue a savepoint
5477: --
5478: savepoint trans_org_name;
5479: --
5480: hr_utility.set_location(l_proc, 15);
5481: --
5482: --
5483: -- Validate the language parameter. l_language_code should be passed to functions
5484: -- instead of p_language_code from now on, to allow an IN OUT parameter to
5486: --
5487: l_language_code := p_language_code;
5488: hr_api.validate_language_code(p_language_code => l_language_code);
5489: --
5490: hr_utility.set_location(l_proc, 20);
5491: --
5492: --
5493: --
5494: hr_api.mandatory_arg_error
5521: p_language_code => p_language_code,
5522: p_organization_id => p_organization_id,
5523: p_name => p_name);
5524: --
5525: hr_utility.set_location(l_proc, 60);
5526: --
5527: -- When in validation only mode raise the Validate_Enabled exception
5528: --
5529: IF p_validate THEN
5532: --
5533: -- Set all output arguments
5534: --
5535: --
5536: hr_utility.set_location(' Leaving:'||l_proc, 70);
5537: --
5538: EXCEPTION
5539: --
5540: WHEN hr_api.validate_enabled THEN
5547: -- Only set output warning arguments
5548: -- (Any key or derived arguments must be set to null
5549: -- when validation only mode is being used.)
5550: --
5551: hr_utility.set_location(' Leaving:'||l_proc, 80);
5552: WHEN OTHERS THEN
5553: --
5554: -- A validation or unexpected error has occurred
5555: ROLLBACK TO trans_org_name;
5552: WHEN OTHERS THEN
5553: --
5554: -- A validation or unexpected error has occurred
5555: ROLLBACK TO trans_org_name;
5556: hr_utility.set_location(' Leaving:'||l_proc, 90);
5557: RAISE;
5558: --
5559: END trans_org_name;
5560: -- ----------------------------------------------------------------------------
5583:
5584: BEGIN
5585:
5586: --
5587: hr_utility.set_location('Entering:'|| l_proc, 10);
5588: --
5589: -- Issue a savepoint
5590: --
5591: savepoint create_company_cost_center;
5592: --
5593:
5594: l_org_information1 := substr(p_company_valueset_id||'|'||p_company||'|'||p_costcenter_valueset_id||'|'||p_costcenter,0,150);
5595:
5596: hr_utility.set_location(l_proc, 20);
5597: --
5598: -- Call Before Process User Hook
5599: --
5600: begin
5615: ,p_hook_type => 'BP'
5616: );
5617: end;
5618: --
5619: hr_utility.set_location(l_proc, 30);
5620: --
5621: create_org_classification
5622: ( p_effective_date => p_effective_date
5623: ,p_organization_id => p_organization_id
5625: ,p_org_information_id => p_ori_org_information_id
5626: ,p_object_version_number => p_ori_object_version_number
5627: );
5628: --
5629: hr_utility.set_location(l_proc, 40);
5630: --
5631:
5632: IF ( p_company_valueset_id is NOT NULL ) OR
5633: ( p_company is NOT NULL ) OR
5648: );
5649:
5650: END IF;
5651: --
5652: hr_utility.set_location(l_proc, 50);
5653: --
5654: -- Call After Process User Hook
5655: --
5656: begin
5675: ,p_hook_type => 'AP'
5676: );
5677: end;
5678: --
5679: hr_utility.set_location(l_proc, 60);
5680: --
5681: --
5682: -- When in validation only mode raise the Validate_Enabled exception
5683: --
5685: RAISE hr_api.validate_enabled;
5686: END IF;
5687: --
5688: --
5689: hr_utility.set_location(' Leaving:'||l_proc, 70);
5690: --
5691: EXCEPTION
5692: --
5693: WHEN hr_api.validate_enabled THEN
5705: p_ori_org_information_id := null;
5706: p_ori_object_version_number := null;
5707: p_org_information_id := null;
5708: p_object_version_number := null;
5709: hr_utility.set_location(' Leaving:'||l_proc, 80);
5710: WHEN OTHERS THEN
5711: --
5712: -- A validation or unexpected error has occurred
5713: ROLLBACK TO create_company_cost_center;
5715: p_ori_org_information_id := null;
5716: p_ori_object_version_number := null;
5717: p_org_information_id := null;
5718: p_object_version_number := null;
5719: hr_utility.set_location(' Leaving:'||l_proc, 90);
5720: RAISE;
5721: --
5722: END create_company_cost_center;
5723: --
5761: l_date_from DATE;
5762: --
5763: BEGIN
5764: --
5765: hr_utility.set_location('Entering:'|| l_proc, 10);
5766: --
5767: -- Issue a savepoint
5768: --
5769: savepoint create_not_usable_ou_internal;
5767: -- Issue a savepoint
5768: --
5769: savepoint create_not_usable_ou_internal;
5770: --
5771: hr_utility.set_location(l_proc, 15);
5772: --
5773: -- All date input parameters must be truncated to remove time elements
5774: --
5775: l_date_from := trunc (p_date_from);
5779: --
5780: l_language_code := p_language_code;
5781: hr_api.validate_language_code(p_language_code => l_language_code);
5782: --
5783: hr_utility.set_location(l_proc, 20);
5784: --
5785: -- Process Logic
5786: --
5787: hr_organization_api.create_organization(
5816: ,p_org_information6 => 'N' --Usable N=Not Usable
5817: ,p_org_information_id => l_org_information_id
5818: ,p_object_version_number => l_object_version_number);
5819: --
5820: hr_utility.set_location(l_proc, 70);
5821: --
5822: -- When in validation only mode raise the Validate_Enabled exception
5823: --
5824: IF p_validate THEN
5829: --
5830: p_organization_id := l_organization_id;
5831: p_object_version_number := l_object_version_number;
5832: --
5833: hr_utility.set_location(' Leaving:'||l_proc, 80);
5834: --
5835: EXCEPTION
5836: --
5837: WHEN hr_api.validate_enabled THEN
5846: -- when validation only mode is being used.)
5847: --
5848: p_organization_id := NULL;
5849: p_object_version_number := NULL;
5850: hr_utility.set_location(' Leaving:'||l_proc, 80);
5851: WHEN OTHERS THEN
5852: --
5853: -- A validation or unexpected error has occurred
5854: ROLLBACK TO create_not_usable_ou_internal;
5854: ROLLBACK TO create_not_usable_ou_internal;
5855: -- Set OUT parameters
5856: p_organization_id := NULL;
5857: p_object_version_number := NULL;
5858: hr_utility.set_location(' Leaving:'||l_proc, 90);
5859: RAISE;
5860: --
5861: END create_not_usable_ou_internal;
5862: --------------------------------------------------------------------------------