[Home] [Help]
1: package body CS_KB_REPO_PROPERTIES_PKG as
2: /* $Header: cskbrprb.pls 120.0 2005/06/01 12:47:52 appldev noship $ */
3: /*=======================================================================+
4: | Copyright (c) 1997 Oracle Corporation Redwood Shores, California, USA|
5: | All rights reserved. |
5: | All rights reserved. |
6: +=======================================================================+
7: | FILENAME
8: | DESCRIPTION
9: | PL/SQL body for package: CS_KB_REPO_PROPERTIES_PKG
10: |
11: | History:
12: | 04 Apr 05 Matt Kettle Created
13: *=======================================================================*/
39: X_LAST_UPDATE_DATE in DATE,
40: X_LAST_UPDATED_BY in NUMBER,
41: X_LAST_UPDATE_LOGIN in NUMBER
42: ) is
43: cursor C is select ROWID from CS_KB_REPO_PROPERTIES
44: where PROPERTY_ID = X_PROPERTY_ID
45: ;
46: begin
47: insert into CS_KB_REPO_PROPERTIES (
43: cursor C is select ROWID from CS_KB_REPO_PROPERTIES
44: where PROPERTY_ID = X_PROPERTY_ID
45: ;
46: begin
47: insert into CS_KB_REPO_PROPERTIES (
48: PROPERTY_ID,
49: REPOSITORY_ID,
50: PROPERTY_NAME,
51: PROPERTY_VALUE,
154: ATTRIBUTE12,
155: ATTRIBUTE13,
156: ATTRIBUTE14,
157: ATTRIBUTE15
158: from CS_KB_REPO_PROPERTIES
159: where PROPERTY_ID = X_PROPERTY_ID
160: for update of PROPERTY_ID nowait;
161: recinfo c%rowtype;
162:
244: X_LAST_UPDATED_BY in NUMBER,
245: X_LAST_UPDATE_LOGIN in NUMBER
246: ) is
247: begin
248: update CS_KB_REPO_PROPERTIES set
249: REPOSITORY_ID = X_REPOSITORY_ID,
250: PROPERTY_NAME = X_PROPERTY_NAME,
251: PROPERTY_VALUE = X_PROPERTY_VALUE,
252: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
281: X_PROPERTY_ID in NUMBER
282: ) is
283: begin
284:
285: delete from CS_KB_REPO_PROPERTIES
286: where PROPERTY_ID = X_PROPERTY_ID;
287:
288: if (sql%notfound) then
289: raise no_data_found;
291:
292: end DELETE_ROW;
293:
294:
295: end CS_KB_REPO_PROPERTIES_PKG;