[Home] [Help]
1: package body CS_TP_FREETEXTS_PKG as
2: /* $Header: cstpftxb.pls 115.3 2002/12/04 03:07:30 wzli noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_FREETEXT_ID in NUMBER,
26: X_LAST_UPDATE_DATE in DATE,
27: X_LAST_UPDATED_BY in NUMBER,
28: X_LAST_UPDATE_LOGIN in NUMBER
29: ) is
30: cursor C is select ROWID from CS_TP_FREETEXTS
31: where FREETEXT_ID = X_FREETEXT_ID
32: ;
33: begin
34: insert into CS_TP_FREETEXTS (
30: cursor C is select ROWID from CS_TP_FREETEXTS
31: where FREETEXT_ID = X_FREETEXT_ID
32: ;
33: begin
34: insert into CS_TP_FREETEXTS (
35: FREETEXT_ID,
36: LOOKUP_ID,
37: FREETEXT_SIZE,
38: ATTRIBUTE_CATEGORY,
132: ATTRIBUTE12,
133: ATTRIBUTE13,
134: ATTRIBUTE14,
135: ATTRIBUTE15
136: from CS_TP_FREETEXTS
137: where FREETEXT_ID = X_FREETEXT_ID
138: for update of FREETEXT_ID nowait;
139: recinfo c%rowtype;
140: begin
214: X_LAST_UPDATED_BY in NUMBER,
215: X_LAST_UPDATE_LOGIN in NUMBER
216: ) is
217: begin
218: update CS_TP_FREETEXTS set
219: LOOKUP_ID = X_LOOKUP_ID,
220: FREETEXT_SIZE = X_FREETEXT_SIZE,
221: ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
222: ATTRIBUTE1 = X_ATTRIBUTE1,
247: procedure DELETE_ROW (
248: X_FREETEXT_ID in NUMBER
249: ) is
250: begin
251: delete from CS_TP_FREETEXTS
252: where FREETEXT_ID = X_FREETEXT_ID;
253:
254: if (sql%notfound) then
255: raise no_data_found;
255: raise no_data_found;
256: end if;
257: end DELETE_ROW;
258:
259: end CS_TP_FREETEXTS_PKG;