[Home] [Help]
117: between adr.date_from
118: and nvl(adr.date_to,hr_api.g_eot);
119: --
120: begin
121: hr_utility.set_location('Entering:'|| l_proc, 5);
122: --
123: -- Issue a savepoint.
124: --
125: savepoint create_person_address;
143: (p_api_name => l_proc,
144: p_argument => 'effective_date',
145: p_argument_value => p_effective_date);
146: --
147: hr_utility.set_location(l_proc, 6);
148: --
149: l_date_from := trunc(p_date_from);
150: l_date_to := trunc(p_date_to);
151: l_effective_date := trunc(p_effective_date);
230: fetch csr_bus_grp into l_business_group_id;
231: --
232: if csr_bus_grp%notfound then
233: close csr_bus_grp;
234: hr_utility.set_message(801, 'HR_7298_ADD_PERSON_INVALID');
235: hr_utility.raise_error;
236: end if;
237: close csr_bus_grp;
238: end if;
231: --
232: if csr_bus_grp%notfound then
233: close csr_bus_grp;
234: hr_utility.set_message(801, 'HR_7298_ADD_PERSON_INVALID');
235: hr_utility.raise_error;
236: end if;
237: close csr_bus_grp;
238: end if;
239: hr_utility.set_location(l_proc, 70);
235: hr_utility.raise_error;
236: end if;
237: close csr_bus_grp;
238: end if;
239: hr_utility.set_location(l_proc, 70);
240: --
241: -- Check if primary address overlap validation override mode is on
242: --
243: if p_pradd_ovlapval_override
272: --
273: end if;
274: --
275: end if;
276: hr_utility.set_location(l_proc, 80);
277: --
278: -- Insert Person Address details.
279: --
280: per_add_ins.ins
334: ,p_validate_county => p_validate_county
335: ,p_party_id => p_party_id -- HR/TCA merge
336: );
337: --
338: hr_utility.set_location(l_proc, 8);
339: begin
340: --
341: -- Start of API User Hook for the after hook of create_person_address
342: --
417: --
418: p_address_id := l_address_id;
419: p_object_version_number := l_object_version_number;
420: --
421: hr_utility.set_location(' Leaving:'||l_proc, 11);
422: exception
423: when hr_api.validate_enabled then
424: --
425: -- As the Validate_Enabled exception has been raised
511: --
512: l_proc varchar2(72) := g_package||'create_gb_person_address';
513: --
514: begin
515: hr_utility.set_location('Entering:'|| l_proc, 5);
516: --
517: -- Create Person Address details.
518: --
519: hr_person_address_api.create_person_address
569: ,p_object_version_number => p_object_version_number
570: ,p_party_id => p_party_id -- HR/TCA merge
571: );
572: --
573: hr_utility.set_location(' Leaving:'||l_proc, 10);
574: end create_gb_person_address;
575: --
576: -- ----------------------------------------------------------------------------
577: -- |-----------------------< create_us_person_address >-----------------------|
636: --
637: l_proc varchar2(72) := g_package||'create_us_person_address';
638: --
639: begin
640: hr_utility.set_location('Entering:'|| l_proc, 5);
641: --
642: -- Create Person Address details.
643: --
644: hr_person_address_api.create_person_address
696: ,p_address_id => p_address_id
697: ,p_object_version_number => p_object_version_number
698: );
699: --
700: hr_utility.set_location(' Leaving:'||l_proc, 10);
701: end create_us_person_address;
702: --
703: -- ----------------------------------------------------------------------------
704: -- |-----------------------< create_AT_person_address >-----------------------|
761: --
762: l_proc varchar2(72) := g_package||'create_AT_person_address';
763: --
764: begin
765: hr_utility.set_location('Entering:'|| l_proc, 5);
766: --
767: -- Create Person Address details.
768: --
769: hr_person_address_api.create_person_address
819: ,p_address_id => p_address_id
820: ,p_object_version_number => p_object_version_number
821: );
822: --
823: hr_utility.set_location(' Leaving:'||l_proc, 10);
824: end create_AT_person_address;
825: --
826: -- ----------------------------------------------------------------------------
827: -- |-----------------------< create_AU_person_address >-----------------------|
884: --
885: l_proc varchar2(72) := g_package||'create_AU_person_address';
886: --
887: begin
888: hr_utility.set_location('Entering:'|| l_proc, 5);
889: --
890: -- Create Person Address details.
891: --
892: hr_person_address_api.create_person_address
942: ,p_address_id => p_address_id
943: ,p_object_version_number => p_object_version_number
944: );
945: --
946: hr_utility.set_location(' Leaving:'||l_proc, 10);
947: end create_AU_person_address;
948: --
949: -- ----------------------------------------------------------------------------
950: -- |-----------------------< create_DK_person_address >-----------------------|
1006: --
1007: l_proc varchar2(72) := g_package||'create_DK_person_address';
1008: --
1009: begin
1010: hr_utility.set_location('Entering:'|| l_proc, 5);
1011: --
1012: -- Create Person Address details.
1013: --
1014: hr_person_address_api.create_person_address
1063: ,p_address_id => p_address_id
1064: ,p_object_version_number => p_object_version_number
1065: );
1066: --
1067: hr_utility.set_location(' Leaving:'||l_proc, 10);
1068: end create_DK_person_address;
1069: --
1070: -- ----------------------------------------------------------------------------
1071: -- |-----------------------< create_DE_person_address >-----------------------|
1128: --
1129: l_proc varchar2(72) := g_package||'create_DE_person_address';
1130: --
1131: begin
1132: hr_utility.set_location('Entering:'|| l_proc, 5);
1133: --
1134: -- Create Person Address details.
1135: --
1136: hr_person_address_api.create_person_address
1186: ,p_address_id => p_address_id
1187: ,p_object_version_number => p_object_version_number
1188: );
1189: --
1190: hr_utility.set_location(' Leaving:'||l_proc, 10);
1191: end create_DE_person_address;
1192: --
1193: -- ----------------------------------------------------------------------------
1194: -- |-----------------------< create_IT_person_address >-----------------------|
1251: --
1252: l_proc varchar2(72) := g_package||'create_IT_person_address';
1253: --
1254: begin
1255: hr_utility.set_location('Entering:'|| l_proc, 5);
1256: --
1257: -- Create Person Address details.
1258: --
1259: hr_person_address_api.create_person_address
1309: ,p_address_id => p_address_id
1310: ,p_object_version_number => p_object_version_number
1311: );
1312: --
1313: hr_utility.set_location(' Leaving:'||l_proc, 10);
1314: end create_IT_person_address;
1315: --
1316: -- ----------------------------------------------------------------------------
1317: -- |-----------------------< create_MX_person_address >-----------------------|
1374: --
1375: l_proc varchar2(72) := g_package||'create_MX_person_address';
1376: --
1377: begin
1378: hr_utility.set_location('Entering:'|| l_proc, 5);
1379: --
1380: -- Create Person Address details.
1381: --
1382: hr_person_address_api.create_person_address
1432: ,p_address_id => p_address_id
1433: ,p_object_version_number => p_object_version_number
1434: );
1435: --
1436: hr_utility.set_location(' Leaving:'||l_proc, 10);
1437: end create_MX_person_address;
1438:
1439: --
1440: -- --------------------------------------------------------------------------
1498: --
1499: l_proc varchar2(72) := g_package||'create_MX_LOC_person_address';
1500: --
1501: begin
1502: hr_utility.set_location('Entering:'|| l_proc, 5);
1503: --
1504: -- Create Person Address details.
1505: --
1506: hr_person_address_api.create_person_address
1556: ,p_address_id => p_address_id
1557: ,p_object_version_number => p_object_version_number
1558: );
1559: --
1560: hr_utility.set_location(' Leaving:'||l_proc, 10);
1561: end create_MX_LOC_person_address;
1562:
1563: --
1564: -- ----------------------------------------------------------------------------
1622: --
1623: l_proc varchar2(72) := g_package||'create_MY_person_address';
1624: --
1625: begin
1626: hr_utility.set_location('Entering:'|| l_proc, 5);
1627: --
1628: -- Create Person Address details.
1629: --
1630: hr_person_address_api.create_person_address
1680: ,p_address_id => p_address_id
1681: ,p_object_version_number => p_object_version_number
1682: );
1683: --
1684: hr_utility.set_location(' Leaving:'||l_proc, 10);
1685: end create_MY_person_address;
1686: --
1687: -- ----------------------------------------------------------------------------
1688: -- |-----------------------< create_PT_person_address >-----------------------|
1744: --
1745: l_proc varchar2(72) := g_package||'create_PT_person_address';
1746: --
1747: begin
1748: hr_utility.set_location('Entering:'|| l_proc, 5);
1749: --
1750: -- Create Person Address details.
1751: --
1752: hr_person_address_api.create_person_address
1801: ,p_address_id => p_address_id
1802: ,p_object_version_number => p_object_version_number
1803: );
1804: --
1805: hr_utility.set_location(' Leaving:'||l_proc, 10);
1806: end create_PT_person_address;
1807: --
1808: -- ----------------------------------------------------------------------------
1809: -- |-----------------------< create_BE_person_address >-----------------------|
1865: --
1866: l_proc varchar2(72) := g_package||'create_BE_person_address';
1867: --
1868: begin
1869: hr_utility.set_location('Entering:'|| l_proc, 5);
1870: --
1871: -- Create Person Address details.
1872: --
1873: hr_person_address_api.create_person_address
1922: ,p_address_id => p_address_id
1923: ,p_object_version_number => p_object_version_number
1924: );
1925: --
1926: hr_utility.set_location(' Leaving:'||l_proc, 10);
1927: end create_BE_person_address;
1928: --
1929: -- ----------------------------------------------------------------------------
1930: -- |-----------------------< create_FI_person_address >-----------------------|
1986: --
1987: l_proc varchar2(72) := g_package||'create_FI_person_address';
1988: --
1989: begin
1990: hr_utility.set_location('Entering:'|| l_proc, 5);
1991: --
1992: -- Create Person Address details.
1993: --
1994: hr_person_address_api.create_person_address
2043: ,p_address_id => p_address_id
2044: ,p_object_version_number => p_object_version_number
2045: );
2046: --
2047: hr_utility.set_location(' Leaving:'||l_proc, 10);
2048: end create_FI_person_address;
2049: --
2050: -- ----------------------------------------------------------------------------
2051: -- |-----------------------< create_GR_person_address >-----------------------|
2107: --
2108: l_proc varchar2(72) := g_package||'create_GR_person_address';
2109: --
2110: begin
2111: hr_utility.set_location('Entering:'|| l_proc, 5);
2112: --
2113: -- Create Person Address details.
2114: --
2115: hr_person_address_api.create_person_address
2164: ,p_address_id => p_address_id
2165: ,p_object_version_number => p_object_version_number
2166: );
2167: --
2168: hr_utility.set_location(' Leaving:'||l_proc, 10);
2169: end create_GR_person_address;
2170: --
2171: -- ----------------------------------------------------------------------------
2172: -- |-----------------------< create_HK_person_address >-----------------------|
2227: --
2228: l_proc varchar2(72) := g_package||'create_HK_person_address';
2229: --
2230: begin
2231: hr_utility.set_location('Entering:'|| l_proc, 5);
2232: --
2233: -- Create Person Address details.
2234: --
2235: hr_person_address_api.create_person_address
2283: ,p_address_id => p_address_id
2284: ,p_object_version_number => p_object_version_number
2285: );
2286: --
2287: hr_utility.set_location(' Leaving:'||l_proc, 10);
2288: end create_HK_person_address;
2289: --
2290: -- ----------------------------------------------------------------------------
2291: -- |-----------------------< create_IE_person_address >-----------------------|
2348: --
2349: l_proc varchar2(72) := g_package||'create_IE_person_address';
2350: --
2351: begin
2352: hr_utility.set_location('Entering:'|| l_proc, 5);
2353: --
2354: -- Create Person Address details.
2355: --
2356: hr_person_address_api.create_person_address
2406: ,p_address_id => p_address_id
2407: ,p_object_version_number => p_object_version_number
2408: );
2409: --
2410: hr_utility.set_location(' Leaving:'||l_proc, 10);
2411: end create_IE_person_address;
2412: --
2413: -- ----------------------------------------------------------------------------
2414: -- |-----------------------< create_LU_person_address >-----------------------|
2470: --
2471: l_proc varchar2(72) := g_package||'create_LU_person_address';
2472: --
2473: begin
2474: hr_utility.set_location('Entering:'|| l_proc, 5);
2475: --
2476: -- Create Person Address details.
2477: --
2478: hr_person_address_api.create_person_address
2527: ,p_address_id => p_address_id
2528: ,p_object_version_number => p_object_version_number
2529: );
2530: --
2531: hr_utility.set_location(' Leaving:'||l_proc, 10);
2532: end create_LU_person_address;
2533: --
2534: -- ----------------------------------------------------------------------------
2535: -- |-----------------------< create_NL_person_address >-----------------------|
2592: --
2593: l_proc varchar2(72) := g_package||'create_NL_person_address';
2594: --
2595: begin
2596: hr_utility.set_location('Entering:'|| l_proc, 5);
2597: --
2598: -- Create Person Address details.
2599: --
2600: hr_person_address_api.create_person_address
2650: ,p_address_id => p_address_id
2651: ,p_object_version_number => p_object_version_number
2652: );
2653: --
2654: hr_utility.set_location(' Leaving:'||l_proc, 10);
2655: end create_NL_person_address;
2656: --
2657: -- ----------------------------------------------------------------------------
2658: -- |-----------------------< create_SG_person_address >-----------------------|
2714: --
2715: l_proc varchar2(72) := g_package||'create_SG_person_address';
2716: --
2717: begin
2718: hr_utility.set_location('Entering:'|| l_proc, 5);
2719: --
2720: -- Create Person Address details.
2721: --
2722: hr_person_address_api.create_person_address
2771: ,p_address_id => p_address_id
2772: ,p_object_version_number => p_object_version_number
2773: );
2774: --
2775: hr_utility.set_location(' Leaving:'||l_proc, 10);
2776: end create_SG_person_address;
2777: --
2778: -- ----------------------------------------------------------------------------
2779: -- |-----------------------< create_SE_person_address >-----------------------|
2835: --
2836: l_proc varchar2(72) := g_package||'create_SE_person_address';
2837: --
2838: begin
2839: hr_utility.set_location('Entering:'|| l_proc, 5);
2840: --
2841: -- Create Person Address details.
2842: --
2843: hr_person_address_api.create_person_address
2892: ,p_address_id => p_address_id
2893: ,p_object_version_number => p_object_version_number
2894: );
2895: --
2896: hr_utility.set_location(' Leaving:'||l_proc, 10);
2897: end create_SE_person_address;
2898: --
2899: -- ----------------------------------------------------------------------------
2900: -- |-----------------------< create_ES_GLB_person_address >-----------------------|
2959: begin
2960: --
2961: l_proc := g_package||'create_ES_GLB_person_address';
2962: --
2963: hr_utility.set_location('Entering:'|| l_proc, 5);
2964: --
2965: -- Create Person Address details.
2966: --
2967: hr_person_address_api.create_person_address
3016: ,p_address_id => p_address_id
3017: ,p_object_version_number => p_object_version_number
3018: );
3019: --
3020: hr_utility.set_location(' Leaving:'||l_proc, 10);
3021: end create_ES_GLB_person_address;
3022: --
3023: -- --------------------------------------------------------------------------
3024: -- |-----------------------< create_ES_person_address >-------------------|
3083: begin
3084: --
3085: l_proc := g_package||'create_ES_person_address';
3086: --
3087: hr_utility.set_location('Entering:'|| l_proc, 5);
3088: --
3089: -- Create Person Address details.
3090: --
3091: hr_person_address_api.create_person_address
3140: ,p_address_id => p_address_id
3141: ,p_object_version_number => p_object_version_number
3142: );
3143: --
3144: hr_utility.set_location(' Leaving:'||l_proc, 10);
3145: end create_ES_person_address;
3146: --
3147: -- ----------------------------------------------------------------------------
3148: -- |-----------------------< create_SA_person_address >-----------------------|
3194: --
3195: l_proc varchar2(72) := g_package||'create_SA_person_address';
3196: --
3197: begin
3198: hr_utility.set_location('Entering:'|| l_proc, 5);
3199: --
3200: -- Create Person Address details.
3201: --
3202: hr_person_address_api.create_person_address
3241: ,p_address_id => p_address_id
3242: ,p_object_version_number => p_object_version_number
3243: );
3244: --
3245: hr_utility.set_location(' Leaving:'||l_proc, 10);
3246: end create_SA_person_address;
3247: --
3248: -- ----------------------------------------------------------------------------
3249: -- |------------------------< update_person_address >-------------------------|
3316: --
3317: lv_object_version_number number := p_object_version_number ;
3318: --
3319: begin
3320: hr_utility.set_location('Entering:'|| l_proc, 5);
3321: --
3322: -- Issue a savepoint.
3323: --
3324: savepoint update_person_address;
3334: (p_api_name => l_proc,
3335: p_argument => 'effective_date',
3336: p_argument_value => p_effective_date);
3337: --
3338: hr_utility.set_location(l_proc, 6);
3339: --
3340: l_date_from := trunc(p_date_from);
3341: l_date_to := trunc(p_date_to);
3342: l_effective_date := trunc(p_effective_date);
3414: -- End of API User Hook for the before hook of update_person_address
3415: --
3416: end;
3417: --
3418: hr_utility.set_location(l_proc, 6);
3419: --
3420: l_object_version_number := p_object_version_number;
3421: --
3422: -- Update Person Address details.
3477: ,p_validate_county => p_validate_county
3478: ,p_party_id => p_party_id
3479: );
3480: --
3481: hr_utility.set_location(l_proc, 8);
3482: begin
3483: --
3484: -- Start of API User Hook for the after hook of update_person_address
3485: --
3550: if p_validate then
3551: raise hr_api.validate_enabled;
3552: end if;
3553: --
3554: hr_utility.set_location(' Leaving:'||l_proc, 11);
3555: exception
3556: when hr_api.validate_enabled then
3557: --
3558: -- As the Validate_Enabled exception has been raised
3652: --
3653: lv_object_version_number number := p_object_version_number ;
3654: --
3655: begin
3656: hr_utility.set_location('Entering:'|| l_proc, 5);
3657: --
3658: -- Issue a savepoint.
3659: --
3660: savepoint update_pers_addr_with_style;
3670: (p_api_name => l_proc,
3671: p_argument => 'effective_date',
3672: p_argument_value => p_effective_date);
3673: --
3674: hr_utility.set_location(l_proc, 6);
3675: --
3676: l_date_from := trunc(p_date_from);
3677: l_date_to := trunc(p_date_to);
3678: l_effective_date := trunc(p_effective_date);
3743: -- End of API User Hook for the before hook of update_pers_addr_with_style
3744: --
3745: end;
3746: --
3747: hr_utility.set_location(l_proc, 6);
3748: --
3749: l_object_version_number := p_object_version_number;
3750: --
3751: -- Update Person Address details.
3807: ,p_primary_flag => p_primary_flag
3808: -- End of fix part2 for Bug #2431588
3809: );
3810: --
3811: hr_utility.set_location(l_proc, 8);
3812: begin
3813: --
3814: -- Start of API User Hook for the after hook of update_pers_addr_with_style
3815: --
3881: if p_validate then
3882: raise hr_api.validate_enabled;
3883: end if;
3884: --
3885: hr_utility.set_location(' Leaving:'||l_proc, 11);
3886: exception
3887: when hr_api.validate_enabled then
3888: --
3889: -- As the Validate_Enabled exception has been raised
3975: from per_addresses addr
3976: where addr.address_id = p_address_id;
3977: --
3978: begin
3979: hr_utility.set_location('Entering:'|| l_proc, 5);
3980: --
3981: -- Check that the Address identified is GB style.
3982: --
3983: open csr_add_style;
3986: if csr_add_style%notfound then
3987: --
3988: close csr_add_style;
3989: --
3990: hr_utility.set_location(l_proc, 7);
3991: --
3992: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
3993: hr_utility.raise_error;
3994: --
3988: close csr_add_style;
3989: --
3990: hr_utility.set_location(l_proc, 7);
3991: --
3992: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
3993: hr_utility.raise_error;
3994: --
3995: else
3996: --
3989: --
3990: hr_utility.set_location(l_proc, 7);
3991: --
3992: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
3993: hr_utility.raise_error;
3994: --
3995: else
3996: --
3997: close csr_add_style;
3997: close csr_add_style;
3998: --
3999: if l_style <> 'GB' then
4000: --
4001: hr_utility.set_location(l_proc, 8);
4002: --
4003: hr_utility.set_message(801, 'HR_7788_ADD_INV_NOT_GB_STYLE');
4004: hr_utility.raise_error;
4005: --
3999: if l_style <> 'GB' then
4000: --
4001: hr_utility.set_location(l_proc, 8);
4002: --
4003: hr_utility.set_message(801, 'HR_7788_ADD_INV_NOT_GB_STYLE');
4004: hr_utility.raise_error;
4005: --
4006: end if;
4007: end if;
4000: --
4001: hr_utility.set_location(l_proc, 8);
4002: --
4003: hr_utility.set_message(801, 'HR_7788_ADD_INV_NOT_GB_STYLE');
4004: hr_utility.raise_error;
4005: --
4006: end if;
4007: end if;
4008: --
4005: --
4006: end if;
4007: end if;
4008: --
4009: hr_utility.set_location(l_proc, 9);
4010: --
4011: -- Update Person Address details.
4012: --
4013: hr_person_address_api.update_person_address
4058: ,p_add_information19 => p_add_information19
4059: ,p_add_information20 => p_add_information20
4060: );
4061: --
4062: hr_utility.set_location(' Leaving:'||l_proc, 11);
4063: end update_gb_person_address;
4064: --
4065: -- ----------------------------------------------------------------------------
4066: -- |-----------------------< update_us_person_address >-----------------------|
4127: from per_addresses
4128: where address_id = p_address_id;
4129: --
4130: begin
4131: hr_utility.set_location('Entering:'|| l_proc, 5);
4132: --
4133: -- Check that the address is US style.
4134: --
4135: open csr_add_style;
4137: into l_style;
4138: if csr_add_style%notfound then
4139: close csr_add_style;
4140: --
4141: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4142: hr_utility.raise_error;
4143: else
4144: hr_utility.set_location(l_proc, 10);
4145: --
4138: if csr_add_style%notfound then
4139: close csr_add_style;
4140: --
4141: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4142: hr_utility.raise_error;
4143: else
4144: hr_utility.set_location(l_proc, 10);
4145: --
4146: close csr_add_style;
4140: --
4141: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4142: hr_utility.raise_error;
4143: else
4144: hr_utility.set_location(l_proc, 10);
4145: --
4146: close csr_add_style;
4147: --
4148: if l_style <> 'US' then
4145: --
4146: close csr_add_style;
4147: --
4148: if l_style <> 'US' then
4149: hr_utility.set_message(801, 'HR_51283_ADD_MUST_BE_US_STYLE');
4150: hr_utility.raise_error;
4151: end if;
4152: end if;
4153: --
4146: close csr_add_style;
4147: --
4148: if l_style <> 'US' then
4149: hr_utility.set_message(801, 'HR_51283_ADD_MUST_BE_US_STYLE');
4150: hr_utility.raise_error;
4151: end if;
4152: end if;
4153: --
4154: hr_utility.set_location(l_proc, 15);
4150: hr_utility.raise_error;
4151: end if;
4152: end if;
4153: --
4154: hr_utility.set_location(l_proc, 15);
4155: --
4156: -- Update Person Address details.
4157: --
4158: hr_person_address_api.update_person_address
4205: ,p_add_information19 => p_add_information19
4206: ,p_add_information20 => p_add_information20
4207: );
4208: --
4209: hr_utility.set_location(' Leaving:'||l_proc, 20);
4210: end update_us_person_address;
4211: --
4212: -- ----------------------------------------------------------------------------
4213: -- |-----------------------< update_AT_person_address >-----------------------|
4273: from per_addresses addr
4274: where addr.address_id = p_address_id;
4275: --
4276: begin
4277: hr_utility.set_location('Entering:'|| l_proc, 5);
4278: --
4279: -- Check that the Address identified is of specified style.
4280: --
4281: open csr_add_style;
4284: if csr_add_style%notfound then
4285: --
4286: close csr_add_style;
4287: --
4288: hr_utility.set_location(l_proc, 7);
4289: --
4290: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4291: hr_utility.raise_error;
4292: --
4286: close csr_add_style;
4287: --
4288: hr_utility.set_location(l_proc, 7);
4289: --
4290: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4291: hr_utility.raise_error;
4292: --
4293: else
4294: --
4287: --
4288: hr_utility.set_location(l_proc, 7);
4289: --
4290: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4291: hr_utility.raise_error;
4292: --
4293: else
4294: --
4295: close csr_add_style;
4295: close csr_add_style;
4296: --
4297: if l_style <> 'AT_GLB' then
4298: --
4299: hr_utility.set_location(l_proc, 8);
4300: --
4301: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4302: hr_utility.raise_error;
4303: --
4297: if l_style <> 'AT_GLB' then
4298: --
4299: hr_utility.set_location(l_proc, 8);
4300: --
4301: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4302: hr_utility.raise_error;
4303: --
4304: end if;
4305: end if;
4298: --
4299: hr_utility.set_location(l_proc, 8);
4300: --
4301: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4302: hr_utility.raise_error;
4303: --
4304: end if;
4305: end if;
4306: --
4303: --
4304: end if;
4305: end if;
4306: --
4307: hr_utility.set_location(l_proc, 9);
4308: --
4309: -- Update Person Address details.
4310: --
4311: hr_person_address_api.update_person_address
4357: ,p_add_information19 => p_add_information19
4358: ,p_add_information20 => p_add_information20
4359: );
4360: --
4361: hr_utility.set_location(' Leaving:'||l_proc, 11);
4362: end update_AT_person_address;
4363: --
4364: -- ----------------------------------------------------------------------------
4365: -- |-----------------------< update_AU_person_address >-----------------------|
4425: from per_addresses addr
4426: where addr.address_id = p_address_id;
4427: --
4428: begin
4429: hr_utility.set_location('Entering:'|| l_proc, 5);
4430: --
4431: -- Check that the Address identified is of specified style.
4432: --
4433: open csr_add_style;
4436: if csr_add_style%notfound then
4437: --
4438: close csr_add_style;
4439: --
4440: hr_utility.set_location(l_proc, 7);
4441: --
4442: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4443: hr_utility.raise_error;
4444: --
4438: close csr_add_style;
4439: --
4440: hr_utility.set_location(l_proc, 7);
4441: --
4442: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4443: hr_utility.raise_error;
4444: --
4445: else
4446: --
4439: --
4440: hr_utility.set_location(l_proc, 7);
4441: --
4442: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4443: hr_utility.raise_error;
4444: --
4445: else
4446: --
4447: close csr_add_style;
4447: close csr_add_style;
4448: --
4449: if l_style <> 'AU_GLB' then
4450: --
4451: hr_utility.set_location(l_proc, 8);
4452: --
4453: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4454: hr_utility.raise_error;
4455: --
4449: if l_style <> 'AU_GLB' then
4450: --
4451: hr_utility.set_location(l_proc, 8);
4452: --
4453: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4454: hr_utility.raise_error;
4455: --
4456: end if;
4457: end if;
4450: --
4451: hr_utility.set_location(l_proc, 8);
4452: --
4453: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4454: hr_utility.raise_error;
4455: --
4456: end if;
4457: end if;
4458: --
4455: --
4456: end if;
4457: end if;
4458: --
4459: hr_utility.set_location(l_proc, 9);
4460: --
4461: -- Update Person Address details.
4462: --
4463: hr_person_address_api.update_person_address
4509: ,p_add_information19 => p_add_information19
4510: ,p_add_information20 => p_add_information20
4511: );
4512: --
4513: hr_utility.set_location(' Leaving:'||l_proc, 11);
4514: end update_AU_person_address;
4515: --
4516: -- ----------------------------------------------------------------------------
4517: -- |-----------------------< update_DK_person_address >-----------------------|
4576: from per_addresses addr
4577: where addr.address_id = p_address_id;
4578: --
4579: begin
4580: hr_utility.set_location('Entering:'|| l_proc, 5);
4581: --
4582: -- Check that the Address identified is of specified style.
4583: --
4584: open csr_add_style;
4587: if csr_add_style%notfound then
4588: --
4589: close csr_add_style;
4590: --
4591: hr_utility.set_location(l_proc, 7);
4592: --
4593: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4594: hr_utility.raise_error;
4595: --
4589: close csr_add_style;
4590: --
4591: hr_utility.set_location(l_proc, 7);
4592: --
4593: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4594: hr_utility.raise_error;
4595: --
4596: else
4597: --
4590: --
4591: hr_utility.set_location(l_proc, 7);
4592: --
4593: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4594: hr_utility.raise_error;
4595: --
4596: else
4597: --
4598: close csr_add_style;
4598: close csr_add_style;
4599: --
4600: if l_style <> 'DK_GLB' then
4601: --
4602: hr_utility.set_location(l_proc, 8);
4603: --
4604: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4605: hr_utility.raise_error;
4606: --
4600: if l_style <> 'DK_GLB' then
4601: --
4602: hr_utility.set_location(l_proc, 8);
4603: --
4604: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4605: hr_utility.raise_error;
4606: --
4607: end if;
4608: end if;
4601: --
4602: hr_utility.set_location(l_proc, 8);
4603: --
4604: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4605: hr_utility.raise_error;
4606: --
4607: end if;
4608: end if;
4609: --
4606: --
4607: end if;
4608: end if;
4609: --
4610: hr_utility.set_location(l_proc, 9);
4611: --
4612: -- Update Person Address details.
4613: --
4614: hr_person_address_api.update_person_address
4659: ,p_add_information19 => p_add_information19
4660: ,p_add_information20 => p_add_information20
4661: );
4662: --
4663: hr_utility.set_location(' Leaving:'||l_proc, 11);
4664: end update_DK_person_address;
4665: --
4666: -- ----------------------------------------------------------------------------
4667: -- |-----------------------< update_DE_person_address >-----------------------|
4727: from per_addresses addr
4728: where addr.address_id = p_address_id;
4729: --
4730: begin
4731: hr_utility.set_location('Entering:'|| l_proc, 5);
4732: --
4733: -- Check that the Address identified is of specified style.
4734: --
4735: open csr_add_style;
4738: if csr_add_style%notfound then
4739: --
4740: close csr_add_style;
4741: --
4742: hr_utility.set_location(l_proc, 7);
4743: --
4744: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4745: hr_utility.raise_error;
4746: --
4740: close csr_add_style;
4741: --
4742: hr_utility.set_location(l_proc, 7);
4743: --
4744: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4745: hr_utility.raise_error;
4746: --
4747: else
4748: --
4741: --
4742: hr_utility.set_location(l_proc, 7);
4743: --
4744: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4745: hr_utility.raise_error;
4746: --
4747: else
4748: --
4749: close csr_add_style;
4749: close csr_add_style;
4750: --
4751: if l_style <> 'DE_GLB' then
4752: --
4753: hr_utility.set_location(l_proc, 8);
4754: --
4755: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4756: hr_utility.raise_error;
4757: --
4751: if l_style <> 'DE_GLB' then
4752: --
4753: hr_utility.set_location(l_proc, 8);
4754: --
4755: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4756: hr_utility.raise_error;
4757: --
4758: end if;
4759: end if;
4752: --
4753: hr_utility.set_location(l_proc, 8);
4754: --
4755: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4756: hr_utility.raise_error;
4757: --
4758: end if;
4759: end if;
4760: --
4757: --
4758: end if;
4759: end if;
4760: --
4761: hr_utility.set_location(l_proc, 9);
4762: --
4763: -- Update Person Address details.
4764: --
4765: hr_person_address_api.update_person_address
4811: ,p_add_information19 => p_add_information19
4812: ,p_add_information20 => p_add_information20
4813: );
4814: --
4815: hr_utility.set_location(' Leaving:'||l_proc, 11);
4816: end update_DE_person_address;
4817: --
4818: -- ----------------------------------------------------------------------------
4819: -- |-----------------------< update_IT_person_address >-----------------------|
4879: from per_addresses addr
4880: where addr.address_id = p_address_id;
4881: --
4882: begin
4883: hr_utility.set_location('Entering:'|| l_proc, 5);
4884: --
4885: -- Check that the Address identified is of specified style.
4886: --
4887: open csr_add_style;
4890: if csr_add_style%notfound then
4891: --
4892: close csr_add_style;
4893: --
4894: hr_utility.set_location(l_proc, 7);
4895: --
4896: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4897: hr_utility.raise_error;
4898: --
4892: close csr_add_style;
4893: --
4894: hr_utility.set_location(l_proc, 7);
4895: --
4896: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4897: hr_utility.raise_error;
4898: --
4899: else
4900: --
4893: --
4894: hr_utility.set_location(l_proc, 7);
4895: --
4896: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
4897: hr_utility.raise_error;
4898: --
4899: else
4900: --
4901: close csr_add_style;
4901: close csr_add_style;
4902: --
4903: if l_style <> 'IT_GLB' then
4904: --
4905: hr_utility.set_location(l_proc, 8);
4906: --
4907: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4908: hr_utility.raise_error;
4909: --
4903: if l_style <> 'IT_GLB' then
4904: --
4905: hr_utility.set_location(l_proc, 8);
4906: --
4907: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4908: hr_utility.raise_error;
4909: --
4910: end if;
4911: end if;
4904: --
4905: hr_utility.set_location(l_proc, 8);
4906: --
4907: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
4908: hr_utility.raise_error;
4909: --
4910: end if;
4911: end if;
4912: --
4909: --
4910: end if;
4911: end if;
4912: --
4913: hr_utility.set_location(l_proc, 9);
4914: --
4915: -- Update Person Address details.
4916: --
4917: hr_person_address_api.update_person_address
4963: ,p_add_information19 => p_add_information19
4964: ,p_add_information20 => p_add_information20
4965: );
4966: --
4967: hr_utility.set_location(' Leaving:'||l_proc, 11);
4968: end update_IT_person_address;
4969: --
4970: -- ----------------------------------------------------------------------------
4971: -- |-----------------------< update_MX_person_address >-----------------------|
5031: from per_addresses addr
5032: where addr.address_id = p_address_id;
5033: --
5034: begin
5035: hr_utility.set_location('Entering:'|| l_proc, 5);
5036: --
5037: -- Check that the Address identified is of specified style.
5038: --
5039: open csr_add_style;
5042: if csr_add_style%notfound then
5043: --
5044: close csr_add_style;
5045: --
5046: hr_utility.set_location(l_proc, 7);
5047: --
5048: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5049: hr_utility.raise_error;
5050: --
5044: close csr_add_style;
5045: --
5046: hr_utility.set_location(l_proc, 7);
5047: --
5048: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5049: hr_utility.raise_error;
5050: --
5051: else
5052: --
5045: --
5046: hr_utility.set_location(l_proc, 7);
5047: --
5048: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5049: hr_utility.raise_error;
5050: --
5051: else
5052: --
5053: close csr_add_style;
5053: close csr_add_style;
5054: --
5055: if l_style <> 'MX_GLB' then
5056: --
5057: hr_utility.set_location(l_proc, 8);
5058: --
5059: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5060: hr_utility.raise_error;
5061: --
5055: if l_style <> 'MX_GLB' then
5056: --
5057: hr_utility.set_location(l_proc, 8);
5058: --
5059: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5060: hr_utility.raise_error;
5061: --
5062: end if;
5063: end if;
5056: --
5057: hr_utility.set_location(l_proc, 8);
5058: --
5059: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5060: hr_utility.raise_error;
5061: --
5062: end if;
5063: end if;
5064: --
5061: --
5062: end if;
5063: end if;
5064: --
5065: hr_utility.set_location(l_proc, 9);
5066: --
5067: -- Update Person Address details.
5068: --
5069: hr_person_address_api.update_person_address
5115: ,p_add_information19 => p_add_information19
5116: ,p_add_information20 => p_add_information20
5117: );
5118: --
5119: hr_utility.set_location(' Leaving:'||l_proc, 11);
5120: end update_MX_person_address;
5121: --
5122: -- ----------------------------------------------------------------------------
5123: -- |---------------------< update_MX_LOC_person_address >---------------------|
5184: from per_addresses addr
5185: where addr.address_id = p_address_id;
5186: --
5187: begin
5188: hr_utility.set_location('Entering:'|| l_proc, 5);
5189: --
5190: -- Check that the Address identified is of specified style.
5191: --
5192: open csr_add_style;
5195: if csr_add_style%notfound then
5196: --
5197: close csr_add_style;
5198: --
5199: hr_utility.set_location(l_proc, 7);
5200: --
5201: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5202: hr_utility.raise_error;
5203: --
5197: close csr_add_style;
5198: --
5199: hr_utility.set_location(l_proc, 7);
5200: --
5201: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5202: hr_utility.raise_error;
5203: --
5204: else
5205: --
5198: --
5199: hr_utility.set_location(l_proc, 7);
5200: --
5201: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5202: hr_utility.raise_error;
5203: --
5204: else
5205: --
5206: close csr_add_style;
5206: close csr_add_style;
5207: --
5208: if l_style <> 'MX' then
5209: --
5210: hr_utility.set_location(l_proc, 8);
5211: --
5212: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5213: hr_utility.raise_error;
5214: --
5208: if l_style <> 'MX' then
5209: --
5210: hr_utility.set_location(l_proc, 8);
5211: --
5212: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5213: hr_utility.raise_error;
5214: --
5215: end if;
5216: end if;
5209: --
5210: hr_utility.set_location(l_proc, 8);
5211: --
5212: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5213: hr_utility.raise_error;
5214: --
5215: end if;
5216: end if;
5217: --
5214: --
5215: end if;
5216: end if;
5217: --
5218: hr_utility.set_location(l_proc, 9);
5219: --
5220: -- Update Person Address details.
5221: --
5222: hr_person_address_api.update_person_address
5269: ,p_add_information20 => p_add_information20
5270: ,p_party_id => p_party_id
5271: );
5272: --
5273: hr_utility.set_location(' Leaving:'||l_proc, 11);
5274: end update_MX_LOC_person_address;
5275: --
5276: -- ----------------------------------------------------------------------------
5277: -- |-----------------------< update_MY_person_address >-----------------------|
5337: from per_addresses addr
5338: where addr.address_id = p_address_id;
5339: --
5340: begin
5341: hr_utility.set_location('Entering:'|| l_proc, 5);
5342: --
5343: -- Check that the Address identified is of specified style.
5344: --
5345: open csr_add_style;
5348: if csr_add_style%notfound then
5349: --
5350: close csr_add_style;
5351: --
5352: hr_utility.set_location(l_proc, 7);
5353: --
5354: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5355: hr_utility.raise_error;
5356: --
5350: close csr_add_style;
5351: --
5352: hr_utility.set_location(l_proc, 7);
5353: --
5354: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5355: hr_utility.raise_error;
5356: --
5357: else
5358: --
5351: --
5352: hr_utility.set_location(l_proc, 7);
5353: --
5354: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5355: hr_utility.raise_error;
5356: --
5357: else
5358: --
5359: close csr_add_style;
5359: close csr_add_style;
5360: --
5361: if l_style <> 'MY_GLB' then
5362: --
5363: hr_utility.set_location(l_proc, 8);
5364: --
5365: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5366: hr_utility.raise_error;
5367: --
5361: if l_style <> 'MY_GLB' then
5362: --
5363: hr_utility.set_location(l_proc, 8);
5364: --
5365: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5366: hr_utility.raise_error;
5367: --
5368: end if;
5369: end if;
5362: --
5363: hr_utility.set_location(l_proc, 8);
5364: --
5365: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5366: hr_utility.raise_error;
5367: --
5368: end if;
5369: end if;
5370: --
5367: --
5368: end if;
5369: end if;
5370: --
5371: hr_utility.set_location(l_proc, 9);
5372: --
5373: -- Update Person Address details.
5374: --
5375: hr_person_address_api.update_person_address
5421: ,p_add_information19 => p_add_information19
5422: ,p_add_information20 => p_add_information20
5423: );
5424: --
5425: hr_utility.set_location(' Leaving:'||l_proc, 11);
5426: end update_MY_person_address;
5427: --
5428: -- ----------------------------------------------------------------------------
5429: -- |-----------------------< update_PT_person_address >-----------------------|
5488: from per_addresses addr
5489: where addr.address_id = p_address_id;
5490: --
5491: begin
5492: hr_utility.set_location('Entering:'|| l_proc, 5);
5493: --
5494: -- Check that the Address identified is of specified style.
5495: --
5496: open csr_add_style;
5499: if csr_add_style%notfound then
5500: --
5501: close csr_add_style;
5502: --
5503: hr_utility.set_location(l_proc, 7);
5504: --
5505: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5506: hr_utility.raise_error;
5507: --
5501: close csr_add_style;
5502: --
5503: hr_utility.set_location(l_proc, 7);
5504: --
5505: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5506: hr_utility.raise_error;
5507: --
5508: else
5509: --
5502: --
5503: hr_utility.set_location(l_proc, 7);
5504: --
5505: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5506: hr_utility.raise_error;
5507: --
5508: else
5509: --
5510: close csr_add_style;
5510: close csr_add_style;
5511: --
5512: if l_style <> 'PT_GLB' then
5513: --
5514: hr_utility.set_location(l_proc, 8);
5515: --
5516: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5517: hr_utility.raise_error;
5518: --
5512: if l_style <> 'PT_GLB' then
5513: --
5514: hr_utility.set_location(l_proc, 8);
5515: --
5516: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5517: hr_utility.raise_error;
5518: --
5519: end if;
5520: end if;
5513: --
5514: hr_utility.set_location(l_proc, 8);
5515: --
5516: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5517: hr_utility.raise_error;
5518: --
5519: end if;
5520: end if;
5521: --
5518: --
5519: end if;
5520: end if;
5521: --
5522: hr_utility.set_location(l_proc, 9);
5523: --
5524: -- Update Person Address details.
5525: --
5526: hr_person_address_api.update_person_address
5571: ,p_add_information19 => p_add_information19
5572: ,p_add_information20 => p_add_information20
5573: );
5574: --
5575: hr_utility.set_location(' Leaving:'||l_proc, 11);
5576: end update_PT_person_address;
5577: --
5578: -- ----------------------------------------------------------------------------
5579: -- |-----------------------< update_BE_person_address >-----------------------|
5638: from per_addresses addr
5639: where addr.address_id = p_address_id;
5640: --
5641: begin
5642: hr_utility.set_location('Entering:'|| l_proc, 5);
5643: --
5644: -- Check that the Address identified is of specified style.
5645: --
5646: open csr_add_style;
5649: if csr_add_style%notfound then
5650: --
5651: close csr_add_style;
5652: --
5653: hr_utility.set_location(l_proc, 7);
5654: --
5655: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5656: hr_utility.raise_error;
5657: --
5651: close csr_add_style;
5652: --
5653: hr_utility.set_location(l_proc, 7);
5654: --
5655: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5656: hr_utility.raise_error;
5657: --
5658: else
5659: --
5652: --
5653: hr_utility.set_location(l_proc, 7);
5654: --
5655: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5656: hr_utility.raise_error;
5657: --
5658: else
5659: --
5660: close csr_add_style;
5660: close csr_add_style;
5661: --
5662: if l_style <> 'BE' then
5663: --
5664: hr_utility.set_location(l_proc, 8);
5665: --
5666: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5667: hr_utility.raise_error;
5668: --
5662: if l_style <> 'BE' then
5663: --
5664: hr_utility.set_location(l_proc, 8);
5665: --
5666: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5667: hr_utility.raise_error;
5668: --
5669: end if;
5670: end if;
5663: --
5664: hr_utility.set_location(l_proc, 8);
5665: --
5666: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5667: hr_utility.raise_error;
5668: --
5669: end if;
5670: end if;
5671: --
5668: --
5669: end if;
5670: end if;
5671: --
5672: hr_utility.set_location(l_proc, 9);
5673: --
5674: -- Update Person Address details.
5675: --
5676: hr_person_address_api.update_person_address
5721: ,p_add_information19 => p_add_information19
5722: ,p_add_information20 => p_add_information20
5723: );
5724: --
5725: hr_utility.set_location(' Leaving:'||l_proc, 11);
5726: end update_BE_person_address;
5727: --
5728: -- ----------------------------------------------------------------------------
5729: -- |-----------------------< update_FI_person_address >-----------------------|
5788: from per_addresses addr
5789: where addr.address_id = p_address_id;
5790: --
5791: begin
5792: hr_utility.set_location('Entering:'|| l_proc, 5);
5793: --
5794: -- Check that the Address identified is of specified style.
5795: --
5796: open csr_add_style;
5799: if csr_add_style%notfound then
5800: --
5801: close csr_add_style;
5802: --
5803: hr_utility.set_location(l_proc, 7);
5804: --
5805: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5806: hr_utility.raise_error;
5807: --
5801: close csr_add_style;
5802: --
5803: hr_utility.set_location(l_proc, 7);
5804: --
5805: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5806: hr_utility.raise_error;
5807: --
5808: else
5809: --
5802: --
5803: hr_utility.set_location(l_proc, 7);
5804: --
5805: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5806: hr_utility.raise_error;
5807: --
5808: else
5809: --
5810: close csr_add_style;
5810: close csr_add_style;
5811: --
5812: if l_style <> 'FI_GLB' then
5813: --
5814: hr_utility.set_location(l_proc, 8);
5815: --
5816: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5817: hr_utility.raise_error;
5818: --
5812: if l_style <> 'FI_GLB' then
5813: --
5814: hr_utility.set_location(l_proc, 8);
5815: --
5816: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5817: hr_utility.raise_error;
5818: --
5819: end if;
5820: end if;
5813: --
5814: hr_utility.set_location(l_proc, 8);
5815: --
5816: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5817: hr_utility.raise_error;
5818: --
5819: end if;
5820: end if;
5821: --
5818: --
5819: end if;
5820: end if;
5821: --
5822: hr_utility.set_location(l_proc, 9);
5823: --
5824: -- Update Person Address details.
5825: --
5826: hr_person_address_api.update_person_address
5871: ,p_add_information19 => p_add_information19
5872: ,p_add_information20 => p_add_information20
5873: );
5874: --
5875: hr_utility.set_location(' Leaving:'||l_proc, 11);
5876: end update_FI_person_address;
5877: --
5878: -- ----------------------------------------------------------------------------
5879: -- |-----------------------< update_GR_person_address >-----------------------|
5938: from per_addresses addr
5939: where addr.address_id = p_address_id;
5940: --
5941: begin
5942: hr_utility.set_location('Entering:'|| l_proc, 5);
5943: --
5944: -- Check that the Address identified is of specified style.
5945: --
5946: open csr_add_style;
5949: if csr_add_style%notfound then
5950: --
5951: close csr_add_style;
5952: --
5953: hr_utility.set_location(l_proc, 7);
5954: --
5955: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5956: hr_utility.raise_error;
5957: --
5951: close csr_add_style;
5952: --
5953: hr_utility.set_location(l_proc, 7);
5954: --
5955: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5956: hr_utility.raise_error;
5957: --
5958: else
5959: --
5952: --
5953: hr_utility.set_location(l_proc, 7);
5954: --
5955: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
5956: hr_utility.raise_error;
5957: --
5958: else
5959: --
5960: close csr_add_style;
5960: close csr_add_style;
5961: --
5962: if l_style <> 'GR_GLB' then
5963: --
5964: hr_utility.set_location(l_proc, 8);
5965: --
5966: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5967: hr_utility.raise_error;
5968: --
5962: if l_style <> 'GR_GLB' then
5963: --
5964: hr_utility.set_location(l_proc, 8);
5965: --
5966: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5967: hr_utility.raise_error;
5968: --
5969: end if;
5970: end if;
5963: --
5964: hr_utility.set_location(l_proc, 8);
5965: --
5966: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
5967: hr_utility.raise_error;
5968: --
5969: end if;
5970: end if;
5971: --
5968: --
5969: end if;
5970: end if;
5971: --
5972: hr_utility.set_location(l_proc, 9);
5973: --
5974: -- Update Person Address details.
5975: --
5976: hr_person_address_api.update_person_address
6021: ,p_add_information19 => p_add_information19
6022: ,p_add_information20 => p_add_information20
6023: );
6024: --
6025: hr_utility.set_location(' Leaving:'||l_proc, 11);
6026: end update_GR_person_address;
6027: --
6028: -- ----------------------------------------------------------------------------
6029: -- |-----------------------< update_HK_person_address >-----------------------|
6087: from per_addresses addr
6088: where addr.address_id = p_address_id;
6089: --
6090: begin
6091: hr_utility.set_location('Entering:'|| l_proc, 5);
6092: --
6093: -- Check that the Address identified is of specified style.
6094: --
6095: open csr_add_style;
6098: if csr_add_style%notfound then
6099: --
6100: close csr_add_style;
6101: --
6102: hr_utility.set_location(l_proc, 7);
6103: --
6104: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6105: hr_utility.raise_error;
6106: --
6100: close csr_add_style;
6101: --
6102: hr_utility.set_location(l_proc, 7);
6103: --
6104: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6105: hr_utility.raise_error;
6106: --
6107: else
6108: --
6101: --
6102: hr_utility.set_location(l_proc, 7);
6103: --
6104: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6105: hr_utility.raise_error;
6106: --
6107: else
6108: --
6109: close csr_add_style;
6109: close csr_add_style;
6110: --
6111: if l_style <> 'HK' then
6112: --
6113: hr_utility.set_location(l_proc, 8);
6114: --
6115: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6116: hr_utility.raise_error;
6117: --
6111: if l_style <> 'HK' then
6112: --
6113: hr_utility.set_location(l_proc, 8);
6114: --
6115: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6116: hr_utility.raise_error;
6117: --
6118: end if;
6119: end if;
6112: --
6113: hr_utility.set_location(l_proc, 8);
6114: --
6115: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6116: hr_utility.raise_error;
6117: --
6118: end if;
6119: end if;
6120: --
6117: --
6118: end if;
6119: end if;
6120: --
6121: hr_utility.set_location(l_proc, 9);
6122: --
6123: -- Update Person Address details.
6124: --
6125: hr_person_address_api.update_person_address
6169: ,p_add_information19 => p_add_information19
6170: ,p_add_information20 => p_add_information20
6171: );
6172: --
6173: hr_utility.set_location(' Leaving:'||l_proc, 11);
6174: end update_HK_person_address;
6175: --
6176: -- ----------------------------------------------------------------------------
6177: -- |-----------------------< update_IE_person_address >-----------------------|
6237: from per_addresses addr
6238: where addr.address_id = p_address_id;
6239: --
6240: begin
6241: hr_utility.set_location('Entering:'|| l_proc, 5);
6242: --
6243: -- Check that the Address identified is of specified style.
6244: --
6245: open csr_add_style;
6248: if csr_add_style%notfound then
6249: --
6250: close csr_add_style;
6251: --
6252: hr_utility.set_location(l_proc, 7);
6253: --
6254: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6255: hr_utility.raise_error;
6256: --
6250: close csr_add_style;
6251: --
6252: hr_utility.set_location(l_proc, 7);
6253: --
6254: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6255: hr_utility.raise_error;
6256: --
6257: else
6258: --
6251: --
6252: hr_utility.set_location(l_proc, 7);
6253: --
6254: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6255: hr_utility.raise_error;
6256: --
6257: else
6258: --
6259: close csr_add_style;
6259: close csr_add_style;
6260: --
6261: if l_style <> 'IE_GLB' then
6262: --
6263: hr_utility.set_location(l_proc, 8);
6264: --
6265: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6266: hr_utility.raise_error;
6267: --
6261: if l_style <> 'IE_GLB' then
6262: --
6263: hr_utility.set_location(l_proc, 8);
6264: --
6265: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6266: hr_utility.raise_error;
6267: --
6268: end if;
6269: end if;
6262: --
6263: hr_utility.set_location(l_proc, 8);
6264: --
6265: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6266: hr_utility.raise_error;
6267: --
6268: end if;
6269: end if;
6270: --
6267: --
6268: end if;
6269: end if;
6270: --
6271: hr_utility.set_location(l_proc, 9);
6272: --
6273: -- Update Person Address details.
6274: --
6275: hr_person_address_api.update_person_address
6321: ,p_add_information19 => p_add_information19
6322: ,p_add_information20 => p_add_information20
6323: );
6324: --
6325: hr_utility.set_location(' Leaving:'||l_proc, 11);
6326: end update_IE_person_address;
6327: --
6328: -- ----------------------------------------------------------------------------
6329: -- |-----------------------< update_LU_person_address >-----------------------|
6388: from per_addresses addr
6389: where addr.address_id = p_address_id;
6390: --
6391: begin
6392: hr_utility.set_location('Entering:'|| l_proc, 5);
6393: --
6394: -- Check that the Address identified is of specified style.
6395: --
6396: open csr_add_style;
6399: if csr_add_style%notfound then
6400: --
6401: close csr_add_style;
6402: --
6403: hr_utility.set_location(l_proc, 7);
6404: --
6405: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6406: hr_utility.raise_error;
6407: --
6401: close csr_add_style;
6402: --
6403: hr_utility.set_location(l_proc, 7);
6404: --
6405: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6406: hr_utility.raise_error;
6407: --
6408: else
6409: --
6402: --
6403: hr_utility.set_location(l_proc, 7);
6404: --
6405: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6406: hr_utility.raise_error;
6407: --
6408: else
6409: --
6410: close csr_add_style;
6410: close csr_add_style;
6411: --
6412: if l_style <> 'LU_GLB' then
6413: --
6414: hr_utility.set_location(l_proc, 8);
6415: --
6416: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6417: hr_utility.raise_error;
6418: --
6412: if l_style <> 'LU_GLB' then
6413: --
6414: hr_utility.set_location(l_proc, 8);
6415: --
6416: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6417: hr_utility.raise_error;
6418: --
6419: end if;
6420: end if;
6413: --
6414: hr_utility.set_location(l_proc, 8);
6415: --
6416: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6417: hr_utility.raise_error;
6418: --
6419: end if;
6420: end if;
6421: --
6418: --
6419: end if;
6420: end if;
6421: --
6422: hr_utility.set_location(l_proc, 9);
6423: --
6424: -- Update Person Address details.
6425: --
6426: hr_person_address_api.update_person_address
6471: ,p_add_information19 => p_add_information19
6472: ,p_add_information20 => p_add_information20
6473: );
6474: --
6475: hr_utility.set_location(' Leaving:'||l_proc, 11);
6476: end update_LU_person_address;
6477: --
6478: -- ----------------------------------------------------------------------------
6479: -- |-----------------------< update_NL_person_address >-----------------------|
6539: from per_addresses addr
6540: where addr.address_id = p_address_id;
6541: --
6542: begin
6543: hr_utility.set_location('Entering:'|| l_proc, 5);
6544: --
6545: -- Check that the Address identified is of specified style.
6546: --
6547: open csr_add_style;
6550: if csr_add_style%notfound then
6551: --
6552: close csr_add_style;
6553: --
6554: hr_utility.set_location(l_proc, 7);
6555: --
6556: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6557: hr_utility.raise_error;
6558: --
6552: close csr_add_style;
6553: --
6554: hr_utility.set_location(l_proc, 7);
6555: --
6556: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6557: hr_utility.raise_error;
6558: --
6559: else
6560: --
6553: --
6554: hr_utility.set_location(l_proc, 7);
6555: --
6556: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6557: hr_utility.raise_error;
6558: --
6559: else
6560: --
6561: close csr_add_style;
6561: close csr_add_style;
6562: --
6563: if l_style <> 'NL_GLB' then
6564: --
6565: hr_utility.set_location(l_proc, 8);
6566: --
6567: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6568: hr_utility.raise_error;
6569: --
6563: if l_style <> 'NL_GLB' then
6564: --
6565: hr_utility.set_location(l_proc, 8);
6566: --
6567: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6568: hr_utility.raise_error;
6569: --
6570: end if;
6571: end if;
6564: --
6565: hr_utility.set_location(l_proc, 8);
6566: --
6567: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6568: hr_utility.raise_error;
6569: --
6570: end if;
6571: end if;
6572: --
6569: --
6570: end if;
6571: end if;
6572: --
6573: hr_utility.set_location(l_proc, 9);
6574: --
6575: -- Update Person Address details.
6576: --
6577: hr_person_address_api.update_person_address
6623: ,p_add_information19 => p_add_information19
6624: ,p_add_information20 => p_add_information20
6625: );
6626: --
6627: hr_utility.set_location(' Leaving:'||l_proc, 11);
6628: end update_NL_person_address;
6629: --
6630: -- ----------------------------------------------------------------------------
6631: -- |-----------------------< update_SG_person_address >-----------------------|
6690: from per_addresses addr
6691: where addr.address_id = p_address_id;
6692: --
6693: begin
6694: hr_utility.set_location('Entering:'|| l_proc, 5);
6695: --
6696: -- Check that the Address identified is of specified style.
6697: --
6698: open csr_add_style;
6701: if csr_add_style%notfound then
6702: --
6703: close csr_add_style;
6704: --
6705: hr_utility.set_location(l_proc, 7);
6706: --
6707: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6708: hr_utility.raise_error;
6709: --
6703: close csr_add_style;
6704: --
6705: hr_utility.set_location(l_proc, 7);
6706: --
6707: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6708: hr_utility.raise_error;
6709: --
6710: else
6711: --
6704: --
6705: hr_utility.set_location(l_proc, 7);
6706: --
6707: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6708: hr_utility.raise_error;
6709: --
6710: else
6711: --
6712: close csr_add_style;
6712: close csr_add_style;
6713: --
6714: if l_style <> 'SG_GLB' then
6715: --
6716: hr_utility.set_location(l_proc, 8);
6717: --
6718: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6719: hr_utility.raise_error;
6720: --
6714: if l_style <> 'SG_GLB' then
6715: --
6716: hr_utility.set_location(l_proc, 8);
6717: --
6718: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6719: hr_utility.raise_error;
6720: --
6721: end if;
6722: end if;
6715: --
6716: hr_utility.set_location(l_proc, 8);
6717: --
6718: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6719: hr_utility.raise_error;
6720: --
6721: end if;
6722: end if;
6723: --
6720: --
6721: end if;
6722: end if;
6723: --
6724: hr_utility.set_location(l_proc, 9);
6725: --
6726: -- Update Person Address details.
6727: --
6728: hr_person_address_api.update_person_address
6773: ,p_add_information19 => p_add_information19
6774: ,p_add_information20 => p_add_information20
6775: );
6776: --
6777: hr_utility.set_location(' Leaving:'||l_proc, 11);
6778: end update_SG_person_address;
6779: --
6780: -- ----------------------------------------------------------------------------
6781: -- |-----------------------< update_SE_person_address >-----------------------|
6840: from per_addresses addr
6841: where addr.address_id = p_address_id;
6842: --
6843: begin
6844: hr_utility.set_location('Entering:'|| l_proc, 5);
6845: --
6846: -- Check that the Address identified is of specified style.
6847: --
6848: open csr_add_style;
6851: if csr_add_style%notfound then
6852: --
6853: close csr_add_style;
6854: --
6855: hr_utility.set_location(l_proc, 7);
6856: --
6857: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6858: hr_utility.raise_error;
6859: --
6853: close csr_add_style;
6854: --
6855: hr_utility.set_location(l_proc, 7);
6856: --
6857: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6858: hr_utility.raise_error;
6859: --
6860: else
6861: --
6854: --
6855: hr_utility.set_location(l_proc, 7);
6856: --
6857: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
6858: hr_utility.raise_error;
6859: --
6860: else
6861: --
6862: close csr_add_style;
6862: close csr_add_style;
6863: --
6864: if l_style <> 'SE_GLB' then
6865: --
6866: hr_utility.set_location(l_proc, 8);
6867: --
6868: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6869: hr_utility.raise_error;
6870: --
6864: if l_style <> 'SE_GLB' then
6865: --
6866: hr_utility.set_location(l_proc, 8);
6867: --
6868: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6869: hr_utility.raise_error;
6870: --
6871: end if;
6872: end if;
6865: --
6866: hr_utility.set_location(l_proc, 8);
6867: --
6868: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
6869: hr_utility.raise_error;
6870: --
6871: end if;
6872: end if;
6873: --
6870: --
6871: end if;
6872: end if;
6873: --
6874: hr_utility.set_location(l_proc, 9);
6875: --
6876: -- Update Person Address details.
6877: --
6878: hr_person_address_api.update_person_address
6923: ,p_add_information19 => p_add_information19
6924: ,p_add_information20 => p_add_information20
6925: );
6926: --
6927: hr_utility.set_location(' Leaving:'||l_proc, 11);
6928: end update_SE_person_address;
6929: --
6930: -- ----------------------------------------------------------------------------
6931: -- |-----------------------< update_ES_GLB_person_address >-----------------------|
6993: begin
6994: --
6995: l_proc := g_package||'update_ES_GLB_person_address';
6996: --
6997: hr_utility.set_location('Entering:'|| l_proc, 5);
6998: --
6999: -- Check that the Address identified is of specified style.
7000: --
7001: open csr_add_style;
7004: if csr_add_style%notfound then
7005: --
7006: close csr_add_style;
7007: --
7008: hr_utility.set_location(l_proc, 7);
7009: --
7010: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7011: hr_utility.raise_error;
7012: --
7006: close csr_add_style;
7007: --
7008: hr_utility.set_location(l_proc, 7);
7009: --
7010: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7011: hr_utility.raise_error;
7012: --
7013: else
7014: --
7007: --
7008: hr_utility.set_location(l_proc, 7);
7009: --
7010: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7011: hr_utility.raise_error;
7012: --
7013: else
7014: --
7015: close csr_add_style;
7015: close csr_add_style;
7016: --
7017: if l_style <> 'ES_GLB' then
7018: --
7019: hr_utility.set_location(l_proc, 8);
7020: --
7021: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7022: hr_utility.raise_error;
7023: --
7017: if l_style <> 'ES_GLB' then
7018: --
7019: hr_utility.set_location(l_proc, 8);
7020: --
7021: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7022: hr_utility.raise_error;
7023: --
7024: end if;
7025: end if;
7018: --
7019: hr_utility.set_location(l_proc, 8);
7020: --
7021: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7022: hr_utility.raise_error;
7023: --
7024: end if;
7025: end if;
7026: --
7023: --
7024: end if;
7025: end if;
7026: --
7027: hr_utility.set_location(l_proc, 9);
7028: --
7029: -- Update Person Address details.
7030: --
7031: hr_person_address_api.update_person_address
7076: ,p_add_information19 => p_add_information19
7077: ,p_add_information20 => p_add_information20
7078: );
7079: --
7080: hr_utility.set_location(' Leaving:'||l_proc, 11);
7081: end update_ES_GLB_person_address;
7082: --
7083: -- ----------------------------------------------------------------------------
7084: -- |-----------------------< update_ES_person_address >-----------------------|
7146: begin
7147: --
7148: l_proc := g_package||'update_ES_person_address';
7149: --
7150: hr_utility.set_location('Entering:'|| l_proc, 5);
7151: --
7152: -- Check that the Address identified is of specified style.
7153: --
7154: open csr_add_style;
7157: if csr_add_style%notfound then
7158: --
7159: close csr_add_style;
7160: --
7161: hr_utility.set_location(l_proc, 7);
7162: --
7163: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7164: hr_utility.raise_error;
7165: --
7159: close csr_add_style;
7160: --
7161: hr_utility.set_location(l_proc, 7);
7162: --
7163: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7164: hr_utility.raise_error;
7165: --
7166: else
7167: --
7160: --
7161: hr_utility.set_location(l_proc, 7);
7162: --
7163: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7164: hr_utility.raise_error;
7165: --
7166: else
7167: --
7168: close csr_add_style;
7168: close csr_add_style;
7169: --
7170: if l_style <> 'ES' then
7171: --
7172: hr_utility.set_location(l_proc, 8);
7173: --
7174: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7175: hr_utility.raise_error;
7176: --
7170: if l_style <> 'ES' then
7171: --
7172: hr_utility.set_location(l_proc, 8);
7173: --
7174: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7175: hr_utility.raise_error;
7176: --
7177: end if;
7178: end if;
7171: --
7172: hr_utility.set_location(l_proc, 8);
7173: --
7174: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7175: hr_utility.raise_error;
7176: --
7177: end if;
7178: end if;
7179: --
7176: --
7177: end if;
7178: end if;
7179: --
7180: hr_utility.set_location(l_proc, 9);
7181: --
7182: -- Update Person Address details.
7183: --
7184: hr_person_address_api.update_person_address
7229: ,p_add_information19 => p_add_information19
7230: ,p_add_information20 => p_add_information20
7231: );
7232: --
7233: hr_utility.set_location(' Leaving:'||l_proc, 11);
7234: end update_ES_person_address;
7235: --
7236: -- ----------------------------------------------------------------------------
7237: -- |-----------------------< update_SA_person_address >-----------------------|
7286: from per_addresses addr
7287: where addr.address_id = p_address_id;
7288: --
7289: begin
7290: hr_utility.set_location('Entering:'|| l_proc, 5);
7291: --
7292: -- Check that the Address identified is of specified style.
7293: --
7294: open csr_add_style;
7297: if csr_add_style%notfound then
7298: --
7299: close csr_add_style;
7300: --
7301: hr_utility.set_location(l_proc, 7);
7302: --
7303: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7304: hr_utility.raise_error;
7305: --
7299: close csr_add_style;
7300: --
7301: hr_utility.set_location(l_proc, 7);
7302: --
7303: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7304: hr_utility.raise_error;
7305: --
7306: else
7307: --
7300: --
7301: hr_utility.set_location(l_proc, 7);
7302: --
7303: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
7304: hr_utility.raise_error;
7305: --
7306: else
7307: --
7308: close csr_add_style;
7308: close csr_add_style;
7309: --
7310: if l_style <> 'SA' then
7311: --
7312: hr_utility.set_location(l_proc, 8);
7313: --
7314: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7315: hr_utility.raise_error;
7316: --
7310: if l_style <> 'SA' then
7311: --
7312: hr_utility.set_location(l_proc, 8);
7313: --
7314: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7315: hr_utility.raise_error;
7316: --
7317: end if;
7318: end if;
7311: --
7312: hr_utility.set_location(l_proc, 8);
7313: --
7314: hr_utility.set_message(801, 'HR_52368_ADD_INV_NOT_CORR_STYLE');
7315: hr_utility.raise_error;
7316: --
7317: end if;
7318: end if;
7319: --
7316: --
7317: end if;
7318: end if;
7319: --
7320: hr_utility.set_location(l_proc, 9);
7321: --
7322: -- Update Person Address details.
7323: --
7324: hr_person_address_api.update_person_address
7359: ,p_addr_attribute19 => p_addr_attribute19
7360: ,p_addr_attribute20 => p_addr_attribute20
7361: );
7362: --
7363: hr_utility.set_location(' Leaving:'||l_proc, 11);
7364: end update_SA_person_address;
7365: --
7366: --
7367: -- ----------------------------------------------------------------------------
7441: lv_object_version_number number := p_object_version_number ;
7442: --
7443: begin
7444: --
7445: hr_utility.set_location('Entering:'|| l_proc, 10);
7446: --
7447: savepoint cre_or_upd_person_address;
7448: --
7449: l_update_mode:=p_update_mode;
7450: l_effective_date:=trunc(p_effective_date);
7451: l_api_updating := per_add_shd.api_updating
7452: (p_address_id => p_address_id
7453: ,p_object_version_number => p_object_version_number);
7454: hr_utility.set_location(l_proc, 20);
7455: --
7456: -- set the record
7457: --
7458: l_add_rec:=
7518: --
7519: -- set g_old_rec to null
7520: --
7521: per_add_shd.g_old_rec:=l_null_add_rec;
7522: hr_utility.set_location(l_proc, 30);
7523: --
7524: -- convert the null values
7525: --
7526: hr_utility.set_location(l_proc, 40);
7522: hr_utility.set_location(l_proc, 30);
7523: --
7524: -- convert the null values
7525: --
7526: hr_utility.set_location(l_proc, 40);
7527: l_add_rec:=per_add_upd.convert_defs(l_add_rec);
7528: --
7529: -- insert the data
7530: --
7527: l_add_rec:=per_add_upd.convert_defs(l_add_rec);
7528: --
7529: -- insert the data
7530: --
7531: hr_utility.set_location(l_proc, 50);
7532: hr_person_address_api.create_person_address
7533: (p_validate => FALSE
7534: ,p_effective_date => l_effective_date
7535: ,p_validate_county => p_validate_county
7585: ,p_address_id => l_add_rec.address_id
7586: ,p_object_version_number => l_add_rec.object_version_number
7587: ,p_party_id => l_add_rec.party_id -- HR/TCA merge
7588: );
7589: hr_utility.set_location(l_proc, 60);
7590: else
7591: hr_utility.set_location(l_proc, 70);
7592: --
7593: -- updating not inserting
7587: ,p_party_id => l_add_rec.party_id -- HR/TCA merge
7588: );
7589: hr_utility.set_location(l_proc, 60);
7590: else
7591: hr_utility.set_location(l_proc, 70);
7592: --
7593: -- updating not inserting
7594: --
7595: -- Validating update_mode values
7593: -- updating not inserting
7594: --
7595: -- Validating update_mode values
7596: if (l_update_mode not in (hr_api.g_update,hr_api.g_correction)) then
7597: hr_utility.set_location(l_proc, 80);
7598: hr_utility.set_message(800, 'HR_52862_ADD_CHK_MODE');
7599: hr_utility.raise_error;
7600: end if;
7601: hr_utility.set_location(l_proc, 90);
7594: --
7595: -- Validating update_mode values
7596: if (l_update_mode not in (hr_api.g_update,hr_api.g_correction)) then
7597: hr_utility.set_location(l_proc, 80);
7598: hr_utility.set_message(800, 'HR_52862_ADD_CHK_MODE');
7599: hr_utility.raise_error;
7600: end if;
7601: hr_utility.set_location(l_proc, 90);
7602: --
7595: -- Validating update_mode values
7596: if (l_update_mode not in (hr_api.g_update,hr_api.g_correction)) then
7597: hr_utility.set_location(l_proc, 80);
7598: hr_utility.set_message(800, 'HR_52862_ADD_CHK_MODE');
7599: hr_utility.raise_error;
7600: end if;
7601: hr_utility.set_location(l_proc, 90);
7602: --
7603: -- Validating effective_date
7597: hr_utility.set_location(l_proc, 80);
7598: hr_utility.set_message(800, 'HR_52862_ADD_CHK_MODE');
7599: hr_utility.raise_error;
7600: end if;
7601: hr_utility.set_location(l_proc, 90);
7602: --
7603: -- Validating effective_date
7604: --
7605: if ((p_date_to <> hr_api.g_date) AND ( l_effective_date > p_date_to ))
7604: --
7605: if ((p_date_to <> hr_api.g_date) AND ( l_effective_date > p_date_to ))
7606: or ((p_date_from <> hr_api.g_date) AND ( l_effective_date < p_date_from ))
7607: then
7608: hr_utility.set_location(l_proc, 100);
7609: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7610: hr_utility.raise_error;
7611: end if;
7612: hr_utility.set_location(l_proc, 110);
7605: if ((p_date_to <> hr_api.g_date) AND ( l_effective_date > p_date_to ))
7606: or ((p_date_from <> hr_api.g_date) AND ( l_effective_date < p_date_from ))
7607: then
7608: hr_utility.set_location(l_proc, 100);
7609: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7610: hr_utility.raise_error;
7611: end if;
7612: hr_utility.set_location(l_proc, 110);
7613: --
7606: or ((p_date_from <> hr_api.g_date) AND ( l_effective_date < p_date_from ))
7607: then
7608: hr_utility.set_location(l_proc, 100);
7609: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7610: hr_utility.raise_error;
7611: end if;
7612: hr_utility.set_location(l_proc, 110);
7613: --
7614: per_add_shd.lck
7608: hr_utility.set_location(l_proc, 100);
7609: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7610: hr_utility.raise_error;
7611: end if;
7612: hr_utility.set_location(l_proc, 110);
7613: --
7614: per_add_shd.lck
7615: (p_address_id => p_address_id
7616: ,p_object_version_number => p_object_version_number);
7616: ,p_object_version_number => p_object_version_number);
7617: --
7618: -- convert the null values
7619: --
7620: hr_utility.set_location(l_proc, 130);
7621: l_add_rec:=per_add_upd.convert_defs(l_add_rec);
7622: --
7623: -- check to see if the start date hasn't changed and is equal to the
7624: -- effective date. This will always be a correction.
7633: if l_update_mode = hr_api.g_correction then
7634: --
7635: -- correct the data
7636: --
7637: hr_utility.set_location(l_proc, 140);
7638: --
7639: -- Bug 2863410 starts here.
7640: -- If the style is changed then used update_pers_addr_with_style.
7641: --
7640: -- If the style is changed then used update_pers_addr_with_style.
7641: --
7642: IF per_add_shd.g_old_rec.style <> l_add_rec.style THEN
7643: --
7644: hr_utility.set_location(l_proc, 142);
7645: --
7646: hr_person_address_api.update_pers_addr_with_style
7647: (p_validate => FALSE
7648: ,p_effective_date => l_effective_date
7696: ,p_add_information20 => l_add_rec.add_information20
7697: ,p_style => l_add_rec.style
7698: );
7699: --
7700: hr_utility.set_location(l_proc, 144);
7701: --
7702: ELSE
7703: --
7704: -- Address style is not changed.
7702: ELSE
7703: --
7704: -- Address style is not changed.
7705: --
7706: hr_utility.set_location(l_proc, 146);
7707: --
7708: hr_person_address_api.update_person_address
7709: (p_validate => FALSE
7710: ,p_effective_date => l_effective_date
7757: ,p_add_information19 => l_add_rec.add_information19
7758: ,p_add_information20 => l_add_rec.add_information20
7759: );
7760: --
7761: hr_utility.set_location(l_proc, 148);
7762: --
7763: END IF;
7764: --
7765: -- Bug 2863410 ends here.
7763: END IF;
7764: --
7765: -- Bug 2863410 ends here.
7766: --
7767: hr_utility.set_location(l_proc, 150);
7768: --
7769: else
7770: --
7771: -- update mode
7769: else
7770: --
7771: -- update mode
7772: --
7773: hr_utility.set_location(l_proc, 160);
7774: --
7775: -- if the start date has changed and it is not the effective date then
7776: -- we have an error. A change of start date is the new start date for
7777: -- the new record, so must be the effective date so that the address
7778: -- is continuous.
7779: --
7780: if per_add_shd.g_old_rec.date_from <> l_add_rec.date_from
7781: and l_add_rec.date_from <> l_effective_date then
7782: hr_utility.set_location(l_proc, 170);
7783: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7784: hr_utility.raise_error;
7785: end if;
7786: --
7779: --
7780: if per_add_shd.g_old_rec.date_from <> l_add_rec.date_from
7781: and l_add_rec.date_from <> l_effective_date then
7782: hr_utility.set_location(l_proc, 170);
7783: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7784: hr_utility.raise_error;
7785: end if;
7786: --
7787: hr_utility.set_location(l_proc, 180);
7780: if per_add_shd.g_old_rec.date_from <> l_add_rec.date_from
7781: and l_add_rec.date_from <> l_effective_date then
7782: hr_utility.set_location(l_proc, 170);
7783: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7784: hr_utility.raise_error;
7785: end if;
7786: --
7787: hr_utility.set_location(l_proc, 180);
7788: --
7783: hr_utility.set_message(800, 'HR_52863_ADD_INVALID_EFF_DATE');
7784: hr_utility.raise_error;
7785: end if;
7786: --
7787: hr_utility.set_location(l_proc, 180);
7788: --
7789: -- end the old address
7790: --2660711, remove this call, change the create call to pass TRUE for
7791: --p_pradd_ovlapval_override which will achieve the same thing
7814: end if;
7815: -- changes ended for bug5372061
7816:
7817: --
7818: hr_utility.set_location(l_proc, 190);
7819: --
7820: -- insert the new address
7821: --
7822: hr_person_address_api.create_person_address
7876: ,p_object_version_number => l_add_rec.object_version_number
7877: ,p_party_id => l_add_rec.party_id -- HR/TCA merge
7878: );
7879: --
7880: hr_utility.set_location(l_proc, 190);
7881: --
7882: end if;
7883: end if;
7884: --
7887: end if;
7888: --
7889: p_address_id:=l_add_rec.address_id;
7890: p_object_version_number:=l_add_rec.object_version_number;
7891: hr_utility.set_location('Leaving:'||l_proc, 200);
7892: --
7893: exception
7894: when hr_api.validate_enabled then
7895: rollback to cre_or_upd_person_address;
7894: when hr_api.validate_enabled then
7895: rollback to cre_or_upd_person_address;
7896: p_address_id:=null;
7897: p_object_version_number:=null;
7898: hr_utility.set_location('Leaving:'||l_proc, 220);
7899: when others then
7900: p_address_id := lv_address_id ;
7901: p_object_version_number := lv_object_version_number ;
7902: rollback to cre_or_upd_person_address;
7899: when others then
7900: p_address_id := lv_address_id ;
7901: p_object_version_number := lv_object_version_number ;
7902: rollback to cre_or_upd_person_address;
7903: hr_utility.set_location('Leaving:'||l_proc, 230);
7904: raise;
7905: --
7906: end cre_or_upd_person_address;
7907: --