eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PAY_MONETARY_UNITS_PKG dependencies on PAY_MONETARY_UNITS

Line 1: package body PAY_MONETARY_UNITS_PKG as

1: package body PAY_MONETARY_UNITS_PKG as
2: /* $Header: pymon01t.pkb 115.3 2003/08/05 07:01:07 scchakra ship $ */
3: --
4: -- define globals for validating translation.
5: --

Line 20: hr_utility.set_location('pay_monetary_units_pkg.pop_flds',1);

16: where territory_code = p_terr_code;
17: --
18: begin
19: --
20: hr_utility.set_location('pay_monetary_units_pkg.pop_flds',1);
21: --
22: open c2;
23: --
24: fetch c2 into p_country;

Line 41: from pay_monetary_units pmu

37: l_exists varchar2(1);
38:
39: cursor c3(p_mode in varchar2) is
40: select 'x'
41: from pay_monetary_units pmu
42: ,pay_monetary_units_tl pmut
43: where pmu.currency_code = p_cur_code
44: and ( (p_mode = 'MONETARY_UNIT_NAME'
45: and upper(translate(pmut.monetary_unit_name,'x_','x '))

Line 42: ,pay_monetary_units_tl pmut

38:
39: cursor c3(p_mode in varchar2) is
40: select 'x'
41: from pay_monetary_units pmu
42: ,pay_monetary_units_tl pmut
43: where pmu.currency_code = p_cur_code
44: and ( (p_mode = 'MONETARY_UNIT_NAME'
45: and upper(translate(pmut.monetary_unit_name,'x_','x '))
46: = upper(translate(p_unit_name,'x_','x '))

Line 63: hr_utility.set_location('pay_monetary_units_pkg.chk_unq_row',1);

59: or (p_rowid is not null and chartorowid(p_rowid) <> pmu.rowid));
60: --
61: begin
62: --
63: hr_utility.set_location('pay_monetary_units_pkg.chk_unq_row',1);
64: --
65: if p_unit_name is not null then
66: open c3('MONETARY_UNIT_NAME');
67: --

Line 99: select pay_monetary_units_s.nextval

95:
96: procedure get_id(p_munit_id IN OUT NOCOPY NUMBER) is
97:
98: cursor c4 is
99: select pay_monetary_units_s.nextval
100: from sys.dual;
101: --
102: begin
103: --

Line 104: hr_utility.set_location('pay_monetary_units_pkg.get_id',1);

100: from sys.dual;
101: --
102: begin
103: --
104: hr_utility.set_location('pay_monetary_units_pkg.get_id',1);
105: --
106: open c4;
107: --
108: fetch c4 into p_munit_id;

Line 125: hr_utility.set_location('pay_monetary_units_pkg.stb_del_valid',1);

121: where monetary_unit_id = p_munit_id;
122: --
123: begin
124: --
125: hr_utility.set_location('pay_monetary_units_pkg.stb_del_valid',1);
126: --
127: open c5;
128: --
129: fetch c5 into l_exists;

Line 140: -- Start of Table Handlers for PAY_MONETARY_UNITS and PAY_MONETARY_UNITS_TL.

136: close c5;
137: --
138: end stb_del_valid;
139: --
140: -- Start of Table Handlers for PAY_MONETARY_UNITS and PAY_MONETARY_UNITS_TL.
141: --
142: procedure INSERT_ROW (
143: X_ROWID in out nocopy VARCHAR2,
144: X_MONETARY_UNIT_ID in out nocopy NUMBER,

Line 158: cursor C is select ROWID from PAY_MONETARY_UNITS

154: X_LAST_UPDATED_BY in NUMBER,
155: X_LAST_UPDATE_LOGIN in NUMBER
156: ) is
157: --
158: cursor C is select ROWID from PAY_MONETARY_UNITS
159: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID;
160: begin
161: --
162: chk_unq_row(p_cur_code => X_CURRENCY_CODE

Line 172: insert into PAY_MONETARY_UNITS (

168: );
169: --
170: get_id(x_monetary_unit_id);
171: --
172: insert into PAY_MONETARY_UNITS (
173: MONETARY_UNIT_ID,
174: CURRENCY_CODE,
175: BUSINESS_GROUP_ID,
176: LEGISLATION_CODE,

Line 200: insert into PAY_MONETARY_UNITS_TL (

196: X_LAST_UPDATED_BY,
197: X_LAST_UPDATE_LOGIN
198: );
199:
200: insert into PAY_MONETARY_UNITS_TL (
201: MONETARY_UNIT_ID,
202: MONETARY_UNIT_NAME,
203: LAST_UPDATE_DATE,
204: LAST_UPDATED_BY,

Line 224: from PAY_MONETARY_UNITS_TL T

220: from FND_LANGUAGES L
221: where L.INSTALLED_FLAG in ('I', 'B')
222: and not exists
223: (select NULL
224: from PAY_MONETARY_UNITS_TL T
225: where T.MONETARY_UNIT_ID = X_MONETARY_UNIT_ID
226: and T.LANGUAGE = L.LANGUAGE_CODE);
227:
228: open c;

Line 253: from PAY_MONETARY_UNITS

249: BUSINESS_GROUP_ID,
250: LEGISLATION_CODE,
251: RELATIVE_VALUE,
252: COMMENTS
253: from PAY_MONETARY_UNITS
254: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID
255: for update of MONETARY_UNIT_ID nowait;
256: recinfo c%rowtype;
257:

Line 261: from PAY_MONETARY_UNITS_TL

257:
258: cursor c1 is select
259: MONETARY_UNIT_NAME,
260: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
261: from PAY_MONETARY_UNITS_TL
262: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID
263: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
264: for update of MONETARY_UNIT_ID nowait;
265: begin

Line 327: update PAY_MONETARY_UNITS set

323: ,p_leg_code => X_LEGISLATION_CODE
324: ,p_rowid => X_ROWID
325: );
326: --
327: update PAY_MONETARY_UNITS set
328: CURRENCY_CODE = X_CURRENCY_CODE,
329: BUSINESS_GROUP_ID = X_BUSINESS_GROUP_ID,
330: LEGISLATION_CODE = X_LEGISLATION_CODE,
331: RELATIVE_VALUE = X_RELATIVE_VALUE,

Line 342: update PAY_MONETARY_UNITS_TL set

338: if (sql%notfound) then
339: raise no_data_found;
340: end if;
341:
342: update PAY_MONETARY_UNITS_TL set
343: MONETARY_UNIT_NAME = X_MONETARY_UNIT_NAME,
344: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
345: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
346: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,

Line 352: insert into PAY_MONETARY_UNITS_TL

348: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID
349: and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
350: --
351: if (sql%notfound) then
352: insert into PAY_MONETARY_UNITS_TL
353: (MONETARY_UNIT_ID,
354: MONETARY_UNIT_NAME,
355: LANGUAGE,
356: SOURCE_LANG

Line 367: from PAY_MONETARY_UNITS_TL T

363: from FND_LANGUAGES L
364: where L.INSTALLED_FLAG in ('I', 'B')
365: and not exists
366: (select NULL
367: from PAY_MONETARY_UNITS_TL T
368: where T.MONETARY_UNIT_ID = X_MONETARY_UNIT_ID
369: and T.LANGUAGE = L.LANGUAGE_CODE);
370: end if;
371: --

Line 378: delete from PAY_MONETARY_UNITS_TL

374: procedure DELETE_ROW (
375: X_MONETARY_UNIT_ID in NUMBER
376: ) is
377: begin
378: delete from PAY_MONETARY_UNITS_TL
379: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID;
380:
381: if (sql%notfound) then
382: raise no_data_found;

Line 385: delete from PAY_MONETARY_UNITS

381: if (sql%notfound) then
382: raise no_data_found;
383: end if;
384:
385: delete from PAY_MONETARY_UNITS
386: where MONETARY_UNIT_ID = X_MONETARY_UNIT_ID;
387:
388: if (sql%notfound) then
389: raise no_data_found;

Line 396: delete from PAY_MONETARY_UNITS_TL T

392: --
393: procedure ADD_LANGUAGE
394: is
395: begin
396: delete from PAY_MONETARY_UNITS_TL T
397: where not exists
398: (select NULL
399: from PAY_MONETARY_UNITS B
400: where B.MONETARY_UNIT_ID = T.MONETARY_UNIT_ID

Line 399: from PAY_MONETARY_UNITS B

395: begin
396: delete from PAY_MONETARY_UNITS_TL T
397: where not exists
398: (select NULL
399: from PAY_MONETARY_UNITS B
400: where B.MONETARY_UNIT_ID = T.MONETARY_UNIT_ID
401: );
402:
403: update PAY_MONETARY_UNITS_TL T set (

Line 403: update PAY_MONETARY_UNITS_TL T set (

399: from PAY_MONETARY_UNITS B
400: where B.MONETARY_UNIT_ID = T.MONETARY_UNIT_ID
401: );
402:
403: update PAY_MONETARY_UNITS_TL T set (
404: MONETARY_UNIT_NAME
405: ) = (select
406: B.MONETARY_UNIT_NAME
407: from PAY_MONETARY_UNITS_TL B

Line 407: from PAY_MONETARY_UNITS_TL B

403: update PAY_MONETARY_UNITS_TL T set (
404: MONETARY_UNIT_NAME
405: ) = (select
406: B.MONETARY_UNIT_NAME
407: from PAY_MONETARY_UNITS_TL B
408: where B.MONETARY_UNIT_ID = T.MONETARY_UNIT_ID
409: and B.LANGUAGE = T.SOURCE_LANG)
410: where (
411: T.MONETARY_UNIT_ID,

Line 418: from PAY_MONETARY_UNITS_TL SUBB, PAY_MONETARY_UNITS_TL SUBT

414: ) in (select
415: SUBT.MONETARY_UNIT_ID,
416: SUBT.MONETARY_UNIT_ID,
417: SUBT.LANGUAGE
418: from PAY_MONETARY_UNITS_TL SUBB, PAY_MONETARY_UNITS_TL SUBT
419: where SUBB.MONETARY_UNIT_ID = SUBT.MONETARY_UNIT_ID
420: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
421: and (SUBB.MONETARY_UNIT_NAME <> SUBT.MONETARY_UNIT_NAME
422: ));

Line 424: insert into PAY_MONETARY_UNITS_TL (

420: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
421: and (SUBB.MONETARY_UNIT_NAME <> SUBT.MONETARY_UNIT_NAME
422: ));
423:
424: insert into PAY_MONETARY_UNITS_TL (
425: MONETARY_UNIT_ID,
426: MONETARY_UNIT_NAME,
427: LAST_UPDATE_DATE,
428: LAST_UPDATED_BY,

Line 444: from PAY_MONETARY_UNITS_TL B, FND_LANGUAGES L

440: B.CREATED_BY,
441: B.CREATION_DATE,
442: L.LANGUAGE_CODE,
443: B.SOURCE_LANG
444: from PAY_MONETARY_UNITS_TL B, FND_LANGUAGES L
445: where L.INSTALLED_FLAG in ('I', 'B')
446: and B.LANGUAGE = userenv('LANG')
447: and not exists
448: (select NULL

Line 449: from PAY_MONETARY_UNITS_TL T

445: where L.INSTALLED_FLAG in ('I', 'B')
446: and B.LANGUAGE = userenv('LANG')
447: and not exists
448: (select NULL
449: from PAY_MONETARY_UNITS_TL T
450: where T.MONETARY_UNIT_ID = B.MONETARY_UNIT_ID
451: and T.LANGUAGE = L.LANGUAGE_CODE);
452: end ADD_LANGUAGE;
453: --

Line 485: update PAY_MONETARY_UNITS_TL pmut

481: l_last_updated_by := fnd_global.user_id;
482: l_last_update_login := fnd_global.login_id;
483: l_last_update_date := sysdate;
484: --
485: update PAY_MONETARY_UNITS_TL pmut
486: set pmut.MONETARY_UNIT_NAME = nvl(X_MONETARY_UNIT_NAME,MONETARY_UNIT_NAME)
487: ,pmut.SOURCE_LANG = USERENV('LANG')
488: ,pmut.LAST_UPDATE_DATE = l_last_update_date
489: ,pmut.LAST_UPDATED_BY = l_last_updated_by

Line 494: from pay_monetary_units pmu

490: ,pmut.LAST_UPDATE_LOGIN = l_last_update_login
491: where USERENV('LANG') in (pmut.LANGUAGE,pmut.SOURCE_LANG)
492: and exists
493: ( select null
494: from pay_monetary_units pmu
495: where pmu.relative_value = x_relative_value
496: and pmu.currency_code = x_currency_code
497: and pmu.monetary_unit_id = pmut.monetary_unit_id
498: and (x_legislation_code is null

Line 530: from pay_monetary_units pmu

526: l_last_update_date date;
527: --
528: cursor c_get_mon_unit(p_bg_id in number) is
529: select pmu.monetary_unit_id, pmu.rowid
530: from pay_monetary_units pmu
531: where pmu.relative_value = x_relative_value
532: and pmu.currency_code = x_currency_code
533: and (x_legislation_code is null
534: or pmu.legislation_code = x_legislation_code)

Line 638: from pay_monetary_units pmu,

634: ,p_monetary_unit_id in number
635: ,p_business_group_id in number
636: ,p_legislation_code in varchar2) is
637: select 1
638: from pay_monetary_units pmu,
639: pay_monetary_units_tl pmut
640: where upper(pmut.monetary_unit_name) = upper(p_monetary_unit_name)
641: and pmu.currency_code = g_currency_code
642: and pmut.language = p_language

Line 639: pay_monetary_units_tl pmut

635: ,p_business_group_id in number
636: ,p_legislation_code in varchar2) is
637: select 1
638: from pay_monetary_units pmu,
639: pay_monetary_units_tl pmut
640: where upper(pmut.monetary_unit_name) = upper(p_monetary_unit_name)
641: and pmu.currency_code = g_currency_code
642: and pmut.language = p_language
643: and pmu.monetary_unit_id = pmut.monetary_unit_id

Line 651: l_proc_name VARCHAR2(80) := 'PAY_MONETARY_UNITS_PKG.VALIDATE_TRANSLATION';

647: or p_business_group_id is null)
648: and (pmu.legislation_code = p_legislation_code
649: or p_legislation_code is null);
650: --
651: l_proc_name VARCHAR2(80) := 'PAY_MONETARY_UNITS_PKG.VALIDATE_TRANSLATION';
652: l_bus_grp_id NUMBER := nvl(p_business_group_id, g_business_group_id);
653: l_leg_code VARCHAR2(150) := nvl(p_legislation_code, g_legislation_code);
654: l_exists number(1);
655: --

Line 677: end PAY_MONETARY_UNITS_PKG;

673: --
674: hr_utility.set_location(l_proc_name, 10);
675: end VALIDATE_TRANSLATION;
676: --
677: end PAY_MONETARY_UNITS_PKG;