[Home] [Help]
561: debug_exit(l_proc);
562: return l_include;
563: END IF; --IF l_include = 'N'
564:
565: IF UPPER(l_change_table) = 'PER_ADDRESSES' THEN
566: IF g_person_addresses.exists(l_chg_surrogate_key)
567: AND (g_person_addresses(l_chg_surrogate_key).address_type
568: NOT IN (g_office_address_type,g_home_address_type)
569: OR g_person_addresses(l_chg_surrogate_key).address_type IS NULL) THEN
592: END IF;--IF NOT chk_pen_addresses_exist(g_effective_date)
593:
594: END IF;---IF g_person_addresses.exists(l_chg_surrogate_key)
595:
596: END IF; --IF UPPER(l_change_table) = 'PER_ADDRESSES'
597: --------------------------
598:
599: debug('Returning : '||l_include,10);
600: debug_exit(l_proc);
898: p_address_line1 OUT NOCOPY VARCHAR2
899: ) RETURN NUMBER
900: IS
901: l_proc varchar2(72) := g_package||'.get_address_line1';
902: l_address_line1 per_addresses.address_line1%TYPE;
903: BEGIN
904: debug_enter(l_proc);
905: l_address_line1 := NULL;
906: IF g_current_run = 'CUTOVER' THEN
965: p_address_line2 OUT NOCOPY VARCHAR2
966: ) RETURN NUMBER
967: IS
968: l_proc varchar2(72) := g_package||'.get_address_line2';
969: l_address_line2 per_addresses.address_line2%TYPE;
970: BEGIN
971: debug_enter(l_proc);
972: l_address_line2 := NULL;
973: IF g_current_run = 'CUTOVER' THEN
1014: p_address_line3 OUT NOCOPY VARCHAR2
1015: ) RETURN NUMBER
1016: IS
1017: l_proc varchar2(72) := g_package||'.get_address_line3';
1018: l_address_line3 per_addresses.address_line3%TYPE;
1019: BEGIN
1020: debug_enter(l_proc);
1021: l_address_line3 := NULL;
1022: IF g_current_run = 'CUTOVER' THEN
1075: p_address_line4 OUT NOCOPY VARCHAR2
1076: ) RETURN NUMBER
1077: IS
1078: l_proc varchar2(72) := g_package||'.get_address_line4';
1079: l_address_line4 per_addresses.region_1%TYPE;
1080: BEGIN
1081: debug_enter(l_proc);
1082: l_address_line4 := NULL;
1083: IF g_current_run = 'CUTOVER' THEN
1136: p_address_line5 OUT NOCOPY VARCHAR2
1137: ) RETURN NUMBER
1138: IS
1139: l_proc varchar2(72) := g_package||'.get_address_line5';
1140: l_address_line5 per_addresses.region_1%TYPE;
1141: BEGIN
1142: debug_enter(l_proc);
1143: l_address_line5 := NULL;
1144: IF g_current_run = 'CUTOVER' THEN
1198: p_address_postcode OUT NOCOPY VARCHAR2
1199: ) RETURN NUMBER
1200: IS
1201: l_proc varchar2(72) := g_package||'.get_address_postcode';
1202: l_postal_code per_addresses.postal_code%TYPE;
1203: l_country per_addresses.country%TYPE;
1204: BEGIN
1205: debug_enter(l_proc);
1206: l_postal_code := NULL;
1199: ) RETURN NUMBER
1200: IS
1201: l_proc varchar2(72) := g_package||'.get_address_postcode';
1202: l_postal_code per_addresses.postal_code%TYPE;
1203: l_country per_addresses.country%TYPE;
1204: BEGIN
1205: debug_enter(l_proc);
1206: l_postal_code := NULL;
1207: IF g_current_run = 'CUTOVER' THEN
1272: p_country OUT NOCOPY VARCHAR2
1273: ) RETURN NUMBER
1274: IS
1275: l_proc varchar2(72) := g_package||'.get_country';
1276: l_country per_addresses.country%TYPE;
1277: BEGIN
1278: debug_enter(l_proc);
1279: IF g_current_run = 'CUTOVER' THEN
1280: IF (g_current_layout = 'HOME' AND g_home_address_changed = 'Y') OR
1345: p_address_effdate OUT NOCOPY VARCHAR2
1346: ) RETURN NUMBER
1347: IS
1348: l_proc varchar2(72) := g_package||'.get_address_effdate';
1349: l_date_from per_addresses.date_from%TYPE;
1350: BEGIN
1351: debug_enter(l_proc);
1352: l_date_from := NULL;
1353: IF g_current_run = 'CUTOVER' THEN
1518: p_telephone_number_1 OUT NOCOPY VARCHAR2
1519: ) RETURN NUMBER
1520: IS
1521: l_proc varchar2(72) := g_package||'.get_telephone_number_1';
1522: l_telephone_number_1 per_addresses.telephone_number_1%TYPE;
1523: BEGIN
1524: debug_enter(l_proc);
1525: l_telephone_number_1 := NULL;
1526: IF g_current_run = 'CUTOVER' THEN
1580: p_telephone_number_2 OUT NOCOPY VARCHAR2
1581: ) RETURN NUMBER
1582: IS
1583: l_proc varchar2(72) := g_package||'.get_telephone_number_2';
1584: l_telephone_number_2 per_addresses.telephone_number_2%TYPE;
1585: BEGIN
1586: debug_enter(l_proc);
1587: l_telephone_number_2 := NULL;
1588: IF g_current_run = 'CUTOVER' THEN
1680: l_chg_surrogate_key := ben_ext_person.g_chg_surrogate_key;
1681: l_change_table := ben_ext_person.g_chg_pay_table;
1682: l_change_column := ben_ext_person.g_chg_pay_column;
1683: -- added in version 115.15
1684: IF UPPER(l_change_table) = 'PER_ADDRESSES'
1685: AND g_person_addresses.exists(l_chg_surrogate_key)
1686: AND (g_person_addresses(l_chg_surrogate_key).address_type
1687: NOT IN (g_office_address_type,g_home_address_type)
1688: OR g_person_addresses(l_chg_surrogate_key).address_type IS NULL)
1698: END IF;
1699: debug('p_output_value: '||p_output_value,10);
1700: debug_exit(l_proc);
1701: return l_error;
1702: END IF;--IF UPPER(l_change_table) = 'PER_ADDRESSES'
1703: ----------
1704: END IF;--IF g_current_run = 'CUTOVER'
1705:
1706: debug('l_change_table: '||l_change_table,10);
1719: -- The home/office address id are picked up from the respective
1720: -- global variable. These values are set while setting the assignment
1721: -- globals for a cutover run. and during chk_xxx_address_changed function
1722: -- for periodic changes extract.
1723: IF l_change_table <> 'PER_ADDRESSES' THEN
1724: IF g_current_layout = 'OFFICE' THEN
1725: l_chg_surrogate_key := g_office_address_id;
1726: ELSE
1727: l_chg_surrogate_key := g_home_address_id;