1: package body XDO_CONFIG_KEYS_PKG as
2: /* $Header: XDOCFGKB.pls 120.0 2005/09/01 20:26:12 bokim noship $ */
3:
4: procedure INSERT_ROW (
5: P_VALUE_ID in NUMBER,
10: P_LAST_UPDATED_BY in NUMBER,
11: P_LAST_UPDATE_LOGIN in NUMBER
12: ) is
13: begin
14: insert into XDO_CONFIG_KEYS (
15: VALUE_ID,
16: VALUE_KEY,
17: CREATION_DATE,
18: CREATED_BY,
39: P_LAST_UPDATED_BY in NUMBER,
40: P_LAST_UPDATE_LOGIN in NUMBER
41: ) is
42: begin
43: update XDO_CONFIG_KEYS
44: set VALUE_KEY = P_VALUE_KEY,
45: LAST_UPDATE_DATE = P_LAST_UPDATE_DATE,
46: LAST_UPDATED_BY = P_LAST_UPDATED_BY,
47: LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN
58: P_VALUE_ID in NUMBER
59: ) is
60: begin
61:
62: delete from XDO_CONFIG_KEYS
63: where VALUE_ID = P_VALUE_ID;
64:
65: if (sql%notfound) then
66: raise no_data_found;
105: end;
106:
107: end LOAD_ROW;
108:
109: end XDO_CONFIG_KEYS_PKG;