270: open c1 ;
271: fetch c1 into l_dummy ;
272: if c1%found
273: then close c1 ;
274: hr_utility.set_message( 801 , 'PAY_7689_USER_TAB_TAB_UNIQUE' ) ;
275: hr_utility.raise_error ;
276: end if ;
277: close c1 ;
278: --
271: fetch c1 into l_dummy ;
272: if c1%found
273: then close c1 ;
274: hr_utility.set_message( 801 , 'PAY_7689_USER_TAB_TAB_UNIQUE' ) ;
275: hr_utility.raise_error ;
276: end if ;
277: close c1 ;
278: --
279: --check _TL uniqeness
280: open c2 ;
281: fetch c2 into l_dummy ;
282: if c2%found
283: then close c2 ;
284: hr_utility.set_message( 801 , 'PAY_7689_USER_TAB_TAB_UNIQUE' ) ;
285: hr_utility.raise_error ;
286: end if ;
287: close c2 ;
288: --
281: fetch c2 into l_dummy ;
282: if c2%found
283: then close c2 ;
284: hr_utility.set_message( 801 , 'PAY_7689_USER_TAB_TAB_UNIQUE' ) ;
285: hr_utility.raise_error ;
286: end if ;
287: close c2 ;
288: --
289: end check_unique ;
306: open c1 ;
307: fetch c1 into l_dummy ;
308: if c1%found then
309: close c1 ;
310: hr_utility.set_message ( 801 , 'PAY_6368_USERTAB_COLUMNS_FIRST' ) ;
311: hr_utility.raise_error ;
312: end if ;
313: close c1 ;
314: --
307: fetch c1 into l_dummy ;
308: if c1%found then
309: close c1 ;
310: hr_utility.set_message ( 801 , 'PAY_6368_USERTAB_COLUMNS_FIRST' ) ;
311: hr_utility.raise_error ;
312: end if ;
313: close c1 ;
314: --
315: -- Check PAY_USER_ROWS_F
316: open c2 ;
317: fetch c2 into l_dummy ;
318: if c2%found then
319: close c2 ;
320: hr_utility.set_message ( 801 , 'PAY_6369_USERTAB_ROWS_FIRST' ) ;
321: hr_utility.raise_error ;
322: end if ;
323: close c2 ;
324: --
317: fetch c2 into l_dummy ;
318: if c2%found then
319: close c2 ;
320: hr_utility.set_message ( 801 , 'PAY_6369_USERTAB_ROWS_FIRST' ) ;
321: hr_utility.raise_error ;
322: end if ;
323: close c2 ;
324: --
325: end check_references ;
333: select base_user_table_name into original_user_table_name
334: from pay_user_tables_vl
335: where row_id = p_rowid;
336: if(p_base_user_table_name <> original_user_table_name) then
337: hr_utility.set_location (l_package_name,1);
338: fnd_message.set_name ('PER','PER_52480_SSM_NON_UPD_FIELD'); -- checkformat failure
339: fnd_message.raise_error;
340: end if;
341: --
528: BEGIN
529: l_package_name := 'PAY_USER_TABLES_PKG.VALIDATE_TRANSLATION';
530: l_business_group_id := p_business_group_id;
531: l_legislation_code := p_legislation_code;
532: hr_utility.set_location (l_package_name,10);
533: OPEN c_translation(language, user_table_name,user_table_id,
534: l_business_group_id,l_legislation_code);
535: hr_utility.set_location (l_package_name,50);
536: FETCH c_translation INTO g_dummy;
531: l_legislation_code := p_legislation_code;
532: hr_utility.set_location (l_package_name,10);
533: OPEN c_translation(language, user_table_name,user_table_id,
534: l_business_group_id,l_legislation_code);
535: hr_utility.set_location (l_package_name,50);
536: FETCH c_translation INTO g_dummy;
537:
538: IF c_translation%NOTFOUND THEN
539: hr_utility.set_location (l_package_name,60);
535: hr_utility.set_location (l_package_name,50);
536: FETCH c_translation INTO g_dummy;
537:
538: IF c_translation%NOTFOUND THEN
539: hr_utility.set_location (l_package_name,60);
540: CLOSE c_translation;
541: ELSE
542: hr_utility.set_location (l_package_name,70);
543: CLOSE c_translation;
538: IF c_translation%NOTFOUND THEN
539: hr_utility.set_location (l_package_name,60);
540: CLOSE c_translation;
541: ELSE
542: hr_utility.set_location (l_package_name,70);
543: CLOSE c_translation;
544: fnd_message.set_name('PAY','HR_TRANSLATION_EXISTS');
545: fnd_message.raise_error;
546: END IF;
543: CLOSE c_translation;
544: fnd_message.set_name('PAY','HR_TRANSLATION_EXISTS');
545: fnd_message.raise_error;
546: END IF;
547: hr_utility.set_location ('Leaving:'||l_package_name,80);
548: END validate_translation;
549: --
550:
551: function return_dml_status