[Home] [Help]
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: --
3432: where hoi.org_information_id = p_org_information_id
3433: and hoi.org_information_context = p_org_info_type_code;
3434: BEGIN
3435: --
3436: hr_utility.set_location('Entering:'|| l_proc, 10);
3437: --
3438: -- Issue a savepoint.
3439: --
3440: savepoint update_org_information;
3438: -- Issue a savepoint.
3439: --
3440: savepoint update_org_information;
3441: --
3442: hr_utility.set_location(l_proc, 20);
3443:
3444: --Fix for bug9064403
3445: l_effective_date := trunc(p_effective_date);
3446: hr_kflex_utility.set_session_date
3456: -- OR p_org_info_type_code = 'Operating Unit Information'
3457: OR p_org_info_type_code = 'Canada Employer Identification'
3458: OR p_org_info_type_code = 'FPT_BRANCH_INFO'
3459: OR p_org_info_type_code = 'FPT_BANK_INFO' THEN
3460: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3461: hr_utility.raise_error;
3462: END IF;
3463: --
3464: open csr_check_ou;
3457: OR p_org_info_type_code = 'Canada Employer Identification'
3458: OR p_org_info_type_code = 'FPT_BRANCH_INFO'
3459: OR p_org_info_type_code = 'FPT_BANK_INFO' THEN
3460: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3461: hr_utility.raise_error;
3462: END IF;
3463: --
3464: open csr_check_ou;
3465: IF csr_check_ou%notfound then
3462: END IF;
3463: --
3464: open csr_check_ou;
3465: IF csr_check_ou%notfound then
3466: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3467: hr_utility.raise_error;
3468: END IF;
3469:
3470: hr_utility.set_location(l_proc, 30);
3463: --
3464: open csr_check_ou;
3465: IF csr_check_ou%notfound then
3466: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3467: hr_utility.raise_error;
3468: END IF;
3469:
3470: hr_utility.set_location(l_proc, 30);
3471: --
3466: hr_utility.set_message(800, 'HR_289005_INFO_TYPE_NONUPD');
3467: hr_utility.raise_error;
3468: END IF;
3469:
3470: hr_utility.set_location(l_proc, 30);
3471: --
3472: -- Call Before Process User Hook
3473: --
3474: begin
3525: ,p_hook_type => 'BP'
3526: );
3527: end;
3528: --
3529: hr_utility.set_location(l_proc, 40);
3530: --
3531: -- Update row in HR_ORGANIZATION_INFORMATION Table
3532: --
3533: hr_ori_upd.upd(
3577: p_attribute20 => p_attribute20,
3578: p_object_version_number => l_object_version_number
3579: );
3580: --
3581: hr_utility.set_location(l_proc, 50);
3582: --
3583: -- Call After Process User Hook
3584: --
3585: begin
3636: ,p_hook_type => 'AP'
3637: );
3638: end;
3639: --
3640: hr_utility.set_location(l_proc, 60);
3641: --
3642: -- When in validation only mode raise the Validate_Enabled exception
3643: --
3644: IF p_validate THEN
3644: IF p_validate THEN
3645: RAISE hr_api.validate_enabled;
3646: END IF;
3647: --
3648: hr_utility.set_location(l_proc, 70);
3649: --
3650: -- Set all output arguments. If p_validate was TRUE, this bit is
3651: -- never reached, so p_object_version_number is passed back unchanged.
3652: --
3656: (p_session_id => l_session_id);
3657: --
3658:
3659: --
3660: hr_utility.set_location(' Leaving:'||l_proc, 80);
3661: --
3662: EXCEPTION
3663: --
3664: WHEN hr_api.validate_enabled THEN
3672: -- (Any key or derived arguments must be set to null
3673: -- when validation only mode is being used.)
3674: -- Reset IN OUT parameters.
3675: p_object_version_number := l_temp_ovn;
3676: hr_utility.set_location(' Leaving:'||l_proc, 80);
3677: WHEN OTHERS THEN
3678: --
3679: -- A validation or unexpected error has occurred
3680: ROLLBACK TO update_org_information;
3679: -- A validation or unexpected error has occurred
3680: ROLLBACK TO update_org_information;
3681: -- Reset IN OUT parameters.
3682: p_object_version_number := l_temp_ovn;
3683: hr_utility.set_location(' Leaving:'||l_proc, 90);
3684: RAISE;
3685: --
3686: --
3687: END update_org_information;
3756: l_business_group_id number;
3757: --
3758: BEGIN
3759: --
3760: hr_utility.set_location('Entering:'|| l_proc, 10);
3761: --
3762: -- Issue a savepoint.
3763: --
3764: open c1;
3773: close c1;
3774: --
3775: savepoint update_org_information;
3776: --
3777: hr_utility.set_location(l_proc, 20);
3778: --
3779: -- Call Before Process User Hook
3780: --
3781: begin
3836: ,p_hook_type => 'BP'
3837: );
3838: end;
3839: --
3840: hr_utility.set_location(l_proc, 40);
3841: --
3842: -- Update row in HR_ORGANIZATION_INFORMATION Table
3843: --
3844: hr_ori_upd.upd
3887: ,p_attribute19 => p_attribute19
3888: ,p_attribute20 => p_attribute20
3889: ,p_object_version_number => l_object_version_number);
3890: --
3891: hr_utility.set_location(l_proc, 50);
3892: --
3893: -- Set the warning parameter if a gap occurred
3894: --
3895: l_warning := false;
3973: ,p_hook_type => 'AP');
3974: --
3975: end;
3976: --
3977: hr_utility.set_location(l_proc, 60);
3978: --
3979: -- When in validation only mode raise the Validate_Enabled exception
3980: --
3981: IF p_validate THEN
3981: IF p_validate THEN
3982: RAISE hr_api.validate_enabled;
3983: END IF;
3984: --
3985: hr_utility.set_location(l_proc, 70);
3986: --
3987: -- Set all output arguments. If p_validate was TRUE, this bit is
3988: -- never reached, so p_object_version_number is passed back unchanged.
3989: --
3989: --
3990: p_object_version_number := l_object_version_number;
3991: p_warning := l_warning;
3992: --
3993: hr_utility.set_location(' Leaving:'||l_proc, 80);
3994: --
3995: EXCEPTION
3996: --
3997: WHEN hr_api.validate_enabled THEN
4005: -- (Any key or derived arguments must be set to null
4006: -- when validation only mode is being used.)
4007: p_object_version_number := l_temp_ovn;
4008: p_warning := l_warning;
4009: hr_utility.set_location(' Leaving:'||l_proc, 80);
4010: WHEN OTHERS THEN
4011: --
4012: -- A validation or unexpected error has occurred
4013: ROLLBACK TO update_org_information;
4012: -- A validation or unexpected error has occurred
4013: ROLLBACK TO update_org_information;
4014: p_object_version_number := l_temp_ovn;
4015: p_warning := null;
4016: hr_utility.set_location(' Leaving:'||l_proc, 90);
4017: RAISE;
4018: --
4019: END update_org_manager;
4020: --
4034: l_temp_ovn number := p_object_version_number;
4035: --
4036: begin
4037: --
4038: hr_utility.set_location('Entering:'|| l_proc, 10);
4039: --
4040: -- Issue a savepoint if operating in validation only mode
4041: --
4042: savepoint delete_org_manager;
4040: -- Issue a savepoint if operating in validation only mode
4041: --
4042: savepoint delete_org_manager;
4043: --
4044: hr_utility.set_location(l_proc, 20);
4045: --
4046: -- Process Logic
4047: --
4048: l_object_version_number := p_object_version_number;
4091: -- End of API User Hook for the after hook of delete_org_manager
4092: --
4093: end;
4094: --
4095: hr_utility.set_location(l_proc, 60);
4096: --
4097: -- When in validation only mode raise the Validate_Enabled exception
4098: --
4099: if p_validate then
4099: if p_validate then
4100: raise hr_api.validate_enabled;
4101: end if;
4102: --
4103: hr_utility.set_location(' Leaving:'||l_proc, 70);
4104: --
4105: exception
4106: --
4107: when hr_api.validate_enabled then
4149: l_object_version_number hr_organization_information.object_version_number%TYPE;
4150: --
4151: BEGIN
4152: --
4153: hr_utility.set_location('Entering:'|| l_proc, 10);
4154: --
4155: -- Issue a savepoint
4156: --
4157: savepoint create_org_class_internal;
4155: -- Issue a savepoint
4156: --
4157: savepoint create_org_class_internal;
4158: --
4159: hr_utility.set_location(l_proc, 15);
4160: --
4161: -- added the hook for create_org_class_internal
4162: begin
4163: hr_organization_bk10.create_org_class_internal_b
4175: ,p_hook_type => 'BP'
4176: );
4177: end;
4178: --
4179: hr_utility.set_location(l_proc, 20);
4180: --
4181: -- Process Logic
4182: --
4183: -- Check if it is proper classification first
4187: p_org_classif_code => p_org_classif_code,
4188: p_parent_call => 'INTERNAL',
4189: p_organization_id => p_organization_id);
4190: --
4191: hr_utility.set_location(l_proc, 30);
4192: --
4193: hr_ori_ins.ins(
4194: p_effective_date => p_effective_date,
4195: p_org_information_context => 'CLASS',
4199: p_org_information_id => l_org_information_id,
4200: p_object_version_number => l_object_version_number
4201: );
4202: --
4203: hr_utility.set_location(l_proc, 60);
4204: --
4205: -- When in validation only mode raise the Validate_Enabled exception
4206: --
4207: IF p_validate THEN
4212: --
4213: p_org_information_id := l_org_information_id;
4214: p_object_version_number := l_object_version_number;
4215: --
4216: hr_utility.set_location(l_proc, 70);
4217:
4218: begin
4219:
4220: hr_organization_bk10.create_org_class_internal_a
4233: );
4234: end;
4235:
4236: --
4237: hr_utility.set_location(' Leaving:'||l_proc, 80);
4238: --
4239: EXCEPTION
4240: --
4241: WHEN hr_api.validate_enabled THEN
4250: -- when validation only mode is being used.)
4251: --
4252: p_org_information_id := NULL;
4253: p_object_version_number := NULL;
4254: hr_utility.set_location(' Leaving:'||l_proc, 80);
4255: WHEN OTHERS THEN
4256: --
4257: -- A validation or unexpected error has occurred
4258: ROLLBACK TO create_org_class_internal;
4255: WHEN OTHERS THEN
4256: --
4257: -- A validation or unexpected error has occurred
4258: ROLLBACK TO create_org_class_internal;
4259: hr_utility.set_location(' Leaving:'||l_proc, 90);
4260: RAISE;
4261: --
4262: END create_org_class_internal;
4263: --
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);
4312: --
4313: -- Issue a savepoint
4314: --
4315: savepoint create_business_group;
4313: -- Issue a savepoint
4314: --
4315: savepoint create_business_group;
4316: --
4317: hr_utility.set_location(l_proc, 15);
4318: --
4319: -- All date input parameters must be truncated to remove time elements
4320: --
4321: l_date_from := trunc (p_date_from);
4327: --
4328: l_language_code := p_language_code;
4329: hr_api.validate_language_code(p_language_code => l_language_code);
4330: --
4331: hr_utility.set_location(l_proc, 20);
4332: --
4333: -- Process Logic
4334: --
4335: --
4387: ,p_org_information16 => p_cwk_gen_method
4388: ,p_org_information_id => l_org_information_id
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;
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);
4398: --
4399: -- When in validation only mode raise the Validate_Enabled exception
4400: --
4401: IF p_validate THEN
4406: --
4407: p_organization_id := l_organization_id;
4408: p_object_version_number := l_ovn_bg + 1;
4409: --
4410: hr_utility.set_location(' Leaving:'||l_proc, 80);
4411: --
4412: EXCEPTION
4413: --
4414: WHEN hr_api.validate_enabled THEN
4423: -- when validation only mode is being used.)
4424: --
4425: p_organization_id := NULL;
4426: p_object_version_number := NULL;
4427: hr_utility.set_location(' Leaving:'||l_proc, 80);
4428: WHEN OTHERS THEN
4429: --
4430: -- A validation or unexpected error has occurred
4431: ROLLBACK TO create_business_group;
4431: ROLLBACK TO create_business_group;
4432: -- Set OUT parameters
4433: p_organization_id := NULL;
4434: p_object_version_number := NULL;
4435: hr_utility.set_location(' Leaving:'||l_proc, 90);
4436: RAISE;
4437: --
4438: END create_business_group;
4439: --
4486: --
4487:
4488: BEGIN
4489:
4490: hr_utility.set_location(' Entering:'||l_proc, 10);
4491:
4492: --TO CHECK IF NONE OF THE IN PARAMETERS ARE ENTERED
4493:
4494: if (p_person_id is null
4494: if (p_person_id is null
4495: and p_assignment_id is null
4496: and p_organization_id is null) then
4497:
4498: hr_utility.set_message(800,'PER_449733_MUST_ENTR_ONE_PAR');
4499: hr_utility.raise_error;
4500:
4501: end if;
4502:
4495: and p_assignment_id is null
4496: and p_organization_id is null) then
4497:
4498: hr_utility.set_message(800,'PER_449733_MUST_ENTR_ONE_PAR');
4499: hr_utility.raise_error;
4500:
4501: end if;
4502:
4503: hr_utility.set_location(l_proc, 20);
4499: hr_utility.raise_error;
4500:
4501: end if;
4502:
4503: hr_utility.set_location(l_proc, 20);
4504:
4505: --TO CHECK IF MORE THAN ONE PARAMETER HAS BEEN ENTERED
4506:
4507: if (p_person_id is not null
4509: or p_person_id is not null
4510: and p_organization_id is not null
4511: or p_assignment_id is not null
4512: and p_organization_id is not null) then
4513: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4514: hr_utility.raise_error;
4515: end if;
4516:
4517: hr_utility.set_location(l_proc, 30);
4510: and p_organization_id is not null
4511: or p_assignment_id is not null
4512: and p_organization_id is not null) then
4513: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4514: hr_utility.raise_error;
4515: end if;
4516:
4517: hr_utility.set_location(l_proc, 30);
4518:
4513: hr_utility.set_message(800,'PER_449734_ENTR_ONLY_ONE_PAR');
4514: hr_utility.raise_error;
4515: end if;
4516:
4517: hr_utility.set_location(l_proc, 30);
4518:
4519: if p_person_id is not null then
4520:
4521: hr_utility.set_location(l_proc, 40);
4517: hr_utility.set_location(l_proc, 30);
4518:
4519: if p_person_id is not null then
4520:
4521: hr_utility.set_location(l_proc, 40);
4522:
4523: open ou_person;
4524: fetch ou_person into l_operating_unit_id;
4525: if ou_person%notfound then
4523: open ou_person;
4524: fetch ou_person into l_operating_unit_id;
4525: if ou_person%notfound then
4526:
4527: hr_utility.set_location(l_proc, 50);
4528:
4529: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4530:
4531: end if;
4530:
4531: end if;
4532: close ou_person;
4533:
4534: hr_utility.set_location(l_proc, 60);
4535:
4536: elsif p_assignment_id is not null then
4537:
4538: hr_utility.set_location(l_proc, 70);
4534: hr_utility.set_location(l_proc, 60);
4535:
4536: elsif p_assignment_id is not null then
4537:
4538: hr_utility.set_location(l_proc, 70);
4539:
4540: open ou_assignment;
4541: fetch ou_assignment into l_operating_unit_id;
4542: if ou_assignment%notfound then
4540: open ou_assignment;
4541: fetch ou_assignment into l_operating_unit_id;
4542: if ou_assignment%notfound then
4543:
4544: hr_utility.set_location(l_proc, 80);
4545:
4546: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4547:
4548: end if;
4547:
4548: end if;
4549: close ou_assignment;
4550:
4551: hr_utility.set_location(l_proc, 90);
4552: else
4553:
4554: open ou_organization;
4555: fetch ou_organization into l_operating_unit_id;
4554: open ou_organization;
4555: fetch ou_organization into l_operating_unit_id;
4556: if ou_organization%notfound then
4557:
4558: hr_utility.set_location(l_proc, 100);
4559:
4560: l_operating_unit_id := nvl(fnd_profile.value('ORG_ID'),-99);
4561:
4562: end if;
4561:
4562: end if;
4563: close ou_organization;
4564:
4565: hr_utility.set_location(l_proc, 110);
4566: end if;
4567:
4568: hr_utility.set_location(l_proc, 120);
4569:
4564:
4565: hr_utility.set_location(l_proc, 110);
4566: end if;
4567:
4568: hr_utility.set_location(l_proc, 120);
4569:
4570: if nvl(l_operating_unit_id,-99) <> -99 then
4571:
4572: hr_utility.set_location(l_proc, 130);
4568: hr_utility.set_location(l_proc, 120);
4569:
4570: if nvl(l_operating_unit_id,-99) <> -99 then
4571:
4572: hr_utility.set_location(l_proc, 130);
4573:
4574: return l_operating_unit_id;
4575:
4576: else
4574: return l_operating_unit_id;
4575:
4576: else
4577:
4578: hr_utility.set_message(800,'PER_449732_UNABLE_TO_DERI_OU');
4579: hr_utility.raise_error;
4580:
4581: end if;
4582:
4575:
4576: else
4577:
4578: hr_utility.set_message(800,'PER_449732_UNABLE_TO_DERI_OU');
4579: hr_utility.raise_error;
4580:
4581: end if;
4582:
4583: hr_utility.set_location(' Leaving:'||l_proc, 140);
4579: hr_utility.raise_error;
4580:
4581: end if;
4582:
4583: hr_utility.set_location(' Leaving:'||l_proc, 140);
4584:
4585: return l_operating_unit_id;
4586:
4587: END get_operating_unit;
4620: l_date_from DATE;
4621: --
4622: BEGIN
4623: --
4624: hr_utility.set_location('Entering:'|| l_proc, 10);
4625: --
4626: -- Issue a savepoint
4627: --
4628: savepoint create_operating_unit;
4626: -- Issue a savepoint
4627: --
4628: savepoint create_operating_unit;
4629: --
4630: hr_utility.set_location(l_proc, 15);
4631: --
4632: -- All date input parameters must be truncated to remove time elements
4633: --
4634: l_date_from := trunc (p_date_from);
4640: --
4641: l_language_code := p_language_code;
4642: hr_api.validate_language_code(p_language_code => l_language_code);
4643: --
4644: hr_utility.set_location(l_proc, 20);
4645: --
4646: -- Process Logic
4647: --
4648: --
4713: ,p_org_information_id => l_org_information_id
4714: ,p_object_version_number => l_object_version_number);
4715: --
4716: --
4717: hr_utility.set_location(l_proc, 70);
4718: --
4719: -- When in validation only mode raise the Validate_Enabled exception
4720: --
4721: IF p_validate THEN
4728: -- Changed for the bug 5446483 - Start
4729: --p_object_version_number := l_object_version_number;
4730: -- Changed for the bug 5446483 - end
4731: --
4732: hr_utility.set_location(' Leaving:'||l_proc, 80);
4733: --
4734: EXCEPTION
4735: --
4736: WHEN hr_api.validate_enabled THEN
4745: -- when validation only mode is being used.)
4746: --
4747: p_organization_id := NULL;
4748: p_object_version_number := NULL;
4749: hr_utility.set_location(' Leaving:'||l_proc, 80);
4750: WHEN OTHERS THEN
4751: --
4752: -- A validation or unexpected error has occurred
4753: ROLLBACK TO create_operating_unit;
4753: ROLLBACK TO create_operating_unit;
4754: -- Set OUT parameters
4755: p_organization_id := NULL;
4756: p_object_version_number := NULL;
4757: hr_utility.set_location(' Leaving:'||l_proc, 90);
4758: RAISE;
4759: --
4760: END create_operating_unit;
4761: --
4808: and organization_id = p_organization_id;
4809:
4810: BEGIN
4811: --
4812: hr_utility.set_location('Entering:'|| l_proc, 10);
4813: --
4814: -- Issue a savepoint
4815: --
4816: savepoint update_operating_unit;
4877: end if;
4878:
4879: close csr_check_update;
4880:
4881: hr_utility.set_location(l_proc, 20);
4882: --
4883: -- When in validation only mode raise the Validate_Enabled exception
4884: --
4885: IF p_validate THEN
4895:
4896:
4897: p_update_prim_ledger_warning := l_update_prim_ledger_warning;
4898: --
4899: hr_utility.set_location(' Leaving:'||l_proc, 30);
4900: --
4901: EXCEPTION
4902: --
4903: WHEN hr_api.validate_enabled THEN
4912: -- when validation only mode is being used.)
4913: -- Reset IN OUT parameters.
4914: p_object_version_number := l_object_version_number;
4915: p_update_prim_ledger_warning :=false;
4916: hr_utility.set_location(' Leaving:'||l_proc, 40);
4917: WHEN OTHERS THEN
4918: --
4919: -- A validation or unexpected error has occurred
4920: ROLLBACK TO update_operating_unit;
4921: -- Set OUT parameters
4922: -- Reset IN OUT parameters.
4923: p_object_version_number := l_object_version_number;
4924: p_update_prim_ledger_warning :=false;
4925: hr_utility.set_location(' Leaving:'||l_proc, 50);
4926: RAISE;
4927: --
4928:
4929: END update_operating_unit;
4961: l_date_from DATE;
4962: --
4963: BEGIN
4964: --
4965: hr_utility.set_location('Entering:'|| l_proc, 10);
4966:
4967: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4968: hr_utility.raise_error;
4969: /*
4963: BEGIN
4964: --
4965: hr_utility.set_location('Entering:'|| l_proc, 10);
4966:
4967: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4968: hr_utility.raise_error;
4969: /*
4970: --
4971: -- Issue a savepoint
4964: --
4965: hr_utility.set_location('Entering:'|| l_proc, 10);
4966:
4967: hr_utility.set_message(800, 'HR_449740_LEG_ENT_API_OBSOLETE');
4968: hr_utility.raise_error;
4969: /*
4970: --
4971: -- Issue a savepoint
4972: --
4971: -- Issue a savepoint
4972: --
4973: savepoint create_legal_entity;
4974: --
4975: hr_utility.set_location(l_proc, 15);
4976: --
4977: -- All date input parameters must be truncated to remove time elements
4978: --
4979: l_date_from := trunc (p_date_from);
4985: --
4986: l_language_code := p_language_code;
4987: hr_api.validate_language_code(p_language_code => l_language_code);
4988: --
4989: hr_utility.set_location(l_proc, 20);
4990: --
4991: -- Process Logic
4992: --
4993: --
5029: ,p_org_information_id => l_org_information_id
5030: ,p_object_version_number => l_object_version_number);
5031: --
5032: --
5033: hr_utility.set_location(l_proc, 70);
5034: --
5035: -- When in validation only mode raise the Validate_Enabled exception
5036: --
5037: IF p_validate THEN
5042: --
5043: p_organization_id := l_organization_id;
5044: p_object_version_number := l_object_version_number;
5045: --
5046: hr_utility.set_location(' Leaving:'||l_proc, 80);
5047: --
5048: EXCEPTION
5049: --
5050: WHEN hr_api.validate_enabled THEN
5059: -- when validation only mode is being used.)
5060: --
5061: p_organization_id := NULL;
5062: p_object_version_number := NULL;
5063: hr_utility.set_location(' Leaving:'||l_proc, 80);
5064: WHEN OTHERS THEN
5065: --
5066: -- A validation or unexpected error has occurred
5067: ROLLBACK TO create_legal_entity;
5067: ROLLBACK TO create_legal_entity;
5068: -- Set OUT parameters
5069: p_organization_id := NULL;
5070: p_object_version_number := NULL;
5071: hr_utility.set_location(' Leaving:'||l_proc, 90);
5072: RAISE;
5073: --
5074: */
5075: END create_legal_entity;
5112: l_exists VARCHAR2(1) := 'N';
5113: --
5114: BEGIN
5115: --
5116: hr_utility.set_location('Entering:'|| l_proc, 10);
5117: --
5118: --
5119: -- Check business_group_id presence
5120: --
5129: EXCEPTION
5130: WHEN NO_DATA_FOUND THEN NULL;
5131: END;
5132: --
5133: hr_utility.set_location(l_proc, 20);
5134: --
5135: IF l_exists = 'N' THEN
5136: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5137: hr_utility.raise_error;
5132: --
5133: hr_utility.set_location(l_proc, 20);
5134: --
5135: IF l_exists = 'N' THEN
5136: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5137: hr_utility.raise_error;
5138: END IF;
5139: --
5140: --
5133: hr_utility.set_location(l_proc, 20);
5134: --
5135: IF l_exists = 'N' THEN
5136: hr_utility.set_message(800, 'HR_7208_API_BUS_GRP_INVALID');
5137: hr_utility.raise_error;
5138: END IF;
5139: --
5140: --
5141: hr_utility.set_location('Leaving:'||l_proc, 30);
5137: hr_utility.raise_error;
5138: END IF;
5139: --
5140: --
5141: hr_utility.set_location('Leaving:'||l_proc, 30);
5142: --
5143: END chk_bgr_id;
5144: --
5145: --
5163: l_org_information_id hr_organization_information.org_information_id%TYPE;
5164: --
5165: BEGIN
5166: --
5167: hr_utility.set_location('Entering:'|| l_proc, 10);
5168: --
5169: -- Issue a savepoint
5170: --
5171: savepoint create_bgr_classif;
5174: --
5175: chk_bgr_id(p_business_group_id);
5176: --
5177: --
5178: hr_utility.set_location(l_proc, 20);
5179: --
5180: -- Process Logic
5181: --
5182: create_org_class_internal(
5216: ,p_org_information_id => l_org_information_id
5217: ,p_object_version_number => l_object_version_number);
5218: --
5219: --
5220: hr_utility.set_location(l_proc, 70);
5221: --
5222: -- When in validation only mode raise the Validate_Enabled exception
5223: --
5224: IF p_validate THEN
5225: RAISE hr_api.validate_enabled;
5226: END IF;
5227: --
5228: --
5229: hr_utility.set_location(' Leaving:'||l_proc, 80);
5230: --
5231: EXCEPTION
5232: --
5233: WHEN hr_api.validate_enabled THEN
5240: -- Only set output warning arguments
5241: -- (Any key or derived arguments must be set to null
5242: -- when validation only mode is being used.)
5243: --
5244: hr_utility.set_location(' Leaving:'||l_proc, 80);
5245: WHEN OTHERS THEN
5246: --
5247: -- A validation or unexpected error has occurred
5248: ROLLBACK TO create_bgr_classif;
5245: WHEN OTHERS THEN
5246: --
5247: -- A validation or unexpected error has occurred
5248: ROLLBACK TO create_bgr_classif;
5249: hr_utility.set_location(' Leaving:'||l_proc, 90);
5250: RAISE;
5251: --
5252: END create_bgr_classif;
5253: --
5289: l_exists VARCHAR2(1) := 'N';
5290: --
5291: BEGIN
5292: --
5293: hr_utility.set_location('Entering:'|| l_proc, 10);
5294: --
5295: --
5296: -- Check organization_id presence
5297: --
5306: EXCEPTION
5307: WHEN NO_DATA_FOUND THEN NULL;
5308: END;
5309: --
5310: hr_utility.set_location(l_proc, 20);
5311: --
5312: IF l_exists = 'N' THEN
5313: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5314: hr_utility.raise_error;
5309: --
5310: hr_utility.set_location(l_proc, 20);
5311: --
5312: IF l_exists = 'N' THEN
5313: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5317: --
5310: hr_utility.set_location(l_proc, 20);
5311: --
5312: IF l_exists = 'N' THEN
5313: hr_utility.set_message(800, 'HR_289002_INV_ORG_ID');
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5317: --
5318: hr_utility.set_location('Leaving:'||l_proc, 30);
5314: hr_utility.raise_error;
5315: END IF;
5316: --
5317: --
5318: hr_utility.set_location('Leaving:'||l_proc, 30);
5319: --
5320: END chk_organization_id;
5321: --
5322: --
5340: l_org_information_id hr_organization_information.org_information_id%TYPE;
5341: --
5342: BEGIN
5343: --
5344: hr_utility.set_location('Entering:'|| l_proc, 10);
5345: --
5346: -- Issue a savepoint
5347: --
5348: savepoint create_legal_entity_classif;
5351: --
5352: chk_organization_id(p_organization_id);
5353: --
5354: --
5355: hr_utility.set_location(l_proc, 20);
5356: --
5357: -- Process Logic
5358: --
5359: create_org_class_internal(
5373: ,p_org_information1 => p_set_of_books_id
5374: ,p_org_information_id => l_org_information_id
5375: ,p_object_version_number => l_object_version_number);
5376: --
5377: hr_utility.set_location(l_proc, 70);
5378: --
5379: -- When in validation only mode raise the Validate_Enabled exception
5380: --
5381: IF p_validate THEN
5382: RAISE hr_api.validate_enabled;
5383: END IF;
5384: --
5385: --
5386: hr_utility.set_location(' Leaving:'||l_proc, 80);
5387: --
5388: EXCEPTION
5389: --
5390: WHEN hr_api.validate_enabled THEN
5397: -- Only set output warning arguments
5398: -- (Any key or derived arguments must be set to null
5399: -- when validation only mode is being used.)
5400: --
5401: hr_utility.set_location(' Leaving:'||l_proc, 80);
5402: WHEN OTHERS THEN
5403: --
5404: -- A validation or unexpected error has occurred
5405: ROLLBACK TO create_legal_entity_classif;
5402: WHEN OTHERS THEN
5403: --
5404: -- A validation or unexpected error has occurred
5405: ROLLBACK TO create_legal_entity_classif;
5406: hr_utility.set_location(' Leaving:'||l_proc, 90);
5407: RAISE;
5408: --
5409: END create_legal_entity_classif;
5410: --
5431: l_org_information_id hr_organization_information.org_information_id%TYPE;
5432: --
5433: BEGIN
5434: --
5435: hr_utility.set_location('Entering:'|| l_proc, 10);
5436: --
5437: -- Issue a savepoint
5438: --
5439: savepoint create_oper_unit_classif;
5442: --
5443: chk_organization_id(p_organization_id);
5444: --
5445: --
5446: hr_utility.set_location(l_proc, 20);
5447: --
5448: -- Process Logic
5449: --
5450: create_org_class_internal(
5467: ,p_org_information_id => l_org_information_id
5468: ,p_object_version_number => l_object_version_number);
5469: --
5470: --
5471: hr_utility.set_location(l_proc, 70);
5472: --
5473: -- When in validation only mode raise the Validate_Enabled exception
5474: --
5475: IF p_validate THEN
5476: RAISE hr_api.validate_enabled;
5477: END IF;
5478: --
5479: --
5480: hr_utility.set_location(' Leaving:'||l_proc, 80);
5481: --
5482: EXCEPTION
5483: --
5484: WHEN hr_api.validate_enabled THEN
5491: -- Only set output warning arguments
5492: -- (Any key or derived arguments must be set to null
5493: -- when validation only mode is being used.)
5494: --
5495: hr_utility.set_location(' Leaving:'||l_proc, 80);
5496: WHEN OTHERS THEN
5497: --
5498: -- A validation or unexpected error has occurred
5499: ROLLBACK TO create_oper_unit_classif;
5496: WHEN OTHERS THEN
5497: --
5498: -- A validation or unexpected error has occurred
5499: ROLLBACK TO create_oper_unit_classif;
5500: hr_utility.set_location(' Leaving:'||l_proc, 90);
5501: RAISE;
5502: --
5503: END create_oper_unit_classif;
5504: --
5524: l_language_code hr_all_organization_units_tl.language%TYPE;
5525: --
5526: BEGIN
5527: --
5528: hr_utility.set_location('Entering:'|| l_proc, 10);
5529: --
5530: -- Issue a savepoint
5531: --
5532: savepoint trans_org_name;
5530: -- Issue a savepoint
5531: --
5532: savepoint trans_org_name;
5533: --
5534: hr_utility.set_location(l_proc, 15);
5535: --
5536: --
5537: -- Validate the language parameter. l_language_code should be passed to functions
5538: -- instead of p_language_code from now on, to allow an IN OUT parameter to
5540: --
5541: l_language_code := p_language_code;
5542: hr_api.validate_language_code(p_language_code => l_language_code);
5543: --
5544: hr_utility.set_location(l_proc, 20);
5545: --
5546: --
5547: --
5548: hr_api.mandatory_arg_error
5575: p_language_code => p_language_code,
5576: p_organization_id => p_organization_id,
5577: p_name => p_name);
5578: --
5579: hr_utility.set_location(l_proc, 60);
5580: --
5581: -- When in validation only mode raise the Validate_Enabled exception
5582: --
5583: IF p_validate THEN
5586: --
5587: -- Set all output arguments
5588: --
5589: --
5590: hr_utility.set_location(' Leaving:'||l_proc, 70);
5591: --
5592: EXCEPTION
5593: --
5594: WHEN hr_api.validate_enabled THEN
5601: -- Only set output warning arguments
5602: -- (Any key or derived arguments must be set to null
5603: -- when validation only mode is being used.)
5604: --
5605: hr_utility.set_location(' Leaving:'||l_proc, 80);
5606: WHEN OTHERS THEN
5607: --
5608: -- A validation or unexpected error has occurred
5609: ROLLBACK TO trans_org_name;
5606: WHEN OTHERS THEN
5607: --
5608: -- A validation or unexpected error has occurred
5609: ROLLBACK TO trans_org_name;
5610: hr_utility.set_location(' Leaving:'||l_proc, 90);
5611: RAISE;
5612: --
5613: END trans_org_name;
5614: -- ----------------------------------------------------------------------------
5637:
5638: BEGIN
5639:
5640: --
5641: hr_utility.set_location('Entering:'|| l_proc, 10);
5642: --
5643: -- Issue a savepoint
5644: --
5645: savepoint create_company_cost_center;
5646: --
5647:
5648: l_org_information1 := substr(p_company_valueset_id||'|'||p_company||'|'||p_costcenter_valueset_id||'|'||p_costcenter,0,150);
5649:
5650: hr_utility.set_location(l_proc, 20);
5651: --
5652: -- Call Before Process User Hook
5653: --
5654: begin
5669: ,p_hook_type => 'BP'
5670: );
5671: end;
5672: --
5673: hr_utility.set_location(l_proc, 30);
5674: --
5675: create_org_classification
5676: ( p_effective_date => p_effective_date
5677: ,p_organization_id => p_organization_id
5679: ,p_org_information_id => p_ori_org_information_id
5680: ,p_object_version_number => p_ori_object_version_number
5681: );
5682: --
5683: hr_utility.set_location(l_proc, 40);
5684: --
5685:
5686: IF ( p_company_valueset_id is NOT NULL ) OR
5687: ( p_company is NOT NULL ) OR
5702: );
5703:
5704: END IF;
5705: --
5706: hr_utility.set_location(l_proc, 50);
5707: --
5708: -- Call After Process User Hook
5709: --
5710: begin
5729: ,p_hook_type => 'AP'
5730: );
5731: end;
5732: --
5733: hr_utility.set_location(l_proc, 60);
5734: --
5735: --
5736: -- When in validation only mode raise the Validate_Enabled exception
5737: --
5739: RAISE hr_api.validate_enabled;
5740: END IF;
5741: --
5742: --
5743: hr_utility.set_location(' Leaving:'||l_proc, 70);
5744: --
5745: EXCEPTION
5746: --
5747: WHEN hr_api.validate_enabled THEN
5759: p_ori_org_information_id := null;
5760: p_ori_object_version_number := null;
5761: p_org_information_id := null;
5762: p_object_version_number := null;
5763: hr_utility.set_location(' Leaving:'||l_proc, 80);
5764: WHEN OTHERS THEN
5765: --
5766: -- A validation or unexpected error has occurred
5767: ROLLBACK TO create_company_cost_center;
5769: p_ori_org_information_id := null;
5770: p_ori_object_version_number := null;
5771: p_org_information_id := null;
5772: p_object_version_number := null;
5773: hr_utility.set_location(' Leaving:'||l_proc, 90);
5774: RAISE;
5775: --
5776: END create_company_cost_center;
5777: --
5815: l_date_from DATE;
5816: --
5817: BEGIN
5818: --
5819: hr_utility.set_location('Entering:'|| l_proc, 10);
5820: --
5821: -- Issue a savepoint
5822: --
5823: savepoint create_not_usable_ou_internal;
5821: -- Issue a savepoint
5822: --
5823: savepoint create_not_usable_ou_internal;
5824: --
5825: hr_utility.set_location(l_proc, 15);
5826: --
5827: -- All date input parameters must be truncated to remove time elements
5828: --
5829: l_date_from := trunc (p_date_from);
5833: --
5834: l_language_code := p_language_code;
5835: hr_api.validate_language_code(p_language_code => l_language_code);
5836: --
5837: hr_utility.set_location(l_proc, 20);
5838: --
5839: -- Process Logic
5840: --
5841: hr_organization_api.create_organization(
5870: ,p_org_information6 => 'N' --Usable N=Not Usable
5871: ,p_org_information_id => l_org_information_id
5872: ,p_object_version_number => l_object_version_number);
5873: --
5874: hr_utility.set_location(l_proc, 70);
5875: --
5876: -- When in validation only mode raise the Validate_Enabled exception
5877: --
5878: IF p_validate THEN
5883: --
5884: p_organization_id := l_organization_id;
5885: p_object_version_number := l_object_version_number;
5886: --
5887: hr_utility.set_location(' Leaving:'||l_proc, 80);
5888: --
5889: EXCEPTION
5890: --
5891: WHEN hr_api.validate_enabled THEN
5900: -- when validation only mode is being used.)
5901: --
5902: p_organization_id := NULL;
5903: p_object_version_number := NULL;
5904: hr_utility.set_location(' Leaving:'||l_proc, 80);
5905: WHEN OTHERS THEN
5906: --
5907: -- A validation or unexpected error has occurred
5908: ROLLBACK TO create_not_usable_ou_internal;
5908: ROLLBACK TO create_not_usable_ou_internal;
5909: -- Set OUT parameters
5910: p_organization_id := NULL;
5911: p_object_version_number := NULL;
5912: hr_utility.set_location(' Leaving:'||l_proc, 90);
5913: RAISE;
5914: --
5915: END create_not_usable_ou_internal;
5916: --------------------------------------------------------------------------------