eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PER_CONTACT_RELATIONSHIPS_PKG dependencies on PER_CONTACT_RELATIONSHIPS

Line 1: PACKAGE BODY PER_CONTACT_RELATIONSHIPS_PKG AS

1: PACKAGE BODY PER_CONTACT_RELATIONSHIPS_PKG AS
2: /* $Header: pecon01t.pkb 120.8.12010000.1 2008/07/28 04:24:03 appldev ship $ */
3: /*---------------------------------------------------------------------------
4: --
5: Change List

Line 29: into PER_CONTACT_RELATIONSHIPS for the

25: 04-MAR-97 JAlloun 70.13 Changed all occurances of system.dual to
26: sys.dual for next release requirements.
27: 18-JUL-97 RKAMIYAM 70.14 Added per_information1 to 30 and know_as cols
28: 11-Sep-97 IHARDING 110.1 505202 Insert value 'N' for all relationship flags
29: into PER_CONTACT_RELATIONSHIPS for the
30: mirror contact.
31: 04-DEC-97 IHARDING 110.2 568596 Set p_comments to null when creating
32: a mirror contact relationship row.
33: 05-MAY-98 CCARTER 115.1 Changes to the following procedures resulting

Line 73: 14-Feb-02 hnarayan 115.27 1772037 added code to pass dff attributes of per_contact_relationships

69: 19-Oct-01 wstallar 115.21 add support for TCA-mapped columns
70: 24-Oct-01 adhunter 115.23 1931258 added ben_person_delete calls in delete_row
71: 15-Nov-01 adhunter 115.24 2073795 added validation for X_Contact_Person_Id.
72: 16-Nov-01 adhunter 115.25 added dbdrv line
73: 14-Feb-02 hnarayan 115.27 1772037 added code to pass dff attributes of per_contact_relationships
74: table to ben_con_ler.ler_chk procedure
75: Makiko Iwamoto 2002/03/05 115.28 2225930 Added procedure chk_dates to validate
76: if new date_start is earlier than the
77: effective_start_date of child contact extra

Line 168: FROM per_contact_relationships

164: ,p_date_end DATE
165: ) RETURN BOOLEAN IS
166: CURSOR c IS
167: SELECT 'Y'
168: FROM per_contact_relationships
169: WHERE person_id = p_person_id
170: AND primary_contact_flag = 'Y'
171: AND NVL(date_start, Hr_General.start_of_time) <=
172: NVL(p_date_end,Hr_General.end_of_time)

Line 205: FROM per_contact_relationships per

201: l_start_of_time DATE := Hr_General.start_of_time;
202: l_end_of_time DATE := Hr_General.end_of_time;
203: CURSOR c IS
204: SELECT 'X'
205: FROM per_contact_relationships per
206: WHERE per.person_id = p_person_id
207: AND per.contact_person_id = p_contact_person_id
208: AND (per.contact_relationship_id <> p_contact_relationship_id
209: OR p_contact_relationship_id IS NULL)

Line 262: x_contact_relationship_id IN per_contact_relationships.contact_relationship_id%TYPE,

258: --
259: -- {End Of Comments}
260: -- ---------------------------------------------------------------------------
261: PROCEDURE chk_dates(
262: x_contact_relationship_id IN per_contact_relationships.contact_relationship_id%TYPE,
263: x_date_start IN per_contact_relationships.date_start%TYPE,
264: x_date_end IN per_contact_relationships.date_end%TYPE) IS
265: --
266: CURSOR cel_earlier_child_exists IS

Line 263: x_date_start IN per_contact_relationships.date_start%TYPE,

259: -- {End Of Comments}
260: -- ---------------------------------------------------------------------------
261: PROCEDURE chk_dates(
262: x_contact_relationship_id IN per_contact_relationships.contact_relationship_id%TYPE,
263: x_date_start IN per_contact_relationships.date_start%TYPE,
264: x_date_end IN per_contact_relationships.date_end%TYPE) IS
265: --
266: CURSOR cel_earlier_child_exists IS
267: SELECT 1

Line 264: x_date_end IN per_contact_relationships.date_end%TYPE) IS

260: -- ---------------------------------------------------------------------------
261: PROCEDURE chk_dates(
262: x_contact_relationship_id IN per_contact_relationships.contact_relationship_id%TYPE,
263: x_date_start IN per_contact_relationships.date_start%TYPE,
264: x_date_end IN per_contact_relationships.date_end%TYPE) IS
265: --
266: CURSOR cel_earlier_child_exists IS
267: SELECT 1
268: FROM per_contact_extra_info_f

Line 549: SELECT ROWID FROM PER_CONTACT_RELATIONSHIPS

545: -- Local procedure to insert individual contact row
546: --
547: PROCEDURE Insert_Contact IS
548: CURSOR C IS
549: SELECT ROWID FROM PER_CONTACT_RELATIONSHIPS
550: WHERE contact_relationship_id = X_Contact_Relationship_Id;
551: --
552: CURSOR C2 IS
553: SELECT per_contact_relationships_s.NEXTVAL FROM sys.dual;

Line 553: SELECT per_contact_relationships_s.NEXTVAL FROM sys.dual;

549: SELECT ROWID FROM PER_CONTACT_RELATIONSHIPS
550: WHERE contact_relationship_id = X_Contact_Relationship_Id;
551: --
552: CURSOR C2 IS
553: SELECT per_contact_relationships_s.NEXTVAL FROM sys.dual;
554: --
555: -- Start of Fix for WWBUG 1408379
556: --
557: l_old ben_con_ler.g_con_ler_rec;

Line 594: INSERT INTO PER_CONTACT_RELATIONSHIPS(

590: hr_utility.set_message(800,'PER_6996_REL_CURR_EXISTS');
591: hr_utility.raise_error;
592: END IF;
593: --
594: INSERT INTO PER_CONTACT_RELATIONSHIPS(
595: contact_relationship_id,
596: business_group_id,
597: person_id,
598: contact_person_id,

Line 1490: FROM PER_CONTACT_RELATIONSHIPS

1486:
1487: ) IS
1488: CURSOR C IS
1489: SELECT *
1490: FROM PER_CONTACT_RELATIONSHIPS
1491: WHERE ROWID = X_Rowid
1492: FOR UPDATE OF Contact_Relationship_Id NOWAIT;
1493: Recinfo C%ROWTYPE;
1494: BEGIN

Line 1838: FROM per_contact_relationships

1834: --
1835: --fix for bug 4867048.
1836: CURSOR Check_Mirror_Update IS
1837: SELECT 'Y'
1838: FROM per_contact_relationships
1839: WHERE ROWID = CHARTOROWID(X_Rowid)
1840: AND( nvl(date_start,hr_api.g_date) <> nvl(X_date_start,hr_api.g_date)
1841: OR nvl(start_life_reason_id,hr_api.g_number) <> nvl(X_start_life_reason_Id,hr_api.g_number)
1842: OR nvl(date_end,hr_api.g_date) <> nvl(X_date_end,hr_api.g_date)

Line 1849: FROM per_contact_relationships

1845: OR nvl(personal_flag,hr_api.g_varchar2) <> nvl(X_personal_flag,hr_api.g_varchar2));
1846: --
1847: CURSOR Check_Mirror IS
1848: SELECT ROWIDTOCHAR(ROWID)
1849: FROM per_contact_relationships
1850: WHERE contact_person_id = X_Person_Id
1851: AND person_id = X_Contact_Person_Id
1852: AND contact_type = l_old_mirror_contact_type
1853: AND nvl(date_start,hr_api.g_date) =nvl(l_date_start,hr_api.g_date)--fix for bug 4867048.

Line 1858: FROM per_contact_relationships

1854: FOR UPDATE OF Contact_Type;
1855: --
1856: CURSOR Check_Relationship_Changed IS
1857: SELECT 'Y'
1858: FROM per_contact_relationships
1859: WHERE contact_relationship_id = X_Contact_Relationship_Id
1860: AND contact_type <> X_Contact_Type
1861: AND EXISTS
1862: (SELECT NULL

Line 1871: FROM per_contact_relationships

1867: -- Start of Fix for WWBUG 1408379
1868: --
1869: CURSOR c1 IS
1870: SELECT *
1871: FROM per_contact_relationships
1872: WHERE ROWID = CHARTOROWID(l_mirror_rowid);
1873: --
1874: CURSOR c2 IS
1875: SELECT *

Line 1876: FROM per_contact_relationships

1872: WHERE ROWID = CHARTOROWID(l_mirror_rowid);
1873: --
1874: CURSOR c2 IS
1875: SELECT *
1876: FROM per_contact_relationships
1877: WHERE ROWID = x_rowid;
1878: --
1879: l_c1 c1%ROWTYPE;
1880: l_rows_found BOOLEAN := FALSE;

Line 1893: FROM per_contact_relationships

1889: BEGIN
1890: --
1891: SELECT date_start, contact_type
1892: INTO l_date_start, l_contact_type
1893: FROM per_contact_relationships
1894: WHERE ROWID = CHARTOROWID(X_rowid);
1895: --
1896: -- Find the mirror_contact_type before update to locate
1897: -- the correct mirror relationship for update.

Line 1974: UPDATE per_contact_relationships

1970: END IF;
1971: --
1972: CLOSE c1;
1973: --
1974: UPDATE per_contact_relationships
1975: SET
1976: date_start = X_date_start
1977: ,start_life_reason_id = X_start_life_reason_id
1978: ,date_end = X_date_end

Line 2084: UPDATE PER_CONTACT_RELATIONSHIPS

2080: END IF;
2081: --
2082: CLOSE c2;
2083: --
2084: UPDATE PER_CONTACT_RELATIONSHIPS
2085: SET
2086: contact_relationship_id = X_Contact_Relationship_Id,
2087: business_group_id = X_Business_Group_Id,
2088: person_id = X_Person_Id,

Line 2254: DELETE FROM PER_CONTACT_RELATIONSHIPS

2250: -- for function multiple_contacts
2251:
2252: -- Delete the base contact relationship
2253: --
2254: DELETE FROM PER_CONTACT_RELATIONSHIPS
2255: WHERE ROWID = X_Rowid;
2256:
2257: IF (SQL%NOTFOUND) THEN
2258: RAISE NO_DATA_FOUND;

Line 2266: DELETE FROM PER_CONTACT_RELATIONSHIPS

2262: --
2263: IF X_contact_type IN ('C','P','S') THEN
2264: l_mirror_type := Get_Mirror_Contact_Type(p_contact_type =>X_Contact_Type);
2265: --
2266: DELETE FROM PER_CONTACT_RELATIONSHIPS
2267: WHERE person_id = X_Contact_Person_Id
2268: AND contact_person_id = X_Person_Id
2269: AND contact_type = l_mirror_type
2270: AND date_start = X_date_start;

Line 2416: FROM per_contact_relationships con

2412: l_old_seq_number NUMBER;
2413: --
2414: CURSOR csr_seq IS
2415: SELECT sequence_number
2416: FROM per_contact_relationships con
2417: WHERE con.person_id = p_person_id
2418: AND con.contact_person_id = p_contact_person_id
2419: AND con.sequence_number <> p_sequence_number;
2420: --

Line 2423: FROM per_contact_relationships con

2419: AND con.sequence_number <> p_sequence_number;
2420: --
2421: CURSOR csr_old_seq IS
2422: SELECT sequence_number
2423: FROM per_contact_relationships con
2424: WHERE con.person_id = p_person_id
2425: AND con.contact_person_id = p_contact_person_id
2426: AND con.contact_relationship_id = p_contact_relationship_id;
2427: --

Line 2431: FROM per_contact_relationships con

2427: --
2428: --modified the cursor to add additional conditions for checking for end_date
2429: CURSOR csr_seq_others IS
2430: SELECT sequence_number
2431: FROM per_contact_relationships con
2432: WHERE con.person_id = p_person_id
2433: AND con.contact_person_id <> p_contact_person_id
2434: AND con.sequence_number = p_sequence_number
2435: AND con.date_end <=to_date(SYSDATE,'dd/mm/yyyy');

Line 2735: from per_contact_relationships

2731: -- earlier than date of brith exists.
2732:
2733: cursor csr_chk_rel is
2734: select contact_relationship_id
2735: from per_contact_relationships
2736: where contact_person_id = X_contact_Person_Id
2737: and date_end < x_date_of_birth;
2738:
2739: l_con_rel_id per_contact_relationships.contact_relationship_id%type;

Line 2739: l_con_rel_id per_contact_relationships.contact_relationship_id%type;

2735: from per_contact_relationships
2736: where contact_person_id = X_contact_Person_Id
2737: and date_end < x_date_of_birth;
2738:
2739: l_con_rel_id per_contact_relationships.contact_relationship_id%type;
2740:
2741: -- cursor to fetch contact relationship details
2742: -- of the records to be updated.
2743:

Line 2746: from per_contact_relationships c

2742: -- of the records to be updated.
2743:
2744: cursor csr_rel is
2745: select c.*,rowidtochar(rowid) row_id
2746: from per_contact_relationships c
2747: where c.contact_person_id = X_contact_Person_Id
2748: and c.date_start < x_date_of_birth;
2749:
2750: -- bug fix 4281500 ends here -----

Line 3126: hr_utility.set_location('per_contact_relationships_pkg.update_contact',1);

3122: -- i.e. check whether the Contact Only flag = 'Y' and if it is then
3123: -- check that the actual values have changed on the person record
3124: -- for the current person record
3125: --
3126: hr_utility.set_location('per_contact_relationships_pkg.update_contact',1);
3127: IF X_Contact_Only = 'Y' THEN
3128: -- bug fix 4281500 starts here --
3129: -- check if there exist a reslationship record with end date
3130: -- earlier than new DOB.

Line 3179: PER_CONTACT_RELATIONSHIPS_PKG.Update_Row(

3175: if x_date_of_birth is not null then
3176: for rel_rec in csr_rel
3177: loop
3178: --
3179: PER_CONTACT_RELATIONSHIPS_PKG.Update_Row(
3180: X_Rowid => rel_rec.Row_Id,
3181: X_Contact_Relationship_Id=> rel_rec.Contact_Relationship_Id,
3182: X_Business_Group_Id => rel_rec.Business_Group_Id,
3183: X_Person_Id => rel_rec.Person_Id,

Line 3260: END PER_CONTACT_RELATIONSHIPS_PKG;

3256: END IF;*/-- fix for bug 4763755.
3257:
3258: END Update_Contact;
3259:
3260: END PER_CONTACT_RELATIONSHIPS_PKG;