[Home] [Help]
PACKAGE BODY: APPS.JTF_TERR_TYPES_PKG
Source
1 PACKAGE BODY JTF_TERR_TYPES_PKG as
2 /* $Header: jtfvtrtb.pls 120.1 2005/06/24 00:26:19 jradhakr ship $ */
3
4 -- 01/20/00 VNEDUNGA Changing the update/lock_row procedure to use
5 -- terr_type_id instead of row_id
6 -- 02/17/00 VNEDUNGA Adding ORG_ID to the table handler procedures
7 -- 02/24/00 vnedunga fixing decode for date fields
8 PROCEDURE Insert_Row(
9 x_Rowid IN OUT NOCOPY VARCHAR2,
10 x_TERR_TYPE_ID IN OUT NOCOPY NUMBER,
11 x_LAST_UPDATED_BY IN NUMBER,
12 x_LAST_UPDATE_DATE IN DATE,
13 x_CREATED_BY IN NUMBER,
14 x_CREATION_DATE IN DATE,
15 x_LAST_UPDATE_LOGIN IN NUMBER,
16 x_APPLICATION_SHORT_NAME IN VARCHAR2,
17 x_NAME IN VARCHAR2,
18 x_ENABLED_FLAG IN VARCHAR2,
19 x_DESCRIPTION IN VARCHAR2,
20 x_START_DATE_ACTIVE IN DATE,
21 x_END_DATE_ACTIVE IN DATE,
22 x_ATTRIBUTE_CATEGORY IN VARCHAR2,
23 x_ATTRIBUTE1 IN VARCHAR2,
24 x_ATTRIBUTE2 IN VARCHAR2,
25 x_ATTRIBUTE3 IN VARCHAR2,
26 x_ATTRIBUTE4 IN VARCHAR2,
27 x_ATTRIBUTE5 IN VARCHAR2,
28 x_ATTRIBUTE6 IN VARCHAR2,
29 x_ATTRIBUTE7 IN VARCHAR2,
30 x_ATTRIBUTE8 IN VARCHAR2,
31 x_ATTRIBUTE9 IN VARCHAR2,
32 x_ATTRIBUTE10 IN VARCHAR2,
33 x_ATTRIBUTE11 IN VARCHAR2,
34 x_ATTRIBUTE12 IN VARCHAR2,
35 x_ATTRIBUTE13 IN VARCHAR2,
36 x_ATTRIBUTE14 IN VARCHAR2,
37 x_ATTRIBUTE15 IN VARCHAR2,
38 x_ORG_ID IN NUMBER
39 ) IS
40 CURSOR C IS SELECT rowid FROM JTF_TERR_TYPES
41 WHERE TERR_TYPE_ID = x_TERR_TYPE_ID;
42 CURSOR C2 IS SELECT JTF_TERR_TYPES_s.nextval FROM sys.dual;
43 BEGIN
44 If (x_TERR_TYPE_ID IS NULL) then
45 OPEN C2;
46 FETCH C2 INTO x_TERR_TYPE_ID;
47 CLOSE C2;
48 End If;
49 INSERT INTO JTF_TERR_TYPES(
50 TERR_TYPE_ID,
51 LAST_UPDATED_BY,
52 LAST_UPDATE_DATE,
53 CREATED_BY,
54 CREATION_DATE,
55 LAST_UPDATE_LOGIN,
56 APPLICATION_SHORT_NAME,
57 NAME,
58 ENABLED_FLAG,
59 DESCRIPTION,
60 START_DATE_ACTIVE,
61 END_DATE_ACTIVE,
62 ATTRIBUTE_CATEGORY,
63 ATTRIBUTE1,
64 ATTRIBUTE2,
65 ATTRIBUTE3,
66 ATTRIBUTE4,
67 ATTRIBUTE5,
68 ATTRIBUTE6,
69 ATTRIBUTE7,
70 ATTRIBUTE8,
71 ATTRIBUTE9,
72 ATTRIBUTE10,
73 ATTRIBUTE11,
74 ATTRIBUTE12,
75 ATTRIBUTE13,
76 ATTRIBUTE14,
77 ATTRIBUTE15,
78 ORG_ID
79 ) VALUES (
80 x_TERR_TYPE_ID,
81 decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATED_BY),
82 decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_LAST_UPDATE_DATE),
83 decode( x_CREATED_BY, FND_API.G_MISS_NUM, NULL,x_CREATED_BY),
84 decode( x_CREATION_DATE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_CREATION_DATE),
85 decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM, NULL,x_LAST_UPDATE_LOGIN),
86 decode( x_APPLICATION_SHORT_NAME, FND_API.G_MISS_CHAR, NULL,x_APPLICATION_SHORT_NAME),
87 decode( x_NAME, FND_API.G_MISS_CHAR, NULL,x_NAME),
88 decode( x_ENABLED_FLAG, FND_API.G_MISS_CHAR, NULL,x_ENABLED_FLAG),
89 decode( x_DESCRIPTION, FND_API.G_MISS_CHAR, NULL,x_DESCRIPTION),
90 decode( x_START_DATE_ACTIVE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_START_DATE_ACTIVE),
91 decode( x_END_DATE_ACTIVE, FND_API.G_MISS_DATE, TO_DATE(NULL),x_END_DATE_ACTIVE),
92 decode( x_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE_CATEGORY),
93 decode( x_ATTRIBUTE1, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE1),
94 decode( x_ATTRIBUTE2, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE2),
95 decode( x_ATTRIBUTE3, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE3),
96 decode( x_ATTRIBUTE4, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE4),
97 decode( x_ATTRIBUTE5, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE5),
98 decode( x_ATTRIBUTE6, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE6),
99 decode( x_ATTRIBUTE7, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE7),
100 decode( x_ATTRIBUTE8, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE8),
101 decode( x_ATTRIBUTE9, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE9),
102 decode( x_ATTRIBUTE10, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE10),
103 decode( x_ATTRIBUTE11, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE11),
104 decode( x_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE12),
105 decode( x_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE13),
106 decode( x_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE14),
107 decode( x_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL,x_ATTRIBUTE15),
108 decode( x_ORG_ID, FND_API.G_MISS_NUM, NULL, x_ORG_ID) );
109 OPEN C;
110 FETCH C INTO x_Rowid;
111 If (C%NOTFOUND) then
112 CLOSE C;
113 RAISE NO_DATA_FOUND;
114 End If;
115 End Insert_Row;
116
117
118
119 PROCEDURE Delete_Row( x_TERR_TYPE_ID IN NUMBER
120 ) IS
121 BEGIN
122 DELETE FROM JTF_TERR_TYPES
123 WHERE TERR_TYPE_ID = x_TERR_TYPE_ID;
124 If (SQL%NOTFOUND) then
125 RAISE NO_DATA_FOUND;
126 End If;
127 END Delete_Row;
128
129
130
131 PROCEDURE Update_Row(
132 x_Rowid IN VARCHAR2,
133 x_TERR_TYPE_ID IN NUMBER,
134 x_LAST_UPDATED_BY IN NUMBER,
135 x_LAST_UPDATE_DATE IN DATE,
136 x_CREATED_BY IN NUMBER,
137 x_CREATION_DATE IN DATE,
138 x_LAST_UPDATE_LOGIN IN NUMBER,
139 x_APPLICATION_SHORT_NAME IN VARCHAR2,
140 x_NAME IN VARCHAR2,
141 x_ENABLED_FLAG IN VARCHAR2,
142 x_DESCRIPTION IN VARCHAR2,
143 x_START_DATE_ACTIVE IN DATE,
144 x_END_DATE_ACTIVE IN DATE,
145 x_ATTRIBUTE_CATEGORY IN VARCHAR2,
146 x_ATTRIBUTE1 IN VARCHAR2,
147 x_ATTRIBUTE2 IN VARCHAR2,
148 x_ATTRIBUTE3 IN VARCHAR2,
149 x_ATTRIBUTE4 IN VARCHAR2,
150 x_ATTRIBUTE5 IN VARCHAR2,
151 x_ATTRIBUTE6 IN VARCHAR2,
152 x_ATTRIBUTE7 IN VARCHAR2,
153 x_ATTRIBUTE8 IN VARCHAR2,
154 x_ATTRIBUTE9 IN VARCHAR2,
155 x_ATTRIBUTE10 IN VARCHAR2,
156 x_ATTRIBUTE11 IN VARCHAR2,
157 x_ATTRIBUTE12 IN VARCHAR2,
158 x_ATTRIBUTE13 IN VARCHAR2,
159 x_ATTRIBUTE14 IN VARCHAR2,
160 x_ATTRIBUTE15 IN VARCHAR2,
161 x_ORG_ID IN NUMBER
162 ) IS
163 BEGIN
164 Update JTF_TERR_TYPES
165 SET
166 TERR_TYPE_ID = decode( x_TERR_TYPE_ID, FND_API.G_MISS_NUM,TERR_TYPE_ID,x_TERR_TYPE_ID),
167 LAST_UPDATED_BY = decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM,LAST_UPDATED_BY,x_LAST_UPDATED_BY),
168 LAST_UPDATE_DATE = decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE,LAST_UPDATE_DATE,x_LAST_UPDATE_DATE),
169 CREATED_BY = decode( x_CREATED_BY, FND_API.G_MISS_NUM,CREATED_BY,x_CREATED_BY),
170 CREATION_DATE = decode( x_CREATION_DATE, FND_API.G_MISS_DATE,CREATION_DATE,x_CREATION_DATE),
171 LAST_UPDATE_LOGIN = decode( x_LAST_UPDATE_LOGIN, FND_API.G_MISS_NUM,LAST_UPDATE_LOGIN,x_LAST_UPDATE_LOGIN),
172 APPLICATION_SHORT_NAME = decode( x_APPLICATION_SHORT_NAME, FND_API.G_MISS_CHAR,APPLICATION_SHORT_NAME,x_APPLICATION_SHORT_NAME),
173 NAME = decode( x_NAME, FND_API.G_MISS_CHAR,NAME,x_NAME),
174 ENABLED_FLAG = decode( x_ENABLED_FLAG, FND_API.G_MISS_CHAR,ENABLED_FLAG,x_ENABLED_FLAG),
175 DESCRIPTION = decode( x_DESCRIPTION, FND_API.G_MISS_CHAR,DESCRIPTION,x_DESCRIPTION),
176 START_DATE_ACTIVE = decode( x_START_DATE_ACTIVE, FND_API.G_MISS_DATE,START_DATE_ACTIVE,x_START_DATE_ACTIVE),
177 END_DATE_ACTIVE = decode( x_END_DATE_ACTIVE, FND_API.G_MISS_DATE,END_DATE_ACTIVE,x_END_DATE_ACTIVE),
178 ATTRIBUTE_CATEGORY = decode( x_ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR,ATTRIBUTE_CATEGORY,x_ATTRIBUTE_CATEGORY),
179 ATTRIBUTE1 = decode( x_ATTRIBUTE1, FND_API.G_MISS_CHAR,ATTRIBUTE1,x_ATTRIBUTE1),
180 ATTRIBUTE2 = decode( x_ATTRIBUTE2, FND_API.G_MISS_CHAR,ATTRIBUTE2,x_ATTRIBUTE2),
181 ATTRIBUTE3 = decode( x_ATTRIBUTE3, FND_API.G_MISS_CHAR,ATTRIBUTE3,x_ATTRIBUTE3),
182 ATTRIBUTE4 = decode( x_ATTRIBUTE4, FND_API.G_MISS_CHAR,ATTRIBUTE4,x_ATTRIBUTE4),
183 ATTRIBUTE5 = decode( x_ATTRIBUTE5, FND_API.G_MISS_CHAR,ATTRIBUTE5,x_ATTRIBUTE5),
184 ATTRIBUTE6 = decode( x_ATTRIBUTE6, FND_API.G_MISS_CHAR,ATTRIBUTE6,x_ATTRIBUTE6),
185 ATTRIBUTE7 = decode( x_ATTRIBUTE7, FND_API.G_MISS_CHAR,ATTRIBUTE7,x_ATTRIBUTE7),
186 ATTRIBUTE8 = decode( x_ATTRIBUTE8, FND_API.G_MISS_CHAR,ATTRIBUTE8,x_ATTRIBUTE8),
187 ATTRIBUTE9 = decode( x_ATTRIBUTE9, FND_API.G_MISS_CHAR,ATTRIBUTE9,x_ATTRIBUTE9),
188 ATTRIBUTE10 = decode( x_ATTRIBUTE10, FND_API.G_MISS_CHAR,ATTRIBUTE10,x_ATTRIBUTE10),
189 ATTRIBUTE11 = decode( x_ATTRIBUTE11, FND_API.G_MISS_CHAR,ATTRIBUTE11,x_ATTRIBUTE11),
190 ATTRIBUTE12 = decode( x_ATTRIBUTE12, FND_API.G_MISS_CHAR,ATTRIBUTE12,x_ATTRIBUTE12),
191 ATTRIBUTE13 = decode( x_ATTRIBUTE13, FND_API.G_MISS_CHAR,ATTRIBUTE13,x_ATTRIBUTE13),
192 ATTRIBUTE14 = decode( x_ATTRIBUTE14, FND_API.G_MISS_CHAR,ATTRIBUTE14,x_ATTRIBUTE14),
193 ATTRIBUTE15 = decode( x_ATTRIBUTE15, FND_API.G_MISS_CHAR,ATTRIBUTE15,x_ATTRIBUTE15),
194 ORG_ID = decode( x_ORG_ID, FND_API.G_MISS_NUM, ORG_ID, x_ORG_ID)
195 where TERR_TYPE_ID = X_TERR_TYPE_ID;
196
197 If (SQL%NOTFOUND) then
198 RAISE NO_DATA_FOUND;
199 End If;
200 END Update_Row;
201
202
203
204 PROCEDURE Lock_Row(
205 x_Rowid IN VARCHAR2,
206 x_TERR_TYPE_ID IN NUMBER,
207 x_LAST_UPDATED_BY IN NUMBER,
208 x_LAST_UPDATE_DATE IN DATE,
209 x_CREATED_BY IN NUMBER,
210 x_CREATION_DATE IN DATE,
211 x_LAST_UPDATE_LOGIN IN NUMBER,
212 x_APPLICATION_SHORT_NAME IN VARCHAR2,
213 x_NAME IN VARCHAR2,
214 x_ENABLED_FLAG IN VARCHAR2,
215 x_DESCRIPTION IN VARCHAR2,
216 x_START_DATE_ACTIVE IN DATE,
217 x_END_DATE_ACTIVE IN DATE,
218 x_ATTRIBUTE_CATEGORY IN VARCHAR2,
219 x_ATTRIBUTE1 IN VARCHAR2,
220 x_ATTRIBUTE2 IN VARCHAR2,
221 x_ATTRIBUTE3 IN VARCHAR2,
222 x_ATTRIBUTE4 IN VARCHAR2,
223 x_ATTRIBUTE5 IN VARCHAR2,
224 x_ATTRIBUTE6 IN VARCHAR2,
225 x_ATTRIBUTE7 IN VARCHAR2,
226 x_ATTRIBUTE8 IN VARCHAR2,
227 x_ATTRIBUTE9 IN VARCHAR2,
228 x_ATTRIBUTE10 IN VARCHAR2,
229 x_ATTRIBUTE11 IN VARCHAR2,
230 x_ATTRIBUTE12 IN VARCHAR2,
231 x_ATTRIBUTE13 IN VARCHAR2,
232 x_ATTRIBUTE14 IN VARCHAR2,
233 x_ATTRIBUTE15 IN VARCHAR2,
234 x_ORG_ID IN NUMBER
235 ) IS
236 CURSOR C IS
237 SELECT *
238 FROM JTF_TERR_TYPES
239 WHERE TERR_TYPE_ID = x_TERR_TYPE_ID
240 FOR UPDATE of TERR_TYPE_ID NOWAIT;
241 Recinfo C%ROWTYPE;
242 BEGIN
243 OPEN C;
244 FETCH C INTO Recinfo;
245 If (C%NOTFOUND) then
246 CLOSE C;
247 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
248 APP_EXCEPTION.RAISE_EXCEPTION;
249 End If;
250 CLOSE C;
251 if (
252 ( ( Recinfo.TERR_TYPE_ID = x_TERR_TYPE_ID)
253 OR ( ( Recinfo.TERR_TYPE_ID IS NULL )
254 AND ( x_TERR_TYPE_ID IS NULL )))
255 AND ( ( Recinfo.LAST_UPDATED_BY = x_LAST_UPDATED_BY)
256 OR ( ( Recinfo.LAST_UPDATED_BY IS NULL )
257 AND ( x_LAST_UPDATED_BY IS NULL )))
258 AND ( ( Recinfo.LAST_UPDATE_DATE = x_LAST_UPDATE_DATE)
259 OR ( ( Recinfo.LAST_UPDATE_DATE IS NULL )
260 AND ( x_LAST_UPDATE_DATE IS NULL )))
261 AND ( ( Recinfo.CREATED_BY = x_CREATED_BY)
262 OR ( ( Recinfo.CREATED_BY IS NULL )
263 AND ( x_CREATED_BY IS NULL )))
264 AND ( ( Recinfo.CREATION_DATE = x_CREATION_DATE)
265 OR ( ( Recinfo.CREATION_DATE IS NULL )
266 AND ( x_CREATION_DATE IS NULL )))
267 AND ( ( Recinfo.LAST_UPDATE_LOGIN = x_LAST_UPDATE_LOGIN)
268 OR ( ( Recinfo.LAST_UPDATE_LOGIN IS NULL )
269 AND ( x_LAST_UPDATE_LOGIN IS NULL )))
270 AND ( ( Recinfo.APPLICATION_SHORT_NAME = x_APPLICATION_SHORT_NAME)
271 OR ( ( Recinfo.APPLICATION_SHORT_NAME IS NULL )
272 AND ( x_APPLICATION_SHORT_NAME IS NULL )))
273 AND ( ( Recinfo.NAME = x_NAME)
274 OR ( ( Recinfo.NAME IS NULL )
275 AND ( x_NAME IS NULL )))
276 AND ( ( Recinfo.ENABLED_FLAG = x_ENABLED_FLAG)
277 OR ( ( Recinfo.ENABLED_FLAG IS NULL )
278 AND ( x_ENABLED_FLAG IS NULL )))
279 AND ( ( Recinfo.DESCRIPTION = x_DESCRIPTION)
280 OR ( ( Recinfo.DESCRIPTION IS NULL )
281 AND ( x_DESCRIPTION IS NULL )))
282 AND ( ( Recinfo.START_DATE_ACTIVE = x_START_DATE_ACTIVE)
283 OR ( ( Recinfo.START_DATE_ACTIVE IS NULL )
284 AND ( x_START_DATE_ACTIVE IS NULL )))
285 AND ( ( Recinfo.END_DATE_ACTIVE = x_END_DATE_ACTIVE)
286 OR ( ( Recinfo.END_DATE_ACTIVE IS NULL )
287 AND ( x_END_DATE_ACTIVE IS NULL )))
288 AND ( ( Recinfo.ATTRIBUTE_CATEGORY = x_ATTRIBUTE_CATEGORY)
289 OR ( ( Recinfo.ATTRIBUTE_CATEGORY IS NULL )
290 AND ( x_ATTRIBUTE_CATEGORY IS NULL )))
291 AND ( ( Recinfo.ATTRIBUTE1 = x_ATTRIBUTE1)
292 OR ( ( Recinfo.ATTRIBUTE1 IS NULL )
293 AND ( x_ATTRIBUTE1 IS NULL )))
294 AND ( ( Recinfo.ATTRIBUTE2 = x_ATTRIBUTE2)
295 OR ( ( Recinfo.ATTRIBUTE2 IS NULL )
296 AND ( x_ATTRIBUTE2 IS NULL )))
300 AND ( ( Recinfo.ATTRIBUTE4 = x_ATTRIBUTE4)
297 AND ( ( Recinfo.ATTRIBUTE3 = x_ATTRIBUTE3)
298 OR ( ( Recinfo.ATTRIBUTE3 IS NULL )
299 AND ( x_ATTRIBUTE3 IS NULL )))
301 OR ( ( Recinfo.ATTRIBUTE4 IS NULL )
302 AND ( x_ATTRIBUTE4 IS NULL )))
303 AND ( ( Recinfo.ATTRIBUTE5 = x_ATTRIBUTE5)
304 OR ( ( Recinfo.ATTRIBUTE5 IS NULL )
305 AND ( x_ATTRIBUTE5 IS NULL )))
306 AND ( ( Recinfo.ATTRIBUTE6 = x_ATTRIBUTE6)
307 OR ( ( Recinfo.ATTRIBUTE6 IS NULL )
308 AND ( x_ATTRIBUTE6 IS NULL )))
309 AND ( ( Recinfo.ATTRIBUTE7 = x_ATTRIBUTE7)
310 OR ( ( Recinfo.ATTRIBUTE7 IS NULL )
311 AND ( x_ATTRIBUTE7 IS NULL )))
312 AND ( ( Recinfo.ATTRIBUTE8 = x_ATTRIBUTE8)
313 OR ( ( Recinfo.ATTRIBUTE8 IS NULL )
314 AND ( x_ATTRIBUTE8 IS NULL )))
315 AND ( ( Recinfo.ATTRIBUTE9 = x_ATTRIBUTE9)
316 OR ( ( Recinfo.ATTRIBUTE9 IS NULL )
317 AND ( x_ATTRIBUTE9 IS NULL )))
318 AND ( ( Recinfo.ATTRIBUTE10 = x_ATTRIBUTE10)
319 OR ( ( Recinfo.ATTRIBUTE10 IS NULL )
320 AND ( x_ATTRIBUTE10 IS NULL )))
321 AND ( ( Recinfo.ATTRIBUTE11 = x_ATTRIBUTE11)
322 OR ( ( Recinfo.ATTRIBUTE11 IS NULL )
323 AND ( x_ATTRIBUTE11 IS NULL )))
324 AND ( ( Recinfo.ATTRIBUTE12 = x_ATTRIBUTE12)
325 OR ( ( Recinfo.ATTRIBUTE12 IS NULL )
326 AND ( x_ATTRIBUTE12 IS NULL )))
327 AND ( ( Recinfo.ATTRIBUTE13 = x_ATTRIBUTE13)
328 OR ( ( Recinfo.ATTRIBUTE13 IS NULL )
329 AND ( x_ATTRIBUTE13 IS NULL )))
330 AND ( ( Recinfo.ATTRIBUTE14 = x_ATTRIBUTE14)
331 OR ( ( Recinfo.ATTRIBUTE14 IS NULL )
332 AND ( x_ATTRIBUTE14 IS NULL )))
333 AND ( ( Recinfo.ATTRIBUTE15 = x_ATTRIBUTE15)
334 OR ( ( Recinfo.ATTRIBUTE15 IS NULL )
335 AND ( x_ATTRIBUTE15 IS NULL )))
336 AND ( ( Recinfo.ORG_ID = x_ORG_ID)
337 OR ( ( Recinfo.ORG_ID IS NULL )
338 AND ( x_ORG_ID IS NULL )))
339 ) then
340 return;
341 else
342 FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');
343 APP_EXCEPTION.RAISE_EXCEPTION;
344 End If;
345 END Lock_Row;
346
347 END JTF_TERR_TYPES_PKG;