[Home] [Help]
PACKAGE BODY: APPS.CSP_CURR_SUP_DEM_SUMS_PKG
Source
1 PACKAGE BODY CSP_CURR_SUP_DEM_SUMS_PKG as
2 /* $Header: csptpsdb.pls 115.6 2002/11/26 07:32:16 hhaugeru ship $ */
3 -- Start of Comments
4 -- Package name : CSP_CURR_SUP_DEM_SUMS_PKG
5 -- Purpose :
6 -- History :
7 -- NOTE :
8 -- End of Comments
9
10
11 G_PKG_NAME CONSTANT VARCHAR2(30):= 'CSP_CURR_SUP_DEM_SUMS_PKG';
12 G_FILE_NAME CONSTANT VARCHAR2(12) := 'csptpsdb.pls';
13
14
15 PROCEDURE Insert_Row(
16 px_SUPPLY_DEMAND_ID IN OUT NOCOPY NUMBER,
17 p_CREATED_BY NUMBER,
18 p_CREATION_DATE DATE,
19 p_LAST_UPDATED_BY NUMBER,
20 p_LAST_UPDATE_DATE DATE,
21 p_LAST_UPDATE_LOGIN NUMBER,
22 p_REQUEST_ID NUMBER,
23 p_PROGRAM_APPLICATION_ID NUMBER,
24 p_PROGRAM_ID NUMBER,
25 p_PROGRAM_UPDATE_DATE DATE,
26 p_INVENTORY_ITEM_ID NUMBER,
27 p_ORGANIZATION_ID NUMBER,
28 p_PARTS_LOOP_ID NUMBER,
29 p_HIERARCHY_NODE_ID NUMBER,
30 p_planning_parameters_id number,
31 p_SUBINVENTORY_CODE VARCHAR2,
32 p_ONHAND_BAD NUMBER,
33 p_ONHAND_GOOD NUMBER,
34 p_INTRANSIT_MOVE_ORDERS NUMBER,
35 p_OPEN_INTERORG_TRANSF_IN NUMBER,
36 p_OPEN_INTERORG_TRANSF_OUT NUMBER,
37 p_OPEN_SALES_ORDERS NUMBER,
38 p_OPEN_MOVE_ORDERS_IN NUMBER,
39 p_OPEN_MOVE_ORDERS_OUT NUMBER,
40 p_OPEN_REQUISITIONS NUMBER,
41 p_OPEN_PURCHASE_ORDERS NUMBER,
42 p_OPEN_WORK_ORDERS NUMBER,
43 p_ATTRIBUTE_CATEGORY VARCHAR2,
44 p_ATTRIBUTE1 VARCHAR2,
45 p_ATTRIBUTE2 VARCHAR2,
46 p_ATTRIBUTE3 VARCHAR2,
47 p_ATTRIBUTE4 VARCHAR2,
48 p_ATTRIBUTE5 VARCHAR2,
49 p_ATTRIBUTE6 VARCHAR2,
50 p_ATTRIBUTE7 VARCHAR2,
51 p_ATTRIBUTE8 VARCHAR2,
52 p_ATTRIBUTE9 VARCHAR2,
53 p_ATTRIBUTE10 VARCHAR2,
54 p_ATTRIBUTE11 VARCHAR2,
55 p_ATTRIBUTE12 VARCHAR2,
56 p_ATTRIBUTE13 VARCHAR2,
57 p_ATTRIBUTE14 VARCHAR2,
58 p_ATTRIBUTE15 VARCHAR2)
59
60 IS
61 CURSOR C2 IS SELECT CSP_CURR_SUP_DEM_SUMS_S1.nextval FROM sys.dual;
62 BEGIN
63 If (px_SUPPLY_DEMAND_ID IS NULL) OR (px_SUPPLY_DEMAND_ID = FND_API.G_MISS_NUM) then
64 OPEN C2;
65 FETCH C2 INTO px_SUPPLY_DEMAND_ID;
66 CLOSE C2;
67 End If;
68 INSERT INTO CSP_CURR_SUP_DEM_SUMS(
69 SUPPLY_DEMAND_ID,
70 CREATED_BY,
71 CREATION_DATE,
72 LAST_UPDATED_BY,
73 LAST_UPDATE_DATE,
74 LAST_UPDATE_LOGIN,
75 REQUEST_ID,
76 PROGRAM_APPLICATION_ID,
77 PROGRAM_ID,
78 PROGRAM_UPDATE_DATE,
79 INVENTORY_ITEM_ID,
80 ORGANIZATION_ID,
81 PARTS_LOOP_ID,
82 HIERARCHY_NODE_ID,
83 planning_parameters_id,
84 SUBINVENTORY_CODE,
85 ONHAND_BAD,
86 ONHAND_GOOD,
87 INTRANSIT_MOVE_ORDERS,
88 OPEN_INTERORG_TRANSF_IN,
89 OPEN_INTERORG_TRANSF_OUT,
90 OPEN_SALES_ORDERS,
91 OPEN_MOVE_ORDERS_IN,
92 OPEN_MOVE_ORDERS_OUT,
93 OPEN_REQUISITIONS,
94 OPEN_PURCHASE_ORDERS,
95 OPEN_WORK_ORDERS,
96 ATTRIBUTE_CATEGORY,
97 ATTRIBUTE1,
98 ATTRIBUTE2,
99 ATTRIBUTE3,
100 ATTRIBUTE4,
101 ATTRIBUTE5,
102 ATTRIBUTE6,
103 ATTRIBUTE7,
104 ATTRIBUTE8,
105 ATTRIBUTE9,
106 ATTRIBUTE10,
107 ATTRIBUTE11,
108 ATTRIBUTE12,
109 ATTRIBUTE13,
110 ATTRIBUTE14,
111 ATTRIBUTE15
112 ) VALUES (
113 px_SUPPLY_DEMAND_ID,
114 decode( p_CREATED_BY, FND_API.G_MISS_NUM, NULL, p_CREATED_BY),
115 decode( p_CREATION_DATE, FND_API.G_MISS_DATE, to_date(null), p_CREATION_DATE),
116 decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATED_BY),
117 decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, to_date(null), p_LAST_UPDATE_DATE),
118 decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL, p_LAST_UPDATE_LOGIN),
119 decode( p_REQUEST_ID, FND_API.G_MISS_NUM, NULL, p_REQUEST_ID),
120 decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_APPLICATION_ID),
121 decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, NULL, p_PROGRAM_ID),
122 decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, to_date(null), p_PROGRAM_UPDATE_DATE),
123 decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, NULL, p_INVENTORY_ITEM_ID),
124 decode( p_ORGANIZATION_ID, FND_API.G_MISS_NUM, NULL, p_ORGANIZATION_ID),
125 decode( p_PARTS_LOOP_ID, FND_API.G_MISS_NUM, NULL, p_PARTS_LOOP_ID),
126 decode( p_HIERARCHY_NODE_ID, FND_API.G_MISS_NUM, NULL, p_HIERARCHY_NODE_ID),
127 decode( p_planning_parameters_id,fnd_api.g_miss_num,null,p_planning_parameters_id),
128 decode( p_SUBINVENTORY_CODE, FND_API.G_MISS_CHAR, NULL, p_SUBINVENTORY_CODE),
129 decode( p_ONHAND_BAD, FND_API.G_MISS_NUM, NULL, p_ONHAND_BAD),
130 decode( p_ONHAND_GOOD, FND_API.G_MISS_NUM, NULL, p_ONHAND_GOOD),
131 decode( p_INTRANSIT_MOVE_ORDERS, FND_API.G_MISS_NUM, NULL, p_INTRANSIT_MOVE_ORDERS),
132 decode( p_OPEN_INTERORG_TRANSF_IN, FND_API.G_MISS_NUM, NULL, p_OPEN_INTERORG_TRANSF_IN),
133 decode( p_OPEN_INTERORG_TRANSF_OUT, FND_API.G_MISS_NUM, NULL, p_OPEN_INTERORG_TRANSF_OUT),
134 decode( p_OPEN_SALES_ORDERS, FND_API.G_MISS_NUM, NULL, p_OPEN_SALES_ORDERS),
135 decode( p_OPEN_MOVE_ORDERS_IN, FND_API.G_MISS_NUM, NULL, p_OPEN_MOVE_ORDERS_IN),
136 decode( p_OPEN_MOVE_ORDERS_OUT, FND_API.G_MISS_NUM, NULL, p_OPEN_MOVE_ORDERS_OUT),
137 decode( p_OPEN_REQUISITIONS, FND_API.G_MISS_NUM, NULL, p_OPEN_REQUISITIONS),
138 decode( p_OPEN_PURCHASE_ORDERS, FND_API.G_MISS_NUM, NULL, p_OPEN_PURCHASE_ORDERS),
139 decode( p_OPEN_WORK_ORDERS, FND_API.G_MISS_NUM, NULL, p_OPEN_WORK_ORDERS),
140 decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE_CATEGORY),
141 decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE1),
142 decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE2),
143 decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE3),
144 decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE4),
145 decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE5),
146 decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE6),
147 decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE7),
148 decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE8),
149 decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE9),
150 decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE10),
151 decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE11),
152 decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE12),
153 decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE13),
154 decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE14),
155 decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, p_ATTRIBUTE15));
156 End Insert_Row;
157
158 PROCEDURE Update_Row(
159 p_SUPPLY_DEMAND_ID NUMBER,
160 p_CREATED_BY NUMBER,
161 p_CREATION_DATE DATE,
162 p_LAST_UPDATED_BY NUMBER,
163 p_LAST_UPDATE_DATE DATE,
164 p_LAST_UPDATE_LOGIN NUMBER,
165 p_REQUEST_ID NUMBER,
166 p_PROGRAM_APPLICATION_ID NUMBER,
167 p_PROGRAM_ID NUMBER,
168 p_PROGRAM_UPDATE_DATE DATE,
169 p_INVENTORY_ITEM_ID NUMBER,
170 p_ORGANIZATION_ID NUMBER,
171 p_PARTS_LOOP_ID NUMBER,
172 p_HIERARCHY_NODE_ID NUMBER,
173 p_planning_parameters_id number,
174 p_SUBINVENTORY_CODE VARCHAR2,
175 p_ONHAND_BAD NUMBER,
176 p_ONHAND_GOOD NUMBER,
177 p_INTRANSIT_MOVE_ORDERS NUMBER,
178 p_OPEN_INTERORG_TRANSF_IN NUMBER,
179 p_OPEN_INTERORG_TRANSF_OUT NUMBER,
180 p_OPEN_SALES_ORDERS NUMBER,
181 p_OPEN_MOVE_ORDERS_IN NUMBER,
182 p_OPEN_MOVE_ORDERS_OUT NUMBER,
183 p_OPEN_REQUISITIONS NUMBER,
184 p_OPEN_PURCHASE_ORDERS NUMBER,
185 p_OPEN_WORK_ORDERS NUMBER,
186 p_ATTRIBUTE_CATEGORY VARCHAR2,
187 p_ATTRIBUTE1 VARCHAR2,
188 p_ATTRIBUTE2 VARCHAR2,
189 p_ATTRIBUTE3 VARCHAR2,
190 p_ATTRIBUTE4 VARCHAR2,
191 p_ATTRIBUTE5 VARCHAR2,
192 p_ATTRIBUTE6 VARCHAR2,
193 p_ATTRIBUTE7 VARCHAR2,
194 p_ATTRIBUTE8 VARCHAR2,
195 p_ATTRIBUTE9 VARCHAR2,
196 p_ATTRIBUTE10 VARCHAR2,
197 p_ATTRIBUTE11 VARCHAR2,
198 p_ATTRIBUTE12 VARCHAR2,
199 p_ATTRIBUTE13 VARCHAR2,
200 p_ATTRIBUTE14 VARCHAR2,
201 p_ATTRIBUTE15 VARCHAR2)
202
203 IS
204 BEGIN
205 Update CSP_CURR_SUP_DEM_SUMS
206 SET
207 CREATED_BY = decode( p_CREATED_BY, FND_API.G_MISS_NUM, CREATED_BY, p_CREATED_BY),
208 CREATION_DATE = decode( p_CREATION_DATE, FND_API.G_MISS_DATE, CREATION_DATE, p_CREATION_DATE),
209 LAST_UPDATED_BY = decode( p_LAST_UPDATED_BY, FND_API.G_MISS_NUM, LAST_UPDATED_BY, p_LAST_UPDATED_BY),
210 LAST_UPDATE_DATE = decode( p_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, LAST_UPDATE_DATE, p_LAST_UPDATE_DATE),
211 LAST_UPDATE_LOGIN = decode( p_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, LAST_UPDATE_LOGIN, p_LAST_UPDATE_LOGIN),
212 REQUEST_ID = decode( p_REQUEST_ID, FND_API.G_MISS_NUM, REQUEST_ID, p_REQUEST_ID),
213 PROGRAM_APPLICATION_ID = decode( p_PROGRAM_APPLICATION_ID, FND_API.G_MISS_NUM, PROGRAM_APPLICATION_ID, p_PROGRAM_APPLICATION_ID),
214 PROGRAM_ID = decode( p_PROGRAM_ID, FND_API.G_MISS_NUM, PROGRAM_ID, p_PROGRAM_ID),
215 PROGRAM_UPDATE_DATE = decode( p_PROGRAM_UPDATE_DATE, FND_API.G_MISS_DATE, PROGRAM_UPDATE_DATE, p_PROGRAM_UPDATE_DATE),
216 INVENTORY_ITEM_ID = decode( p_INVENTORY_ITEM_ID, FND_API.G_MISS_NUM, INVENTORY_ITEM_ID, p_INVENTORY_ITEM_ID),
217 ORGANIZATION_ID = decode( p_ORGANIZATION_ID, FND_API.G_MISS_NUM, ORGANIZATION_ID, p_ORGANIZATION_ID),
218 PARTS_LOOP_ID = decode( p_PARTS_LOOP_ID, FND_API.G_MISS_NUM, PARTS_LOOP_ID, p_PARTS_LOOP_ID),
219 HIERARCHY_NODE_ID = decode( p_HIERARCHY_NODE_ID, FND_API.G_MISS_NUM, HIERARCHY_NODE_ID, p_HIERARCHY_NODE_ID),
220 planning_parameters_id = decode(p_planning_parameters_id,fnd_api.g_miss_num,planning_parameters_id,p_planning_parameters_id),
221 SUBINVENTORY_CODE = decode( p_SUBINVENTORY_CODE, FND_API.G_MISS_CHAR, SUBINVENTORY_CODE, p_SUBINVENTORY_CODE),
222 ONHAND_BAD = decode( p_ONHAND_BAD, FND_API.G_MISS_NUM, ONHAND_BAD, p_ONHAND_BAD),
223 ONHAND_GOOD = decode( p_ONHAND_GOOD, FND_API.G_MISS_NUM, ONHAND_GOOD, p_ONHAND_GOOD),
224 INTRANSIT_MOVE_ORDERS = decode( p_INTRANSIT_MOVE_ORDERS, FND_API.G_MISS_NUM, INTRANSIT_MOVE_ORDERS, p_INTRANSIT_MOVE_ORDERS),
225 OPEN_INTERORG_TRANSF_IN = decode( p_OPEN_INTERORG_TRANSF_IN, FND_API.G_MISS_NUM, OPEN_INTERORG_TRANSF_IN, p_OPEN_INTERORG_TRANSF_IN),
226 OPEN_INTERORG_TRANSF_OUT = decode( p_OPEN_INTERORG_TRANSF_OUT, FND_API.G_MISS_NUM, OPEN_INTERORG_TRANSF_OUT, p_OPEN_INTERORG_TRANSF_OUT),
227 OPEN_SALES_ORDERS = decode( p_OPEN_SALES_ORDERS, FND_API.G_MISS_NUM, OPEN_SALES_ORDERS, p_OPEN_SALES_ORDERS),
228 OPEN_MOVE_ORDERS_IN = decode( p_OPEN_MOVE_ORDERS_IN, FND_API.G_MISS_NUM, OPEN_MOVE_ORDERS_IN, p_OPEN_MOVE_ORDERS_IN),
229 OPEN_MOVE_ORDERS_OUT = decode( p_OPEN_MOVE_ORDERS_OUT, FND_API.G_MISS_NUM, OPEN_MOVE_ORDERS_OUT, p_OPEN_MOVE_ORDERS_OUT),
230 OPEN_REQUISITIONS = decode( p_OPEN_REQUISITIONS, FND_API.G_MISS_NUM, OPEN_REQUISITIONS, p_OPEN_REQUISITIONS),
231 OPEN_PURCHASE_ORDERS = decode( p_OPEN_PURCHASE_ORDERS, FND_API.G_MISS_NUM, OPEN_PURCHASE_ORDERS, p_OPEN_PURCHASE_ORDERS),
232 OPEN_WORK_ORDERS = decode( p_OPEN_WORK_ORDERS, FND_API.G_MISS_NUM, OPEN_WORK_ORDERS, p_OPEN_WORK_ORDERS),
233 ATTRIBUTE_CATEGORY = decode( p_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, ATTRIBUTE_CATEGORY, p_ATTRIBUTE_CATEGORY),
234 ATTRIBUTE1 = decode( p_ATTRIBUTE1, FND_API.G_MISS_CHAR, ATTRIBUTE1, p_ATTRIBUTE1),
235 ATTRIBUTE2 = decode( p_ATTRIBUTE2, FND_API.G_MISS_CHAR, ATTRIBUTE2, p_ATTRIBUTE2),
236 ATTRIBUTE3 = decode( p_ATTRIBUTE3, FND_API.G_MISS_CHAR, ATTRIBUTE3, p_ATTRIBUTE3),
237 ATTRIBUTE4 = decode( p_ATTRIBUTE4, FND_API.G_MISS_CHAR, ATTRIBUTE4, p_ATTRIBUTE4),
238 ATTRIBUTE5 = decode( p_ATTRIBUTE5, FND_API.G_MISS_CHAR, ATTRIBUTE5, p_ATTRIBUTE5),
239 ATTRIBUTE6 = decode( p_ATTRIBUTE6, FND_API.G_MISS_CHAR, ATTRIBUTE6, p_ATTRIBUTE6),
240 ATTRIBUTE7 = decode( p_ATTRIBUTE7, FND_API.G_MISS_CHAR, ATTRIBUTE7, p_ATTRIBUTE7),
241 ATTRIBUTE8 = decode( p_ATTRIBUTE8, FND_API.G_MISS_CHAR, ATTRIBUTE8, p_ATTRIBUTE8),
242 ATTRIBUTE9 = decode( p_ATTRIBUTE9, FND_API.G_MISS_CHAR, ATTRIBUTE9, p_ATTRIBUTE9),
243 ATTRIBUTE10 = decode( p_ATTRIBUTE10, FND_API.G_MISS_CHAR, ATTRIBUTE10, p_ATTRIBUTE10),
247 ATTRIBUTE14 = decode( p_ATTRIBUTE14, FND_API.G_MISS_CHAR, ATTRIBUTE14, p_ATTRIBUTE14),
244 ATTRIBUTE11 = decode( p_ATTRIBUTE11, FND_API.G_MISS_CHAR, ATTRIBUTE11, p_ATTRIBUTE11),
245 ATTRIBUTE12 = decode( p_ATTRIBUTE12, FND_API.G_MISS_CHAR, ATTRIBUTE12, p_ATTRIBUTE12),
246 ATTRIBUTE13 = decode( p_ATTRIBUTE13, FND_API.G_MISS_CHAR, ATTRIBUTE13, p_ATTRIBUTE13),
248 ATTRIBUTE15 = decode( p_ATTRIBUTE15, FND_API.G_MISS_CHAR, ATTRIBUTE15, p_ATTRIBUTE15)
249 where SUPPLY_DEMAND_ID = p_SUPPLY_DEMAND_ID;
250
251 If (SQL%NOTFOUND) then
252 RAISE NO_DATA_FOUND;
253 End If;
254 END Update_Row;
255
256 PROCEDURE Delete_Row(
257 p_SUPPLY_DEMAND_ID NUMBER)
258 IS
259 BEGIN
260 DELETE FROM CSP_CURR_SUP_DEM_SUMS
261 WHERE SUPPLY_DEMAND_ID = p_SUPPLY_DEMAND_ID;
262 If (SQL%NOTFOUND) then
263 RAISE NO_DATA_FOUND;
264 End If;
265 END Delete_Row;
266
267 PROCEDURE Lock_Row(
268 p_SUPPLY_DEMAND_ID NUMBER,
269 p_CREATED_BY NUMBER,
270 p_CREATION_DATE DATE,
271 p_LAST_UPDATED_BY NUMBER,
272 p_LAST_UPDATE_DATE DATE,
273 p_LAST_UPDATE_LOGIN NUMBER,
274 p_REQUEST_ID NUMBER,
275 p_PROGRAM_APPLICATION_ID NUMBER,
276 p_PROGRAM_ID NUMBER,
277 p_PROGRAM_UPDATE_DATE DATE,
278 p_INVENTORY_ITEM_ID NUMBER,
279 p_ORGANIZATION_ID NUMBER,
280 p_PARTS_LOOP_ID NUMBER,
281 p_HIERARCHY_NODE_ID NUMBER,
282 p_planning_parameters_id number,
283 p_SUBINVENTORY_CODE VARCHAR2,
284 p_ONHAND_BAD NUMBER,
285 p_ONHAND_GOOD NUMBER,
286 p_INTRANSIT_MOVE_ORDERS NUMBER,
287 p_OPEN_INTERORG_TRANSF_IN NUMBER,
288 p_OPEN_INTERORG_TRANSF_OUT NUMBER,
289 p_OPEN_SALES_ORDERS NUMBER,
290 p_OPEN_MOVE_ORDERS_IN NUMBER,
291 p_OPEN_MOVE_ORDERS_OUT NUMBER,
292 p_OPEN_REQUISITIONS NUMBER,
293 p_OPEN_PURCHASE_ORDERS NUMBER,
294 p_OPEN_WORK_ORDERS NUMBER,
295 p_ATTRIBUTE_CATEGORY VARCHAR2,
296 p_ATTRIBUTE1 VARCHAR2,
297 p_ATTRIBUTE2 VARCHAR2,
298 p_ATTRIBUTE3 VARCHAR2,
299 p_ATTRIBUTE4 VARCHAR2,
300 p_ATTRIBUTE5 VARCHAR2,
301 p_ATTRIBUTE6 VARCHAR2,
302 p_ATTRIBUTE7 VARCHAR2,
303 p_ATTRIBUTE8 VARCHAR2,
304 p_ATTRIBUTE9 VARCHAR2,
305 p_ATTRIBUTE10 VARCHAR2,
306 p_ATTRIBUTE11 VARCHAR2,
307 p_ATTRIBUTE12 VARCHAR2,
308 p_ATTRIBUTE13 VARCHAR2,
309 p_ATTRIBUTE14 VARCHAR2,
310 p_ATTRIBUTE15 VARCHAR2)
311
312 IS
313 CURSOR C IS
314 SELECT *
315 FROM CSP_CURR_SUP_DEM_SUMS
316 WHERE SUPPLY_DEMAND_ID = p_SUPPLY_DEMAND_ID
317 FOR UPDATE of SUPPLY_DEMAND_ID NOWAIT;
318 Recinfo C%ROWTYPE;
319 BEGIN
320 OPEN C;
321 FETCH C INTO Recinfo;
322 If (C%NOTFOUND) then
323 CLOSE C;
324 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
325 APP_EXCEPTION.RAISE_EXCEPTION;
326 End If;
327 CLOSE C;
328 if (
329 ( Recinfo.SUPPLY_DEMAND_ID = p_SUPPLY_DEMAND_ID)
330 AND ( ( Recinfo.CREATED_BY = p_CREATED_BY)
331 OR ( ( Recinfo.CREATED_BY IS NULL )
332 AND ( p_CREATED_BY IS NULL )))
333 AND ( ( Recinfo.CREATION_DATE = p_CREATION_DATE)
334 OR ( ( Recinfo.CREATION_DATE IS NULL )
335 AND ( p_CREATION_DATE IS NULL )))
336 AND ( ( Recinfo.LAST_UPDATED_BY = p_LAST_UPDATED_BY)
337 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
338 AND ( p_LAST_UPDATED_BY IS NULL )))
339 AND ( ( Recinfo.LAST_UPDATE_DATE = p_LAST_UPDATE_DATE)
340 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
341 AND ( p_LAST_UPDATE_DATE IS NULL )))
342 AND ( ( Recinfo.LAST_UPDATE_LOGIN = p_LAST_UPDATE_LOGIN)
343 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
344 AND ( p_LAST_UPDATE_LOGIN IS NULL )))
345 AND ( ( Recinfo.REQUEST_ID = p_REQUEST_ID)
346 OR ( ( Recinfo.REQUEST_ID IS NULL )
347 AND ( p_REQUEST_ID IS NULL )))
348 AND ( ( Recinfo.PROGRAM_APPLICATION_ID = p_PROGRAM_APPLICATION_ID)
349 OR ( ( Recinfo.PROGRAM_APPLICATION_ID IS NULL )
350 AND ( p_PROGRAM_APPLICATION_ID IS NULL )))
351 AND ( ( Recinfo.PROGRAM_ID = p_PROGRAM_ID)
352 OR ( ( Recinfo.PROGRAM_ID IS NULL )
353 AND ( p_PROGRAM_ID IS NULL )))
354 AND ( ( Recinfo.PROGRAM_UPDATE_DATE = p_PROGRAM_UPDATE_DATE)
355 OR ( ( Recinfo.PROGRAM_UPDATE_DATE IS NULL )
356 AND ( p_PROGRAM_UPDATE_DATE IS NULL )))
357 AND ( ( Recinfo.INVENTORY_ITEM_ID = p_INVENTORY_ITEM_ID)
358 OR ( ( Recinfo.INVENTORY_ITEM_ID IS NULL )
359 AND ( p_INVENTORY_ITEM_ID IS NULL )))
360 AND ( ( Recinfo.ORGANIZATION_ID = p_ORGANIZATION_ID)
361 OR ( ( Recinfo.ORGANIZATION_ID IS NULL )
362 AND ( p_ORGANIZATION_ID IS NULL )))
363 AND ( ( Recinfo.PARTS_LOOP_ID = p_PARTS_LOOP_ID)
364 OR ( ( Recinfo.PARTS_LOOP_ID IS NULL )
365 AND ( p_PARTS_LOOP_ID IS NULL )))
366 AND ( ( Recinfo.HIERARCHY_NODE_ID = p_HIERARCHY_NODE_ID)
367 OR ( ( Recinfo.HIERARCHY_NODE_ID IS NULL )
368 AND ( p_HIERARCHY_NODE_ID IS NULL )))
369 AND ( ( Recinfo.planning_parameters_id = p_planning_parameters_id)
373 OR ( ( Recinfo.SUBINVENTORY_CODE IS NULL )
370 OR ( ( Recinfo.planning_parameters_id IS NULL )
371 AND ( p_planning_parameters_id IS NULL )))
372 AND ( ( Recinfo.SUBINVENTORY_CODE = p_SUBINVENTORY_CODE)
374 AND ( p_SUBINVENTORY_CODE IS NULL )))
375 AND ( ( Recinfo.ONHAND_BAD = p_ONHAND_BAD)
376 OR ( ( Recinfo.ONHAND_BAD IS NULL )
377 AND ( p_ONHAND_BAD IS NULL )))
378 AND ( ( Recinfo.ONHAND_GOOD = p_ONHAND_GOOD)
379 OR ( ( Recinfo.ONHAND_GOOD IS NULL )
380 AND ( p_ONHAND_GOOD IS NULL )))
381 AND ( ( Recinfo.INTRANSIT_MOVE_ORDERS = p_INTRANSIT_MOVE_ORDERS)
382 OR ( ( Recinfo.INTRANSIT_MOVE_ORDERS IS NULL )
383 AND ( p_INTRANSIT_MOVE_ORDERS IS NULL )))
384 AND ( ( Recinfo.OPEN_INTERORG_TRANSF_IN = p_OPEN_INTERORG_TRANSF_IN)
385 OR ( ( Recinfo.OPEN_INTERORG_TRANSF_IN IS NULL )
386 AND ( p_OPEN_INTERORG_TRANSF_IN IS NULL )))
387 AND ( ( Recinfo.OPEN_INTERORG_TRANSF_OUT = p_OPEN_INTERORG_TRANSF_OUT)
388 OR ( ( Recinfo.OPEN_INTERORG_TRANSF_OUT IS NULL )
389 AND ( p_OPEN_INTERORG_TRANSF_OUT IS NULL )))
390 AND ( ( Recinfo.OPEN_SALES_ORDERS = p_OPEN_SALES_ORDERS)
391 OR ( ( Recinfo.OPEN_SALES_ORDERS IS NULL )
392 AND ( p_OPEN_SALES_ORDERS IS NULL )))
393 AND ( ( Recinfo.OPEN_MOVE_ORDERS_IN = p_OPEN_MOVE_ORDERS_IN)
394 OR ( ( Recinfo.OPEN_MOVE_ORDERS_IN IS NULL )
395 AND ( p_OPEN_MOVE_ORDERS_IN IS NULL )))
396 AND ( ( Recinfo.OPEN_MOVE_ORDERS_OUT = p_OPEN_MOVE_ORDERS_OUT)
397 OR ( ( Recinfo.OPEN_MOVE_ORDERS_OUT IS NULL )
398 AND ( p_OPEN_MOVE_ORDERS_OUT IS NULL )))
399 AND ( ( Recinfo.OPEN_REQUISITIONS = p_OPEN_REQUISITIONS)
400 OR ( ( Recinfo.OPEN_REQUISITIONS IS NULL )
401 AND ( p_OPEN_REQUISITIONS IS NULL )))
402 AND ( ( Recinfo.OPEN_PURCHASE_ORDERS = p_OPEN_PURCHASE_ORDERS)
403 OR ( ( Recinfo.OPEN_PURCHASE_ORDERS IS NULL )
404 AND ( p_OPEN_PURCHASE_ORDERS IS NULL )))
405 AND ( ( Recinfo.OPEN_WORK_ORDERS = p_OPEN_WORK_ORDERS)
406 OR ( ( Recinfo.OPEN_WORK_ORDERS IS NULL )
407 AND ( p_OPEN_WORK_ORDERS IS NULL )))
408 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = p_ATTRIBUTE_CATEGORY)
409 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
410 AND ( p_ATTRIBUTE_CATEGORY IS NULL )))
411 AND ( ( Recinfo.ATTRIBUTE1 = p_ATTRIBUTE1)
412 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
413 AND ( p_ATTRIBUTE1 IS NULL )))
414 AND ( ( Recinfo.ATTRIBUTE2 = p_ATTRIBUTE2)
415 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
416 AND ( p_ATTRIBUTE2 IS NULL )))
417 AND ( ( Recinfo.ATTRIBUTE3 = p_ATTRIBUTE3)
418 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
419 AND ( p_ATTRIBUTE3 IS NULL )))
420 AND ( ( Recinfo.ATTRIBUTE4 = p_ATTRIBUTE4)
421 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
422 AND ( p_ATTRIBUTE4 IS NULL )))
423 AND ( ( Recinfo.ATTRIBUTE5 = p_ATTRIBUTE5)
424 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
425 AND ( p_ATTRIBUTE5 IS NULL )))
426 AND ( ( Recinfo.ATTRIBUTE6 = p_ATTRIBUTE6)
427 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
428 AND ( p_ATTRIBUTE6 IS NULL )))
429 AND ( ( Recinfo.ATTRIBUTE7 = p_ATTRIBUTE7)
430 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
431 AND ( p_ATTRIBUTE7 IS NULL )))
432 AND ( ( Recinfo.ATTRIBUTE8 = p_ATTRIBUTE8)
433 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
434 AND ( p_ATTRIBUTE8 IS NULL )))
435 AND ( ( Recinfo.ATTRIBUTE9 = p_ATTRIBUTE9)
436 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
437 AND ( p_ATTRIBUTE9 IS NULL )))
438 AND ( ( Recinfo.ATTRIBUTE10 = p_ATTRIBUTE10)
439 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
440 AND ( p_ATTRIBUTE10 IS NULL )))
441 AND ( ( Recinfo.ATTRIBUTE11 = p_ATTRIBUTE11)
442 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
443 AND ( p_ATTRIBUTE11 IS NULL )))
444 AND ( ( Recinfo.ATTRIBUTE12 = p_ATTRIBUTE12)
445 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
446 AND ( p_ATTRIBUTE12 IS NULL )))
447 AND ( ( Recinfo.ATTRIBUTE13 = p_ATTRIBUTE13)
448 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
449 AND ( p_ATTRIBUTE13 IS NULL )))
450 AND ( ( Recinfo.ATTRIBUTE14 = p_ATTRIBUTE14)
451 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
452 AND ( p_ATTRIBUTE14 IS NULL )))
453 AND ( ( Recinfo.ATTRIBUTE15 = p_ATTRIBUTE15)
454 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
455 AND ( p_ATTRIBUTE15 IS NULL )))
456 ) then
457 return;
458 else
459 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
460 APP_EXCEPTION.RAISE_EXCEPTION;
461 End If;
462 END Lock_Row;
463
464
465 End CSP_CURR_SUP_DEM_SUMS_PKG;