[Home] [Help]
PACKAGE BODY: APPS.IGC_CC_CONTROL_FUNCTIONS_PKG
Source
1 PACKAGE BODY IGC_CC_CONTROL_FUNCTIONS_PKG AS
2 -- $Header: IGCCAAGB.pls 120.3.12000000.2 2007/09/26 17:36:51 smannava ship $
3 PROCEDURE INSERT_ROW ( X_ROWID IN OUT NOCOPY VARCHAR2,
4 X_CONTROL_FUNCTION_ID NUMBER,
5 X_CC_STATE VARCHAR2,
6 X_CC_TYPE VARCHAR2,
7 X_JOB_ID NUMBER,
8 X_POSITION_ID NUMBER,
9 X_CONTROL_GROUP_ID NUMBER,
10 X_ORGANIZATION_ID NUMBER,
11 X_ORG_ID NUMBER,
12 X_END_DATE DATE,
13 X_START_DATE DATE,
14 X_LAST_UPDATED_BY NUMBER,
15 X_LAST_UPDATE_DATE DATE,
16 X_LAST_UPDATE_LOGIN NUMBER,
17 X_CREATION_DATE DATE,
18 X_CREATED_BY NUMBER,
19 X_ATTRIBUTE_CATEGORY VARCHAR2,
20 X_ATTRIBUTE1 VARCHAR2,
21 X_ATTRIBUTE2 VARCHAR2,
22 X_ATTRIBUTE3 VARCHAR2,
23 X_ATTRIBUTE4 VARCHAR2,
24 X_ATTRIBUTE5 VARCHAR2,
25 X_ATTRIBUTE6 VARCHAR2,
26 X_ATTRIBUTE7 VARCHAR2,
27 X_ATTRIBUTE8 VARCHAR2,
28 X_ATTRIBUTE9 VARCHAR2,
29 X_ATTRIBUTE10 VARCHAR2,
30 X_ATTRIBUTE11 VARCHAR2,
31 X_ATTRIBUTE12 VARCHAR2,
32 X_ATTRIBUTE13 VARCHAR2,
33 X_ATTRIBUTE14 VARCHAR2,
34 X_ATTRIBUTE15 VARCHAR2 ) IS
35 cursor c is select rowid from igc_cc_control_functions_all
36 where control_function_id = x_control_function_id;
37 BEGIN
38 insert into igc_cc_control_functions_all (
39 CONTROL_FUNCTION_ID,
40 CC_STATE,
41 CC_TYPE,
42 JOB_ID,
43 POSITION_ID,
44 CONTROL_GROUP_ID,
45 ORGANIZATION_ID,
46 ORG_ID,
47 END_DATE,
48 START_DATE,
49 LAST_UPDATED_BY,
50 LAST_UPDATE_DATE,
51 LAST_UPDATE_LOGIN,
52 CREATION_DATE,
53 CREATED_BY,
54 ATTRIBUTE_CATEGORY,
55 ATTRIBUTE1,
56 ATTRIBUTE2,
57 ATTRIBUTE3,
58 ATTRIBUTE4,
59 ATTRIBUTE5,
60 ATTRIBUTE6,
61 ATTRIBUTE7,
62 ATTRIBUTE8,
63 ATTRIBUTE9,
64 ATTRIBUTE10,
65 ATTRIBUTE11,
66 ATTRIBUTE12,
67 ATTRIBUTE13,
68 ATTRIBUTE14,
69 ATTRIBUTE15 )
70 VALUES (
71 X_CONTROL_FUNCTION_ID,
72 X_CC_STATE,
73 X_CC_TYPE,
74 X_JOB_ID,
75 X_POSITION_ID,
76 X_CONTROL_GROUP_ID,
77 X_ORGANIZATION_ID,
78 X_ORG_ID,
79 X_END_DATE,
80 X_START_DATE,
81 X_LAST_UPDATED_BY,
82 X_LAST_UPDATE_DATE,
83 X_LAST_UPDATE_LOGIN,
84 X_CREATION_DATE,
85 X_CREATED_BY,
86 X_ATTRIBUTE_CATEGORY,
87 X_ATTRIBUTE1,
88 X_ATTRIBUTE2,
89 X_ATTRIBUTE3,
90 X_ATTRIBUTE4,
91 X_ATTRIBUTE5,
92 X_ATTRIBUTE6,
93 X_ATTRIBUTE7,
94 X_ATTRIBUTE8,
95 X_ATTRIBUTE9,
96 X_ATTRIBUTE10,
97 X_ATTRIBUTE11,
98 X_ATTRIBUTE12,
99 X_ATTRIBUTE13,
100 X_ATTRIBUTE14,
101 X_ATTRIBUTE15 );
102 open c;
103 fetch c into x_rowid;
104 if c%notfound then
105 close c;
106 raise no_data_found;
107 end if;
108 close c;
109 END INSERT_ROW;
110
111 PROCEDURE UPDATE_ROW ( X_ROWID VARCHAR2,
112 X_CONTROL_FUNCTION_ID NUMBER,
113 X_CC_STATE VARCHAR2,
114 X_CC_TYPE VARCHAR2,
115 X_JOB_ID NUMBER,
116 X_POSITION_ID NUMBER,
117 X_CONTROL_GROUP_ID NUMBER,
118 X_ORGANIZATION_ID NUMBER,
119 X_ORG_ID NUMBER,
120 X_END_DATE DATE,
121 X_START_DATE DATE,
122 X_LAST_UPDATED_BY NUMBER,
123 X_LAST_UPDATE_DATE DATE,
124 X_LAST_UPDATE_LOGIN NUMBER,
125 X_CREATION_DATE DATE,
126 X_CREATED_BY NUMBER,
127 X_ATTRIBUTE_CATEGORY VARCHAR2,
128 X_ATTRIBUTE1 VARCHAR2,
129 X_ATTRIBUTE2 VARCHAR2,
130 X_ATTRIBUTE3 VARCHAR2,
131 X_ATTRIBUTE4 VARCHAR2,
132 X_ATTRIBUTE5 VARCHAR2,
133 X_ATTRIBUTE6 VARCHAR2,
134 X_ATTRIBUTE7 VARCHAR2,
135 X_ATTRIBUTE8 VARCHAR2,
136 X_ATTRIBUTE9 VARCHAR2,
137 X_ATTRIBUTE10 VARCHAR2,
138 X_ATTRIBUTE11 VARCHAR2,
139 X_ATTRIBUTE12 VARCHAR2,
140 X_ATTRIBUTE13 VARCHAR2,
141 X_ATTRIBUTE14 VARCHAR2,
142 X_ATTRIBUTE15 VARCHAR2 ) IS
143 BEGIN
144 update igc_cc_control_functions_all set
145 CONTROL_FUNCTION_ID = X_CONTROL_FUNCTION_ID,
146 CC_STATE = X_CC_STATE,
147 CC_TYPE = X_CC_TYPE,
148 JOB_ID = X_JOB_ID,
149 POSITION_ID = X_POSITION_ID,
150 CONTROL_GROUP_ID = X_CONTROL_GROUP_ID,
151 ORGANIZATION_ID = X_ORGANIZATION_ID,
152 ORG_ID = X_ORG_ID,
153 END_DATE = X_END_DATE,
154 START_DATE = X_START_DATE,
155 LAST_UPDATED_BY = X_LAST_UPDATED_BY,
156 LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
157 LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
158 CREATION_DATE = X_CREATION_DATE,
159 CREATED_BY = X_CREATED_BY,
160 ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
161 ATTRIBUTE1 = X_ATTRIBUTE1,
162 ATTRIBUTE2 = X_ATTRIBUTE2,
163 ATTRIBUTE3 = X_ATTRIBUTE3,
164 ATTRIBUTE4 = X_ATTRIBUTE4,
165 ATTRIBUTE5 = X_ATTRIBUTE5,
166 ATTRIBUTE6 = X_ATTRIBUTE6,
167 ATTRIBUTE7 = X_ATTRIBUTE7,
168 ATTRIBUTE8 = X_ATTRIBUTE8,
169 ATTRIBUTE9 = X_ATTRIBUTE9,
170 ATTRIBUTE10 = X_ATTRIBUTE10,
171 ATTRIBUTE11 = X_ATTRIBUTE11,
172 ATTRIBUTE12 = X_ATTRIBUTE12,
173 ATTRIBUTE13 = X_ATTRIBUTE13,
174 ATTRIBUTE14 = X_ATTRIBUTE14,
175 ATTRIBUTE15 = X_ATTRIBUTE15
176 WHERE ROWID = X_ROWID;
177 IF (SQL%NOTFOUND) THEN
178 RAISE NO_DATA_FOUND;
179 END IF;
180 END UPDATE_ROW;
181
182 PROCEDURE DELETE_ROW(x_rowid VARCHAR2) IS
183 BEGIN
184 delete from igc_cc_control_functions_all
185 where rowid = x_rowid;
186 if (SQL%NOTFOUND) then
187 raise no_data_found;
188 end if;
189 END DELETE_ROW;
190
191 PROCEDURE LOCK_ROW ( X_ROWID VARCHAR2,
192 X_CONTROL_FUNCTION_ID NUMBER,
193 X_CC_STATE VARCHAR2,
194 X_CC_TYPE VARCHAR2,
195 X_JOB_ID NUMBER,
196 X_POSITION_ID NUMBER,
197 X_CONTROL_GROUP_ID NUMBER,
198 X_ORGANIZATION_ID NUMBER,
199 X_ORG_ID NUMBER,
200 X_END_DATE DATE,
201 X_START_DATE DATE,
202 X_LAST_UPDATED_BY NUMBER,
203 X_LAST_UPDATE_DATE DATE,
204 X_LAST_UPDATE_LOGIN NUMBER,
205 X_CREATION_DATE DATE,
206 X_CREATED_BY NUMBER,
207 X_ATTRIBUTE_CATEGORY VARCHAR2,
208 X_ATTRIBUTE1 VARCHAR2,
209 X_ATTRIBUTE2 VARCHAR2,
210 X_ATTRIBUTE3 VARCHAR2,
211 X_ATTRIBUTE4 VARCHAR2,
212 X_ATTRIBUTE5 VARCHAR2,
213 X_ATTRIBUTE6 VARCHAR2,
214 X_ATTRIBUTE7 VARCHAR2,
215 X_ATTRIBUTE8 VARCHAR2,
216 X_ATTRIBUTE9 VARCHAR2,
217 X_ATTRIBUTE10 VARCHAR2,
218 X_ATTRIBUTE11 VARCHAR2,
219 X_ATTRIBUTE12 VARCHAR2,
220 X_ATTRIBUTE13 VARCHAR2,
221 X_ATTRIBUTE14 VARCHAR2,
222 X_ATTRIBUTE15 VARCHAR2 ) IS
223 CURSOR C is select * from igc_cc_control_functions_all
224 where rowid = x_rowid
225 for update of control_function_id nowait;
226 recinfo c%rowtype;
227 BEGIN
228 open c;
229 fetch c into recinfo;
230 if (c%notfound) then
231 close c;
232 fnd_message.set_name('FND','FORM_RECORD_DELETED');
233 APP_EXCEPTION.raise_exception;
234 end if;
235 close c;
236 if
237 ( recinfo.CONTROL_FUNCTION_ID = X_CONTROL_FUNCTION_ID ) AND
238 ( recinfo.CC_STATE = X_CC_STATE ) AND
239 ( recinfo.CC_TYPE = X_CC_TYPE ) AND
240 ( ( recinfo.JOB_ID = X_JOB_ID )
241 OR ( ( recinfo.job_id is null ) and ( x_job_id is null ) ) ) AND
242 ( ( recinfo.POSITION_ID = X_POSITION_ID )
243 OR ( ( recinfo.position_id is null ) and ( x_position_id is null ) ) ) AND
244 ( recinfo.CONTROL_GROUP_ID = X_CONTROL_GROUP_ID ) AND
245 ( ( recinfo.ORGANIZATION_ID = X_ORGANIZATION_ID )
246 OR ( ( recinfo.organization_id is null ) and ( x_organization_id is null ) ) ) AND
247 ( ( recinfo.ORG_ID = X_ORG_ID )
248 OR ( ( recinfo.org_id is null ) and ( x_org_id is null ) ) ) AND
249 ( ( recinfo.END_DATE = X_END_DATE )
250 OR ( ( recinfo.end_date is null ) and ( x_end_date is null ) ) ) AND
251 ( ( recinfo.START_DATE = X_START_DATE )
252 OR ( ( recinfo.start_date is null ) and ( x_start_date is null ) ) ) AND
253 ( ( recinfo.LAST_UPDATED_BY = X_LAST_UPDATED_BY ) AND
254 ( ( recinfo.LAST_UPDATE_DATE = X_LAST_UPDATE_DATE ) AND
255 ( recinfo.LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN )
256 OR ( ( recinfo.last_update_login is null ) and ( x_last_update_login is null ) ) ) AND
257 ( recinfo.CREATION_DATE = X_CREATION_DATE ) AND
258 ( recinfo.CREATED_BY = X_CREATED_BY ) AND
259 ( ( recinfo.ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY )
260 OR ( ( recinfo.attribute_category is null ) and ( x_attribute_category is null))) AND
261 ( ( recinfo.ATTRIBUTE1 = X_ATTRIBUTE1 )
262 OR ( ( recinfo.attribute1 is null ) and ( x_attribute1 is null ) ) ) AND
263 ( ( recinfo.ATTRIBUTE2 = X_ATTRIBUTE2 )
264 OR ( ( recinfo.attribute2 is null ) and ( x_attribute2 is null ) ) ) AND
265 ( ( recinfo.ATTRIBUTE3 = X_ATTRIBUTE3 )
266 OR ( ( recinfo.attribute3 is null ) and ( x_attribute3 is null ) ) ) AND
267 ( ( recinfo.ATTRIBUTE4 = X_ATTRIBUTE4 )
268 OR ( ( recinfo.attribute4 is null ) and ( x_attribute4 is null ) ) ) AND
269 ( ( recinfo.ATTRIBUTE5 = X_ATTRIBUTE5 )
270 OR ( ( recinfo.attribute5 is null ) and ( x_attribute5 is null ) ) ) AND
271 ( ( recinfo.ATTRIBUTE6 = X_ATTRIBUTE6 )
272 OR ( ( recinfo.attribute6 is null ) and ( x_attribute6 is null ) ) ) AND
273 ( ( recinfo.ATTRIBUTE7 = X_ATTRIBUTE7 )
274 OR ( ( recinfo.attribute7 is null ) and ( x_attribute7 is null ) ) ) AND
275 ( ( recinfo.ATTRIBUTE8 = X_ATTRIBUTE8 )
276 OR ( ( recinfo.attribute8 is null ) and ( x_attribute8 is null ) ) ) AND
277 ( ( recinfo.ATTRIBUTE9 = X_ATTRIBUTE9 )
278 OR ( ( recinfo.attribute9 is null ) and ( x_attribute9 is null ) ) ) AND
279 ( ( recinfo.ATTRIBUTE10 = X_ATTRIBUTE10 )
280 OR ( ( recinfo.attribute10 is null ) and ( x_attribute10 is null ) ) ) AND
281 ( ( recinfo.ATTRIBUTE11 = X_ATTRIBUTE11 )
282 OR ( ( recinfo.attribute11 is null ) and ( x_attribute11 is null ) ) ) AND
283 ( ( recinfo.ATTRIBUTE12 = X_ATTRIBUTE12 )
284 OR ( ( recinfo.attribute12 is null ) and ( x_attribute12 is null ) ) ) AND
285 ( ( recinfo.ATTRIBUTE13 = X_ATTRIBUTE13 )
286 OR ( ( recinfo.attribute13 is null ) and ( x_attribute13 is null ) ) ) AND
287 ( ( recinfo.ATTRIBUTE14 = X_ATTRIBUTE14 )
288 OR ( ( recinfo.attribute14 is null ) and ( x_attribute14 is null ) ) ) AND
289 ( ( recinfo.ATTRIBUTE15 = X_ATTRIBUTE15 )
290 OR ( ( recinfo.attribute15 is null ) and ( x_attribute15 is null ) ) ) ) THEN
291 return;
292 else
293 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
294 app_exception.raise_exception;
295 end if;
296 END LOCK_ROW;
297
298 END IGC_CC_CONTROL_FUNCTIONS_PKG;