DBA Data[Home] [Help]

APPS.HR_PROCESS_ADDRESS_SS dependencies on HR_UTILITY

Line 211: hr_utility.set_location(' Entering:' || l_proc,5);

207: l_validate_g_per_con_step_id number;
208: l_old_ovn number;
209:
210: BEGIN
211: hr_utility.set_location(' Entering:' || l_proc,5);
212:
213: --bug 5375749
214: --If user enter effective date for which is less than person joining date then error should come.
215: declare

Line 222: hr_utility.trace('ORCL : inside the result true ');

218: begin
219: result := is_a_personal_info_flow (p_person_id, p_effective_date);
220: error_flag := hr_perinfo_util_web.isDateLessThanCreationDate(p_effective_date,p_person_id);
221: if result = true then
222: hr_utility.trace('ORCL : inside the result true ');
223: end if;
224: if error_flag = true then
225: hr_utility.trace('ORCL : inside the error_flag true');
226: end if;

Line 225: hr_utility.trace('ORCL : inside the error_flag true');

221: if result = true then
222: hr_utility.trace('ORCL : inside the result true ');
223: end if;
224: if error_flag = true then
225: hr_utility.trace('ORCL : inside the error_flag true');
226: end if;
227: if error_flag= true and result= true then
228: fnd_message.set_name('PER', 'HR_PERINFO_INVALID_EFFEC_DATE');
229: fnd_message.raise_error;

Line 252: hr_utility.set_location(l_proc,10);

248: -- value of primary flag could be "T". This is required to be stored in
249: -- transaction tables as "T" but the api validation will be as "N" only and
250: -- finally it will go in database as N in process_api
251: if p_primary_flag = 'T' then
252: hr_utility.set_location(l_proc,10);
253: l_primary_flag := 'N';
254: end if;
255: -- endregistration anupam
256:

Line 258: hr_utility.set_location(l_proc,15);

254: end if;
255: -- endregistration anupam
256:
257: IF (p_save_mode = 'SAVE_FOR_LATER') THEN
258: hr_utility.set_location(l_proc,15);
259: GOTO only_transaction;
260: END IF;
261:
262: savepoint create_address;

Line 265: hr_utility.set_location(l_proc,20);

261:
262: savepoint create_address;
263: --
264: if (l_person_id is null or l_person_id < 0 ) then
265: hr_utility.set_location(l_proc,20);
266: --
267: -- Now create a dummy contact to the login person and
268: -- use the out contact person id to validate the phone.
269: --

Line 285: hr_utility.set_location(l_proc,25);

281: l_comment_id number;
282: l_name_combination_warning boolean;
283: l_orig_hire_warning boolean;
284: begin
285: hr_utility.set_location(l_proc,25);
286: --ignore the dff validations for Dummy Person created
287: hr_person_info_util_ss.create_ignore_df_validation('PER_PEOPLE');
288: hr_person_info_util_ss.create_ignore_df_validation('Person Developer DF');
289: hr_contact_api.create_person

Line 310: hr_utility.set_location(l_proc,30);

306: end if;
307: -- end bug # 2174876
308: --end bug # 2138073/2115552
309: if p_contact_or_person = 'PERSON' then
310: hr_utility.set_location(l_proc,30);
311: -- we need to call only BD step to create the dummy person
312: -- and nothing else, so use process_selected_transaction
313: hr_new_user_reg_ss.process_selected_transaction(
314: p_item_type => p_item_type,

Line 331: hr_utility.set_location(l_proc,35);

327: -- and do it in validate false mode, as we have a rollback down.
328:
329: IF UPPER(p_action) = 'CHANGE' THEN
330: IF UPPER(l_primary_flag) like 'N%' THEN
331: hr_utility.set_location(l_proc,35);
332: l_old_ovn := p_old_object_version_number;
333: hr_person_address_api.update_person_address
334: (p_validate => false
335: ,p_effective_date => p_effective_date

Line 440: hr_utility.set_location(l_proc,40);

436:
437: IF NOT (p_contact_or_person = 'CONTACT' or p_contact_or_person = 'EMER_CR_NEW_CONT' or p_contact_or_person = 'EMRG_OVRW_UPD' or p_contact_or_person = 'EMRG_OVRW_DEL' or p_contact_or_person = 'EMER_CR_NEW_REL'
438: or p_contact_or_person = 'DPDNT_CR_NEW_CONT' or p_contact_or_person = 'DPDNT_OVRW_UPD' or p_contact_or_person = 'DPDNT_OVRW_DEL' or p_contact_or_person = 'DPDNT_CR_NEW_REL') THEN
439:
440: hr_utility.set_location(l_proc,40);
441: wf_engine.setItemAttrText (itemtype => p_item_type,
442: itemkey => p_item_key,
443: aname => 'P_EFFECTIVE_DATE',
444: avalue => to_char(p_effective_date,

Line 460: hr_utility.set_location(l_proc,45);

456: (p_item_type => p_item_type
457: ,p_item_key => p_item_key);
458: --
459: IF l_transaction_id is null THEN
460: hr_utility.set_location(l_proc,45);
461:
462: -- Start a Transaction
463:
464: hr_transaction_ss.start_transaction

Line 499: hr_utility.set_location(l_proc,50);

495: l_transaction_table(l_count).param_value := p_person_id;
496: l_transaction_table(l_count).param_data_type := 'NUMBER';
497:
498: -- IF UPPER(p_action) = 'DELETE' THEN
499: hr_utility.set_location(l_proc,50);
500: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
501: -- ELSE
502: hr_utility.set_location(l_proc,55);
503: -- l_effective_date := p_effective_date;

Line 502: hr_utility.set_location(l_proc,55);

498: -- IF UPPER(p_action) = 'DELETE' THEN
499: hr_utility.set_location(l_proc,50);
500: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
501: -- ELSE
502: hr_utility.set_location(l_proc,55);
503: -- l_effective_date := p_effective_date;
504: -- END IF;
505:
506: l_count := l_count + 1;

Line 609: hr_utility.set_location(l_proc,60);

605:
606: l_count := l_count + 1;
607: l_transaction_table(l_count).param_name := 'P_PRADD_OVLAPVAL_OVERRIDE';
608: IF (p_pradd_ovlapval_override = 1) THEN
609: hr_utility.set_location(l_proc,60);
610: l_transaction_table(l_count).param_value := 'Y';
611: ELSIF (p_pradd_ovlapval_override = 0) THEN
612: hr_utility.set_location(l_proc,65);
613: l_transaction_table(l_count).param_value := 'N';

Line 612: hr_utility.set_location(l_proc,65);

608: IF (p_pradd_ovlapval_override = 1) THEN
609: hr_utility.set_location(l_proc,60);
610: l_transaction_table(l_count).param_value := 'Y';
611: ELSIF (p_pradd_ovlapval_override = 0) THEN
612: hr_utility.set_location(l_proc,65);
613: l_transaction_table(l_count).param_value := 'N';
614: END IF;
615:
616: l_transaction_table(l_count).param_data_type := 'VARCHAR2';

Line 824: hr_utility.set_location(l_proc || 'EXCEPTION' ,555);

820: actid => p_activity_id,
821: aname => gv_wf_review_region_item);
822: EXCEPTION
823: WHEN OTHERS THEN
824: hr_utility.set_location(l_proc || 'EXCEPTION' ,555);
825: l_review_item_name := 'HrMainAddressReview';
826: END;
827:
828: l_count := l_count + 1;

Line 844: hr_utility.set_location(l_proc,70);

840: -- This is a marker for the contact person to be used to identify the Address
841: -- to be retrieved for the contact person in context in review page.
842: -- The HR_LAST_CONTACT_SET is in from the work flow attribute
843: begin
844: hr_utility.set_location(l_proc,70);
845: l_contact_set := wf_engine.GetItemAttrNumber(itemtype => p_item_type,
846: itemkey => p_item_key,
847: aname => 'HR_CONTACT_SET');
848:

Line 850: hr_utility.set_location(l_proc || 'EXCEPTION' ,560 );

846: itemkey => p_item_key,
847: aname => 'HR_CONTACT_SET');
848:
849: exception when others then
850: hr_utility.set_location(l_proc || 'EXCEPTION' ,560 );
851: l_contact_set := 0;
852:
853: end;
854:

Line 861: hr_utility.set_location(l_proc,75);

857: l_transaction_table(l_count).param_value := l_contact_set;
858: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
859:
860: if (p_contact_relationship_id > 0) then
861: hr_utility.set_location(l_proc,75);
862: l_count := l_count + 1;
863: l_transaction_table(l_count).param_name := 'P_CONTACT_RELATIONSHIP_ID';
864: l_transaction_table(l_count).param_value := p_contact_relationship_id;
865: l_transaction_table(l_count).param_data_type := 'NUMBER';

Line 878: hr_utility.set_location(' Leaving:' || l_proc,80);

874: ,p_api_name => g_package || '.PROCESS_API'
875: ,p_transaction_data => l_transaction_table);
876:
877:
878: hr_utility.set_location(' Leaving:' || l_proc,80);
879:
880:
881: EXCEPTION
882: WHEN hr_utility.hr_error THEN

Line 882: WHEN hr_utility.hr_error THEN

878: hr_utility.set_location(' Leaving:' || l_proc,80);
879:
880:
881: EXCEPTION
882: WHEN hr_utility.hr_error THEN
883: hr_utility.set_location(' Leaving:' || l_proc,565);
884:
885: -- -------------------------------------------
886: -- an application error has been raised so we must

Line 883: hr_utility.set_location(' Leaving:' || l_proc,565);

879:
880:
881: EXCEPTION
882: WHEN hr_utility.hr_error THEN
883: hr_utility.set_location(' Leaving:' || l_proc,565);
884:
885: -- -------------------------------------------
886: -- an application error has been raised so we must
887: -- redisplay the web form to display the error

Line 1026: hr_utility.set_location(' Entering:' || l_proc,5);

1022: l_result varchar2(100) default null;
1023:
1024:
1025: BEGIN
1026: hr_utility.set_location(' Entering:' || l_proc,5);
1027: -- save the the old address id and old object version number in temp variables
1028: l_old_ovn := p_object_version_number;
1029: l_old_address_id := p_address_id;
1030: --startregistration anupam

Line 1037: hr_utility.set_location( l_proc,10);

1033: -- transaction tables as "T" but the api validation will be as "N" only and
1034: -- finally it will go in database as N in process_api
1035: l_primary_flag := p_primary_flag;
1036: if p_primary_flag = 'T' then
1037: hr_utility.set_location( l_proc,10);
1038: l_primary_flag := 'N';
1039: end if;
1040: -- replacing the p_primary_flag with l_primary_flag in api_calls
1041: -- endregistration anupam

Line 1044: hr_utility.set_location( l_proc,15);

1040: -- replacing the p_primary_flag with l_primary_flag in api_calls
1041: -- endregistration anupam
1042:
1043: IF (p_save_mode = 'SAVE_FOR_LATER') THEN
1044: hr_utility.set_location( l_proc,15);
1045: GOTO only_transaction;
1046: END IF;
1047:
1048:

Line 1052: hr_utility.set_location( l_proc,20);

1048:
1049: -- Call the actual API.
1050: -- savepoint update_address;
1051: IF (UPPER(p_action) = 'DELETE') THEN
1052: hr_utility.set_location( l_proc,20);
1053: hr_person_address_api.update_person_address
1054: (p_validate => hr_java_conv_util_ss.get_boolean (
1055: p_number => p_validate
1056: )

Line 1068: hr_utility.set_location( l_proc,25);

1064: ,p_date_to => p_date_to
1065: );
1066:
1067: ELSE --Bug#3114508 start
1068: hr_utility.set_location( l_proc,25);
1069: hr_person_address_api.update_pers_addr_with_style --Bug#3114508 end
1070: (p_validate => hr_java_conv_util_ss.get_boolean (
1071: p_number => p_validate
1072: )

Line 1136: hr_utility.set_location( l_proc,30);

1132: -- object_version_number are set (i.e. not null).
1133: -- -----------------------------------------------------------------------------
1134:
1135: <> -- label for GOTO
1136: hr_utility.set_location( l_proc,30);
1137: -- Set the P_EFFECTIVE_DATE and CURRENT_EFFECTIVE_DATE in wf item attributes to be retreived
1138: -- in review page
1139:
1140: wf_engine.setItemAttrText (itemtype => p_item_type,

Line 1157: hr_utility.set_location( l_proc,35);

1153: (p_item_type => p_item_type
1154: ,p_item_key => p_item_key);
1155: --
1156: IF l_transaction_id is null THEN
1157: hr_utility.set_location( l_proc,35);
1158: -- Start a Transaction
1159: hr_transaction_ss.start_transaction
1160: (itemtype => p_item_type
1161: ,itemkey => p_item_key

Line 1200: hr_utility.set_location( l_proc,40);

1196: l_transaction_table(l_count).param_value := p_person_id;
1197: l_transaction_table(l_count).param_data_type := 'NUMBER';
1198:
1199: -- IF UPPER(p_action) = 'DELETE' THEN
1200: hr_utility.set_location( l_proc,40);
1201: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
1202: -- ELSE
1203: hr_utility.set_location( l_proc,45);
1204: -- l_effective_date := p_effective_date;

Line 1203: hr_utility.set_location( l_proc,45);

1199: -- IF UPPER(p_action) = 'DELETE' THEN
1200: hr_utility.set_location( l_proc,40);
1201: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
1202: -- ELSE
1203: hr_utility.set_location( l_proc,45);
1204: -- l_effective_date := p_effective_date;
1205: -- END IF;
1206:
1207: l_count := l_count + 1;

Line 1510: hr_utility.set_location( l_proc,50);

1506: l_transaction_table(l_count).param_value := p_activity_id;
1507: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
1508:
1509: BEGIN
1510: hr_utility.set_location( l_proc,50);
1511: l_review_item_name := wf_engine.GetActivityAttrText(itemtype => p_item_type,
1512: itemkey => p_item_key,
1513: actid => p_activity_id,
1514: aname => gv_wf_review_region_item);

Line 1517: hr_utility.set_location( l_proc || 'EXCEPTION' ,555);

1513: actid => p_activity_id,
1514: aname => gv_wf_review_region_item);
1515: EXCEPTION
1516: WHEN OTHERS THEN
1517: hr_utility.set_location( l_proc || 'EXCEPTION' ,555);
1518: l_review_item_name := 'HrMainAddressReview';
1519: END;
1520:
1521: l_count := l_count + 1;

Line 1526: hr_utility.set_location( l_proc,55);

1522: l_transaction_table(l_count).param_name := 'P_REVIEW_PROC_CALL';
1523: l_transaction_table(l_count).param_value := l_review_item_name;
1524: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
1525: if (p_contact_relationship_id > 0) then
1526: hr_utility.set_location( l_proc,55);
1527: l_count := l_count + 1;
1528: l_transaction_table(l_count).param_name := 'P_CONTACT_RELATIONSHIP_ID';
1529: l_transaction_table(l_count).param_value := p_contact_relationship_id;
1530: l_transaction_table(l_count).param_data_type := 'NUMBER';

Line 1544: hr_utility.set_location(' Leaving:' || l_proc,60);

1540: ,p_api_name => g_package || '.PROCESS_API'
1541: ,p_transaction_data => l_transaction_table);
1542:
1543:
1544: hr_utility.set_location(' Leaving:' || l_proc,60);
1545:
1546: EXCEPTION
1547: WHEN hr_utility.hr_error THEN
1548: hr_utility.set_location(' Leaving:' || l_proc,560);

Line 1547: WHEN hr_utility.hr_error THEN

1543:
1544: hr_utility.set_location(' Leaving:' || l_proc,60);
1545:
1546: EXCEPTION
1547: WHEN hr_utility.hr_error THEN
1548: hr_utility.set_location(' Leaving:' || l_proc,560);
1549:
1550: -- -------------------------------------------
1551: -- an application error has been raised so we must

Line 1548: hr_utility.set_location(' Leaving:' || l_proc,560);

1544: hr_utility.set_location(' Leaving:' || l_proc,60);
1545:
1546: EXCEPTION
1547: WHEN hr_utility.hr_error THEN
1548: hr_utility.set_location(' Leaving:' || l_proc,560);
1549:
1550: -- -------------------------------------------
1551: -- an application error has been raised so we must
1552: -- redisplay the web form to display the error

Line 1583: hr_utility.set_location(' Leaving:' || l_proc,565);

1579: p_error_message := hr_java_conv_util_ss.get_formatted_error_message(
1580: p_error_message => p_error_message);
1581: END IF;
1582: WHEN OTHERS THEN
1583: hr_utility.set_location(' Leaving:' || l_proc,565);
1584:
1585: p_error_message := hr_java_conv_util_ss.get_formatted_error_message(
1586: p_error_message => p_error_message);
1587: END update_person_address;

Line 1668: hr_utility.set_location(' Entering:' || l_proc,5);

1664: -- l_trans_rec_count integer default 0;
1665: l_trans_rec_count number;
1666: begin
1667:
1668: hr_utility.set_location(' Entering:' || l_proc,5);
1669:
1670: -- ------------------------------------------------------------------
1671: -- Check if there are any transactions waiting to be approved.
1672: -----------------------------------------------------------------------------

Line 1702: hr_utility.set_location(l_proc,10);

1698: -- 'HR_MAINT_PERSONAL_DETAILS_FRM', 'HR_MAINT_MAIN_ADDRESS_FRM',
1699: -- 'HR_MAINT_SECONDARY_ADDRESS_FRM . For contacts, there can be ??? rows.
1700: -- -------------------------------------------------------------------
1701: THEN
1702: hr_utility.set_location(l_proc,10);
1703:
1704:
1705: -- For Personal Information, there can only be 1 transaction step per
1706: -- item type and item key, therefore, we don't need to handle the multiple

Line 1718: hr_utility.set_location(l_proc,15);

1714: ,p_transaction_step_id => l_trans_step_id
1715: ,p_object_version_number => l_trans_obj_vers_num);
1716: END LOOP;
1717: ELSE
1718: hr_utility.set_location(l_proc,15);
1719: l_trans_rec_count := 0;
1720: -- p_trans_rec_count := to_char(l_trans_rec_count);
1721: p_trans_rec_count := l_trans_rec_count;
1722: RETURN;

Line 1731: hr_utility.set_location(l_proc,20);

1727: -- that means we have a data integrity error.
1728: IF l_trans_step_id is NULL OR
1729: l_trans_step_id = 0
1730: THEN
1731: hr_utility.set_location(l_proc,20);
1732: RAISE g_data_error;
1733: END IF;
1734: --
1735: -- Now get the transaction data for the given step

Line 1799: hr_utility.set_location(' Leaving:' || l_proc,25);

1795: -- p_trans_rec_count := to_char(l_trans_rec_count);
1796: p_trans_rec_count := l_trans_rec_count;
1797:
1798:
1799: hr_utility.set_location(' Leaving:' || l_proc,25);
1800:
1801: EXCEPTION
1802: WHEN g_data_error THEN
1803: hr_utility.set_location(' Leaving:' || l_proc,555);

Line 1803: hr_utility.set_location(' Leaving:' || l_proc,555);

1799: hr_utility.set_location(' Leaving:' || l_proc,25);
1800:
1801: EXCEPTION
1802: WHEN g_data_error THEN
1803: hr_utility.set_location(' Leaving:' || l_proc,555);
1804: RAISE;
1805:
1806: END get_address_data_from_tt;
1807:

Line 1890: hr_utility.set_location(' Entering:' || l_proc,5);

1886: l_trans_rec_count integer default 0;
1887:
1888: BEGIN
1889:
1890: hr_utility.set_location(' Entering:' || l_proc,5);
1891:
1892: -- ------------------------------------------------------------------
1893: -- Check if there are any transaction rec already saved for the current
1894: -- transaction. This is used for re-display the Update page when a user

Line 1910: hr_utility.set_location(l_proc,10);

1906:
1907: IF l_trans_step_rows IS NOT NULL OR
1908: l_trans_step_rows > 0
1909: THEN
1910: hr_utility.set_location(l_proc,10);
1911: l_trans_rec_count := l_trans_step_rows;
1912: ELSE
1913: hr_utility.set_location(l_proc,15);
1914: l_trans_rec_count := 0;

Line 1913: hr_utility.set_location(l_proc,15);

1909: THEN
1910: hr_utility.set_location(l_proc,10);
1911: l_trans_rec_count := l_trans_step_rows;
1912: ELSE
1913: hr_utility.set_location(l_proc,15);
1914: l_trans_rec_count := 0;
1915: hr_utility.set_location(' Leaving:' || l_proc,20);
1916:
1917: return;

Line 1915: hr_utility.set_location(' Leaving:' || l_proc,20);

1911: l_trans_rec_count := l_trans_step_rows;
1912: ELSE
1913: hr_utility.set_location(l_proc,15);
1914: l_trans_rec_count := 0;
1915: hr_utility.set_location(' Leaving:' || l_proc,20);
1916:
1917: return;
1918: END IF;
1919: --

Line 1930: hr_utility.set_location(l_proc || 'LOOP' ,25);

1926: -- Need to loop through l_trans_rec_count -1 as the index starts from 0
1927:
1928: FOR i in 0..l_trans_rec_count-1 LOOP
1929: IF(l_api_names(i) = 'HR_PROCESS_ADDRESS_SS.PROCESS_API') THEN
1930: hr_utility.set_location(l_proc || 'LOOP' ,25);
1931: get_address_data_from_tt(
1932: p_transaction_step_id => l_trans_step_ids(i)
1933: ,p_effective_date => p_effective_date
1934: ,p_person_id => p_person_id

Line 1997: hr_utility.set_location(' Leaving:' || l_proc,30);

1993:
1994: -- p_trans_rec_count := to_char(l_trans_rec_count);
1995: p_trans_rec_count := l_trans_rec_count;
1996:
1997: hr_utility.set_location(' Leaving:' || l_proc,30);
1998:
1999: EXCEPTION
2000: WHEN g_data_error THEN
2001: hr_utility.set_location(' Leaving:' || l_proc,555);

Line 2001: hr_utility.set_location(' Leaving:' || l_proc,555);

1997: hr_utility.set_location(' Leaving:' || l_proc,30);
1998:
1999: EXCEPTION
2000: WHEN g_data_error THEN
2001: hr_utility.set_location(' Leaving:' || l_proc,555);
2002:
2003: RAISE;
2004:
2005: END get_address_data_from_tt;

Line 2077: hr_utility.set_location(' Entering:' || l_proc,5);

2073: l_proc varchar2(200) := g_package || 'get_address_data_from_tt';
2074:
2075: begin
2076:
2077: hr_utility.set_location(' Entering:' || l_proc,5);
2078:
2079: --
2080: p_effective_date:= to_date(
2081: hr_transaction_ss.get_wf_effective_date

Line 2363: hr_utility.set_location(' Leaving:' || l_proc,10);

2359: (p_transaction_step_id => p_transaction_step_id
2360: ,p_name => 'P_ADD_INFORMATION16');
2361: --
2362:
2363: hr_utility.set_location(' Leaving:' || l_proc,10);
2364:
2365:
2366: EXCEPTION
2367: WHEN OTHERS THEN

Line 2425: hr_utility.set_location(' Leaving:' || l_proc,555);

2421: p_add_information19 := NULL;
2422: p_add_information20 := NULL;
2423: p_action := NULL;
2424: p_old_address_id := NULL;
2425: hr_utility.set_location(' Leaving:' || l_proc,555);
2426:
2427: RAISE;
2428:
2429: END get_address_data_from_tt;

Line 2458: hr_utility.set_location(' Entering:' || l_proc,5);

2454: l_check_for_sfl varchar2(10);
2455: l_sfl_g_contact_step_id NUMBER;
2456:
2457: BEGIN
2458: hr_utility.set_location(' Entering:' || l_proc,5);
2459: if (p_effective_date is not null) then
2460: hr_utility.set_location( l_proc, 10);
2461: l_effective_date:= to_date(p_effective_date,g_date_format);
2462: else

Line 2460: hr_utility.set_location( l_proc, 10);

2456:
2457: BEGIN
2458: hr_utility.set_location(' Entering:' || l_proc,5);
2459: if (p_effective_date is not null) then
2460: hr_utility.set_location( l_proc, 10);
2461: l_effective_date:= to_date(p_effective_date,g_date_format);
2462: else
2463: hr_utility.set_location( l_proc, 15);
2464: l_effective_date:= to_date(

Line 2463: hr_utility.set_location( l_proc, 15);

2459: if (p_effective_date is not null) then
2460: hr_utility.set_location( l_proc, 10);
2461: l_effective_date:= to_date(p_effective_date,g_date_format);
2462: else
2463: hr_utility.set_location( l_proc, 15);
2464: l_effective_date:= to_date(
2465: hr_transaction_ss.get_wf_effective_date
2466: (p_transaction_step_id => p_transaction_step_id),g_date_format);
2467: end if;

Line 2504: hr_utility.set_location( l_proc, 20);

2500:
2501: IF hr_transaction_api.get_varchar2_value
2502: (p_Transaction_step_id => p_transaction_step_id
2503: ,p_name => 'P_PRADD_OVLAPVAL_OVERRIDE') = 'Y' THEN
2504: hr_utility.set_location( l_proc, 20);
2505: l_pradd_ovrlap := TRUE;
2506: ELSE
2507: hr_utility.set_location( l_proc, 25);
2508: l_pradd_ovrlap := FALSE;

Line 2507: hr_utility.set_location( l_proc, 25);

2503: ,p_name => 'P_PRADD_OVLAPVAL_OVERRIDE') = 'Y' THEN
2504: hr_utility.set_location( l_proc, 20);
2505: l_pradd_ovrlap := TRUE;
2506: ELSE
2507: hr_utility.set_location( l_proc, 25);
2508: l_pradd_ovrlap := FALSE;
2509: END IF;
2510:
2511:

Line 2531: hr_utility.set_location( l_proc, 30);

2527: --
2528: -- PB :
2529: --
2530: if l_address.person_id is null or l_address.person_id < 0 then
2531: hr_utility.set_location( l_proc, 30);
2532: --
2533: -- This is the case where the contact and address are created.
2534: -- So get contact person id from the global which is set by
2535: -- hrconwrs.pkb.

Line 2546: hr_utility.set_location( l_proc, 35);

2542: ,p_name => 'P_CONTACT_OR_PERSON');
2543: --
2544: if l_contact_or_person = 'CONTACT' or l_contact_or_person = 'EMER_CR_NEW_CONT' or l_contact_or_person = 'EMRG_OVRW_UPD' or l_contact_or_person = 'EMRG_OVRW_DEL' or l_contact_or_person = 'EMER_CR_NEW_REL'
2545: or l_contact_or_person = 'DPDNT_CR_NEW_CONT' or l_contact_or_person = 'DPDNT_OVRW_UPD' or l_contact_or_person = 'DPDNT_OVRW_DEL' or l_contact_or_person = 'DPDNT_CR_NEW_REL' then
2546: hr_utility.set_location( l_proc, 35);
2547: --
2548: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2549: --
2550: -- In case of SaveForLater run process_create_contact_api

Line 2564: hr_utility.set_location( l_proc || 'EXCEPTION' , 555);

2560: where person_id =l_address.person_id;
2561:
2562: EXCEPTION
2563: WHEN no_data_found THEN
2564: hr_utility.set_location( l_proc || 'EXCEPTION' , 555);
2565: l_check_for_sfl := 'SFL';
2566: END;
2567:
2568:

Line 2570: hr_utility.set_location( l_proc, 40);

2566: END;
2567:
2568:
2569: IF l_check_for_sfl = 'SFL' THEN
2570: hr_utility.set_location( l_proc, 40);
2571: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2572: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2573:
2574: BEGIN

Line 2571: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);

2567:
2568:
2569: IF l_check_for_sfl = 'SFL' THEN
2570: hr_utility.set_location( l_proc, 40);
2571: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2572: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2573:
2574: BEGIN
2575: select nvl(hats1.transaction_step_id,0)

Line 2572: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);

2568:
2569: IF l_check_for_sfl = 'SFL' THEN
2570: hr_utility.set_location( l_proc, 40);
2571: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2572: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2573:
2574: BEGIN
2575: select nvl(hats1.transaction_step_id,0)
2576: into l_sfl_g_contact_step_id

Line 2593: hr_utility.set_location('g_contact_person_id after :'||hr_process_contact_ss.g_contact_person_id , 1234);

2589: p_transaction_step_id => l_sfl_g_contact_step_id
2590: );
2591:
2592: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2593: hr_utility.set_location('g_contact_person_id after :'||hr_process_contact_ss.g_contact_person_id , 1234);
2594: EXCEPTION
2595: WHEN others THEN
2596: hr_utility.set_location( l_proc || 'EXCEPTION' , 565);
2597: null;

Line 2596: hr_utility.set_location( l_proc || 'EXCEPTION' , 565);

2592: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2593: hr_utility.set_location('g_contact_person_id after :'||hr_process_contact_ss.g_contact_person_id , 1234);
2594: EXCEPTION
2595: WHEN others THEN
2596: hr_utility.set_location( l_proc || 'EXCEPTION' , 565);
2597: null;
2598: END;
2599: END IF;
2600:

Line 2602: hr_utility.set_location( l_proc, 45);

2598: END;
2599: END IF;
2600:
2601: else -- for person PERSON
2602: hr_utility.set_location( l_proc, 45);
2603: --
2604: -- StartRegistration : For Create person and address in one
2605: -- transaction get person id from the package global.
2606: --

Line 2611: hr_utility.set_location( l_proc, 50);

2607: -- adding the session id check to avoid connection pooling problems.
2608: /* l_address.person_id := hr_process_person_ss.g_person_id; */
2609: if (( hr_process_person_ss.g_person_id is not null) and
2610: (hr_process_person_ss.g_session_id= ICX_SEC.G_SESSION_ID)) then
2611: hr_utility.set_location( l_proc, 50);
2612: l_address.person_id := hr_process_person_ss.g_person_id;
2613: --
2614: end if;
2615: --

Line 2628: hr_utility.set_location( l_proc, 55);

2624: -- startregistration anupam
2625: -- For tertiary address from overview page we have T for primary flag
2626: -- it should be changed to N in the database.
2627: if l_address.primary_flag = 'T' then
2628: hr_utility.set_location( l_proc, 55);
2629: l_address.primary_flag := 'N';
2630: end if;
2631: -- endregistration anupam
2632:

Line 2812: hr_utility.set_location( l_proc, 60);

2808:
2809:
2810: IF UPPER(l_action) = 'CHANGE' THEN
2811: IF UPPER(l_address.primary_flag) like 'N%' THEN
2812: hr_utility.set_location( l_proc, 60);
2813: hr_person_address_api.update_person_address
2814: (p_validate => false
2815: ,p_effective_date => l_effective_date
2816: ,p_address_id => l_old_address_id

Line 2875: hr_utility.set_location( l_proc, 65);

2871: ,p_add_information18 => l_address.add_information18
2872: ,p_add_information19 => l_address.add_information19
2873: ,p_add_information20 => l_address.add_information20);
2874: ELSIF UPPER(l_action) = 'CORRECT' THEN --Bug#3114508 start
2875: hr_utility.set_location( l_proc, 65);
2876: if (hr_process_contact_ss.g_is_address_updated = true) then
2877: l_address.object_version_number := l_address.object_version_number + 1;
2878: end if;
2879: hr_person_address_api.update_pers_addr_with_style --Bug#3114508 end

Line 2930: hr_utility.set_location( l_proc, 70);

2926: ,p_add_information19 => l_address.add_information19
2927: ,p_add_information20 => l_address.add_information20);
2928: hr_process_contact_ss.g_is_address_updated := false;
2929: ELSIF UPPER(l_action) = 'DELETE' THEN
2930: hr_utility.set_location( l_proc, 70);
2931: hr_person_address_api.update_person_address
2932: (p_validate => false
2933: ,p_address_id => l_address.address_id
2934: ,p_object_version_number => l_address.object_version_number

Line 2939: hr_utility.set_location( l_proc, 75);

2935: ,p_effective_date => l_effective_date
2936: ,p_date_from => l_address.date_from
2937: ,p_date_to => l_address.date_to);
2938: ELSIF UPPER(l_action) = 'NEW' THEN
2939: hr_utility.set_location( l_proc, 75);
2940: hr_person_address_api.create_person_address
2941: (p_validate => false
2942: ,p_effective_date => l_effective_date
2943: ,p_person_id => l_address.person_id

Line 2994: hr_utility.set_location(' Leaving:' || l_proc,80);

2990: ,p_add_information19 => l_address.add_information19
2991: ,p_add_information20 => l_address.add_information20);
2992: END IF;
2993:
2994: hr_utility.set_location(' Leaving:' || l_proc,80);
2995:
2996: END process_api;
2997:
2998: END hr_process_address_ss;