eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.CS_KB_SET_USED_SUMS_PKG

Source


1 PACKAGE BODY CS_KB_SET_USED_SUMS_PKG AS
2 /* $Header: cskbsusb.pls 115.3 2002/02/01 17:24:29 pkm ship   $ */
3 
4 function Create_Set_Used_Sum(
5   P_SET_ID in NUMBER,
6   P_DEF_ID in NUMBER,
7   P_USED_COUNT in NUMBER,
8   P_ATTRIBUTE_CATEGORY in VARCHAR2 DEFAULT NULL,
9   P_ATTRIBUTE1 in VARCHAR2 DEFAULT NULL,
10   P_ATTRIBUTE2 in VARCHAR2 DEFAULT NULL,
11   P_ATTRIBUTE3 in VARCHAR2 DEFAULT NULL,
12   P_ATTRIBUTE4 in VARCHAR2 DEFAULT NULL,
13   P_ATTRIBUTE5 in VARCHAR2 DEFAULT NULL,
14   P_ATTRIBUTE6 in VARCHAR2 DEFAULT NULL,
15   P_ATTRIBUTE7 in VARCHAR2 DEFAULT NULL,
16   P_ATTRIBUTE8 in VARCHAR2 DEFAULT NULL,
17   P_ATTRIBUTE9 in VARCHAR2 DEFAULT NULL,
18   P_ATTRIBUTE10 in VARCHAR2 DEFAULT NULL,
19   P_ATTRIBUTE11 in VARCHAR2 DEFAULT NULL,
20   P_ATTRIBUTE12 in VARCHAR2 DEFAULT NULL,
21   P_ATTRIBUTE13 in VARCHAR2 DEFAULT NULL,
22   P_ATTRIBUTE14 in VARCHAR2 DEFAULT NULL,
23   P_ATTRIBUTE15 in VARCHAR2 DEFAULT NULL
24 ) return number IS
25   l_date  date;
26   l_created_by number;
27   l_login number;
28 BEGIN
29 
30   -- Check params
31   if(P_SET_ID is null OR P_DEF_ID is null) then
32     goto error_found;
33   end if;
34 
35   l_date := sysdate;
36   l_created_by := fnd_global.user_id;
37   l_login := fnd_global.login_id;
38 
39   insert into CS_KB_SET_USED_SUMS (
40     SET_ID,
41     DEF_ID,
42     USED_COUNT,
43     CREATION_DATE,
44     CREATED_BY,
45     LAST_UPDATE_DATE,
46     LAST_UPDATED_BY,
47     LAST_UPDATE_LOGIN,
48     ATTRIBUTE_CATEGORY,
49     ATTRIBUTE1,
50     ATTRIBUTE2,
51     ATTRIBUTE3,
52     ATTRIBUTE4,
53     ATTRIBUTE5,
54     ATTRIBUTE6,
55     ATTRIBUTE7,
56     ATTRIBUTE8,
57     ATTRIBUTE9,
58     ATTRIBUTE10,
59     ATTRIBUTE11,
60     ATTRIBUTE12,
61     ATTRIBUTE13,
62     ATTRIBUTE14,
63     ATTRIBUTE15
64   ) values (
65     P_SET_ID,
66     P_DEF_ID,
67     P_USED_COUNT,
68     l_date,
69     l_created_by,
70     l_date,
71     l_created_by,
72     l_login,
73     P_ATTRIBUTE_CATEGORY,
74     P_ATTRIBUTE1,
75     P_ATTRIBUTE2,
76     P_ATTRIBUTE3,
77     P_ATTRIBUTE4,
78     P_ATTRIBUTE5,
79     P_ATTRIBUTE6,
80     P_ATTRIBUTE7,
81     P_ATTRIBUTE8,
82     P_ATTRIBUTE9,
83     P_ATTRIBUTE10,
84     P_ATTRIBUTE11,
85     P_ATTRIBUTE12,
86     P_ATTRIBUTE13,
87     P_ATTRIBUTE14,
88     P_ATTRIBUTE15
89     );
90 
91   return OKAY_STATUS;
92   <<error_found>>
93   return ERROR_STATUS;
94 
95 END Create_Set_Used_Sum;
96 
97 
98 function Update_Set_Used_Sum(
99   P_SET_ID in NUMBER,
100   P_DEF_ID in NUMBER,
101   P_USED_COUNT in NUMBER,
102   P_ATTRIBUTE_CATEGORY in VARCHAR2 DEFAULT NULL,
103   P_ATTRIBUTE1 in VARCHAR2 DEFAULT NULL,
104   P_ATTRIBUTE2 in VARCHAR2 DEFAULT NULL,
105   P_ATTRIBUTE3 in VARCHAR2 DEFAULT NULL,
106   P_ATTRIBUTE4 in VARCHAR2 DEFAULT NULL,
107   P_ATTRIBUTE5 in VARCHAR2 DEFAULT NULL,
108   P_ATTRIBUTE6 in VARCHAR2 DEFAULT NULL,
109   P_ATTRIBUTE7 in VARCHAR2 DEFAULT NULL,
110   P_ATTRIBUTE8 in VARCHAR2 DEFAULT NULL,
111   P_ATTRIBUTE9 in VARCHAR2 DEFAULT NULL,
112   P_ATTRIBUTE10 in VARCHAR2 DEFAULT NULL,
113   P_ATTRIBUTE11 in VARCHAR2 DEFAULT NULL,
114   P_ATTRIBUTE12 in VARCHAR2 DEFAULT NULL,
115   P_ATTRIBUTE13 in VARCHAR2 DEFAULT NULL,
116   P_ATTRIBUTE14 in VARCHAR2 DEFAULT NULL,
117   P_ATTRIBUTE15 in VARCHAR2 DEFAULT NULL
118 ) return number is
119   l_ret number;
120   l_date  date;
121   l_updated_by number;
122   l_login number;
123 begin
124 
125   -- validate params
126   if(P_SET_ID is null OR P_DEF_ID is null) then
127     goto error_found;
128   end if;
129 
130   l_date := sysdate;
131   l_updated_by := fnd_global.user_id;
132   l_login := fnd_global.login_id;
133 
134   update CS_KB_SET_USED_SUMS set
135     USED_COUNT = P_USED_COUNT,
136     LAST_UPDATE_DATE = l_date,
137     LAST_UPDATED_BY = l_updated_by,
138     LAST_UPDATE_LOGIN = l_login,
139     ATTRIBUTE_CATEGORY = P_ATTRIBUTE_CATEGORY,
140     ATTRIBUTE1 = P_ATTRIBUTE1,
141     ATTRIBUTE2 = P_ATTRIBUTE2,
142     ATTRIBUTE3 = P_ATTRIBUTE3,
143     ATTRIBUTE4 = P_ATTRIBUTE4,
144     ATTRIBUTE5 = P_ATTRIBUTE5,
145     ATTRIBUTE6 = P_ATTRIBUTE6,
146     ATTRIBUTE7 = P_ATTRIBUTE7,
147     ATTRIBUTE8 = P_ATTRIBUTE8,
148     ATTRIBUTE9 = P_ATTRIBUTE9,
149     ATTRIBUTE10 = P_ATTRIBUTE10,
150     ATTRIBUTE11 = P_ATTRIBUTE11,
151     ATTRIBUTE12 = P_ATTRIBUTE12,
152     ATTRIBUTE13 = P_ATTRIBUTE13,
153     ATTRIBUTE14 = P_ATTRIBUTE14,
154     ATTRIBUTE15 = P_ATTRIBUTE15
155   where SET_ID = P_SET_ID AND DEF_ID = P_DEF_ID;
156 
157   if (sql%notfound) then
158     raise no_data_found;
159   end if;
160 
161   return OKAY_STATUS;
162 
163   <<error_found>>
164   return ERROR_STATUS;
165 
166   exception
167   when others then
168     return ERROR_STATUS;
169 
170 end Update_Set_Used_Sum;
171 
172 function Delete_Set_Used_Sum (
173   P_SET_ID in NUMBER,
174   P_DEF_ID in NUMBER
175 ) return number is
176 begin
177   if (P_SET_ID is null OR P_DEF_ID is null) then return ERROR_STATUS;  end if;
178 
179   delete from CS_KB_SET_USED_SUMS
180   where SET_ID = P_SET_ID AND DEF_ID = P_DEF_ID;
181 
182 
183   if (sql%notfound) then
184     raise no_data_found;
185   end if;
186    return OKAY_STATUS;
187   <<error_found>>
188   return ERROR_STATUS;
189 
190 end Delete_Set_Used_Sum;
191 
192 
193 end CS_KB_SET_USED_SUMS_PKG;