APPS.PER_PREV_JOB_INFO_TYPES_PKG dependencies on PER_PREV_JOB_INFO_TYPES

Line 1: PACKAGE BODY PER_PREV_JOB_INFO_TYPES_PKG as

1: PACKAGE BODY PER_PREV_JOB_INFO_TYPES_PKG as
2: /* $Header: perpjxit.pkb 115.1 2002/12/06 15:20:42 eumenyio ship $ */
3: --------------------------------------------------------------------------------
4: g_dummy number(1); -- Dummy for cursor returns which are not needed
5: g_business_group_id number(15); -- For validating translation;

Line 18: from PER_PREV_JOB_INFO_TYPES t

14: IS
15: L_DUMMY1 number;
16: CURSOR C1 IS
17: select 1
18: from PER_PREV_JOB_INFO_TYPES t
19: where upper(t.description) = upper(P_DESCRIPTION)
20: and nvl(t.legislation_code, nvl(P_LEGISLATION_CODE, 'XXX') )
21: = nvl(P_LEGISLATION_CODE, 'XXX')
22: and (P_ROWID is null

Line 50: cursor C is select ROWID from PER_PREV_JOB_INFO_TYPES

46: X_LAST_UPDATE_DATE in DATE,
47: X_LAST_UPDATED_BY in NUMBER,
48: X_LAST_UPDATE_LOGIN in NUMBER
49: ) is
50: cursor C is select ROWID from PER_PREV_JOB_INFO_TYPES
51: where INFORMATION_TYPE = X_INFORMATION_TYPE
52: ;
53: begin
54: insert into PER_PREV_JOB_INFO_TYPES (

Line 54: insert into PER_PREV_JOB_INFO_TYPES (

50: cursor C is select ROWID from PER_PREV_JOB_INFO_TYPES
51: where INFORMATION_TYPE = X_INFORMATION_TYPE
52: ;
53: begin
54: insert into PER_PREV_JOB_INFO_TYPES (
55: INFORMATION_TYPE,
56: ACTIVE_INACTIVE_FLAG,
57: MULTIPLE_OCCURANCES_FLAG,
58: LEGISLATION_CODE,

Line 103: from PER_PREV_JOB_INFO_TYPES

99: ACTIVE_INACTIVE_FLAG,
100: MULTIPLE_OCCURANCES_FLAG,
101: LEGISLATION_CODE,
102: OBJECT_VERSION_NUMBER
103: from PER_PREV_JOB_INFO_TYPES
104: where INFORMATION_TYPE = X_INFORMATION_TYPE
105: for update of INFORMATION_TYPE nowait;
106: recinfo c%rowtype;
107:

Line 145: update PER_PREV_JOB_INFO_TYPES set

141: X_LAST_UPDATED_BY in NUMBER,
142: X_LAST_UPDATE_LOGIN in NUMBER
143: ) is
144: begin
145: update PER_PREV_JOB_INFO_TYPES set
146: ACTIVE_INACTIVE_FLAG = X_ACTIVE_INACTIVE_FLAG,
147: MULTIPLE_OCCURANCES_FLAG = X_MULTIPLE_OCCURANCES_FLAG,
148: LEGISLATION_CODE = X_LEGISLATION_CODE,
149: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,

Line 167: delete from PER_PREV_JOB_INFO_TYPES

163: X_INFORMATION_TYPE in VARCHAR2
164: ) is
165: begin
166:
167: delete from PER_PREV_JOB_INFO_TYPES
168: where INFORMATION_TYPE = X_INFORMATION_TYPE;
169:
170: if (sql%notfound) then
171: raise no_data_found;

Line 185: l_proc VARCHAR2(61) := 'PER_PREV_JOB_INFO_TYPES_PKG.LOAD_ROW';

181: ,X_OBJECT_VERSION_NUMBER in number
182: ,X_OWNER in varchar2
183: )
184: is
185: l_proc VARCHAR2(61) := 'PER_PREV_JOB_INFO_TYPES_PKG.LOAD_ROW';
186: l_rowid rowid;
187: l_progam_application_id PER_PEOPLE_INFO_types.program_application_id%TYPE;
188: l_program_id PER_PEOPLE_INFO_types.program_id%TYPE;
189: l_program_update_date PER_PEOPLE_INFO_types.program_update_date%TYPE;

Line 252: END PER_PREV_JOB_INFO_TYPES_PKG;

248: AND information_type = X_INFORMATION_TYPE;
249: end TRANSLATE_ROW;
250:
251:
252: END PER_PREV_JOB_INFO_TYPES_PKG;