DBA Data[Home] [Help]

APPS.PAY_USER_COLUMNS_PKG dependencies on PAY_USER_COLUMNS

Line 1: PACKAGE BODY PAY_USER_COLUMNS_PKG AS

1: PACKAGE BODY PAY_USER_COLUMNS_PKG AS
2: /* $Header: pyusc01t.pkb 120.1 2005/07/29 05:08:17 shisriva noship $ */
3: --
4: g_dummy number(1); -- Dummy for cursor returns which are not needed
5: g_user_table_id number(9); -- For validating translation;

Line 19: select pay_user_columns_s.nextval

15: p_legislation_subgroup in varchar2,
16: p_user_column_name in varchar2,
17: p_formula_id in number ) is
18: cursor c1 is
19: select pay_user_columns_s.nextval
20: from sys.dual ;
21:
22: cursor c2 is
23: select rowid

Line 24: from pay_user_columns

20: from sys.dual ;
21:
22: cursor c2 is
23: select rowid
24: from pay_user_columns
25: where user_column_id = p_user_column_id ;
26: --
27: begin
28: --

Line 33: insert into PAY_USER_COLUMNS

29: open c1 ;
30: fetch c1 into p_user_column_id ;
31: close c1 ;
32:
33: insert into PAY_USER_COLUMNS
34: ( USER_COLUMN_ID,
35: USER_TABLE_ID,
36: BUSINESS_GROUP_ID,
37: LEGISLATION_CODE,

Line 76: update PAY_USER_COLUMNS

72: p_formula_id in number,
73: p_base_user_column_name in varchar2 default hr_api.g_varchar2) is
74: begin
75: --
76: update PAY_USER_COLUMNS
77: set USER_COLUMN_ID = p_user_column_id,
78: USER_TABLE_ID = p_user_table_id,
79: BUSINESS_GROUP_ID = p_business_group_id ,
80: LEGISLATION_CODE = p_legislation_code,

Line 104: select user_column_id into ucid from pay_user_columns

100: begin
101: --
102: g_dml_status := TRUE;
103: --For MLS------------------------------------------------------------------
104: select user_column_id into ucid from pay_user_columns
105: where rowid = p_rowid;
106: pay_pct_del.del_tl(ucid);
107: ---------------------------------------------------------------------------
108: g_dml_status := FALSE;

Line 109: delete from PAY_USER_COLUMNS

105: where rowid = p_rowid;
106: pay_pct_del.del_tl(ucid);
107: ---------------------------------------------------------------------------
108: g_dml_status := FALSE;
109: delete from PAY_USER_COLUMNS
110: where ROWID = p_rowid;
111: --
112: Exception
113: When Others then

Line 129: from PAY_USER_COLUMNS_TL

125: p_formula_id in number,
126: p_base_user_column_name in varchar2 default hr_api.g_varchar2) is
127: --_TL cursor--
128: cursor T is select *
129: from PAY_USER_COLUMNS_TL
130: where user_column_id = p_user_column_id
131: and language = userenv('lang')
132: for update NOWAIT ;
133: --

Line 138: from PAY_USER_COLUMNS

134: tlrowinfo T%rowtype;
135: --
136: --
137: cursor C is select *
138: from PAY_USER_COLUMNS
139: where rowid = p_rowid
140: for update of USER_COLUMN_ID NOWAIT ;
141: --
142: rowinfo C%rowtype;

Line 211: from pay_user_columns uc

207: p_base_user_column_name in varchar2 default hr_api.g_varchar2) is
208:
209: cursor c1 is
210: select '1'
211: from pay_user_columns uc
212: where upper(uc.user_column_name) = upper( p_base_user_column_name)
213: and uc.user_table_id = p_user_table_id
214: and ( p_rowid is null
215: or ( p_rowid is not null

Line 240: from pay_user_columns uc

236: p_legislation_code in varchar2,
237: p_base_user_column_name in varchar2 default hr_api.g_varchar2) is
238: cursor c1 is
239: select '1'
240: from pay_user_columns uc
241: where upper(uc.user_column_name) = upper( p_base_user_column_name)
242: and uc.user_table_id = p_user_table_id
243: and ( p_rowid is null
244: or ( p_rowid is not null

Line 254: from pay_user_columns uc,pay_user_columns_tl ucl

250:
251: --_TL cursor
252: cursor c2 is
253: select '1'
254: from pay_user_columns uc,pay_user_columns_tl ucl
255: where upper(ucl.user_column_name) = upper(p_user_column_name)
256: and ucl.user_column_id = uc.user_column_id
257: and uc.user_table_id = p_user_table_id
258: and nvl(uc.business_group_id,nvl(p_business_group_id, -1))

Line 262: and (ucl.rowid not in ((select rowid from pay_user_columns_tl pct

258: and nvl(uc.business_group_id,nvl(p_business_group_id, -1))
259: = nvl(p_business_group_id, -1)
260: and nvl(uc.legislation_code, nvl(p_legislation_code,'~~nvl~~'))
261: = nvl(p_legislation_code, '~~nvl~~')
262: and (ucl.rowid not in ((select rowid from pay_user_columns_tl pct
263: where pct.user_column_id = (select user_column_id from
264: pay_user_columns
265: where rowid = p_rowid)
266: --and language = userenv('lang')

Line 264: pay_user_columns

260: and nvl(uc.legislation_code, nvl(p_legislation_code,'~~nvl~~'))
261: = nvl(p_legislation_code, '~~nvl~~')
262: and (ucl.rowid not in ((select rowid from pay_user_columns_tl pct
263: where pct.user_column_id = (select user_column_id from
264: pay_user_columns
265: where rowid = p_rowid)
266: --and language = userenv('lang')
267: )));
268:

Line 322: l_package_name VARCHAR2(80) := 'PAY_USER_COLUMNS_PKG.CHECK_UPDATE';

318: ----For MLS---------------------------------------------------------------------
319:
320: procedure check_base_update(p_base_user_column_name in varchar2,
321: p_rowid in varchar2) is
322: l_package_name VARCHAR2(80) := 'PAY_USER_COLUMNS_PKG.CHECK_UPDATE';
323: original_user_column_name varchar2(80);
324: begin
325: select base_user_column_name into original_user_column_name
326: from pay_user_columns_vl

Line 326: from pay_user_columns_vl

322: l_package_name VARCHAR2(80) := 'PAY_USER_COLUMNS_PKG.CHECK_UPDATE';
323: original_user_column_name varchar2(80);
324: begin
325: select base_user_column_name into original_user_column_name
326: from pay_user_columns_vl
327: where row_id = p_rowid;
328: if(p_base_user_column_name <> original_user_column_name) then
329: hr_utility.set_location (l_package_name,1);
330: fnd_message.set_name ('PER','PER_52480_SSM_NON_UPD_FIELD'); -- checkformat failure

Line 340: delete from PAY_USER_COLUMNS_TL T

336:
337: procedure ADD_LANGUAGE
338: is
339: begin
340: delete from PAY_USER_COLUMNS_TL T
341: where not exists
342: (select NULL
343: from PAY_USER_COLUMNS B
344: where B.USER_COLUMN_ID = T.USER_COLUMN_ID

Line 343: from PAY_USER_COLUMNS B

339: begin
340: delete from PAY_USER_COLUMNS_TL T
341: where not exists
342: (select NULL
343: from PAY_USER_COLUMNS B
344: where B.USER_COLUMN_ID = T.USER_COLUMN_ID
345: );
346: update PAY_USER_COLUMNS_TL T
347: set (USER_COLUMN_NAME) =

Line 346: update PAY_USER_COLUMNS_TL T

342: (select NULL
343: from PAY_USER_COLUMNS B
344: where B.USER_COLUMN_ID = T.USER_COLUMN_ID
345: );
346: update PAY_USER_COLUMNS_TL T
347: set (USER_COLUMN_NAME) =
348: (select B.USER_COLUMN_NAME
349: from PAY_USER_COLUMNS_TL B
350: where B.USER_COLUMN_ID = T.USER_COLUMN_ID

Line 349: from PAY_USER_COLUMNS_TL B

345: );
346: update PAY_USER_COLUMNS_TL T
347: set (USER_COLUMN_NAME) =
348: (select B.USER_COLUMN_NAME
349: from PAY_USER_COLUMNS_TL B
350: where B.USER_COLUMN_ID = T.USER_COLUMN_ID
351: and B.LANGUAGE = T.SOURCE_LANG)
352: where (T.USER_COLUMN_ID,T.LANGUAGE) in
353: (select SUBT.USER_COLUMN_ID,SUBT.LANGUAGE

Line 354: from PAY_USER_COLUMNS_TL SUBB, PAY_USER_COLUMNS_TL SUBT

350: where B.USER_COLUMN_ID = T.USER_COLUMN_ID
351: and B.LANGUAGE = T.SOURCE_LANG)
352: where (T.USER_COLUMN_ID,T.LANGUAGE) in
353: (select SUBT.USER_COLUMN_ID,SUBT.LANGUAGE
354: from PAY_USER_COLUMNS_TL SUBB, PAY_USER_COLUMNS_TL SUBT
355: where SUBB.USER_COLUMN_ID = SUBT.USER_COLUMN_ID
356: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
357: and (SUBB.USER_COLUMN_NAME <> SUBT.USER_COLUMN_NAME
358: ));

Line 360: insert into PAY_USER_COLUMNS_TL (

356: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
357: and (SUBB.USER_COLUMN_NAME <> SUBT.USER_COLUMN_NAME
358: ));
359:
360: insert into PAY_USER_COLUMNS_TL (
361: USER_COLUMN_ID,
362: USER_COLUMN_NAME,
363: LAST_UPDATE_DATE,
364: LAST_UPDATED_BY,

Line 380: from PAY_USER_COLUMNS_TL B, FND_LANGUAGES L

376: B.CREATED_BY,
377: B.CREATION_DATE,
378: L.LANGUAGE_CODE,
379: B.SOURCE_LANG
380: from PAY_USER_COLUMNS_TL B, FND_LANGUAGES L
381: where L.INSTALLED_FLAG in ('I', 'B')
382: and B.LANGUAGE = userenv('LANG')
383: and not exists
384: (select NULL

Line 385: from PAY_USER_COLUMNS_TL T

381: where L.INSTALLED_FLAG in ('I', 'B')
382: and B.LANGUAGE = userenv('LANG')
383: and not exists
384: (select NULL
385: from PAY_USER_COLUMNS_TL T
386: where T.USER_COLUMN_ID = B.USER_COLUMN_ID
387: and T.LANGUAGE = L.LANGUAGE_CODE);
388: end ADD_LANGUAGE;
389: --

Line 397: UPDATE PAY_USER_COLUMNS_TL

393: X_USER_COLUMN_NAME in VARCHAR2,
394: X_OWNER in VARCHAR2
395: ) is
396: begin
397: UPDATE PAY_USER_COLUMNS_TL
398: SET USER_COLUMN_NAME = nvl(X_USER_COLUMN_NAME,USER_COLUMN_NAME),
399: last_update_date = SYSDATE,
400: last_updated_by = decode(x_owner,'SEED',1,0),
401: last_update_login = 0,

Line 406: from PAY_USER_COLUMNS

402: source_lang = userenv('LANG')
403: WHERE userenv('LANG') IN (language,source_lang)
404: AND USER_COLUMN_ID in
405: (select USER_COLUMN_ID
406: from PAY_USER_COLUMNS
407: where nvl(USER_COLUMN_NAME,'~null~')=nvl(X_B_USER_COLUMN_NAME,'~null~')
408: and nvl(LEGISLATION_CODE,'~null~') = nvl(X_B_LEGISLATION_CODE,'~null~')
409: and BUSINESS_GROUP_ID is NULL);
410: if (sql%notfound) then

Line 453: from pay_user_columns uc,

449: p_user_table_id IN NUMBER,
450: p_bus_grp_id IN NUMBER,
451: p_leg_code IN varchar2) IS
452: select '1'
453: from pay_user_columns uc,
454: pay_user_columns_tl ucl
455: where upper(ucl.user_column_name) = upper(p_user_column_name)
456: AND uc.user_column_id = ucl.user_column_id
457: AND (ucl.user_column_id <> p_user_column_id OR p_user_column_id IS NULL)

Line 454: pay_user_columns_tl ucl

450: p_bus_grp_id IN NUMBER,
451: p_leg_code IN varchar2) IS
452: select '1'
453: from pay_user_columns uc,
454: pay_user_columns_tl ucl
455: where upper(ucl.user_column_name) = upper(p_user_column_name)
456: AND uc.user_column_id = ucl.user_column_id
457: AND (ucl.user_column_id <> p_user_column_id OR p_user_column_id IS NULL)
458: AND uc.user_table_id = p_user_table_id

Line 469: l_package_name := 'PAY_USER_COLUMNS_PKG.VALIDATE_TRANSLATION';

465: l_legislation_code VARCHAR2(150);
466:
467:
468: BEGIN
469: l_package_name := 'PAY_USER_COLUMNS_PKG.VALIDATE_TRANSLATION';
470: l_business_group_id := p_business_group_id;
471: l_legislation_code := p_legislation_code;
472: hr_utility.set_location (l_package_name,10);
473: OPEN c_translation(language, user_column_name,user_column_id,g_user_table_id,

Line 499: END PAY_USER_COLUMNS_PKG;

495: return g_dml_status;
496: end return_dml_status;
497: --
498: --------------------------------------------------------------------------------
499: END PAY_USER_COLUMNS_PKG;