1: package body CS_TP_LOOKUPS_PKG as
2: /* $Header: cstplokb.pls 115.4 2002/12/04 03:15:59 wzli noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_LOOKUP_ID in NUMBER,
29: X_START_DATE_ACTIVE in DATE,
30: X_END_DATE_ACTIVE in DATE
31: )
32: is
33: cursor c is SELECT ROWID from CS_TP_LOOKUPS
34: where LOOKUP_ID = X_LOOKUP_ID;
35:
36: begin
37: insert into CS_TP_LOOKUPS (
33: cursor c is SELECT ROWID from CS_TP_LOOKUPS
34: where LOOKUP_ID = X_LOOKUP_ID;
35:
36: begin
37: insert into CS_TP_LOOKUPS (
38: LOOKUP_ID ,
39: LOOKUP_TYPE ,
40: DEFAULT_VALUE ,
41: CREATION_DATE ,
130: X_START_DATE_ACTIVE in DATE,
131: X_END_DATE_ACTIVE in DATE
132: ) is
133: begin
134: update CS_TP_LOOKUPS set
135:
136: LOOKUP_TYPE = X_LOOKUP_TYPE,
137: DEFAULT_VALUE = X_DEFAULT_VALUE,
138: CREATION_DATE = X_CREATION_DATE,
167: procedure DELETE_ROW (
168: X_LOOKUP_ID in NUMBER
169: ) is
170: begin
171: delete from CS_TP_LOOKUPS where
172: LOOKUP_ID = X_LOOKUP_ID;
173:
174: if (sql%notfound) then
175: raise no_data_found;
175: raise no_data_found;
176: end if;
177: end DELETE_ROW;
178:
179: end CS_TP_LOOKUPS_PKG;