DBA Data[Home] [Help]

APPS.HR_PROCESS_ADDRESS_SS dependencies on HR_UTILITY

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

215: l_validate_g_per_con_step_id number;
216: l_old_ovn number;
217:
218: BEGIN
219: hr_utility.set_location(' Entering:' || l_proc,5);
220:
221: --bug 5375749
222: --If user enter effective date for which is less than person joining date then error should come.
223: declare

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

226: begin
227: result := is_a_personal_info_flow (p_person_id, p_effective_date);
228: error_flag := hr_perinfo_util_web.isDateLessThanCreationDate(p_effective_date,p_person_id);
229: if result = true then
230: hr_utility.trace('ORCL : inside the result true ');
231: end if;
232: if error_flag = true then
233: hr_utility.trace('ORCL : inside the error_flag true');
234: end if;

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

229: if result = true then
230: hr_utility.trace('ORCL : inside the result true ');
231: end if;
232: if error_flag = true then
233: hr_utility.trace('ORCL : inside the error_flag true');
234: end if;
235: if error_flag= true and result= true then
236: fnd_message.set_name('PER', 'HR_PERINFO_INVALID_EFFEC_DATE');
237: fnd_message.raise_error;

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

256: -- value of primary flag could be "T". This is required to be stored in
257: -- transaction tables as "T" but the api validation will be as "N" only and
258: -- finally it will go in database as N in process_api
259: if p_primary_flag = 'T' then
260: hr_utility.set_location(l_proc,10);
261: l_primary_flag := 'N';
262: end if;
263: -- endregistration anupam
264:

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

262: end if;
263: -- endregistration anupam
264:
265: IF (p_save_mode = 'SAVE_FOR_LATER') THEN
266: hr_utility.set_location(l_proc,15);
267: GOTO only_transaction;
268: END IF;
269:
270: savepoint create_address;

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

269:
270: savepoint create_address;
271: --
272: if (l_person_id is null or l_person_id < 0 ) then
273: hr_utility.set_location(l_proc,20);
274: --
275: -- Now create a dummy contact to the login person and
276: -- use the out contact person id to validate the phone.
277: --

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

289: l_comment_id number;
290: l_name_combination_warning boolean;
291: l_orig_hire_warning boolean;
292: begin
293: hr_utility.set_location(l_proc,25);
294: --ignore the dff validations for Dummy Person created
295: hr_person_info_util_ss.create_ignore_df_validation('PER_PEOPLE');
296: hr_person_info_util_ss.create_ignore_df_validation('Person Developer DF');
297: hr_contact_api.create_person

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

314: end if;
315: -- end bug # 2174876
316: --end bug # 2138073/2115552
317: if p_contact_or_person = 'PERSON' then
318: hr_utility.set_location(l_proc,30);
319: -- we need to call only BD step to create the dummy person
320: -- and nothing else, so use process_selected_transaction
321: hr_new_user_reg_ss.process_selected_transaction(
322: p_item_type => p_item_type,

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

335: -- and do it in validate false mode, as we have a rollback down.
336:
337: IF UPPER(p_action) = 'CHANGE' THEN
338: IF UPPER(l_primary_flag) like 'N%' THEN
339: hr_utility.set_location(l_proc,35);
340: l_old_ovn := p_old_object_version_number;
341: hr_person_address_api.update_person_address
342: (p_validate => false
343: ,p_effective_date => p_effective_date

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

444:
445: 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'
446: 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
447:
448: hr_utility.set_location(l_proc,40);
449: wf_engine.setItemAttrText (itemtype => p_item_type,
450: itemkey => p_item_key,
451: aname => 'P_EFFECTIVE_DATE',
452: avalue => to_char(p_effective_date,

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

464: (p_item_type => p_item_type
465: ,p_item_key => p_item_key);
466: --
467: IF l_transaction_id is null THEN
468: hr_utility.set_location(l_proc,45);
469:
470: -- Start a Transaction
471:
472: hr_transaction_ss.start_transaction

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

503: l_transaction_table(l_count).param_value := p_person_id;
504: l_transaction_table(l_count).param_data_type := 'NUMBER';
505:
506: -- IF UPPER(p_action) = 'DELETE' THEN
507: hr_utility.set_location(l_proc,50);
508: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
509: -- ELSE
510: hr_utility.set_location(l_proc,55);
511: -- l_effective_date := p_effective_date;

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

506: -- IF UPPER(p_action) = 'DELETE' THEN
507: hr_utility.set_location(l_proc,50);
508: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
509: -- ELSE
510: hr_utility.set_location(l_proc,55);
511: -- l_effective_date := p_effective_date;
512: -- END IF;
513:
514: l_count := l_count + 1;

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

613:
614: l_count := l_count + 1;
615: l_transaction_table(l_count).param_name := 'P_PRADD_OVLAPVAL_OVERRIDE';
616: IF (p_pradd_ovlapval_override = 1) THEN
617: hr_utility.set_location(l_proc,60);
618: l_transaction_table(l_count).param_value := 'Y';
619: ELSIF (p_pradd_ovlapval_override = 0) THEN
620: hr_utility.set_location(l_proc,65);
621: l_transaction_table(l_count).param_value := 'N';

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

616: IF (p_pradd_ovlapval_override = 1) THEN
617: hr_utility.set_location(l_proc,60);
618: l_transaction_table(l_count).param_value := 'Y';
619: ELSIF (p_pradd_ovlapval_override = 0) THEN
620: hr_utility.set_location(l_proc,65);
621: l_transaction_table(l_count).param_value := 'N';
622: END IF;
623:
624: l_transaction_table(l_count).param_data_type := 'VARCHAR2';

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

828: actid => p_activity_id,
829: aname => gv_wf_review_region_item);
830: EXCEPTION
831: WHEN OTHERS THEN
832: hr_utility.set_location(l_proc || 'EXCEPTION' ,555);
833: l_review_item_name := 'HrMainAddressReview';
834: END;
835:
836: l_count := l_count + 1;

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

848: -- This is a marker for the contact person to be used to identify the Address
849: -- to be retrieved for the contact person in context in review page.
850: -- The HR_LAST_CONTACT_SET is in from the work flow attribute
851: begin
852: hr_utility.set_location(l_proc,70);
853: l_contact_set := wf_engine.GetItemAttrNumber(itemtype => p_item_type,
854: itemkey => p_item_key,
855: aname => 'HR_CONTACT_SET');
856:

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

854: itemkey => p_item_key,
855: aname => 'HR_CONTACT_SET');
856:
857: exception when others then
858: hr_utility.set_location(l_proc || 'EXCEPTION' ,560 );
859: l_contact_set := 0;
860:
861: end;
862:

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

865: l_transaction_table(l_count).param_value := l_contact_set;
866: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
867:
868: if (p_contact_relationship_id > 0) then
869: hr_utility.set_location(l_proc,75);
870: l_count := l_count + 1;
871: l_transaction_table(l_count).param_name := 'P_CONTACT_RELATIONSHIP_ID';
872: l_transaction_table(l_count).param_value := p_contact_relationship_id;
873: l_transaction_table(l_count).param_data_type := 'NUMBER';

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

882: ,p_api_name => g_package || '.PROCESS_API'
883: ,p_transaction_data => l_transaction_table);
884:
885:
886: hr_utility.set_location(' Leaving:' || l_proc,80);
887:
888:
889: EXCEPTION
890: WHEN hr_utility.hr_error THEN

Line 890: WHEN hr_utility.hr_error THEN

886: hr_utility.set_location(' Leaving:' || l_proc,80);
887:
888:
889: EXCEPTION
890: WHEN hr_utility.hr_error THEN
891: hr_utility.set_location(' Leaving:' || l_proc,565);
892:
893: -- -------------------------------------------
894: -- an application error has been raised so we must

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

887:
888:
889: EXCEPTION
890: WHEN hr_utility.hr_error THEN
891: hr_utility.set_location(' Leaving:' || l_proc,565);
892:
893: -- -------------------------------------------
894: -- an application error has been raised so we must
895: -- redisplay the web form to display the error

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

1030: l_result varchar2(100) default null;
1031:
1032:
1033: BEGIN
1034: hr_utility.set_location(' Entering:' || l_proc,5);
1035: -- save the the old address id and old object version number in temp variables
1036: l_old_ovn := p_object_version_number;
1037: l_old_address_id := p_address_id;
1038: --startregistration anupam

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

1041: -- transaction tables as "T" but the api validation will be as "N" only and
1042: -- finally it will go in database as N in process_api
1043: l_primary_flag := p_primary_flag;
1044: if p_primary_flag = 'T' then
1045: hr_utility.set_location( l_proc,10);
1046: l_primary_flag := 'N';
1047: end if;
1048: -- replacing the p_primary_flag with l_primary_flag in api_calls
1049: -- endregistration anupam

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

1048: -- replacing the p_primary_flag with l_primary_flag in api_calls
1049: -- endregistration anupam
1050:
1051: IF (p_save_mode = 'SAVE_FOR_LATER') THEN
1052: hr_utility.set_location( l_proc,15);
1053: GOTO only_transaction;
1054: END IF;
1055:
1056:

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

1056:
1057: -- Call the actual API.
1058: -- savepoint update_address;
1059: IF (UPPER(p_action) = 'DELETE') THEN
1060: hr_utility.set_location( l_proc,20);
1061: hr_person_address_api.update_person_address
1062: (p_validate => hr_java_conv_util_ss.get_boolean (
1063: p_number => p_validate
1064: )

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

1072: ,p_date_to => p_date_to
1073: );
1074:
1075: ELSE --Bug#3114508 start
1076: hr_utility.set_location( l_proc,25);
1077: hr_person_address_api.update_pers_addr_with_style --Bug#3114508 end
1078: (p_validate => hr_java_conv_util_ss.get_boolean (
1079: p_number => p_validate
1080: )

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

1140: -- object_version_number are set (i.e. not null).
1141: -- -----------------------------------------------------------------------------
1142:
1143: <> -- label for GOTO
1144: hr_utility.set_location( l_proc,30);
1145: -- Set the P_EFFECTIVE_DATE and CURRENT_EFFECTIVE_DATE in wf item attributes to be retreived
1146: -- in review page
1147:
1148: wf_engine.setItemAttrText (itemtype => p_item_type,

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

1161: (p_item_type => p_item_type
1162: ,p_item_key => p_item_key);
1163: --
1164: IF l_transaction_id is null THEN
1165: hr_utility.set_location( l_proc,35);
1166: -- Start a Transaction
1167: hr_transaction_ss.start_transaction
1168: (itemtype => p_item_type
1169: ,itemkey => p_item_key

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

1204: l_transaction_table(l_count).param_value := p_person_id;
1205: l_transaction_table(l_count).param_data_type := 'NUMBER';
1206:
1207: -- IF UPPER(p_action) = 'DELETE' THEN
1208: hr_utility.set_location( l_proc,40);
1209: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
1210: -- ELSE
1211: hr_utility.set_location( l_proc,45);
1212: -- l_effective_date := p_effective_date;

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

1207: -- IF UPPER(p_action) = 'DELETE' THEN
1208: hr_utility.set_location( l_proc,40);
1209: -- l_effective_date := to_char(trunc(sysdate),l_user_date_format);
1210: -- ELSE
1211: hr_utility.set_location( l_proc,45);
1212: -- l_effective_date := p_effective_date;
1213: -- END IF;
1214:
1215: l_count := l_count + 1;

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

1514: l_transaction_table(l_count).param_value := p_activity_id;
1515: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
1516:
1517: BEGIN
1518: hr_utility.set_location( l_proc,50);
1519: l_review_item_name := wf_engine.GetActivityAttrText(itemtype => p_item_type,
1520: itemkey => p_item_key,
1521: actid => p_activity_id,
1522: aname => gv_wf_review_region_item);

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

1521: actid => p_activity_id,
1522: aname => gv_wf_review_region_item);
1523: EXCEPTION
1524: WHEN OTHERS THEN
1525: hr_utility.set_location( l_proc || 'EXCEPTION' ,555);
1526: l_review_item_name := 'HrMainAddressReview';
1527: END;
1528:
1529: l_count := l_count + 1;

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

1530: l_transaction_table(l_count).param_name := 'P_REVIEW_PROC_CALL';
1531: l_transaction_table(l_count).param_value := l_review_item_name;
1532: l_transaction_table(l_count).param_data_type := 'VARCHAR2';
1533: if (p_contact_relationship_id > 0) then
1534: hr_utility.set_location( l_proc,55);
1535: l_count := l_count + 1;
1536: l_transaction_table(l_count).param_name := 'P_CONTACT_RELATIONSHIP_ID';
1537: l_transaction_table(l_count).param_value := p_contact_relationship_id;
1538: l_transaction_table(l_count).param_data_type := 'NUMBER';

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

1548: ,p_api_name => g_package || '.PROCESS_API'
1549: ,p_transaction_data => l_transaction_table);
1550:
1551:
1552: hr_utility.set_location(' Leaving:' || l_proc,60);
1553:
1554: EXCEPTION
1555: WHEN hr_utility.hr_error THEN
1556: hr_utility.set_location(' Leaving:' || l_proc,560);

Line 1555: WHEN hr_utility.hr_error THEN

1551:
1552: hr_utility.set_location(' Leaving:' || l_proc,60);
1553:
1554: EXCEPTION
1555: WHEN hr_utility.hr_error THEN
1556: hr_utility.set_location(' Leaving:' || l_proc,560);
1557:
1558: -- -------------------------------------------
1559: -- an application error has been raised so we must

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

1552: hr_utility.set_location(' Leaving:' || l_proc,60);
1553:
1554: EXCEPTION
1555: WHEN hr_utility.hr_error THEN
1556: hr_utility.set_location(' Leaving:' || l_proc,560);
1557:
1558: -- -------------------------------------------
1559: -- an application error has been raised so we must
1560: -- redisplay the web form to display the error

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

1587: p_error_message := hr_java_conv_util_ss.get_formatted_error_message(
1588: p_error_message => p_error_message);
1589: END IF;
1590: WHEN OTHERS THEN
1591: hr_utility.set_location(' Leaving:' || l_proc,565);
1592:
1593: p_error_message := hr_java_conv_util_ss.get_formatted_error_message(
1594: p_error_message => p_error_message);
1595: END update_person_address;

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

1672: -- l_trans_rec_count integer default 0;
1673: l_trans_rec_count number;
1674: begin
1675:
1676: hr_utility.set_location(' Entering:' || l_proc,5);
1677:
1678: -- ------------------------------------------------------------------
1679: -- Check if there are any transactions waiting to be approved.
1680: -----------------------------------------------------------------------------

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

1706: -- 'HR_MAINT_PERSONAL_DETAILS_FRM', 'HR_MAINT_MAIN_ADDRESS_FRM',
1707: -- 'HR_MAINT_SECONDARY_ADDRESS_FRM . For contacts, there can be ??? rows.
1708: -- -------------------------------------------------------------------
1709: THEN
1710: hr_utility.set_location(l_proc,10);
1711:
1712:
1713: -- For Personal Information, there can only be 1 transaction step per
1714: -- item type and item key, therefore, we don't need to handle the multiple

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

1722: ,p_transaction_step_id => l_trans_step_id
1723: ,p_object_version_number => l_trans_obj_vers_num);
1724: END LOOP;
1725: ELSE
1726: hr_utility.set_location(l_proc,15);
1727: l_trans_rec_count := 0;
1728: -- p_trans_rec_count := to_char(l_trans_rec_count);
1729: p_trans_rec_count := l_trans_rec_count;
1730: RETURN;

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

1735: -- that means we have a data integrity error.
1736: IF l_trans_step_id is NULL OR
1737: l_trans_step_id = 0
1738: THEN
1739: hr_utility.set_location(l_proc,20);
1740: RAISE g_data_error;
1741: END IF;
1742: --
1743: -- Now get the transaction data for the given step

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

1803: -- p_trans_rec_count := to_char(l_trans_rec_count);
1804: p_trans_rec_count := l_trans_rec_count;
1805:
1806:
1807: hr_utility.set_location(' Leaving:' || l_proc,25);
1808:
1809: EXCEPTION
1810: WHEN g_data_error THEN
1811: hr_utility.set_location(' Leaving:' || l_proc,555);

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

1807: hr_utility.set_location(' Leaving:' || l_proc,25);
1808:
1809: EXCEPTION
1810: WHEN g_data_error THEN
1811: hr_utility.set_location(' Leaving:' || l_proc,555);
1812: RAISE;
1813:
1814: END get_address_data_from_tt;
1815:

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

1894: l_trans_rec_count integer default 0;
1895:
1896: BEGIN
1897:
1898: hr_utility.set_location(' Entering:' || l_proc,5);
1899:
1900: -- ------------------------------------------------------------------
1901: -- Check if there are any transaction rec already saved for the current
1902: -- transaction. This is used for re-display the Update page when a user

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

1914:
1915: IF l_trans_step_rows IS NOT NULL OR
1916: l_trans_step_rows > 0
1917: THEN
1918: hr_utility.set_location(l_proc,10);
1919: l_trans_rec_count := l_trans_step_rows;
1920: ELSE
1921: hr_utility.set_location(l_proc,15);
1922: l_trans_rec_count := 0;

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

1917: THEN
1918: hr_utility.set_location(l_proc,10);
1919: l_trans_rec_count := l_trans_step_rows;
1920: ELSE
1921: hr_utility.set_location(l_proc,15);
1922: l_trans_rec_count := 0;
1923: hr_utility.set_location(' Leaving:' || l_proc,20);
1924:
1925: return;

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

1919: l_trans_rec_count := l_trans_step_rows;
1920: ELSE
1921: hr_utility.set_location(l_proc,15);
1922: l_trans_rec_count := 0;
1923: hr_utility.set_location(' Leaving:' || l_proc,20);
1924:
1925: return;
1926: END IF;
1927: --

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

1934: -- Need to loop through l_trans_rec_count -1 as the index starts from 0
1935:
1936: FOR i in 0..l_trans_rec_count-1 LOOP
1937: IF(l_api_names(i) = 'HR_PROCESS_ADDRESS_SS.PROCESS_API') THEN
1938: hr_utility.set_location(l_proc || 'LOOP' ,25);
1939: get_address_data_from_tt(
1940: p_transaction_step_id => l_trans_step_ids(i)
1941: ,p_effective_date => p_effective_date
1942: ,p_person_id => p_person_id

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

2001:
2002: -- p_trans_rec_count := to_char(l_trans_rec_count);
2003: p_trans_rec_count := l_trans_rec_count;
2004:
2005: hr_utility.set_location(' Leaving:' || l_proc,30);
2006:
2007: EXCEPTION
2008: WHEN g_data_error THEN
2009: hr_utility.set_location(' Leaving:' || l_proc,555);

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

2005: hr_utility.set_location(' Leaving:' || l_proc,30);
2006:
2007: EXCEPTION
2008: WHEN g_data_error THEN
2009: hr_utility.set_location(' Leaving:' || l_proc,555);
2010:
2011: RAISE;
2012:
2013: END get_address_data_from_tt;

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

2081: l_proc varchar2(200) := g_package || 'get_address_data_from_tt';
2082:
2083: begin
2084:
2085: hr_utility.set_location(' Entering:' || l_proc,5);
2086:
2087: --
2088: p_effective_date:= to_date(
2089: hr_transaction_ss.get_wf_effective_date

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

2367: (p_transaction_step_id => p_transaction_step_id
2368: ,p_name => 'P_ADD_INFORMATION16');
2369: --
2370:
2371: hr_utility.set_location(' Leaving:' || l_proc,10);
2372:
2373:
2374: EXCEPTION
2375: WHEN OTHERS THEN

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

2429: p_add_information19 := NULL;
2430: p_add_information20 := NULL;
2431: p_action := NULL;
2432: p_old_address_id := NULL;
2433: hr_utility.set_location(' Leaving:' || l_proc,555);
2434:
2435: RAISE;
2436:
2437: END get_address_data_from_tt;

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

2462: l_check_for_sfl varchar2(10);
2463: l_sfl_g_contact_step_id NUMBER;
2464:
2465: BEGIN
2466: hr_utility.set_location(' Entering:' || l_proc,5);
2467: if (p_effective_date is not null) then
2468: hr_utility.set_location( l_proc, 10);
2469: l_effective_date:= to_date(p_effective_date,g_date_format);
2470: else

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

2464:
2465: BEGIN
2466: hr_utility.set_location(' Entering:' || l_proc,5);
2467: if (p_effective_date is not null) then
2468: hr_utility.set_location( l_proc, 10);
2469: l_effective_date:= to_date(p_effective_date,g_date_format);
2470: else
2471: hr_utility.set_location( l_proc, 15);
2472: l_effective_date:= to_date(

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

2467: if (p_effective_date is not null) then
2468: hr_utility.set_location( l_proc, 10);
2469: l_effective_date:= to_date(p_effective_date,g_date_format);
2470: else
2471: hr_utility.set_location( l_proc, 15);
2472: l_effective_date:= to_date(
2473: hr_transaction_ss.get_wf_effective_date
2474: (p_transaction_step_id => p_transaction_step_id),g_date_format);
2475: end if;

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

2508:
2509: IF hr_transaction_api.get_varchar2_value
2510: (p_Transaction_step_id => p_transaction_step_id
2511: ,p_name => 'P_PRADD_OVLAPVAL_OVERRIDE') = 'Y' THEN
2512: hr_utility.set_location( l_proc, 20);
2513: l_pradd_ovrlap := TRUE;
2514: ELSE
2515: hr_utility.set_location( l_proc, 25);
2516: l_pradd_ovrlap := FALSE;

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

2511: ,p_name => 'P_PRADD_OVLAPVAL_OVERRIDE') = 'Y' THEN
2512: hr_utility.set_location( l_proc, 20);
2513: l_pradd_ovrlap := TRUE;
2514: ELSE
2515: hr_utility.set_location( l_proc, 25);
2516: l_pradd_ovrlap := FALSE;
2517: END IF;
2518:
2519:

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

2535: --
2536: -- PB :
2537: --
2538: if l_address.person_id is null or l_address.person_id < 0 then
2539: hr_utility.set_location( l_proc, 30);
2540: --
2541: -- This is the case where the contact and address are created.
2542: -- So get contact person id from the global which is set by
2543: -- hrconwrs.pkb.

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

2550: ,p_name => 'P_CONTACT_OR_PERSON');
2551: --
2552: 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'
2553: 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
2554: hr_utility.set_location( l_proc, 35);
2555: --
2556: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2557: --
2558: -- In case of SaveForLater run process_create_contact_api

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

2568: where person_id =l_address.person_id;
2569:
2570: EXCEPTION
2571: WHEN no_data_found THEN
2572: hr_utility.set_location( l_proc || 'EXCEPTION' , 555);
2573: l_check_for_sfl := 'SFL';
2574: END;
2575:
2576:

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

2574: END;
2575:
2576:
2577: IF l_check_for_sfl = 'SFL' THEN
2578: hr_utility.set_location( l_proc, 40);
2579: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2580: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2581:
2582: BEGIN

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

2575:
2576:
2577: IF l_check_for_sfl = 'SFL' THEN
2578: hr_utility.set_location( l_proc, 40);
2579: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2580: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2581:
2582: BEGIN
2583: select nvl(hats1.transaction_step_id,0)

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

2576:
2577: IF l_check_for_sfl = 'SFL' THEN
2578: hr_utility.set_location( l_proc, 40);
2579: hr_utility.set_location('Address: process_api: It is a save for later step' , 1234);
2580: hr_utility.set_location('g_contact_person_id before :'||hr_process_contact_ss.g_contact_person_id , 1234);
2581:
2582: BEGIN
2583: select nvl(hats1.transaction_step_id,0)
2584: into l_sfl_g_contact_step_id

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

2597: p_transaction_step_id => l_sfl_g_contact_step_id
2598: );
2599:
2600: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2601: hr_utility.set_location('g_contact_person_id after :'||hr_process_contact_ss.g_contact_person_id , 1234);
2602: EXCEPTION
2603: WHEN others THEN
2604: hr_utility.set_location( l_proc || 'EXCEPTION' , 565);
2605: null;

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

2600: l_address.person_id := hr_process_contact_ss.g_contact_person_id;
2601: hr_utility.set_location('g_contact_person_id after :'||hr_process_contact_ss.g_contact_person_id , 1234);
2602: EXCEPTION
2603: WHEN others THEN
2604: hr_utility.set_location( l_proc || 'EXCEPTION' , 565);
2605: null;
2606: END;
2607: END IF;
2608:

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

2606: END;
2607: END IF;
2608:
2609: else -- for person PERSON
2610: hr_utility.set_location( l_proc, 45);
2611: --
2612: -- StartRegistration : For Create person and address in one
2613: -- transaction get person id from the package global.
2614: --

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

2615: -- adding the session id check to avoid connection pooling problems.
2616: /* l_address.person_id := hr_process_person_ss.g_person_id; */
2617: if (( hr_process_person_ss.g_person_id is not null) and
2618: (hr_process_person_ss.g_session_id= ICX_SEC.G_SESSION_ID)) then
2619: hr_utility.set_location( l_proc, 50);
2620: l_address.person_id := hr_process_person_ss.g_person_id;
2621: --
2622: end if;
2623: --

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

2632: -- startregistration anupam
2633: -- For tertiary address from overview page we have T for primary flag
2634: -- it should be changed to N in the database.
2635: if l_address.primary_flag = 'T' then
2636: hr_utility.set_location( l_proc, 55);
2637: l_address.primary_flag := 'N';
2638: end if;
2639: -- endregistration anupam
2640:

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

2816:
2817:
2818: IF UPPER(l_action) = 'CHANGE' THEN
2819: IF UPPER(l_address.primary_flag) like 'N%' THEN
2820: hr_utility.set_location( l_proc, 60);
2821: hr_person_address_api.update_person_address
2822: (p_validate => false
2823: ,p_effective_date => l_effective_date
2824: ,p_address_id => l_old_address_id

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

2879: ,p_add_information18 => l_address.add_information18
2880: ,p_add_information19 => l_address.add_information19
2881: ,p_add_information20 => l_address.add_information20);
2882: ELSIF UPPER(l_action) = 'CORRECT' THEN --Bug#3114508 start
2883: hr_utility.set_location( l_proc, 65);
2884: if (hr_process_contact_ss.g_is_address_updated = true) then
2885: l_address.object_version_number := l_address.object_version_number + 1;
2886: end if;
2887: hr_person_address_api.update_pers_addr_with_style --Bug#3114508 end

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

2934: ,p_add_information19 => l_address.add_information19
2935: ,p_add_information20 => l_address.add_information20);
2936: hr_process_contact_ss.g_is_address_updated := false;
2937: ELSIF UPPER(l_action) = 'DELETE' THEN
2938: hr_utility.set_location( l_proc, 70);
2939: hr_person_address_api.update_person_address
2940: (p_validate => false
2941: ,p_address_id => l_address.address_id
2942: ,p_object_version_number => l_address.object_version_number

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

2943: ,p_effective_date => l_effective_date
2944: ,p_date_from => l_address.date_from
2945: ,p_date_to => l_address.date_to);
2946: ELSIF UPPER(l_action) = 'NEW' THEN
2947: hr_utility.set_location( l_proc, 75);
2948: hr_person_address_api.create_person_address
2949: (p_validate => false
2950: ,p_effective_date => l_effective_date
2951: ,p_person_id => l_address.person_id

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

2998: ,p_add_information19 => l_address.add_information19
2999: ,p_add_information20 => l_address.add_information20);
3000: END IF;
3001:
3002: hr_utility.set_location(' Leaving:' || l_proc,80);
3003:
3004: END process_api;
3005:
3006: END hr_process_address_ss;