DBA Data[Home] [Help]

PACKAGE BODY: APPS.SO_PRICE_LIST_LINES_PKG

Source


1 PACKAGE BODY SO_PRICE_LIST_LINES_PKG as
2 /* $Header: OEXPRDPB.pls 115.2 99/08/13 13:13:51 porting s $ */
3 
4   PROCEDURE Insert_Row(X_Rowid                   IN OUT VARCHAR2,
5                        X_Price_List_Line_Id             IN OUT NUMBER,
6                        X_Creation_Date                  DATE,
7                        X_Created_By                     NUMBER,
8                        X_Last_Update_Date               DATE,
9                        X_Last_Updated_By                NUMBER,
10                        X_Last_Update_Login              NUMBER,
11                        X_Price_List_Id                  NUMBER,
12                        X_Inventory_Item_Id              NUMBER,
13                        X_Unit_Code                      VARCHAR2,
14                        X_Method_Code                    VARCHAR2,
15                        X_List_Price                     NUMBER,
16                        X_Pricing_Rule_Id                NUMBER,
17                        X_Reprice_Flag                   VARCHAR2,
18                        X_Pricing_Context                VARCHAR2,
19                        X_Pricing_Attribute1             VARCHAR2,
20                        X_Pricing_Attribute2             VARCHAR2,
21                        X_Pricing_Attribute3             VARCHAR2,
22                        X_Pricing_Attribute4             VARCHAR2,
23                        X_Pricing_Attribute5             VARCHAR2,
24                        X_Pricing_Attribute6             VARCHAR2,
25                        X_Pricing_Attribute7             VARCHAR2,
26                        X_Pricing_Attribute8             VARCHAR2,
27                        X_Pricing_Attribute9             VARCHAR2,
28                        X_Pricing_Attribute10            VARCHAR2,
29                        X_Pricing_Attribute11            VARCHAR2,
30                        X_Pricing_Attribute12            VARCHAR2,
31                        X_Pricing_Attribute13            VARCHAR2,
32                        X_Pricing_Attribute14            VARCHAR2,
33                        X_Pricing_Attribute15            VARCHAR2,
34                        X_Start_Date_Active              DATE,
35                        X_End_Date_Active                DATE,
36                        X_Context                        VARCHAR2,
37                        X_Attribute1                     VARCHAR2,
38                        X_Attribute2                     VARCHAR2,
39                        X_Attribute3                     VARCHAR2,
40                        X_Attribute4                     VARCHAR2,
41                        X_Attribute5                     VARCHAR2,
42                        X_Attribute6                     VARCHAR2,
43                        X_Attribute7                     VARCHAR2,
44                        X_Attribute8                     VARCHAR2,
45                        X_Attribute9                     VARCHAR2,
46                        X_Attribute10                    VARCHAR2,
47                        X_Attribute11                    VARCHAR2,
48                        X_Attribute12                    VARCHAR2,
49                        X_Attribute13                    VARCHAR2,
50                        X_Attribute14                    VARCHAR2,
51                        X_Attribute15                    VARCHAR2
52   ) IS
53     CURSOR C IS SELECT rowid FROM so_price_list_lines
54                  WHERE price_list_line_id = X_Price_List_Line_Id;
55       CURSOR C2 IS SELECT so_price_list_lines_s.nextval FROM sys.dual;
56    BEGIN
57       if (X_Price_List_Line_Id is NULL) then
58         OPEN C2;
59         FETCH C2 INTO X_Price_List_Line_Id;
60         CLOSE C2;
61       end if;
62 
63        INSERT INTO so_price_list_lines(
64               price_list_line_id,
65               creation_date,
66               created_by,
67               last_update_date,
68               last_updated_by,
69               last_update_login,
70               price_list_id,
71               inventory_item_id,
72               unit_code,
73               method_code,
74               list_price,
75               pricing_rule_id,
76               reprice_flag,
77               pricing_context,
78               pricing_attribute1,
79               pricing_attribute2,
80               pricing_attribute3,
81               pricing_attribute4,
82               pricing_attribute5,
83               pricing_attribute6,
84               pricing_attribute7,
85               pricing_attribute8,
86               pricing_attribute9,
87               pricing_attribute10,
88               pricing_attribute11,
89               pricing_attribute12,
90               pricing_attribute13,
91               pricing_attribute14,
92               pricing_attribute15,
93               start_date_active,
94               end_date_active,
95               context,
96               attribute1,
97               attribute2,
98               attribute3,
99               attribute4,
100               attribute5,
101               attribute6,
102               attribute7,
103               attribute8,
104               attribute9,
105               attribute10,
106               attribute11,
107               attribute12,
108               attribute13,
109               attribute14,
110               attribute15
111              ) VALUES (
112               X_Price_List_Line_Id,
113               X_Creation_Date,
114               X_Created_By,
115               X_Last_Update_Date,
116               X_Last_Updated_By,
117               X_Last_Update_Login,
118               X_Price_List_Id,
119               X_Inventory_Item_Id,
120               X_Unit_Code,
121               X_Method_Code,
122               X_List_Price,
123               X_Pricing_Rule_Id,
124               X_Reprice_Flag,
125               X_Pricing_Context,
126               X_Pricing_Attribute1,
127               X_Pricing_Attribute2,
128               X_Pricing_Attribute3,
129               X_Pricing_Attribute4,
130               X_Pricing_Attribute5,
131               X_Pricing_Attribute6,
132               X_Pricing_Attribute7,
133               X_Pricing_Attribute8,
134               X_Pricing_Attribute9,
135               X_Pricing_Attribute10,
136               X_Pricing_Attribute11,
137               X_Pricing_Attribute12,
138               X_Pricing_Attribute13,
139               X_Pricing_Attribute14,
140               X_Pricing_Attribute15,
141               X_Start_Date_Active,
142               X_End_Date_Active,
143               X_Context,
144               X_Attribute1,
145               X_Attribute2,
146               X_Attribute3,
147               X_Attribute4,
148               X_Attribute5,
149               X_Attribute6,
150               X_Attribute7,
151               X_Attribute8,
152               X_Attribute9,
153               X_Attribute10,
154               X_Attribute11,
155               X_Attribute12,
156               X_Attribute13,
157               X_Attribute14,
158               X_Attribute15
159              );
160 
161     OPEN C;
162     FETCH C INTO X_Rowid;
163     if (C%NOTFOUND) then
164       CLOSE C;
165       Raise NO_DATA_FOUND;
166     end if;
167     CLOSE C;
168   END Insert_Row;
169 
170 
171   PROCEDURE Lock_Row(X_Rowid                            VARCHAR2,
172                      X_Price_List_Line_Id               NUMBER,
173                      X_Price_List_Id                    NUMBER,
174                      X_Inventory_Item_Id                NUMBER,
175                      X_Unit_Code                        VARCHAR2,
176                      X_Method_Code                      VARCHAR2,
177                      X_List_Price                       NUMBER,
178                      X_Pricing_Rule_Id                  NUMBER,
179                      X_Reprice_Flag                     VARCHAR2,
180                      X_Pricing_Context                  VARCHAR2,
181                      X_Pricing_Attribute1               VARCHAR2,
182                      X_Pricing_Attribute2               VARCHAR2,
183                      X_Pricing_Attribute3               VARCHAR2,
184                      X_Pricing_Attribute4               VARCHAR2,
185                      X_Pricing_Attribute5               VARCHAR2,
186                      X_Pricing_Attribute6               VARCHAR2,
187                      X_Pricing_Attribute7               VARCHAR2,
188                      X_Pricing_Attribute8               VARCHAR2,
189                      X_Pricing_Attribute9               VARCHAR2,
190                      X_Pricing_Attribute10              VARCHAR2,
191                      X_Pricing_Attribute11              VARCHAR2,
192                      X_Pricing_Attribute12              VARCHAR2,
193                      X_Pricing_Attribute13              VARCHAR2,
194                      X_Pricing_Attribute14              VARCHAR2,
195                      X_Pricing_Attribute15              VARCHAR2,
196                      X_Start_Date_Active                DATE,
197                      X_End_Date_Active                  DATE,
198                      X_Context                          VARCHAR2,
199                      X_Attribute1                       VARCHAR2,
200                      X_Attribute2                       VARCHAR2,
201                      X_Attribute3                       VARCHAR2,
202                      X_Attribute4                       VARCHAR2,
203                      X_Attribute5                       VARCHAR2,
204                      X_Attribute6                       VARCHAR2,
205                      X_Attribute7                       VARCHAR2,
206                      X_Attribute8                       VARCHAR2,
207                      X_Attribute9                       VARCHAR2,
208                      X_Attribute10                      VARCHAR2,
209                      X_Attribute11                      VARCHAR2,
210                      X_Attribute12                      VARCHAR2,
211                      X_Attribute13                      VARCHAR2,
212                      X_Attribute14                      VARCHAR2,
213                      X_Attribute15                      VARCHAR2
214   ) IS
215     CURSOR C IS
216         SELECT *
217         FROM   so_price_list_lines
218         WHERE  rowid = X_Rowid
219         FOR UPDATE of Price_List_Line_Id NOWAIT;
220     Recinfo C%ROWTYPE;
221 
222   BEGIN
223     OPEN C;
224     FETCH C INTO Recinfo;
225     if (C%NOTFOUND) then
226       CLOSE C;
227       FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
228       APP_EXCEPTION.Raise_Exception;
229     end if;
230     CLOSE C;
231     if (
232                (Recinfo.price_list_line_id =  X_Price_List_Line_Id)
233            AND (Recinfo.price_list_id =  X_Price_List_Id)
234            AND (Recinfo.inventory_item_id =  X_Inventory_Item_Id)
235            AND (   (Recinfo.unit_code =  X_Unit_Code)
236                 OR (    (Recinfo.unit_code IS NULL)
237                     AND (X_Unit_Code IS NULL)))
238            AND (Recinfo.method_code =  X_Method_Code)
239            AND (   (Recinfo.list_price =  X_List_Price)
240                 OR (    (Recinfo.list_price IS NULL)
241                     AND (X_List_Price IS NULL)))
242            AND (   (Recinfo.pricing_rule_id =  X_Pricing_Rule_Id)
243                 OR (    (Recinfo.pricing_rule_id IS NULL)
244                     AND (X_Pricing_Rule_Id IS NULL)))
245            AND (   (Recinfo.reprice_flag =  X_Reprice_Flag)
246                 OR (    (Recinfo.reprice_flag IS NULL)
247                     AND (X_Reprice_Flag IS NULL)))
248            AND (   (Recinfo.pricing_context =  X_Pricing_Context)
249                 OR (    (Recinfo.pricing_context IS NULL)
250                     AND (X_Pricing_Context IS NULL)))
251            AND (   (Recinfo.pricing_attribute1 =  X_Pricing_Attribute1)
252                 OR (    (Recinfo.pricing_attribute1 IS NULL)
253                     AND (X_Pricing_Attribute1 IS NULL)))
254            AND (   (Recinfo.pricing_attribute2 =  X_Pricing_Attribute2)
255                 OR (    (Recinfo.pricing_attribute2 IS NULL)
256                     AND (X_Pricing_Attribute2 IS NULL)))
257            AND (   (Recinfo.pricing_attribute3 =  X_Pricing_Attribute3)
258                 OR (    (Recinfo.pricing_attribute3 IS NULL)
259                     AND (X_Pricing_Attribute3 IS NULL)))
260            AND (   (Recinfo.pricing_attribute4 =  X_Pricing_Attribute4)
261                 OR (    (Recinfo.pricing_attribute4 IS NULL)
262                     AND (X_Pricing_Attribute4 IS NULL)))
263            AND (   (Recinfo.pricing_attribute5 =  X_Pricing_Attribute5)
264                 OR (    (Recinfo.pricing_attribute5 IS NULL)
265                     AND (X_Pricing_Attribute5 IS NULL)))
266            AND (   (Recinfo.pricing_attribute6 =  X_Pricing_Attribute6)
267                 OR (    (Recinfo.pricing_attribute6 IS NULL)
268                     AND (X_Pricing_Attribute6 IS NULL)))
269            AND (   (Recinfo.pricing_attribute7 =  X_Pricing_Attribute7)
270                 OR (    (Recinfo.pricing_attribute7 IS NULL)
271                     AND (X_Pricing_Attribute7 IS NULL)))
272            AND (   (Recinfo.pricing_attribute8 =  X_Pricing_Attribute8)
273                 OR (    (Recinfo.pricing_attribute8 IS NULL)
274                     AND (X_Pricing_Attribute8 IS NULL)))
275            AND (   (Recinfo.pricing_attribute9 =  X_Pricing_Attribute9)
276                 OR (    (Recinfo.pricing_attribute9 IS NULL)
277                     AND (X_Pricing_Attribute9 IS NULL)))
278            AND (   (Recinfo.pricing_attribute10 =  X_Pricing_Attribute10)
279                 OR (    (Recinfo.pricing_attribute10 IS NULL)
280                     AND (X_Pricing_Attribute10 IS NULL)))
281            AND (   (Recinfo.pricing_attribute11 =  X_Pricing_Attribute11)
282                 OR (    (Recinfo.pricing_attribute11 IS NULL)
283                     AND (X_Pricing_Attribute11 IS NULL)))
284            AND (   (Recinfo.pricing_attribute12 =  X_Pricing_Attribute12)
285                 OR (    (Recinfo.pricing_attribute12 IS NULL)
286                     AND (X_Pricing_Attribute12 IS NULL)))
287            AND (   (Recinfo.pricing_attribute13 =  X_Pricing_Attribute13)
288                 OR (    (Recinfo.pricing_attribute13 IS NULL)
289                     AND (X_Pricing_Attribute13 IS NULL)))
290            AND (   (Recinfo.pricing_attribute14 =  X_Pricing_Attribute14)
291                 OR (    (Recinfo.pricing_attribute14 IS NULL)
292                     AND (X_Pricing_Attribute14 IS NULL)))
293            AND (   (Recinfo.pricing_attribute15 =  X_Pricing_Attribute15)
294                 OR (    (Recinfo.pricing_attribute15 IS NULL)
295                     AND (X_Pricing_Attribute15 IS NULL)))
296            AND (   (Recinfo.start_date_active =  X_Start_Date_Active)
297                 OR (    (Recinfo.start_date_active IS NULL)
298                     AND (X_Start_Date_Active IS NULL)))
299            AND (   (Recinfo.end_date_active =  X_End_Date_Active)
300                 OR (    (Recinfo.end_date_active IS NULL)
301                     AND (X_End_Date_Active IS NULL)))
302            AND (   (Recinfo.context =  X_Context)
303                 OR (    (Recinfo.context IS NULL)
304                     AND (X_Context IS NULL)))
305            AND (   (Recinfo.attribute1 =  X_Attribute1)
306                 OR (    (Recinfo.attribute1 IS NULL)
307                     AND (X_Attribute1 IS NULL)))
308            AND (   (Recinfo.attribute2 =  X_Attribute2)
309                 OR (    (Recinfo.attribute2 IS NULL)
310                     AND (X_Attribute2 IS NULL)))
311            AND (   (Recinfo.attribute3 =  X_Attribute3)
312                 OR (    (Recinfo.attribute3 IS NULL)
313                     AND (X_Attribute3 IS NULL)))
314            AND (   (Recinfo.attribute4 =  X_Attribute4)
315                 OR (    (Recinfo.attribute4 IS NULL)
316                     AND (X_Attribute4 IS NULL)))
317            AND (   (Recinfo.attribute5 =  X_Attribute5)
318                 OR (    (Recinfo.attribute5 IS NULL)
319                     AND (X_Attribute5 IS NULL)))
320            AND (   (Recinfo.attribute6 =  X_Attribute6)
321                 OR (    (Recinfo.attribute6 IS NULL)
322                     AND (X_Attribute6 IS NULL)))
323            AND (   (Recinfo.attribute7 =  X_Attribute7)
324                 OR (    (Recinfo.attribute7 IS NULL)
325                     AND (X_Attribute7 IS NULL)))
326            AND (   (Recinfo.attribute8 =  X_Attribute8)
327                 OR (    (Recinfo.attribute8 IS NULL)
328                     AND (X_Attribute8 IS NULL)))
329            AND (   (Recinfo.attribute9 =  X_Attribute9)
330                 OR (    (Recinfo.attribute9 IS NULL)
331                     AND (X_Attribute9 IS NULL)))
332            AND (   (Recinfo.attribute10 =  X_Attribute10)
333                 OR (    (Recinfo.attribute10 IS NULL)
334                     AND (X_Attribute10 IS NULL)))
335            AND (   (Recinfo.attribute11 =  X_Attribute11)
336                 OR (    (Recinfo.attribute11 IS NULL)
337                     AND (X_Attribute11 IS NULL)))
338            AND (   (Recinfo.attribute12 =  X_Attribute12)
339                 OR (    (Recinfo.attribute12 IS NULL)
340                     AND (X_Attribute12 IS NULL)))
341            AND (   (Recinfo.attribute13 =  X_Attribute13)
342                 OR (    (Recinfo.attribute13 IS NULL)
343                     AND (X_Attribute13 IS NULL)))
344            AND (   (Recinfo.attribute14 =  X_Attribute14)
345                 OR (    (Recinfo.attribute14 IS NULL)
346                     AND (X_Attribute14 IS NULL)))
347            AND (   (Recinfo.attribute15 =  X_Attribute15)
348                 OR (    (Recinfo.attribute15 IS NULL)
349                     AND (X_Attribute15 IS NULL)))
350       ) then
351       return;
352     else
353       FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
354       APP_EXCEPTION.Raise_Exception;
355     end if;
356   END Lock_Row;
357 
358 
359   PROCEDURE Update_Row(X_Rowid                          VARCHAR2,
360                        X_Price_List_Line_Id             NUMBER,
361                        X_Last_Update_Date               DATE,
362                        X_Last_Updated_By                NUMBER,
363                        X_Last_Update_Login              NUMBER,
364                        X_Price_List_Id                  NUMBER,
365                        X_Inventory_Item_Id              NUMBER,
366                        X_Unit_Code                      VARCHAR2,
367                        X_Method_Code                    VARCHAR2,
368                        X_List_Price                     NUMBER,
369                        X_Pricing_Rule_Id                NUMBER,
370                        X_Reprice_Flag                   VARCHAR2,
371                        X_Pricing_Context                VARCHAR2,
372                        X_Pricing_Attribute1             VARCHAR2,
373                        X_Pricing_Attribute2             VARCHAR2,
374                        X_Pricing_Attribute3             VARCHAR2,
375                        X_Pricing_Attribute4             VARCHAR2,
376                        X_Pricing_Attribute5             VARCHAR2,
377                        X_Pricing_Attribute6             VARCHAR2,
378                        X_Pricing_Attribute7             VARCHAR2,
379                        X_Pricing_Attribute8             VARCHAR2,
380                        X_Pricing_Attribute9             VARCHAR2,
381                        X_Pricing_Attribute10            VARCHAR2,
382                        X_Pricing_Attribute11            VARCHAR2,
383                        X_Pricing_Attribute12            VARCHAR2,
384                        X_Pricing_Attribute13            VARCHAR2,
385                        X_Pricing_Attribute14            VARCHAR2,
386                        X_Pricing_Attribute15            VARCHAR2,
387                        X_Start_Date_Active              DATE,
388                        X_End_Date_Active                DATE,
389                        X_Context                        VARCHAR2,
390                        X_Attribute1                     VARCHAR2,
391                        X_Attribute2                     VARCHAR2,
392                        X_Attribute3                     VARCHAR2,
393                        X_Attribute4                     VARCHAR2,
394                        X_Attribute5                     VARCHAR2,
395                        X_Attribute6                     VARCHAR2,
396                        X_Attribute7                     VARCHAR2,
397                        X_Attribute8                     VARCHAR2,
398                        X_Attribute9                     VARCHAR2,
399                        X_Attribute10                    VARCHAR2,
400                        X_Attribute11                    VARCHAR2,
401                        X_Attribute12                    VARCHAR2,
402                        X_Attribute13                    VARCHAR2,
403                        X_Attribute14                    VARCHAR2,
404                        X_Attribute15                    VARCHAR2
405   ) IS
406   BEGIN
407     UPDATE so_price_list_lines
408     SET
409        price_list_line_id              =     X_Price_List_Line_Id,
410        last_update_date                =     X_Last_Update_Date,
411        last_updated_by                 =     X_Last_Updated_By,
412        last_update_login               =     X_Last_Update_Login,
413        price_list_id                   =     X_Price_List_Id,
414        inventory_item_id               =     X_Inventory_Item_Id,
415        unit_code                       =     X_Unit_Code,
416        method_code                     =     X_Method_Code,
417        list_price                      =     X_List_Price,
418        pricing_rule_id                 =     X_Pricing_Rule_Id,
419        reprice_flag                    =     X_Reprice_Flag,
420        pricing_context                 =     X_Pricing_Context,
421        pricing_attribute1              =     X_Pricing_Attribute1,
422        pricing_attribute2              =     X_Pricing_Attribute2,
423        pricing_attribute3              =     X_Pricing_Attribute3,
424        pricing_attribute4              =     X_Pricing_Attribute4,
425        pricing_attribute5              =     X_Pricing_Attribute5,
426        pricing_attribute6              =     X_Pricing_Attribute6,
427        pricing_attribute7              =     X_Pricing_Attribute7,
428        pricing_attribute8              =     X_Pricing_Attribute8,
429        pricing_attribute9              =     X_Pricing_Attribute9,
430        pricing_attribute10             =     X_Pricing_Attribute10,
431        pricing_attribute11             =     X_Pricing_Attribute11,
432        pricing_attribute12             =     X_Pricing_Attribute12,
433        pricing_attribute13             =     X_Pricing_Attribute13,
434        pricing_attribute14             =     X_Pricing_Attribute14,
435        pricing_attribute15             =     X_Pricing_Attribute15,
436        start_date_active               =     X_Start_Date_Active,
437        end_date_active                 =     X_End_Date_Active,
438        context                         =     X_Context,
439        attribute1                      =     X_Attribute1,
440        attribute2                      =     X_Attribute2,
441        attribute3                      =     X_Attribute3,
442        attribute4                      =     X_Attribute4,
443        attribute5                      =     X_Attribute5,
444        attribute6                      =     X_Attribute6,
445        attribute7                      =     X_Attribute7,
446        attribute8                      =     X_Attribute8,
447        attribute9                      =     X_Attribute9,
448        attribute10                     =     X_Attribute10,
449        attribute11                     =     X_Attribute11,
450        attribute12                     =     X_Attribute12,
451        attribute13                     =     X_Attribute13,
452        attribute14                     =     X_Attribute14,
453        attribute15                     =     X_Attribute15
454     WHERE rowid = X_Rowid;
455 
456     if (SQL%NOTFOUND) then
457       Raise NO_DATA_FOUND;
458     end if;
459   END Update_Row;
460 
461   PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
462   BEGIN
463     DELETE FROM so_price_list_lines
464     WHERE rowid = X_Rowid;
465 
466     if (SQL%NOTFOUND) then
467       Raise NO_DATA_FOUND;
468     end if;
469   END Delete_Row;
470 
471   PROCEDURE Validate_Price_Line(
472 				   X_Inventory_Item_Id	NUMBER,
473 				   X_Unit_Code			VARCHAR2,
474 				   X_Price_List_Id		NUMBER,
475 				   X_Method_Code		VARCHAR2,
476 				   X_Pricing_Attribute1	VARCHAR2,
477 				   X_Pricing_Attribute2	VARCHAR2,
478 				   X_Pricing_Attribute3	VARCHAR2,
479 				   X_Pricing_Attribute4	VARCHAR2,
480 				   X_Pricing_Attribute5	VARCHAR2,
481 				   X_Pricing_Attribute6	VARCHAR2,
482 				   X_Pricing_Attribute7	VARCHAR2,
483 				   X_Pricing_Attribute8	VARCHAR2,
484 				   X_Pricing_Attribute9	VARCHAR2,
485 				   X_Pricing_Attribute10	VARCHAR2,
486 				   X_Pricing_Attribute11	VARCHAR2,
487 				   X_Pricing_Attribute12	VARCHAR2,
488 				   X_Pricing_Attribute13	VARCHAR2,
489 				   X_Pricing_Attribute14	VARCHAR2,
490 				   X_Pricing_Attribute15	VARCHAR2,
491 				   X_Message_Name	OUT	VARCHAR2) IS
492 
493   CURSOR C IS
494     SELECT  'Y'
495     FROM 	  so_headers sh, so_lines sl
496     WHERE   sh.price_list_Id = X_Price_List_Id
497     AND	  sh.header_id = sl.header_id
498     AND     sl.inventory_Item_Id = X_Inventory_Item_Id
499     AND 	  sl.unit_code = X_Unit_Code
500     AND	  sl.pricing_method_code = X_Method_Code
501     AND	  NVL(sl.s6, '-99') <> 10
502     AND     NVL(sl.pricing_attribute1, ' ') = NVL(X_Pricing_Attribute1, ' ')
503     AND     NVL(sl.pricing_attribute2, ' ') = NVL(X_Pricing_Attribute2, ' ')
504     AND     NVL(sl.pricing_attribute3, ' ') = NVL(X_Pricing_Attribute3, ' ')
505     AND     NVL(sl.pricing_attribute4, ' ') = NVL(X_Pricing_Attribute4, ' ')
506     AND     NVL(sl.pricing_attribute5, ' ') = NVL(X_Pricing_Attribute5, ' ')
507     AND     NVL(sl.pricing_attribute6, ' ') = NVL(X_Pricing_Attribute6, ' ')
508     AND     NVL(sl.pricing_attribute7, ' ') = NVL(X_Pricing_Attribute7, ' ')
509     AND     NVL(sl.pricing_attribute8, ' ') = NVL(X_Pricing_Attribute8, ' ')
510     AND     NVL(sl.pricing_attribute9, ' ') = NVL(X_Pricing_Attribute9, ' ')
511     AND     NVL(sl.pricing_attribute10, ' ') = NVL(X_Pricing_Attribute10, ' ')
512     AND     NVL(sl.pricing_attribute11, ' ') = NVL(X_Pricing_Attribute11, ' ')
513     AND     NVL(sl.pricing_attribute12, ' ') = NVL(X_Pricing_Attribute12, ' ')
514     AND     NVL(sl.pricing_attribute13, ' ') = NVL(X_Pricing_Attribute13, ' ')
515     AND     NVL(sl.pricing_attribute14, ' ') = NVL(X_Pricing_Attribute14, ' ')
516     AND     NVL(sl.pricing_attribute15, ' ') = NVL(X_Pricing_Attribute15, ' ');
517 
518 
519   l_exists	VARCHAR2(1);
520 
521   BEGIN
522 
523     X_Message_Name := NULL;
524     OPEN C;
525     FETCH C INTO l_exists;
526     IF (C%FOUND) THEN
527 	 CLOSE C;
528 	 X_Message_Name := 'OE_CANNOT_DELETE_PRICE_LINE';
529     ELSE
530 	 CLOSE C;
531     END IF;
532 
533   END Validate_Price_Line;
534 
535 END  SO_PRICE_LIST_LINES_PKG;