15: X_LAST_UPDATED_BY in NUMBER,
16: X_LAST_UPDATE_LOGIN in NUMBER,
17: X_READ_ONLY_FLAG in VARCHAR2
18: ) is
19: cursor C is select ROWID from BNE_CONTENT_COLS_B
20: where APPLICATION_ID = X_APPLICATION_ID
21: and CONTENT_CODE = X_CONTENT_CODE
22: and SEQUENCE_NUM = X_SEQUENCE_NUM
23: ;
21: and CONTENT_CODE = X_CONTENT_CODE
22: and SEQUENCE_NUM = X_SEQUENCE_NUM
23: ;
24: begin
25: insert into BNE_CONTENT_COLS_B (
26: OBJECT_VERSION_NUMBER,
27: COL_NAME,
28: APPLICATION_ID,
29: CONTENT_CODE,
104: cursor c is select
105: OBJECT_VERSION_NUMBER,
106: COL_NAME,
107: READ_ONLY_FLAG
108: from BNE_CONTENT_COLS_B
109: where APPLICATION_ID = X_APPLICATION_ID
110: and CONTENT_CODE = X_CONTENT_CODE
111: and SEQUENCE_NUM = X_SEQUENCE_NUM
112: for update of APPLICATION_ID nowait;
167: X_LAST_UPDATE_LOGIN in NUMBER,
168: X_READ_ONLY_FLAG in VARCHAR2
169: ) is
170: begin
171: update BNE_CONTENT_COLS_B set
172: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
173: COL_NAME = X_COL_NAME,
174: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
175: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
213: if (sql%notfound) then
214: raise no_data_found;
215: end if;
216:
217: delete from BNE_CONTENT_COLS_B
218: where APPLICATION_ID = X_APPLICATION_ID
219: and CONTENT_CODE = X_CONTENT_CODE
220: and SEQUENCE_NUM = X_SEQUENCE_NUM;
221:
229: begin
230: delete from BNE_CONTENT_COLS_TL T
231: where not exists
232: (select NULL
233: from BNE_CONTENT_COLS_B B
234: where B.APPLICATION_ID = T.APPLICATION_ID
235: and B.CONTENT_CODE = T.CONTENT_CODE
236: and B.SEQUENCE_NUM = T.SEQUENCE_NUM
237: );
412: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
413: begin
414: select LAST_UPDATED_BY, LAST_UPDATE_DATE
415: into db_luby, db_ludate
416: from BNE_CONTENT_COLS_B
417: where APPLICATION_ID = l_app_id
418: and CONTENT_CODE = x_content_code
419: and SEQUENCE_NUM = x_sequence_num;
420: