APPS.PN_SET_TYPES_PKG dependencies on PN_SET_TYPES

Line 1: package body PN_SET_TYPES_PKG As

1: package body PN_SET_TYPES_PKG As
2: -- $Header: PNTSTTYB.pls 115.14 2004/04/09 21:49:07 ftanudja ship $
3:
4: procedure INSERT_ROW (
5: X_ROWID in out NOCOPY VARCHAR2,

Line 18: from PN_SET_TYPES

14: ) IS
15:
16: cursor C is
17: select ROWID
18: from PN_SET_TYPES
19: where SET_ID = X_SET_ID
20: and LANGUAGE = userenv('LANG');
21:
22: begin

Line 26: select PN_SET_TYPES_s.nextval

22: begin
23:
24: IF X_SET_ID is null then
25:
26: select PN_SET_TYPES_s.nextval
27: into X_SET_ID
28: from dual;
29:
30: END IF;

Line 32: insert into PN_SET_TYPES (

28: from dual;
29:
30: END IF;
31:
32: insert into PN_SET_TYPES (
33: SET_ID,
34: LAST_UPDATE_DATE,
35: LAST_UPDATED_BY,
36: CREATION_DATE,

Line 59: from PN_SET_TYPES T

55: from FND_LANGUAGES L
56: where L.INSTALLED_FLAG in ('I', 'B')
57: and not exists (
58: select NULL
59: from PN_SET_TYPES T
60: where T.SET_ID = X_SET_ID
61: and T.LANGUAGE = L.LANGUAGE_CODE
62: );
63:

Line 81: from PN_SET_TYPES

77: X_DESCRIPTION in VARCHAR2
78: ) IS
79: cursor c1 is
80: select *
81: from PN_SET_TYPES
82: where SET_ID = X_SET_ID
83: and LANGUAGE = userenv('LANG')
84: for update of SET_ID nowait;
85:

Line 121: update PN_SET_TYPES

117: X_LAST_UPDATE_LOGIN in NUMBER
118: ) IS
119: begin
120:
121: update PN_SET_TYPES
122: set
123: SET_NAME = X_SET_NAME,
124: DESCRIPTION = X_DESCRIPTION,
125: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,

Line 143: delete from PN_SET_TYPES

139: X_SET_ID in NUMBER
140: ) is
141: begin
142:
143: delete from PN_SET_TYPES
144: where SET_ID = X_SET_ID;
145:
146: if (sql%notfound) then
147: raise no_data_found;

Line 161: update PN_SET_TYPES T

157:
158: procedure ADD_LANGUAGE is
159: begin
160:
161: update PN_SET_TYPES T
162: set (
163: SET_NAME,
164: DESCRIPTION
165: ) = (

Line 168: from PN_SET_TYPES B

164: DESCRIPTION
165: ) = (
166: select B.SET_NAME,
167: B.DESCRIPTION
168: from PN_SET_TYPES B
169: where B.SET_ID = T.SET_ID
170: and B.LANGUAGE = T.SOURCE_LANG
171: )
172: where (

Line 178: from PN_SET_TYPES SUBB,

174: T.LANGUAGE
175: ) in (
176: select SUBT.SET_ID,
177: SUBT.LANGUAGE
178: from PN_SET_TYPES SUBB,
179: PN_SET_TYPES SUBT
180: where SUBB.SET_ID = SUBT.SET_ID
181: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
182: and (SUBB.SET_NAME <> SUBT.SET_NAME or

Line 179: PN_SET_TYPES SUBT

175: ) in (
176: select SUBT.SET_ID,
177: SUBT.LANGUAGE
178: from PN_SET_TYPES SUBB,
179: PN_SET_TYPES SUBT
180: where SUBB.SET_ID = SUBT.SET_ID
181: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
182: and (SUBB.SET_NAME <> SUBT.SET_NAME or
183: SUBB.DESCRIPTION <> SUBT.DESCRIPTION or

Line 189: insert into PN_SET_TYPES (

185: (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
186: )
187: );
188:
189: insert into PN_SET_TYPES (
190: SET_ID,
191: LAST_UPDATE_DATE,
192: LAST_UPDATED_BY,
193: CREATION_DATE,

Line 212: from PN_SET_TYPES B,

208: B.SET_NAME,
209: B.DESCRIPTION,
210: L.LANGUAGE_CODE,
211: B.SOURCE_LANG
212: from PN_SET_TYPES B,
213: FND_LANGUAGES L
214: where L.INSTALLED_FLAG in ('I', 'B')
215: and B.LANGUAGE = userenv('LANG')
216: and not exists (

Line 218: from PN_SET_TYPES T

214: where L.INSTALLED_FLAG in ('I', 'B')
215: and B.LANGUAGE = userenv('LANG')
216: and not exists (
217: select NULL
218: from PN_SET_TYPES T
219: where T.SET_ID = B.SET_ID
220: and T.LANGUAGE = L.LANGUAGE_CODE
221: );
222: end ADD_LANGUAGE;

Line 224: end PN_SET_TYPES_PKG;

220: and T.LANGUAGE = L.LANGUAGE_CODE
221: );
222: end ADD_LANGUAGE;
223:
224: end PN_SET_TYPES_PKG;