DBA Data[Home] [Help]

PACKAGE BODY: APPS.ASG_PUB_PKG

Source


1 PACKAGE BODY ASG_PUB_PKG as
2 /* $Header: asgppubb.pls 120.1 2005/08/12 02:53:07 saradhak noship $ */
3 
4 -- HISTORY
5 -- AUG 21, 2003  ytian   Modified the update_row, need to update the entry
6 --                       for the custom publication as well.
7 -- JUL 16, 2003    ytian   Added ADDITIONAL_DEVICE_TYPE column.
8 -- MAR 31, 2003  ytian   modified update_row not to update creation_date.
9 -- Mar 11, 2003  yazhang add shared_by column
10 -- DEC  03, 2002 ytian Modified the update_row not to update the customized objects
11 -- NOV  05, 2002 yazhang add need_resourceid and custom
12 -- AUG  30, 2002 ytian added enable_synch.
13 -- JUN  26, 2002 ytian modified not to update STATUS when loading.
14 -- JUN  06  2002 ytian Modified device_type to varchar2.
15 -- JUN  03  2002 ytian added device_type parameter, changed _ID to varchar2.
16 -- MAR  22, 2002 ytian Modified insert_row  to insert last_release_version
17 --                     value = 0, make sure the object got upgraded.
18 -- MAR  21, 2002 ytian modified update_row not to update last_release_version
19 -- MAR. 11, 2002 ytian created.
20 
21 procedure insert_row (
22   x_PUB_ID in VARCHAR2,
23   x_NAME in VARCHAR2,
24   x_ENABLED in VARCHAR2,
25   x_STATUS  in VARCHAR2,
26   x_LAST_RELEASE_VERSION in NUMBER,
27   x_CURRENT_RELEASE_VERSION in NUMBER,
28   x_WRAPPER_NAME    in VARCHAR2,
29   x_DEVICE_TYPE in VARCHAR2,
30   x_ENABLE_SYNCH in VARCHAR2,
31   x_NEED_RESOURCEID in VARCHAR2,
32   x_CUSTOM  in VARCHAR2,
33   x_SHARED_BY in VARCHAR2,
34   x_ADDITIONAL_DEVICE_TYPE in VARCHAR2,
35   x_CREATION_DATE in DATE,
36   x_CREATED_BY in NUMBER,
37   x_LAST_UPDATE_DATE in DATE,
38   x_LAST_UPDATED_BY in NUMBER) IS
39 
40 
41 begin
42 
43 
44   insert into ASG_PUB (
45     PUB_ID,
46     NAME,
47     ENABLED,
48     STATUS,
49     LAST_RELEASE_VERSION,
50     CURRENT_RELEASE_VERSION,
51     WRAPPER_NAME,
52     DEVICE_TYPE,
53     ENABLE_SYNCH,
54     NEED_RESOURCEID,
55     CUSTOM,
56     SHARED_BY,
57     ADDITIONAL_DEVICE_TYPE,
58     CREATION_DATE,
59     CREATED_BY,
60     LAST_UPDATE_DATE,
61     LAST_UPDATED_BY
62   ) values (
63     x_pub_id,
64     decode(X_NAME,FND_API.G_MISS_CHAR, NULL, x_NAME),
65     decode(X_ENABLED, FND_API.G_MISS_CHAR, NULL, x_ENABLED),
66     'N',
67     0,
68     decode(x_CURRENT_release_version,FND_API.G_MISS_NUM, NULL, x_CURRENT_RELEASE_VERSION),
69     decode(X_WRAPPER_NAME,FND_API.G_MISS_CHAR, NULL, x_wrapper_name),
70     x_device_Type,
71     'Y',
72     decode(X_NEED_RESOURCEID, FND_API.G_MISS_CHAR, NULL, x_NEED_RESOURCEID),
73     decode(X_CUSTOM, FND_API.G_MISS_CHAR, NULL, x_CUSTOM),
74     decode(X_SHARED_BY, FND_API.G_MISS_CHAR, NULL, x_SHARED_BY),
75     decode(X_ADDITIONAL_DEVICE_TYPE, FND_API.G_MISS_CHAR, NULL, x_ADDITIONAL_DEVICE_TYPE),
76     decode(X_CREATION_DATE,FND_API.G_MISS_DATE, NULL, x_creation_date),
77     decode(X_CREATED_BY,FND_API.G_MISS_NUM, NULL,x_created_by),
78     decode(X_LAST_UPDATE_DATE,FND_API.G_MISS_DATE, NULL, x_last_update_date),
79     decode(X_LAST_UPDATED_BY,FND_API.G_MISS_NUM, NULL,x_last_updated_by)
80   );
81 
82 /*
83   open c;
84   fetch c into X_ROWID;
85   if (c%notfound) then
86     close c;
87     raise no_data_found;
88   end if;
89   close c;
90 */
91 
92 end insert_row;
93 
94 procedure update_row (
95    x_PUB_ID in VARCHAR2,
96   x_NAME in VARCHAR2,
97   x_ENABLED in VARCHAR2,
98   x_STATUS  in VARCHAR2,
99   x_LAST_RELEASE_VERSION in NUMBER,
100   x_CURRENT_RELEASE_VERSION in NUMBER,
101   x_WRAPPER_NAME    in VARCHAR2,
102   x_DEVICE_TYPE in VARCHAR2,
103   x_ENABLE_SYNCH in VARCHAR2,
104   x_NEED_RESOURCEID in VARCHAR2,
105   x_CUSTOM  in VARCHAR2,
106   x_SHARED_BY in VARCHAR2,
107   x_ADDITIONAL_DEVICE_TYPE in VARCHAR2,
108   x_CREATION_DATE in DATE,
109   x_CREATED_BY in NUMBER,
110   x_LAST_UPDATE_DATE in DATE,
111   x_LAST_UPDATED_BY in NUMBER) IS
112 
113 l_update_flag varchar2(1);
114 
115 begin
116 
117    select nvl(custom, 'N')
118    into l_update_flag
119    from asg_pub
120    where pub_id = x_pub_id;
121 
122  if (l_update_flag = 'N' ) then
123    update asg_pub set
124     PUB_ID = X_PUB_ID,
125     NAME = X_NAME,
126     ENABLED = X_ENABLED,
127 --    STATUS = X_STATUS,
128 --    LAST_RELEASE_VERSION = X_LAST_RELEASE_VERSION,
129     CURRENT_RELEASE_VERSION = X_CURRENT_RELEASE_VERSION,
130     WRAPPER_NAME = X_WRAPPER_NAME,
131     DEVICE_TYPE = X_DEVICE_TYPE,
132     NEED_RESOURCEID = X_NEED_RESOURCEID,
133     CUSTOM = X_CUSTOM,
134     SHARED_BY = X_SHARED_BY,
135     ADDITIONAL_DEVICE_TYPE = X_ADDITIONAL_DEVICE_TYPE,
136 --    CREATION_DATE = X_CREATION_DATE,
137 --    CREATED_BY = X_CREATED_BY,
138     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
139     LAST_UPDATED_BY = X_LAST_UPDATED_BY
140   where PUB_ID = X_PUB_ID;
141 else
142    update asg_pub set
143        ADDITIONAL_DEVICE_TYPE = X_ADDITIONAL_DEVICE_TYPE
144    where PUB_ID = X_PUB_ID;
145   end if;
146 
147    if (sql%notfound) then
148     raise no_data_found;
149   end if;
150 END UPDATE_ROW;
151 
152 
153 procedure load_row (
154    x_PUB_ID in VARCHAR2,
155   x_NAME in VARCHAR2,
156   x_ENABLED in VARCHAR2,
157   x_STATUS  in VARCHAR2,
158   x_LAST_RELEASE_VERSION in NUMBER,
159   x_CURRENT_RELEASE_VERSION in NUMBER,
160   x_WRAPPER_NAME    in VARCHAR2,
161   x_DEVICE_TYPE  in VARCHAR2,
162   x_ENABLE_SYNCH in VARCHAR2,
163   x_NEED_RESOURCEID in VARCHAR2,
164   x_CUSTOM  in VARCHAR2,
165   x_SHARED_BY in VARCHAR2,
166   x_ADDITIONAL_DEVICE_TYPE in VARCHAR2,
167   x_CREATION_DATE in DATE,
168   x_CREATED_BY in NUMBER,
169   x_LAST_UPDATE_DATE in DATE,
170   x_LAST_UPDATED_BY in NUMBER,
171   p_owner in VARCHAR2)  IS
172 
173     l_user_id      number := 0;
174 
175 BEGIN
176 
177 
178   if (p_owner = 'SEED') then
179     l_user_id := 1;
180   end if;
181 
182   asg_pub_pkg.UPDATE_ROW (
183     X_PUB_ID       		   => x_PUB_ID,
184     X_NAME	                   => x_NAME,
185     X_ENABLED                      => x_ENABLED,
186     X_STATUS			   => x_STATUS,
187     X_LAST_RELEASE_VERSION         => x_LAST_release_version,
188     X_CURRENT_RELEASE_VERSION      => x_CURRENT_release_version,
189     X_WRAPPER_NAME                 => X_WRAPPER_NAME,
190     x_DEVICE_TYPE		   => x_DEVICE_TYPE,
191     x_ENABLE_SYNCH                 => x_ENABLE_SYNCH,
192     x_NEED_RESOURCEID              => x_NEED_RESOURCEID,
193     x_CUSTOM                       => x_CUSTOM,
194     x_SHARED_BY                    => x_SHARED_BY,
195     x_ADDITIONAL_DEVICE_TYPE       => x_ADDITIONAL_DEVICE_TYPE,
196     X_CREATION_DATE                => X_CREATION_DATE,
197     X_CREATED_BY                   => X_CREATED_BY,
198     X_LAST_UPDATE_DATE             => sysdate,
199     X_LAST_UPDATED_BY              => l_user_id);
200 
201 EXCEPTION
202   WHEN NO_DATA_FOUND THEN
203 
204   asg_pub_pkg.insert_row (
205     X_PUB_ID       		   => x_PUB_ID,
206     X_NAME	                   => x_NAME,
207     X_ENABLED                      => x_ENABLED,
208     X_STATUS			   => x_STATUS,
209     X_LAST_RELEASE_VERSION         => x_LAST_release_version,
210     X_CURRENT_RELEASE_VERSION      => x_CURRENT_release_version,
211     X_WRAPPER_NAME                 => X_WRAPPER_NAME,
212     x_DEVICE_TYPE		   => x_DEVICE_TYPE,
213     x_ENABLE_SYNCH                 => x_ENABLE_SYNCH,
214     x_NEED_RESOURCEID              => x_NEED_RESOURCEID,
215     x_CUSTOM                       => x_CUSTOM,
216     x_SHARED_BY                    => x_SHARED_BY,
217     x_ADDITIONAL_DEVICE_TYPE       => x_ADDITIONAL_DEVICE_TYPE,
218     X_CREATION_DATE                => sysdate,
219     X_CREATED_BY                   => l_user_id,
220     X_LAST_UPDATE_DATE             => sysdate,
221     X_LAST_UPDATED_BY              => l_user_id);
222 
223 END load_row;
224 
225 END ASG_PUB_PKG;