1 package body CS_SR_SAVED_ADV_CRITERIA_PKG as
2 /* $Header: csxtssab.pls 115.2 2003/12/16 08:31:50 aktripat noship $*/
3
4 procedure INSERT_ROW ( X_ROWID in out nocopy VARCHAR2,
5 X_SEARCH_ID in NUMBER,
6 X_FIELD_NAME in VARCHAR2,
7 X_ROWNUM_IN_LAYOUT in NUMBER,
8 X_FIELD_NAME_ID in VARCHAR2,
9 X_CONDITION in VARCHAR2,
10 X_FIELD_VALUE_ID in VARCHAR2,
11 X_OBJECT_VERSION_NUMBER in NUMBER,
12 X_FIELD_VALUE in VARCHAR2,
13 X_CREATION_DATE in DATE,
14 X_CREATED_BY in NUMBER,
15 X_LAST_UPDATE_DATE in DATE,
16 X_LAST_UPDATED_BY in NUMBER,
17 X_LAST_UPDATE_LOGIN in NUMBER,
18 X_COMMIT_FLAG in VARCHAR2) is
19
20 cursor C is select ROWID from CS_SR_SAVED_ADV_CRITERIA
21 where SEARCH_ID = X_SEARCH_ID
22 and FIELD_NAME = X_FIELD_NAME ;
23
24 begin
25
26 insert into CS_SR_SAVED_ADV_CRITERIA (
27 ROWNUM_IN_LAYOUT,
28 FIELD_NAME,
29 FIELD_NAME_ID,
30 CONDITION,
31 FIELD_VALUE,
32 FIELD_VALUE_ID,
33 OBJECT_VERSION_NUMBER,
34 LAST_UPDATE_LOGIN,
35 SEARCH_ID,
36 LAST_UPDATE_DATE,
37 LAST_UPDATED_BY,
38 CREATION_DATE,
39 CREATED_BY )
40 values (X_ROWNUM_IN_LAYOUT,
41 X_FIELD_NAME,
42 X_FIELD_NAME_ID,
43 X_CONDITION,
44 X_FIELD_VALUE,
45 X_FIELD_VALUE_ID,
46 X_OBJECT_VERSION_NUMBER,
47 X_LAST_UPDATE_LOGIN,
48 X_SEARCH_ID,
49 X_LAST_UPDATE_DATE,
50 X_LAST_UPDATED_BY,
51 X_CREATION_DATE,
52 X_CREATED_BY);
53 open c;
54
55 fetch c into X_ROWID;
56
57 if (c%notfound) then
58 close c;
59 raise no_data_found;
60 end if;
61 close c;
62
63 IF X_COMMIT_FLAG = 'Y' THEN
64 commit;
65 END IF;
66
67 end INSERT_ROW;
68
69 procedure LOCK_ROW ( X_SEARCH_ID in NUMBER,
70 X_FIELD_NAME in VARCHAR2,
71 X_ROWNUM_IN_LAYOUT in NUMBER,
72 X_FIELD_NAME_ID in VARCHAR2,
73 X_CONDITION in VARCHAR2,
74 X_FIELD_VALUE_ID in VARCHAR2,
75 X_OBJECT_VERSION_NUMBER in NUMBER,
76 X_SECURITY_GROUP_ID in NUMBER,
77 X_FIELD_VALUE in VARCHAR2) is
78
79 begin
80 null;
81 end LOCK_ROW;
82
83 procedure UPDATE_ROW ( X_SEARCH_ID in NUMBER,
84 X_FIELD_NAME in VARCHAR2,
85 X_ROWNUM_IN_LAYOUT in NUMBER,
86 X_FIELD_NAME_ID in VARCHAR2,
87 X_CONDITION in VARCHAR2,
88 X_FIELD_VALUE_ID in VARCHAR2,
89 X_OBJECT_VERSION_NUMBER in NUMBER,
90 X_SECURITY_GROUP_ID in NUMBER,
91 X_FIELD_VALUE in VARCHAR2,
92 X_LAST_UPDATE_DATE in DATE,
93 X_LAST_UPDATED_BY in NUMBER,
94 X_LAST_UPDATE_LOGIN in NUMBER) is
95
96 begin
97 null;
98
99 end UPDATE_ROW;
100
101 procedure DELETE_ROW ( X_SEARCH_ID in NUMBER) is
102
103 begin
104
105 delete from CS_SR_SAVED_ADV_CRITERIA
106 where SEARCH_ID = X_SEARCH_ID;
107
108 if (sql%notfound) then
109 raise no_data_found;
110 end if;
111
112 end DELETE_ROW;
113
114 end CS_SR_SAVED_ADV_CRITERIA_PKG;