APPS.AME_ITEM_CLASSES_API dependencies on AME_ITEM_CLASSES

Line 1: PACKAGE BODY AME_ITEM_CLASSES_API AS

1: PACKAGE BODY AME_ITEM_CLASSES_API AS
2: /* $Header: ameicapi.pkb 120.11 2006/09/21 15:09:00 pvelugul noship $ */
3: procedure OWNER_TO_WHO (
4: X_OWNER in VARCHAR2,
5: X_CREATED_BY out nocopy NUMBER,

Line 32: from AME_ITEM_CLASSES

28: ITEM_CLASS_ID,
29: LAST_UPDATED_BY,
30: to_char(LAST_UPDATE_DATE,'YYYY/MM/DD HH24:MI:SS'),
31: nvl(OBJECT_VERSION_NUMBER,1)
32: from AME_ITEM_CLASSES
33: where NAME = X_ITEM_CLASS_NAME
34: and sysdate between START_DATE
35: and nvl(END_DATE - (1/86400), sysdate);
36: cursor CSR_MAX_ITEM_CLASS_ID is

Line 38: from AME_ITEM_CLASSES

34: and sysdate between START_DATE
35: and nvl(END_DATE - (1/86400), sysdate);
36: cursor CSR_MAX_ITEM_CLASS_ID is
37: select nvl(max(ITEM_CLASS_ID),4)
38: from AME_ITEM_CLASSES
39: where ITEM_CLASS_ID > 4;
40: L_ITEM_CLASS_ID NUMBER;
41: begin
42: X_CURRENT_OVN := 1;

Line 58: ,ame_item_classes_s.nextVal)

54: ,'header',1
55: ,'line item',2
56: ,'cost center',3
57: ,'project code',4
58: ,ame_item_classes_s.nextVal)
59: into X_ITEM_CLASS_ID
60: from dual;
61: else
62: X_ITEM_CLASS_ID := L_ITEM_CLASS_ID;

Line 117: insert into AME_ITEM_CLASSES

113: X_START_DATE in DATE,
114: X_OBJECT_VERSION_NUMBER in NUMBER)
115: is
116: begin
117: insert into AME_ITEM_CLASSES
118: (
119: ITEM_CLASS_ID,
120: NAME,
121: CREATED_BY,

Line 156: insert into AME_ITEM_CLASSES_TL

152: if not AME_SEED_UTILITY.MLS_ENABLED then
153: return;
154: end if;
155:
156: insert into AME_ITEM_CLASSES_TL
157: (ITEM_CLASS_ID
158: ,USER_ITEM_CLASS_NAME
159: ,CREATED_BY
160: ,CREATION_DATE

Line 178: from AME_ITEM_CLASSES_TL T

174: userenv('LANG')
175: from FND_LANGUAGES L
176: where L.INSTALLED_FLAG in ('I', 'B')
177: and not exists (select null
178: from AME_ITEM_CLASSES_TL T
179: where T.ITEM_CLASS_ID = X_ITEM_CLASS_ID
180: and T.LANGUAGE = L.LANGUAGE_CODE);
181: END INSERT_TL_ROW;
182:

Line 203: FROM AME_ITEM_CLASSES_TL

199: select LAST_UPDATED_BY,
200: LAST_UPDATE_DATE
201: into X_CURRENT_OWNER,
202: X_CURRENT_LAST_UPDATE_DATE
203: FROM AME_ITEM_CLASSES_TL
204: WHERE ITEM_CLASS_ID = X_ITEM_CLASS_ID
205: AND LANGUAGE = USERENV('LANG');
206:
207: if DO_UPDATE_INSERT

Line 213: update AME_ITEM_CLASSES_TL

209: ,X_CURRENT_OWNER
210: ,AME_SEED_UTILITY.DATE_AS_STRING(X_LAST_UPDATE_DATE)
211: ,AME_SEED_UTILITY.DATE_AS_STRING(X_CURRENT_LAST_UPDATE_DATE)
212: ,X_CUSTOM_MODE) then
213: update AME_ITEM_CLASSES_TL
214: set USER_ITEM_CLASS_NAME = nvl(X_USER_ITEM_CLASS_NAME,USER_ITEM_CLASS_NAME),
215: SOURCE_LANG = userenv('LANG'),
216: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
217: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 240: update AME_ITEM_CLASSES

236: X_END_DATE in DATE,
237: X_OBJECT_VERSION_NUMBER in NUMBER
238: ) is
239: begin
240: update AME_ITEM_CLASSES
241: set NAME = X_ITEM_CLASS_NAME,
242: CREATED_BY = X_CREATED_BY,
243: CREATION_DATE = X_CREATION_DATE,
244: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 258: update AME_ITEM_CLASSES set

254: X_ITEM_CLASS_ROWID in VARCHAR2,
255: X_END_DATE in DATE)
256: is
257: begin
258: update AME_ITEM_CLASSES set
259: END_DATE = X_END_DATE
260: where ROWID = X_ITEM_CLASS_ROWID;
261: end UPDATE_ROW;
262: procedure DELETE_ROW (

Line 267: delete from AME_ITEM_CLASSES_TL

263: X_ITEM_CLASS_ID in NUMBER
264: ) is
265: begin
266: if AME_SEED_UTILITY.MLS_ENABLED then
267: delete from AME_ITEM_CLASSES_TL
268: where ITEM_CLASS_ID = X_ITEM_CLASS_ID;
269: end if;
270: delete from AME_ITEM_CLASSES
271: where ITEM_CLASS_ID = X_ITEM_CLASS_ID;

Line 270: delete from AME_ITEM_CLASSES

266: if AME_SEED_UTILITY.MLS_ENABLED then
267: delete from AME_ITEM_CLASSES_TL
268: where ITEM_CLASS_ID = X_ITEM_CLASS_ID;
269: end if;
270: delete from AME_ITEM_CLASSES
271: where ITEM_CLASS_ID = X_ITEM_CLASS_ID;
272: if (sql%notfound) then
273: raise no_data_found;
274: end if;

Line 299: (LOCKNAME =>'AME_ITEM_CLASSES.'||X_ITEM_CLASS_NAME

295: X_RETURN_VALUE number;
296: begin
297: -- retrieve information for the current row
298: DBMS_LOCK.ALLOCATE_UNIQUE
299: (LOCKNAME =>'AME_ITEM_CLASSES.'||X_ITEM_CLASS_NAME
300: ,LOCKHANDLE => X_LOCK_HANDLE
301: );
302: X_RETURN_VALUE := DBMS_LOCK.REQUEST
303: (LOCKHANDLE => X_LOCK_HANDLE

Line 407: ame_util.runtimeException('ame_item_classes_api',

403: end;
404: end if;
405: exception
406: when others then
407: ame_util.runtimeException('ame_item_classes_api',
408: 'load_row',
409: sqlcode,
410: sqlerrm);
411: raise;

Line 439: from AME_ITEM_CLASSES_TL AICTL,

435: into X_CURRENT_OWNER,
436: X_CURRENT_LAST_UPDATE_DATE,
437: X_CREATED_BY,
438: L_ITEM_CLASS_ID
439: from AME_ITEM_CLASSES_TL AICTL,
440: AME_ITEM_CLASSES AIC
441: where AICTL.ITEM_CLASS_ID = AIC.ITEM_CLASS_ID
442: and AIC.NAME = X_ITEM_CLASS_NAME
443: and sysdate between AIC.START_DATE and nvl(AIC.END_DATE - (1/86400),sysdate)

Line 440: AME_ITEM_CLASSES AIC

436: X_CURRENT_LAST_UPDATE_DATE,
437: X_CREATED_BY,
438: L_ITEM_CLASS_ID
439: from AME_ITEM_CLASSES_TL AICTL,
440: AME_ITEM_CLASSES AIC
441: where AICTL.ITEM_CLASS_ID = AIC.ITEM_CLASS_ID
442: and AIC.NAME = X_ITEM_CLASS_NAME
443: and sysdate between AIC.START_DATE and nvl(AIC.END_DATE - (1/86400),sysdate)
444: and AICTL.LANGUAGE = userenv('LANG');

Line 453: update AME_ITEM_CLASSES_TL AICTL

449: X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE,
450: X_CURRENT_LAST_UPDATE_DATE => X_CURRENT_LAST_UPDATE_DATE,
451: X_CREATED_BY => X_CREATED_BY,
452: X_CUSTOM_MODE => X_CUSTOM_MODE) then
453: update AME_ITEM_CLASSES_TL AICTL
454: set USER_ITEM_CLASS_NAME = nvl(X_USER_ITEM_CLASS_NAME,AICTL.USER_ITEM_CLASS_NAME),
455: SOURCE_LANG = userenv('LANG'),
456: LAST_UPDATE_DATE = AME_SEED_UTILITY.DATE_AS_DATE(X_LAST_UPDATE_DATE),
457: LAST_UPDATED_BY = AME_SEED_UTILITY.OWNER_AS_INTEGER(X_OWNER),

Line 467: END AME_ITEM_CLASSES_API;

463: when no_data_found then
464: null;
465: end;
466: end TRANSLATE_ROW;
467: END AME_ITEM_CLASSES_API;