DBA Data[Home] [Help]

APPS.IEB_SVC_PLANS_PKG dependencies on IEB_SERVICE_PLANS

Line 16: cursor C is select ROWID from IEB_SERVICE_PLANS

12: P_MEDIA_TYPE_ID IN NUMBER,
13: P_OWNER_ID IN NUMBER,
14: X_ROWID IN OUT NOCOPY VARCHAR2
15: ) is
16: cursor C is select ROWID from IEB_SERVICE_PLANS
17: where SVCPLN_ID = P_SVCPLN_ID ;
18: begin
19:
20: insert into IEB_SERVICE_PLANS (

Line 20: insert into IEB_SERVICE_PLANS (

16: cursor C is select ROWID from IEB_SERVICE_PLANS
17: where SVCPLN_ID = P_SVCPLN_ID ;
18: begin
19:
20: insert into IEB_SERVICE_PLANS (
21: SVCPLN_ID,
22: SERVICE_PLAN_NAME,
23: DIRECTION,
24: TREATMENT,

Line 65: cursor C is select ROWID from IEB_SERVICE_PLANS_TL

61: P_OBJECT_VERSION_NUMBER IN NUMBER,
62: P_OWNER_ID IN NUMBER,
63: X_ROWID IN OUT NOCOPY VARCHAR2
64: ) is
65: cursor C is select ROWID from IEB_SERVICE_PLANS_TL
66: where SERVICE_PLAN_ID = P_SVCPLN_ID;
67: begin
68:
69: insert into IEB_SERVICE_PLANS_TL (

Line 69: insert into IEB_SERVICE_PLANS_TL (

65: cursor C is select ROWID from IEB_SERVICE_PLANS_TL
66: where SERVICE_PLAN_ID = P_SVCPLN_ID;
67: begin
68:
69: insert into IEB_SERVICE_PLANS_TL (
70: CREATION_DATE,
71: LAST_UPDATED_BY,
72: LAST_UPDATE_DATE,
73: CREATED_BY,

Line 97: from IEB_SERVICE_PLANS_TL T

93: FROM FND_LANGUAGES L
94: where L.INSTALLED_FLAG in ('I', 'B')
95: and not exists
96: (select NULL
97: from IEB_SERVICE_PLANS_TL T
98: where T.SERVICE_PLAN_ID = P_SVCPLN_ID
99: and T.LANGUAGE = L.LANGUAGE_CODE);
100:
101: open c;

Line 127: FROM IEB_SERVICE_PLANS

123: DIRECTION,
124: TREATMENT,
125: OBJECT_VERSION_NUMBER,
126: MEDIA_TYPE_ID
127: FROM IEB_SERVICE_PLANS
128: WHERE SVCPLN_ID = P_SVCPLN_ID
129: FOR update of SVCPLN_ID nowait;
130: recinfo c%rowtype;
131:

Line 136: FROM IEB_SERVICE_PLANS_TL

132: cursor c1 is select
133: PLAN_NAME,
134: DESCRIPTION,
135: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
136: FROM IEB_SERVICE_PLANS_TL
137: WHERE SERVICE_PLAN_ID = P_SVCPLN_ID
138: AND userenv('LANG') in (LANGUAGE, SOURCE_LANG)
139: FOR update of SERVICE_PLAN_ID nowait;
140: begin

Line 190: update IEB_SERVICE_PLANS set

186: P_MEDIA_TYPE_ID IN NUMBER,
187: P_OWNER_ID IN NUMBER
188: ) is
189: begin
190: update IEB_SERVICE_PLANS set
191: SERVICE_PLAN_NAME = P_SERVICE_PLAN_NAME,
192: DIRECTION = P_DIRECTION,
193: TREATMENT = P_TREATMENT,
194: OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,

Line 214: update IEB_SERVICE_PLANS_TL set

210: P_OBJECT_VERSION_NUMBER IN NUMBER,
211: P_OWNER_ID IN NUMBER
212: ) is
213: begin
214: update IEB_SERVICE_PLANS_TL set
215: PLAN_NAME = P_PLAN_NAME,
216: DESCRIPTION = P_DESCRIPTION,
217: OBJECT_VERSION_NUMBER = P_OBJECT_VERSION_NUMBER,
218: LAST_UPDATE_DATE = SYSDATE,

Line 235: delete from IEB_SERVICE_PLANS

231: procedure DELETE_ROW (
232: P_SVCPLN_ID in NUMBER
233: ) is
234: begin
235: delete from IEB_SERVICE_PLANS
236: where SVCPLN_ID = P_SVCPLN_ID;
237:
238: if (sql%notfound) then
239: raise no_data_found;

Line 242: delete from IEB_SERVICE_PLANS_TL

238: if (sql%notfound) then
239: raise no_data_found;
240: end if;
241:
242: delete from IEB_SERVICE_PLANS_TL
243: where SERVICE_PLAN_ID = P_SVCPLN_ID;
244:
245: if (sql%notfound) then
246: raise no_data_found;

Line 253: delete from IEB_SERVICE_PLANS_TL T

249:
250: procedure ADD_LANGUAGE
251: is
252: begin
253: delete from IEB_SERVICE_PLANS_TL T
254: where not exists
255: (select NULL
256: from IEB_SERVICE_PLANS B
257: where B.SVCPLN_ID = T.SERVICE_PLAN_ID

Line 256: from IEB_SERVICE_PLANS B

252: begin
253: delete from IEB_SERVICE_PLANS_TL T
254: where not exists
255: (select NULL
256: from IEB_SERVICE_PLANS B
257: where B.SVCPLN_ID = T.SERVICE_PLAN_ID
258: );
259:
260: update IEB_SERVICE_PLANS_TL T set (

Line 260: update IEB_SERVICE_PLANS_TL T set (

256: from IEB_SERVICE_PLANS B
257: where B.SVCPLN_ID = T.SERVICE_PLAN_ID
258: );
259:
260: update IEB_SERVICE_PLANS_TL T set (
261: PLAN_NAME,
262: DESCRIPTION
263: ) = (select
264: B.PLAN_NAME,

Line 266: from IEB_SERVICE_PLANS_TL B

262: DESCRIPTION
263: ) = (select
264: B.PLAN_NAME,
265: B.DESCRIPTION
266: from IEB_SERVICE_PLANS_TL B
267: where B.SERVICE_PLAN_ID = T.SERVICE_PLAN_ID
268: and B.LANGUAGE = T.SOURCE_LANG)
269: where (
270: T.SERVICE_PLAN_ID,

Line 275: from IEB_SERVICE_PLANS_TL SUBB, IEB_SERVICE_PLANS_TL SUBT

271: T.LANGUAGE
272: ) in (select
273: SUBT.SERVICE_PLAN_ID,
274: SUBT.LANGUAGE
275: from IEB_SERVICE_PLANS_TL SUBB, IEB_SERVICE_PLANS_TL SUBT
276: where SUBB.SERVICE_PLAN_ID = SUBT.SERVICE_PLAN_ID
277: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
278: and (SUBB.PLAN_NAME <> SUBT.PLAN_NAME
279: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 282: insert into IEB_SERVICE_PLANS_TL (

278: and (SUBB.PLAN_NAME <> SUBT.PLAN_NAME
279: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
280: ));
281:
282: insert into IEB_SERVICE_PLANS_TL (
283: CREATION_DATE,
284: LAST_UPDATED_BY,
285: LAST_UPDATE_DATE,
286: CREATED_BY,

Line 306: from IEB_SERVICE_PLANS_TL B, FND_LANGUAGES L

302: B.LAST_UPDATE_LOGIN,
303: B.PLAN_NAME,
304: L.LANGUAGE_CODE,
305: B.SOURCE_LANG
306: from IEB_SERVICE_PLANS_TL B, FND_LANGUAGES L
307: where L.INSTALLED_FLAG in ('I', 'B')
308: and B.LANGUAGE = userenv('LANG')
309: and not exists
310: (select NULL

Line 311: from IEB_SERVICE_PLANS_TL T

307: where L.INSTALLED_FLAG in ('I', 'B')
308: and B.LANGUAGE = userenv('LANG')
309: and not exists
310: (select NULL
311: from IEB_SERVICE_PLANS_TL T
312: where T.SERVICE_PLAN_ID = B.SERVICE_PLAN_ID
313: and T.LANGUAGE = L.LANGUAGE_CODE);
314: end ADD_LANGUAGE;
315:

Line 325: UPDATE IEB_SERVICE_PLANS_TL

321: ) IS
322:
323: BEGIN
324: --only update rows that have not been altered by user
325: UPDATE IEB_SERVICE_PLANS_TL
326: SET
327: PLAN_NAME = P_PLAN_NAME,
328: SOURCE_LANG = userenv( 'LANG' ),
329: DESCRIPTION = P_DESCRIPTION,