DBA Data[Home] [Help]

APPS.PER_ADDRESSES_PKG dependencies on PER_ADDRESSES

Line 1: PACKAGE BODY PER_ADDRESSES_PKG AS

1: PACKAGE BODY PER_ADDRESSES_PKG AS
2: /* $Header: peadd01t.pkb 120.2.12020000.6 2012/07/05 00:33:17 amnaraya ship $ */
3:
4: g_pkg CONSTANT Varchar2(150):='PER_Addresses_Pkg.';
5: -- ===========================================================================

Line 4: g_pkg CONSTANT Varchar2(150):='PER_Addresses_Pkg.';

1: PACKAGE BODY PER_ADDRESSES_PKG AS
2: /* $Header: peadd01t.pkb 120.2.12020000.6 2012/07/05 00:33:17 amnaraya ship $ */
3:
4: g_pkg CONSTANT Varchar2(150):='PER_Addresses_Pkg.';
5: -- ===========================================================================
6: -- InsUpd_OSS_Person_Add: Insert or Update address into hz_locations only if
7: -- the person is a student or faculty employee.
8: -- p_action : Valid Values INSERT and UPDATE

Line 12: (p_addr_rec_new in per_addresses%ROWTYPE

8: -- p_action : Valid Values INSERT and UPDATE
9: -- p_effective_date :
10: -- ===========================================================================
11: PROCEDURE InsUpd_OSS_Person_Add
12: (p_addr_rec_new in per_addresses%ROWTYPE
13: ,p_addr_rec_old in per_addresses%ROWTYPE
14: ,p_action in varchar2
15: ,p_effective_date in date
16: ) As

Line 13: ,p_addr_rec_old in per_addresses%ROWTYPE

9: -- p_effective_date :
10: -- ===========================================================================
11: PROCEDURE InsUpd_OSS_Person_Add
12: (p_addr_rec_new in per_addresses%ROWTYPE
13: ,p_addr_rec_old in per_addresses%ROWTYPE
14: ,p_action in varchar2
15: ,p_effective_date in date
16: ) As
17: -- Cursor to check if person is student

Line 136: Procedure to perform DML on the table PER_ADDRESSES

132:
133: END InsUpd_OSS_Person_Add;
134:
135: /*
136: Procedure to perform DML on the table PER_ADDRESSES
137: when it is used in Forms which utilise the Base View method
138: */
139: --
140: --

Line 205: per_addresses_pkg.insert_row(p_row_id

201: -- Local Variables
202: --
203: l_default_primary VARCHAR2(1);
204: begin
205: per_addresses_pkg.insert_row(p_row_id
206: ,p_address_id
207: ,p_business_group_id
208: ,p_person_id
209: ,p_date_from

Line 328: cursor c1 is select per_addresses_s.nextval

324: ,p_end_of_time DATE DEFAULT to_date('31-12-4712','DD-MM-YYYY')
325: ,p_default_primary IN OUT NOCOPY VARCHAR2
326: ) is
327: --
328: cursor c1 is select per_addresses_s.nextval
329: from sys.dual;
330: --
331: cursor c2 is select rowid
332: from per_addresses

Line 332: from per_addresses

328: cursor c1 is select per_addresses_s.nextval
329: from sys.dual;
330: --
331: cursor c2 is select rowid
332: from per_addresses
333: where address_id = p_address_id;
334: -- rpinjala
335:
336: cursor c3 is select *

Line 337: from per_addresses

333: where address_id = p_address_id;
334: -- rpinjala
335:
336: cursor c3 is select *
337: from per_addresses
338: where address_id = p_address_id;
339: l_addr_rec per_addresses%ROWTYPE;
340: -- rpinjala
341: --

Line 339: l_addr_rec per_addresses%ROWTYPE;

335:
336: cursor c3 is select *
337: from per_addresses
338: where address_id = p_address_id;
339: l_addr_rec per_addresses%ROWTYPE;
340: -- rpinjala
341: --
342: cursor csr_get_party_id is
343: select max(party_id)

Line 398: insert into per_addresses(

394: open csr_get_party_id;
395: fetch csr_get_party_id into l_party_id;
396: close csr_get_party_id;
397: --
398: insert into per_addresses(
399: address_id
400: ,business_group_id
401: ,person_id
402: ,date_from

Line 557: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id

553: fetch c2 into p_row_id;
554: --
555: close c2;
556: --
557: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id
558: ,p_business_group_id
559: ,p_end_of_time);
560: -- Now need to insure that tax record exists if this is the Primary address.
561: -- For US Payroll installed, employees only.

Line 603: per_addresses_pkg.delete_row(p_row_id

599: l_business_group_id NUMBER;
600: l_end_of_time DATE;
601: l_default_primary VARCHAR2(1);
602: begin
603: per_addresses_pkg.delete_row(p_row_id
604: ,l_person_id
605: ,l_business_group_id
606: ,l_end_of_time
607: ,l_default_primary);

Line 617: delete from per_addresses pa

613: ,p_end_of_time DATE
614: ,p_default_primary IN OUT NOCOPY VARCHAR2) is
615: --
616: begin
617: delete from per_addresses pa
618: where pa.rowid = chartorowid(p_row_id);
619: --
620: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id
621: ,p_business_group_id

Line 620: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id

616: begin
617: delete from per_addresses pa
618: where pa.rowid = chartorowid(p_row_id);
619: --
620: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id
621: ,p_business_group_id
622: ,p_end_of_time);
623: --
624: end delete_row;

Line 675: from per_addresses

671: ,p_add_information19 VARCHAR2
672: ,p_add_information20 VARCHAR2
673: ) is
674: cursor addr is select *
675: from per_addresses
676: where rowid = chartorowid(p_row_id)
677: for update nowait;
678: add_rec addr%rowtype;
679: begin

Line 935: PER_ADDRESSES_PKG.update_row(p_row_id

931: l_return_text varchar2(240);
932:
933: begin
934: hr_utility.set_location('update_row',1);
935: PER_ADDRESSES_PKG.update_row(p_row_id
936: ,p_address_id
937: ,p_business_group_id
938: ,p_person_id
939: ,p_date_from

Line 1087: from per_addresses

1083:
1084: --
1085: cursor c1 is
1086: select *
1087: from per_addresses
1088: where rowid = chartorowid(p_row_id);
1089: --
1090: l_c1 c1%rowtype;
1091: l_c2 c1%rowtype;

Line 1123: update per_addresses pa set

1119: close c1;
1120: --
1121: -- End of Fix for WWBUG 1408379
1122: --
1123: update per_addresses pa set
1124: pa.address_id = p_address_id
1125: ,pa.business_group_id = p_business_group_id
1126: ,pa.person_id = p_person_id
1127: ,pa.date_from = p_date_from

Line 1224: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id

1220: -- ==============================================================
1221: --
1222: -- End of Fix for WWBUG 1408379
1223: --
1224: p_default_primary := per_addresses_pkg.does_primary_exist(p_person_id
1225: ,p_business_group_id
1226: ,p_end_of_time);
1227: --
1228: --OPEN get_install_info;

Line 1266: from per_addresses pa

1262: ,p_business_group_id NUMBER
1263: ,p_end_of_time DATE) return VARCHAR2 is
1264: cursor primary_address is
1265: select 'Y'
1266: from per_addresses pa
1267: , fnd_sessions fs
1268: where pa.business_group_id + 0 = p_business_group_id
1269: and pa.person_id = p_person_id
1270: and pa.primary_flag = 'Y'

Line 1298: from per_addresses pa1

1294: --
1295: --
1296: cursor get_addr is
1297: select 'Y'
1298: from per_addresses pa1
1299: where pa1.primary_flag = 'N'
1300: and pa1.person_id = p_person_id
1301: and not exists (select 'x'
1302: from per_addresses pa2

Line 1302: from per_addresses pa2

1298: from per_addresses pa1
1299: where pa1.primary_flag = 'N'
1300: and pa1.person_id = p_person_id
1301: and not exists (select 'x'
1302: from per_addresses pa2
1303: where pa2.person_id = pa1.person_id
1304: and pa2.primary_flag = 'Y'
1305: and pa2.address_id <> pa1.address_id
1306: and pa2.date_from <=pa1.date_from

Line 1406: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id

1402: ,p_legislation_code VARCHAR2
1403: ,p_default_country IN OUT NOCOPY VARCHAR2
1404: ,p_default_style IN OUT NOCOPY VARCHAR2) is
1405: begin
1406: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id
1407: ,p_business_group_id
1408: ,p_end_of_time);
1409: --
1410: per_addresses_pkg.get_default_style(p_legislation_code

Line 1410: per_addresses_pkg.get_default_style(p_legislation_code

1406: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id
1407: ,p_business_group_id
1408: ,p_end_of_time);
1409: --
1410: per_addresses_pkg.get_default_style(p_legislation_code
1411: ,p_default_country
1412: ,p_default_style);
1413: --
1414: end form_startup1;

Line 1423: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id

1419: ,p_primary_flag IN OUT NOCOPY VARCHAR2
1420: ,p_legislation_code VARCHAR2
1421: ,p_default_country IN OUT NOCOPY VARCHAR2) is
1422: begin
1423: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id
1424: ,p_business_group_id
1425: ,p_end_of_time);
1426: --
1427: per_addresses_pkg.get_addresses(p_legislation_code

Line 1427: per_addresses_pkg.get_addresses(p_legislation_code

1423: p_primary_flag := per_addresses_pkg.does_primary_exist(p_person_id
1424: ,p_business_group_id
1425: ,p_end_of_time);
1426: --
1427: per_addresses_pkg.get_addresses(p_legislation_code
1428: ,p_default_country);
1429: --
1430: end form_startup;
1431: ------------------------- BEGIN: validate_address --------------------

Line 1459: from per_addresses pa

1455: v_effective_date date;
1456: --
1457: cursor has_addrs is
1458: select 'Y'
1459: from per_addresses pa
1460: where pa.person_id = p_person_id;
1461: --
1462: cursor check_min_is_primary is
1463: select 'Y'

Line 1464: from per_addresses pa

1460: where pa.person_id = p_person_id;
1461: --
1462: cursor check_min_is_primary is
1463: select 'Y'
1464: from per_addresses pa
1465: where person_id = p_person_id
1466: and date_from = l_date_from
1467: and primary_flag = 'Y';
1468: --

Line 1471: from per_addresses pa

1467: and primary_flag = 'Y';
1468: --
1469: cursor has_primary is
1470: select 'Y'
1471: from per_addresses pa
1472: where person_id = p_person_id
1473: and primary_flag = 'Y';
1474: --
1475: cursor get_mins is

Line 1477: from per_addresses

1473: and primary_flag = 'Y';
1474: --
1475: cursor get_mins is
1476: select min(date_from)
1477: from per_addresses
1478: where person_id = p_person_id;
1479:
1480:
1481: cursor get_payroll is

Line 1492: from per_addresses pa

1488:
1489: /*
1490: cursor get_next(l_date_from in date) is
1491: select date_to
1492: from per_addresses pa
1493: where date_from = l_date_from
1494: and person_id = p_person_id
1495: and primary_flag = 'Y';
1496: */

Line 1500: from per_addresses pa

1496: */
1497: cursor get_next is
1498: select date_from,
1499: date_to
1500: from per_addresses pa
1501: where person_id = p_person_id
1502: and primary_flag = 'Y'
1503: order by date_from;
1504: --

Line 1507: from per_addresses pa

1503: order by date_from;
1504: --
1505: cursor get_overlapping is
1506: select 'Y'
1507: from per_addresses pa
1508: where person_id = p_person_id
1509: and primary_flag = 'Y'
1510: and exists (select 'Y'
1511: from per_addresses pa2

Line 1511: from per_addresses pa2

1507: from per_addresses pa
1508: where person_id = p_person_id
1509: and primary_flag = 'Y'
1510: and exists (select 'Y'
1511: from per_addresses pa2
1512: where pa.person_id = pa2.person_id
1513: and pa.address_id <> pa2.address_id
1514: and pa2.primary_flag = 'Y'
1515: and ((pa2.date_from between pa.date_from and

Line 1547: from per_addresses pa

1543: -- Validate Address type Cursor
1544: --
1545: cursor validate_address_types is
1546: select 1
1547: from per_addresses pa
1548: where pa.address_type is not null
1549: and pa.person_id = p_person_id
1550: and exists( select 1
1551: from per_addresses pa2

Line 1551: from per_addresses pa2

1547: from per_addresses pa
1548: where pa.address_type is not null
1549: and pa.person_id = p_person_id
1550: and exists( select 1
1551: from per_addresses pa2
1552: where pa2.address_id <> pa.address_id
1553: and pa2.address_type is not null
1554: and pa.address_type = pa2.address_type
1555: and pa.person_id = pa2.person_id

Line 1563: l_proc VARCHAR2(50) := 'per_addresses_pkg.validate_address';

1559: (nvl(pa.date_to,p_end_of_time) between pa2.date_from and
1560: nvl(pa2.date_to, p_end_of_time))
1561: ));
1562: --
1563: l_proc VARCHAR2(50) := 'per_addresses_pkg.validate_address';
1564: --
1565: begin
1566: --
1567: hr_utility.set_location('Entering : '||l_proc,10);

Line 1787: from per_addresses pa

1783: if check_emp_cwk_person_type2%FOUND then
1784: begin
1785: /* select 'Y'
1786: into v_dummy
1787: from per_addresses pa
1788: where person_id = p_person_id
1789: and primary_flag = 'N'
1790: and date_from between l_date_from and l_date_to;
1791:

Line 1802: from per_addresses pa

1798:
1799: -- changes for bug13602807
1800: select 'Y'
1801: into v_dummy
1802: from per_addresses pa
1803: where person_id = p_person_id
1804: and primary_flag = 'Y'
1805: and l_date_to between date_from and nvl(date_to,to_date('31-12-4712','DD-MM-YYYY')) ;
1806:

Line 1862: END PER_ADDRESSES_PKG;

1858: hr_utility.set_location('Leaving : '||l_proc,999);
1859: --
1860: end validate_address;
1861: --
1862: END PER_ADDRESSES_PKG;