[Home] [Help]
21: X_LAST_UPDATE_DATE in DATE,
22: X_LAST_UPDATED_BY in NUMBER,
23: X_LAST_UPDATE_LOGIN in NUMBER
24: ) is
25: cursor C is select ROWID from WMS_PAGE_FIELDS_B
26: where PAGE_ID = X_PAGE_ID
27: and FIELD_ID = X_FIELD_ID
28: ;
29: begin
26: where PAGE_ID = X_PAGE_ID
27: and FIELD_ID = X_FIELD_ID
28: ;
29: begin
30: insert into WMS_PAGE_FIELDS_B (
31: PAGE_ID,
32: FIELD_ID,
33: FIELD_NAME,
34: FIELD_DISP_SEQUENCE_NUMBER,
131: FIELD_IS_CONFIGURABLE,
132: FIELD_IS_VISIBLE,
133: FIELD_PROPERTY1_DEFAULT_VALUE,
134: FIELD_PROPERTY2_DEFAULT_VALUE
135: from WMS_PAGE_FIELDS_B
136: where PAGE_ID = X_PAGE_ID
137: and FIELD_ID = X_FIELD_ID
138: for update of PAGE_ID nowait;
139: recinfo c%rowtype;
214: X_LAST_UPDATED_BY in NUMBER,
215: X_LAST_UPDATE_LOGIN in NUMBER
216: ) is
217: begin
218: update WMS_PAGE_FIELDS_B set
219: FIELD_NAME = X_FIELD_NAME,
220: FIELD_DISP_SEQUENCE_NUMBER = X_FIELD_DISP_SEQUENCE_NUMBER,
221: FIELD_PROMPT = X_FIELD_PROMPT,
222: FIELD_TYPE = X_FIELD_TYPE,
266: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
267: LAST_UPDATED_BY = fnd_load_util.owner_id(X_OWNER) ,
268: LAST_UPDATE_LOGIN = 0
269: where tl.PAGE_ID = X_PAGE_ID
270: and tl.FIELD_ID = (select b.field_id from WMS_PAGE_FIELDS_B b where b.field_name = X_FIELD_NAME)
271: and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
272:
273: end TRANSLATE_ROW;
274:
358: if (sql%notfound) then
359: raise no_data_found;
360: end if;
361:
362: delete from WMS_PAGE_FIELDS_B
363: where PAGE_ID = X_PAGE_ID
364: and FIELD_ID = X_FIELD_ID;
365:
366: if (sql%notfound) then
373: begin
374: delete from WMS_PAGE_FIELDS_TL T
375: where not exists
376: (select NULL
377: from WMS_PAGE_FIELDS_B B
378: where B.PAGE_ID = T.PAGE_ID
379: and B.FIELD_ID = T.FIELD_ID
380: );
381: