[Home] [Help]
PACKAGE BODY: APPS.AMS_PRETTY_URL_ASSOC_PKG
Source
1 PACKAGE BODY AMS_PRETTY_URL_ASSOC_PKG as
2 /* $Header: amstpuab.pls 120.0 2005/07/01 03:56:27 appldev noship $ */
3 -- ===============================================================
4 -- Start of Comments
5 -- Package name
6 -- AMS_PRETTY_URL_ASSOC_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_PRETTY_URL_ASSOC_PKG';
18 G_FILE_NAME CONSTANT VARCHAR2(12) := 'amstpuab.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_assoc_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_system_url_id NUMBER,
46 p_used_by_obj_type VARCHAR2,
47 p_used_by_obj_id NUMBER)
48
49 IS
50 x_rowid VARCHAR2(30);
51
52
53 BEGIN
54
55
56 px_object_version_number := 1;
57
58
59 INSERT INTO AMS_PRETTY_URL_ASSOC(
60 assoc_id,
61 creation_date,
62 created_by,
63 last_update_date,
64 last_updated_by,
65 last_update_login,
66 object_version_number,
67 system_url_id,
68 used_by_obj_type,
69 used_by_obj_id
70 ) VALUES (
71 DECODE( px_assoc_id, FND_API.g_miss_num, NULL, px_assoc_id),
72 DECODE( p_creation_date, FND_API.g_miss_date, NULL, p_creation_date),
73 DECODE( p_created_by, FND_API.g_miss_num, NULL, p_created_by),
74 DECODE( p_last_update_date, FND_API.g_miss_date, NULL, p_last_update_date),
75 DECODE( p_last_updated_by, FND_API.g_miss_num, NULL, p_last_updated_by),
76 DECODE( p_last_update_login, FND_API.g_miss_num, NULL, p_last_update_login),
77 DECODE( px_object_version_number, FND_API.g_miss_num, NULL, px_object_version_number),
78 DECODE( p_system_url_id, FND_API.g_miss_num, NULL, p_system_url_id),
79 DECODE( p_used_by_obj_type, FND_API.g_miss_char, NULL, p_used_by_obj_type),
80 DECODE( p_used_by_obj_id, FND_API.g_miss_num, NULL, p_used_by_obj_id));
81 END Insert_Row;
82
83
84 ----------------------------------------------------------
85 ---- MEDIA ----
86 ----------------------------------------------------------
87
88 -- ========================================================
89 --
90 -- NAME
91 -- createUpdateBody
92 --
93 -- PURPOSE
94 --
95 -- NOTES
96 --
97 -- HISTORY
98 --
99 -- ========================================================
100 PROCEDURE Update_Row(
101 p_assoc_id NUMBER,
102 p_creation_date DATE,
103 p_created_by NUMBER,
104 p_last_update_date DATE,
105 p_last_updated_by NUMBER,
106 p_last_update_login NUMBER,
107 p_object_version_number NUMBER,
108 p_system_url_id NUMBER,
109 p_used_by_obj_type VARCHAR2,
110 p_used_by_obj_id NUMBER)
111
112 IS
113 BEGIN
114 Update AMS_PRETTY_URL_ASSOC
115 SET
116 assoc_id = DECODE( p_assoc_id, FND_API.g_miss_num, assoc_id, p_assoc_id),
117 creation_date = DECODE( p_creation_date, FND_API.g_miss_date, creation_date, p_creation_date),
118 created_by = DECODE( p_created_by, FND_API.g_miss_num, created_by, p_created_by),
119 last_update_date = DECODE( p_last_update_date, FND_API.g_miss_date, last_update_date, p_last_update_date),
120 last_updated_by = DECODE( p_last_updated_by, FND_API.g_miss_num, last_updated_by, p_last_updated_by),
121 last_update_login = DECODE( p_last_update_login, FND_API.g_miss_num, last_update_login, p_last_update_login),
122 object_version_number = DECODE( p_object_version_number, FND_API.g_miss_num, object_version_number, p_object_version_number),
123 system_url_id = DECODE( p_system_url_id, FND_API.g_miss_num, system_url_id, p_system_url_id),
124 used_by_obj_type = DECODE( p_used_by_obj_type, FND_API.g_miss_char, used_by_obj_type, p_used_by_obj_type),
125 used_by_obj_id = DECODE( p_used_by_obj_id, FND_API.g_miss_num, used_by_obj_id, p_used_by_obj_id)
126 WHERE ASSOC_ID = p_ASSOC_ID
127 AND object_version_number = p_object_version_number;
128
129 IF (SQL%NOTFOUND) THEN
130 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
131 END IF;
132 END Update_Row;
133
134
135 ----------------------------------------------------------
136 ---- MEDIA ----
137 ----------------------------------------------------------
138
139 -- ========================================================
140 --
141 -- NAME
142 -- createDeleteBody
143 --
144 -- PURPOSE
145 --
146 -- NOTES
147 --
148 -- HISTORY
149 --
150 -- ========================================================
151 PROCEDURE Delete_Row(
152 p_ASSOC_ID NUMBER)
153 IS
154 BEGIN
155 DELETE FROM AMS_PRETTY_URL_ASSOC
156 WHERE ASSOC_ID = p_ASSOC_ID;
157 If (SQL%NOTFOUND) then
158 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159 End If;
160 END Delete_Row ;
161
162
163
164 ----------------------------------------------------------
165 ---- MEDIA ----
166 ----------------------------------------------------------
167
168 -- ========================================================
169 --
170 -- NAME
171 -- createLockBody
172 --
173 -- PURPOSE
174 --
175 -- NOTES
176 --
177 -- HISTORY
178 --
179 -- ========================================================
180 PROCEDURE Lock_Row(
181 p_assoc_id NUMBER,
182 p_creation_date DATE,
183 p_created_by NUMBER,
184 p_last_update_date DATE,
185 p_last_updated_by NUMBER,
186 p_last_update_login NUMBER,
187 p_object_version_number NUMBER,
188 p_system_url_id NUMBER,
189 p_used_by_obj_type VARCHAR2,
190 p_used_by_obj_id NUMBER)
191
192 IS
193 CURSOR C IS
194 SELECT *
195 FROM AMS_PRETTY_URL_ASSOC
196 WHERE ASSOC_ID = p_ASSOC_ID
197 FOR UPDATE of ASSOC_ID NOWAIT;
198 Recinfo C%ROWTYPE;
199 BEGIN
200 OPEN c;
201 FETCH c INTO Recinfo;
202 If (c%NOTFOUND) then
203 CLOSE c;
204 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
205 APP_EXCEPTION.RAISE_EXCEPTION;
206 END IF;
207 CLOSE C;
208 IF (
209 ( Recinfo.assoc_id = p_assoc_id)
210 AND ( ( Recinfo.creation_date = p_creation_date)
211 OR ( ( Recinfo.creation_date IS NULL )
212 AND ( p_creation_date IS NULL )))
213 AND ( ( Recinfo.created_by = p_created_by)
214 OR ( ( Recinfo.created_by IS NULL )
215 AND ( p_created_by IS NULL )))
216 AND ( ( Recinfo.last_update_date = p_last_update_date)
217 OR ( ( Recinfo.last_update_date IS NULL )
218 AND ( p_last_update_date IS NULL )))
219 AND ( ( Recinfo.last_updated_by = p_last_updated_by)
220 OR ( ( Recinfo.last_updated_by IS NULL )
221 AND ( p_last_updated_by IS NULL )))
222 AND ( ( Recinfo.last_update_login = p_last_update_login)
223 OR ( ( Recinfo.last_update_login IS NULL )
224 AND ( p_last_update_login IS NULL )))
225 AND ( ( Recinfo.object_version_number = p_object_version_number)
226 OR ( ( Recinfo.object_version_number IS NULL )
227 AND ( p_object_version_number IS NULL )))
228 AND ( ( Recinfo.system_url_id = p_system_url_id)
229 OR ( ( Recinfo.system_url_id IS NULL )
230 AND ( p_system_url_id IS NULL )))
231 AND ( ( Recinfo.used_by_obj_type = p_used_by_obj_type)
232 OR ( ( Recinfo.used_by_obj_type IS NULL )
233 AND ( p_used_by_obj_type IS NULL )))
234 AND ( ( Recinfo.used_by_obj_id = p_used_by_obj_id)
235 OR ( ( Recinfo.used_by_obj_id IS NULL )
236 AND ( p_used_by_obj_id IS NULL )))
237 ) THEN
238 RETURN;
239 ELSE
240 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_CHANGED');
241 APP_EXCEPTION.RAISE_EXCEPTION;
242 END IF;
243 END Lock_Row;
244
245 END AMS_PRETTY_URL_ASSOC_PKG;