[Home] [Help]
498: ,p_api_name => g_package || '.PROCESS_API'
499: ,p_transaction_data => l_transaction_table);
500:
501: EXCEPTION
502: WHEN hr_utility.hr_error THEN
503: -- -------------------------------------------
504: -- an application error has been raised so we must
505: -- redisplay the web form to display the error
506: -- --------------------------------------------
1598: WHEN OTHERS THEN
1599: --
1600: -- p_message := SQLCODE||': '||SUBSTR(SQLERRM, 1, 950);
1601: p_message := fnd_message.get();
1602: hr_utility.set_location('Leaving:'||g_package||l_proc, 40);
1603: --
1604: END delete_add_training;
1605:
1606: -- ----------------------------------------------------------------------------
1782: --
1783: WHEN OTHERS THEN
1784: --
1785: p_some_warning := -1;
1786: hr_utility.set_location('Leaving:'||g_package||l_proc, 40);
1787: -- p_message := SQLCODE||': '||SUBSTR(SQLERRM, 1, 950);
1788:
1789:
1790: If g_called_from = 'R' Then
1887: l_new_object_version_number NUMBER;
1888: l_proc VARCHAR2(72) := 'Update_Add_Training';
1889: l_learner_name per_all_people_f.full_name%TYPE;
1890: BEGIN
1891: hr_utility.set_location('Entering:'||g_package||l_proc, 40);
1892:
1893: l_new_object_version_number := p_old_object_version_number;
1894:
1895: OTA_NHS_API.update_non_ota_histories
1981: 'OTA_COURSE_END_DATE',
1982: p_completion_date);
1983:
1984: p_new_object_version_number := l_new_object_version_number;
1985: hr_utility.set_location('Leaving:'||g_package||l_proc, 40);
1986: EXCEPTION
1987: --
1988: WHEN OTHERS THEN
1989: --
1987: --
1988: WHEN OTHERS THEN
1989: --
1990: p_some_warning := -1;
1991: hr_utility.set_location('WHEN OTHERS Exception in :'||g_package||l_proc, 50);
1992: -- p_message := SQLERRM;
1993:
1994:
1995: If g_called_from = 'R' Then
2126: l_person_full_name per_all_people_f.full_name%TYPE;
2127: l_proc VARCHAR2(72) := 'get_internal_contact_name';
2128: BEGIN
2129:
2130: hr_utility.set_location('Entering:'||g_package||l_proc, 10);
2131: OPEN c_get_person_name(person_id);
2132: FETCH c_get_person_name INTO l_person_full_name;
2133: CLOSE c_get_person_name;
2134: hr_utility.set_location('Leaving:'||g_package||l_proc, 20);
2130: hr_utility.set_location('Entering:'||g_package||l_proc, 10);
2131: OPEN c_get_person_name(person_id);
2132: FETCH c_get_person_name INTO l_person_full_name;
2133: CLOSE c_get_person_name;
2134: hr_utility.set_location('Leaving:'||g_package||l_proc, 20);
2135: RETURN l_person_full_name;
2136:
2137: EXCEPTION
2138: WHEN others THEN
2135: RETURN l_person_full_name;
2136:
2137: EXCEPTION
2138: WHEN others THEN
2139: hr_utility.set_location('Leaving:'||g_package||l_proc, 30);
2140: RETURN null;
2141:
2142: END get_internal_contact_name;
2143:
2194: l_person_full_name VARCHAR2(500);
2195: l_proc VARCHAR2(72) := 'get_learner_name';
2196: BEGIN
2197:
2198: hr_utility.set_location('Entering:'||g_package||l_proc, 10);
2199:
2200: IF organization_id IS NULL THEN
2201: -- ra_contacts needs to be queried since org id is null
2202: OPEN c_get_contact_name(person_id);
2206: OPEN c_get_person_name(person_id);
2207: FETCH c_get_person_name INTO l_person_full_name;
2208: CLOSE c_get_person_name;
2209: END IF;
2210: hr_utility.set_location('Leaving:'||g_package||l_proc, 20);
2211: RETURN l_person_full_name;
2212:
2213: EXCEPTION
2214: WHEN others THEN
2211: RETURN l_person_full_name;
2212:
2213: EXCEPTION
2214: WHEN others THEN
2215: hr_utility.set_location('Leaving:'||g_package||l_proc, 30);
2216: RETURN null;
2217: END get_learner_name;
2218:
2219: -- ----------------------------------------------------------------------------
2244: l_value VARCHAR2(500);
2245: l_proc VARCHAR2(50) := 'get_customer_name';
2246:
2247: BEGIN
2248: HR_UTILITY.SET_LOCATION('Entering:'||g_package||l_proc, 10);
2249:
2250: IF p_organization_id IS NOT NULL THEN
2251: SELECT OTA_GENERAL.get_org_name(p_organization_id) INTO l_value FROM DUAL;
2252: ELSE
2254: FETCH c_get_customer_name INTO l_value;
2255: CLOSE c_get_customer_name;
2256: END IF;
2257:
2258: HR_UTILITY.SET_LOCATION('Leaving'||g_package||l_proc, 30);
2259: RETURN l_value;
2260: EXCEPTION
2261: WHEN others THEN
2262: HR_UTILITY.SET_LOCATION('Leaving:'||g_package||l_proc, 30);
2258: HR_UTILITY.SET_LOCATION('Leaving'||g_package||l_proc, 30);
2259: RETURN l_value;
2260: EXCEPTION
2261: WHEN others THEN
2262: HR_UTILITY.SET_LOCATION('Leaving:'||g_package||l_proc, 30);
2263: RETURN null;
2264: END get_custorg_name;
2265:
2266: -- ----------------------------------------------------------------------------
2373: l_null_value_number NUMBER := -1000;
2374: l_null_value_date Date := sysdate - 1000;
2375: BEGIN
2376:
2377: hr_utility.set_location('Entering:'||g_package||l_proc, 10);
2378:
2379: FOR trg_rec IN c_get_training_data(p_nota_history_id) LOOP
2380:
2381: If (Nvl(trim(trg_rec.Trng_Title),l_null_value) = Nvl(trim(p_trng_title),l_null_value)) Then
2614: Else
2615: p_result := 0;
2616: End If;
2617:
2618: hr_utility.set_location('Leaving:'||g_package||l_proc, 20);
2619: END check_changes;
2620:
2621:
2622:
2658:
2659:
2660: BEGIN
2661:
2662: hr_utility.set_location('Entering:'||l_proc, 5);
2663:
2664: FOR c in cur_get_pending_trn_step_id --bug 3590613
2665: LOOP
2666:
2687: fnd_message.raise_error;
2688:
2689: end if;
2690:
2691: hr_utility.set_location('Entering:'||l_proc, 30);
2692:
2693:
2694: end chk_pending_approval;
2695: