[Home] [Help]
PACKAGE BODY: APPS.ONT_DEF_FULFILL_DEF_UTIL
Source
1 PACKAGE BODY ONT_DEF_FULFILL_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_DEF_FULFILL_Def_Util
11 --
12 -- DESCRIPTION
13 --
14 -- Body of package ONT_DEF_FULFILL_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_DEF_FULFILL_Def_Util';
25
26
27 g_database_object_name varchar2(30) :='OE_AK_DEFAULT_FULFILMENT_SET_V';
28
29
30 FUNCTION Get_Attr_Val_Varchar2
31 ( p_attr_code IN VARCHAR2
32 , p_record IN OE_AK_DEFAULT_FULFILMENT_SET_V%ROWTYPE
33 ) RETURN VARCHAR2
34 IS
35 BEGIN
36
37 IF p_attr_code =('DEFAULT_FULFILLMENT_SET') THEN
38 IF NVL(p_record.DEFAULT_FULFILLMENT_SET, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
39 RETURN p_record.DEFAULT_FULFILLMENT_SET;
40 ELSE
41 RETURN NULL;
42 END IF;
43 ELSE
44 RETURN NULL;
45 END IF;
46 END Get_Attr_Val_Varchar2;
47
48
49 FUNCTION Get_Attr_Val_Date
50 ( p_attr_code IN VARCHAR2
51 , p_record IN OE_AK_DEFAULT_FULFILMENT_SET_V%ROWTYPE
52 ) RETURN DATE
53 IS
54 BEGIN
55
56 IF p_attr_code =('DEFAULT_FULFILLMENT_SET') THEN
57 IF NVL(p_record.DEFAULT_FULFILLMENT_SET, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
58 RETURN to_date(p_record.DEFAULT_FULFILLMENT_SET,'RRRR/MM/DD HH24:MI:SS');
59 ELSE
60 RETURN NULL;
61 END IF;
62 ELSE
63 RETURN NULL;
64 END IF;
65
66 END Get_Attr_Val_Date;
67
68
69 PROCEDURE Clear_DEF_FULFILL_Cache
70 IS
71 BEGIN
72 g_cached_record.DEFAULT_FULFILLMENT_SET := null;
73 END Clear_DEF_FULFILL_Cache;
74
75
76 FUNCTION Sync_DEF_FULFILL_Cache
77 ( p_DEFAULT_FULFILLMENT_SET IN VARCHAR2
78
79
80 ) RETURN NUMBER
81 IS
82 CURSOR cache IS
83 SELECT * FROM OE_AK_DEFAULT_FULFILMENT_SET_V
84 WHERE DEFAULT_FULFILLMENT_SET = p_DEFAULT_FULFILLMENT_SET
85 ;
86 BEGIN
87
88 IF (NVL(p_DEFAULT_FULFILLMENT_SET,FND_API.G_MISS_CHAR) = FND_API.G_MISS_CHAR)
89 THEN
90 RETURN 0 ;
91 ELSIF (NVL(g_cached_record.DEFAULT_FULFILLMENT_SET,FND_API.G_MISS_CHAR) <> p_DEFAULT_FULFILLMENT_SET)
92 THEN
93 Clear_DEF_FULFILL_Cache;
94 Open cache;
95 FETCH cache into g_cached_record;
96 IF cache%NOTFOUND THEN
97 RETURN 0;
98 END IF;
99 Close cache;
100 RETURN 1 ;
101 END IF;
102
103 RETURN 1 ;
104 EXCEPTION
105 WHEN OTHERS THEN
106 RETURN 0 ;
107 END Sync_DEF_FULFILL_Cache;
108
109
110 END ONT_DEF_FULFILL_Def_Util;