[Home] [Help]
PACKAGE BODY: APPS.AMS_SYSTEM_PRETTY_URL_PKG
Source
1 PACKAGE BODY AMS_SYSTEM_PRETTY_URL_PKG as
2 /* $Header: amstspub.pls 120.0 2005/07/01 03:56:31 appldev noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- AMS_SYSTEM_PRETTY_URL_PKG
7 -- Purpose
8 --
9 -- History
10 --
11 -- NOTE
12 --
13 -- End of Comments
14 -- ===============================================================
15
16
17 G_PKG_NAME CONSTANT VARCHAR2(30):= 'AMS_SYSTEM_PRETTY_URL_PKG';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amstspub.pls';
19
20
21 ----------------------------------------------------------
22 ---- MEDIA ----
23 ----------------------------------------------------------
24
25 -- ========================================================
26 --
27 -- NAME
28 -- createInsertBody
29 --
30 -- PURPOSE
31 --
32 -- NOTES
33 --
34 -- HISTORY
35 --
36 -- ========================================================
37 PROCEDURE Insert_Row(
38 px_system_url_id IN OUT NOCOPY NUMBER,
39 p_creation_date DATE,
40 p_created_by NUMBER,
41 p_last_update_date DATE,
42 p_last_updated_by NUMBER,
43 p_last_update_login NUMBER,
44 px_object_version_number IN OUT NOCOPY NUMBER,
45 p_pretty_url_id NUMBER,
46 p_additional_url_param VARCHAR2,
47 p_system_url VARCHAR2,
48 p_ctd_id NUMBER,
49 p_track_url VARCHAR2)
50
51 IS
52 x_rowid VARCHAR2(30);
53
54
55 BEGIN
56
57
58 px_object_version_number := 1;
59
60
61 INSERT INTO AMS_SYSTEM_PRETTY_URL(
62 system_url_id,
63 creation_date,
64 created_by,
65 last_update_date,
66 last_updated_by,
67 last_update_login,
68 object_version_number,
69 pretty_url_id,
70 additional_url_param,
71 system_url,
72 ctd_id,
73 track_url
74 ) VALUES (
75 DECODE( px_system_url_id, FND_API.g_miss_num, NULL, px_system_url_id),
76 DECODE( p_creation_date, FND_API.g_miss_date, NULL, p_creation_date),
77 DECODE( p_created_by, FND_API.g_miss_num, NULL, p_created_by),
78 DECODE( p_last_update_date, FND_API.g_miss_date, NULL, p_last_update_date),
79 DECODE( p_last_updated_by, FND_API.g_miss_num, NULL, p_last_updated_by),
80 DECODE( p_last_update_login, FND_API.g_miss_num, NULL, p_last_update_login),
81 DECODE( px_object_version_number, FND_API.g_miss_num, NULL, px_object_version_number),
82 DECODE( p_pretty_url_id, FND_API.g_miss_num, NULL, p_pretty_url_id),
83 DECODE( p_additional_url_param, FND_API.g_miss_char, NULL, p_additional_url_param),
84 DECODE( p_system_url, FND_API.g_miss_char, NULL, p_system_url),
85 DECODE( p_ctd_id, FND_API.g_miss_num, NULL, p_ctd_id),
86 DECODE( p_track_url, FND_API.g_miss_char, NULL, p_track_url));
87 END Insert_Row;
88
89
90 ----------------------------------------------------------
91 ---- MEDIA ----
92 ----------------------------------------------------------
93
94 -- ========================================================
95 --
96 -- NAME
97 -- createUpdateBody
98 --
99 -- PURPOSE
100 --
101 -- NOTES
102 --
103 -- HISTORY
104 --
105 -- ========================================================
106 PROCEDURE Update_Row(
107 p_system_url_id NUMBER,
108 p_creation_date DATE,
109 p_created_by NUMBER,
110 p_last_update_date DATE,
111 p_last_updated_by NUMBER,
112 p_last_update_login NUMBER,
113 p_object_version_number NUMBER,
114 p_pretty_url_id NUMBER,
115 p_additional_url_param VARCHAR2,
116 p_system_url VARCHAR2,
117 p_ctd_id NUMBER,
118 p_track_url VARCHAR2)
119
120 IS
121 BEGIN
122 Update AMS_SYSTEM_PRETTY_URL
123 SET
124 system_url_id = DECODE( p_system_url_id, FND_API.g_miss_num, system_url_id, p_system_url_id),
125 creation_date = DECODE( p_creation_date, FND_API.g_miss_date, creation_date, p_creation_date),
126 created_by = DECODE( p_created_by, FND_API.g_miss_num, created_by, p_created_by),
127 last_update_date = DECODE( p_last_update_date, FND_API.g_miss_date, last_update_date, p_last_update_date),
128 last_updated_by = DECODE( p_last_updated_by, FND_API.g_miss_num, last_updated_by, p_last_updated_by),
129 last_update_login = DECODE( p_last_update_login, FND_API.g_miss_num, last_update_login, p_last_update_login),
130 object_version_number = DECODE( p_object_version_number, FND_API.g_miss_num, object_version_number, p_object_version_number),
131 pretty_url_id = DECODE( p_pretty_url_id, FND_API.g_miss_num, pretty_url_id, p_pretty_url_id),
132 additional_url_param = DECODE( p_additional_url_param, FND_API.g_miss_char, additional_url_param, p_additional_url_param),
133 system_url = DECODE( p_system_url, FND_API.g_miss_char, system_url, p_system_url),
134 ctd_id = DECODE( p_ctd_id, FND_API.g_miss_num, ctd_id, p_ctd_id),
135 track_url = DECODE( p_track_url, FND_API.g_miss_char, track_url, p_track_url)
136 WHERE SYSTEM_URL_ID = p_SYSTEM_URL_ID
137 AND object_version_number = p_object_version_number;
138
139 IF (SQL%NOTFOUND) THEN
140 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
141 END IF;
142 END Update_Row;
143
144
145 ----------------------------------------------------------
146 ---- MEDIA ----
147 ----------------------------------------------------------
148
149 -- ========================================================
150 --
151 -- NAME
152 -- createDeleteBody
153 --
154 -- PURPOSE
155 --
156 -- NOTES
157 --
158 -- HISTORY
159 --
160 -- ========================================================
161 PROCEDURE Delete_Row(
162 p_SYSTEM_URL_ID NUMBER)
163 IS
164 BEGIN
165 DELETE FROM AMS_SYSTEM_PRETTY_URL
166 WHERE SYSTEM_URL_ID = p_SYSTEM_URL_ID;
167 If (SQL%NOTFOUND) then
168 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
169 End If;
170 END Delete_Row ;
171
172
173
174 ----------------------------------------------------------
175 ---- MEDIA ----
176 ----------------------------------------------------------
177
178 -- ========================================================
179 --
180 -- NAME
181 -- createLockBody
182 --
183 -- PURPOSE
184 --
185 -- NOTES
186 --
187 -- HISTORY
188 --
189 -- ========================================================
190 PROCEDURE Lock_Row(
191 p_system_url_id NUMBER,
192 p_creation_date DATE,
193 p_created_by NUMBER,
194 p_last_update_date DATE,
195 p_last_updated_by NUMBER,
196 p_last_update_login NUMBER,
197 p_object_version_number NUMBER,
198 p_pretty_url_id NUMBER,
199 p_additional_url_param VARCHAR2,
200 p_system_url VARCHAR2,
201 p_ctd_id NUMBER,
202 p_track_url VARCHAR2)
203
204 IS
205 CURSOR C IS
206 SELECT *
207 FROM AMS_SYSTEM_PRETTY_URL
208 WHERE SYSTEM_URL_ID = p_SYSTEM_URL_ID
209 FOR UPDATE of SYSTEM_URL_ID NOWAIT;
210 Recinfo C%ROWTYPE;
211 BEGIN
212 OPEN c;
213 FETCH c INTO Recinfo;
214 If (c%NOTFOUND) then
215 CLOSE c;
216 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
217 APP_EXCEPTION.RAISE_EXCEPTION;
218 END IF;
219 CLOSE C;
220 IF (
221 ( Recinfo.system_url_id = p_system_url_id)
222 AND ( ( Recinfo.creation_date = p_creation_date)
223 OR ( ( Recinfo.creation_date IS NULL )
224 AND ( p_creation_date IS NULL )))
225 AND ( ( Recinfo.created_by = p_created_by)
226 OR ( ( Recinfo.created_by IS NULL )
227 AND ( p_created_by IS NULL )))
228 AND ( ( Recinfo.last_update_date = p_last_update_date)
229 OR ( ( Recinfo.last_update_date IS NULL )
230 AND ( p_last_update_date IS NULL )))
231 AND ( ( Recinfo.last_updated_by = p_last_updated_by)
232 OR ( ( Recinfo.last_updated_by IS NULL )
233 AND ( p_last_updated_by IS NULL )))
234 AND ( ( Recinfo.last_update_login = p_last_update_login)
235 OR ( ( Recinfo.last_update_login IS NULL )
236 AND ( p_last_update_login IS NULL )))
237 AND ( ( Recinfo.object_version_number = p_object_version_number)
238 OR ( ( Recinfo.object_version_number IS NULL )
239 AND ( p_object_version_number IS NULL )))
240 AND ( ( Recinfo.pretty_url_id = p_pretty_url_id)
241 OR ( ( Recinfo.pretty_url_id IS NULL )
242 AND ( p_pretty_url_id IS NULL )))
243 AND ( ( Recinfo.additional_url_param = p_additional_url_param)
244 OR ( ( Recinfo.additional_url_param IS NULL )
245 AND ( p_additional_url_param IS NULL )))
246 AND ( ( Recinfo.system_url = p_system_url)
247 OR ( ( Recinfo.system_url IS NULL )
248 AND ( p_system_url IS NULL )))
249 AND ( ( Recinfo.ctd_id = p_ctd_id)
250 OR ( ( Recinfo.ctd_id IS NULL )
251 AND ( p_ctd_id IS NULL )))
252 AND ( ( Recinfo.track_url = p_track_url)
253 OR ( ( Recinfo.track_url IS NULL )
254 AND ( p_track_url IS NULL )))
255 ) THEN
256 RETURN;
257 ELSE
258 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
259 APP_EXCEPTION.RAISE_EXCEPTION;
260 END IF;
261 END Lock_Row;
262
263 END AMS_SYSTEM_PRETTY_URL_PKG;