PACKAGE BODY: APPS.ONT_CUST_ITEM_DEF_UTIL

Source

1 PACKAGE BODY ONT_CUST_ITEM_Def_Util AS
2 /* $Header: OEXDFWKB.pls 115.0 13-AUG-13 23:23:31 appldev ship $ */
3  
4 --  
5 --  Copyright (c) 1996 Oracle Corporation, Redwood Shores, CA, USA
6 --  All rights reserved.
7 --  
8 --  FILENAME
9 --  
10 --      ONT_CUST_ITEM_Def_Util
11 --  
12 --  DESCRIPTION
13 --  
14 --      Body of package ONT_CUST_ITEM_Def_Util
15 --  
16 --  NOTES
17 --  
18 --  HISTORY
19 --  
20 --  13-AUG-13 Created
21 --  
22  
23 --  Global constant holding the package name
24 G_PKG_NAME                    CONSTANT VARCHAR2(30) := 'ONT_CUST_ITEM_Def_Util';
25  
26  
27   g_database_object_name varchar2(30) :='OE_AK_MTL_CUST_ITEMS_V';
28  
29  
30 FUNCTION Get_Attr_Val_Varchar2
31 (   p_attr_code                     IN  VARCHAR2
32 ,   p_record                        IN  OE_AK_MTL_CUST_ITEMS_V%ROWTYPE 
33 ) RETURN VARCHAR2
34 IS
35 BEGIN
36  
37 IF p_attr_code =('CUSTOMER_ITEM_ID') THEN
38   IF NVL(p_record.CUSTOMER_ITEM_ID, FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
39   RETURN p_record.CUSTOMER_ITEM_ID;
40   ELSE
41   RETURN NULL; 
42   END IF;
43 ELSIF p_attr_code =('DEP_PLAN_REQUIRED') THEN
44   IF NVL(p_record.DEP_PLAN_REQUIRED_FLAG, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
45   RETURN p_record.DEP_PLAN_REQUIRED_FLAG;
46   ELSE
47   RETURN NULL; 
48   END IF;
49 ELSIF p_attr_code =('DEP_PLAN_REQUIRED_FLAG') THEN
50   IF NVL(p_record.DEP_PLAN_REQUIRED_FLAG, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
51   RETURN p_record.DEP_PLAN_REQUIRED_FLAG;
52   ELSE
53   RETURN NULL; 
54   END IF;
55 ELSE
56 RETURN NULL; 
57 END IF;
58 END  Get_Attr_Val_Varchar2;
59  
60  
61 FUNCTION Get_Attr_Val_Date
62 (   p_attr_code                     IN  VARCHAR2
63 ,   p_record                        IN  OE_AK_MTL_CUST_ITEMS_V%ROWTYPE 
64 ) RETURN DATE
65 IS
66 BEGIN
67  
68 IF p_attr_code =('CUSTOMER_ITEM_ID') THEN
69     IF NVL(p_record.CUSTOMER_ITEM_ID, FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
70     RETURN to_date(p_record.CUSTOMER_ITEM_ID,'RRRR/MM/DD HH24:MI:SS');
71     ELSE
72     RETURN NULL; 
73     END IF;
74 ELSIF p_attr_code =('DEP_PLAN_REQUIRED') THEN
75     IF NVL(p_record.DEP_PLAN_REQUIRED_FLAG, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
76     RETURN to_date(p_record.DEP_PLAN_REQUIRED_FLAG,'RRRR/MM/DD HH24:MI:SS');
77     ELSE
78     RETURN NULL; 
79     END IF;
80 ELSIF p_attr_code =('DEP_PLAN_REQUIRED_FLAG') THEN
81     IF NVL(p_record.DEP_PLAN_REQUIRED_FLAG, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
82     RETURN to_date(p_record.DEP_PLAN_REQUIRED_FLAG,'RRRR/MM/DD HH24:MI:SS');
83     ELSE
84     RETURN NULL; 
85     END IF;
86 ELSE
87 RETURN NULL; 
88 END IF;
89  
90 END  Get_Attr_Val_Date;
91  
92  
93   PROCEDURE Clear_CUST_ITEM_Cache
94   IS  
95   BEGIN  
96   g_cached_record.CUSTOMER_ITEM_ID := null;
97    END Clear_CUST_ITEM_Cache;
98  
99  
100 FUNCTION Sync_CUST_ITEM_Cache
101 (   p_CUSTOMER_ITEM_ID              IN  NUMBER
102  
103  
104 ) RETURN NUMBER
105 IS
106 CURSOR cache IS 
107   SELECT * FROM   OE_AK_MTL_CUST_ITEMS_V
108   WHERE CUSTOMER_ITEM_ID  = p_CUSTOMER_ITEM_ID
109   ;
110 BEGIN
111  
112 IF (NVL(p_CUSTOMER_ITEM_ID,FND_API.G_MISS_NUM)  = FND_API.G_MISS_NUM) 
113 THEN
114   RETURN 0 ;
115 ELSIF (NVL(g_cached_record.CUSTOMER_ITEM_ID,FND_API.G_MISS_NUM)  <>  p_CUSTOMER_ITEM_ID) 
116 THEN
117   Clear_CUST_ITEM_Cache;
118   Open cache;
119   FETCH cache into g_cached_record;
120   IF cache%NOTFOUND THEN
121     RETURN 0;
122   END IF;
123   Close cache;
124   RETURN 1 ;
125 END IF;
126  
127   RETURN 1 ;
128 EXCEPTION
129   WHEN OTHERS THEN 
130   RETURN 0 ;
131 END Sync_CUST_ITEM_Cache;
132  
133  
134 END ONT_CUST_ITEM_Def_Util;