[Home] [Help]
PACKAGE BODY: APPS.PNT_ADDR_PKG
Source
1 PACKAGE BODY PNT_ADDR_PKG AS
2 -- $Header: PNTADDRB.pls 120.2 2005/08/02 06:18:06 appldev ship $
3
4 /*=============================================================================+
5 | PROCEDURE : INSERT_row
6 | DESCRIPTION : INSERTs a row in pn_addresses_all
7 | SCOPE : PUBLIC
8 | INVOKED FROM :
9 | ARGUMENTS : IN : x_address_id, x_address_line1, x_address_line2,
10 | x_address_line3, x_address_line4, x_county, x_city,
11 | x_state, x_province, x_zip_code, x_country
12 | x_territORy_id, x_lASt_UPDATE_date
13 | x_lASt_UPDATEd_by, x_creation_date
14 | x_created_by, x_lASt_UPDATE_login
15 | x_attribute_categORy, x_attribute1, x_attribute2,
16 | x_attribute3, x_attribute4 , x_attribute5, x_attribute6
17 | x_attribute7, x_attribute8, x_attribute9, x_attribute10
18 | x_attribute11, x_attribute12, x_attribute13,
19 | x_attribute14, x_attribute15,x_addr_attribute_categORy,
20 | x_addr_attribute1,x_addr_attribute2, x_addr_attribute3,
21 | x_addr_attribute4, x_addr_attribute5, x_addr_attribute6,
22 | x_addr_attribute7, x_addr_attribute8, x_addr_attribute9,
23 | x_addr_attribute10, x_addr_attribute11, x_addr_attribute12,
24 | x_addr_attribute13, x_addr_attribute14, x_addr_attribute15
25 | AND x_ORg_id
26 | OUT : NONE
27 | RETURNS : NONE
28 | HISTORY :
29 | 28-APR-05 : piagrawa o ModIFied the SELECT statements to retrieve VALUES
30 | FROM pn_addresses_all instead of pn_addresses
31 +=============================================================================*/
32 PROCEDURE INSERT_row ( x_address_id IN OUT NOCOPY NUMBER,
33 x_address_line1 VARCHAR2,
34 x_address_line2 VARCHAR2,
35 x_address_line3 VARCHAR2,
36 x_address_line4 VARCHAR2,
37 x_county VARCHAR2,
38 x_city VARCHAR2,
39 x_state VARCHAR2,
40 x_province VARCHAR2,
41 x_zip_code VARCHAR2,
42 x_country VARCHAR2,
43 x_territORy_id NUMBER,
44 x_lASt_UPDATE_date DATE,
45 x_lASt_UPDATEd_by NUMBER,
46 x_creation_date DATE,
47 x_created_by NUMBER,
48 x_lASt_UPDATE_login NUMBER,
49 x_attribute_categORy VARCHAR2,
50 x_attribute1 VARCHAR2,
51 x_attribute2 VARCHAR2,
52 x_attribute3 VARCHAR2,
53 x_attribute4 VARCHAR2,
54 x_attribute5 VARCHAR2,
55 x_attribute6 VARCHAR2,
56 x_attribute7 VARCHAR2,
57 x_attribute8 VARCHAR2,
58 x_attribute9 VARCHAR2,
59 x_attribute10 VARCHAR2,
60 x_attribute11 VARCHAR2,
61 x_attribute12 VARCHAR2,
62 x_attribute13 VARCHAR2,
63 x_attribute14 VARCHAR2,
64 x_attribute15 VARCHAR2,
65 x_addr_attribute_categORy VARCHAR2,
66 x_addr_attribute1 VARCHAR2,
67 x_addr_attribute2 VARCHAR2,
68 x_addr_attribute3 VARCHAR2,
69 x_addr_attribute4 VARCHAR2,
70 x_addr_attribute5 VARCHAR2,
71 x_addr_attribute6 VARCHAR2,
72 x_addr_attribute7 VARCHAR2,
73 x_addr_attribute8 VARCHAR2,
74 x_addr_attribute9 VARCHAR2,
75 x_addr_attribute10 VARCHAR2,
76 x_addr_attribute11 VARCHAR2,
77 x_addr_attribute12 VARCHAR2,
78 x_addr_attribute13 VARCHAR2,
79 x_addr_attribute14 VARCHAR2,
80 x_addr_attribute15 VARCHAR2,
81 x_ORg_id NUMBER
82 ) IS
83 CURSOR ADDR IS
84 SELECT address_id
85 FROM pn_addresses_all
86 WHERE address_id = x_address_id;
87
88 BEGIN
89
90 -----------------------------------------------------------------
91 -- Allocate the sequence to the primary key address_id
92 -----------------------------------------------------------------
93 SELECT pn_addresses_s.nextval
94 INTO x_address_id
95 FROM dual;
96
97 INSERT INTO pn_addresses_all ( address_id,
98 address_line1,
99 address_line2,
100 address_line3,
101 address_line4,
102 county,
103 city,
104 state,
105 province,
106 zip_code,
107 country,
108 territORy_id,
109 lASt_UPDATE_date,
110 lASt_UPDATEd_by,
111 creation_date,
112 created_by,
113 lASt_UPDATE_login,
114 attribute_categORy,
115 attribute1,
116 attribute2,
117 attribute3,
118 attribute4,
119 attribute5,
120 attribute6,
121 attribute7,
122 attribute8,
123 attribute9,
124 attribute10,
125 attribute11,
126 attribute12,
127 attribute13,
128 attribute14,
129 attribute15,
130 addr_attribute_categORy,
131 addr_attribute1,
132 addr_attribute2,
133 addr_attribute3,
134 addr_attribute4,
135 addr_attribute5,
136 addr_attribute6,
137 addr_attribute7,
138 addr_attribute8,
139 addr_attribute9,
140 addr_attribute10,
141 addr_attribute11,
142 addr_attribute12,
143 addr_attribute13,
144 addr_attribute14,
145 addr_attribute15,
146 ORg_id
147 )
148 VALUES
149 (
150 x_address_id,
151 x_address_line1,
152 x_address_line2,
153 x_address_line3,
154 x_address_line4,
155 x_county,
156 x_city,
157 x_state,
158 x_province,
159 x_zip_code,
160 x_country,
161 x_territORy_id,
162 x_lASt_UPDATE_date,
163 x_lASt_UPDATEd_by,
164 x_creation_date,
165 x_created_by,
166 x_lASt_UPDATE_login,
167 x_attribute_categORy,
168 x_attribute1,
169 x_attribute2,
170 x_attribute3,
171 x_attribute4,
172 x_attribute5,
173 x_attribute6,
174 x_attribute7,
175 x_attribute8,
176 x_attribute9,
177 x_attribute10,
178 x_attribute11,
179 x_attribute12,
180 x_attribute13,
181 x_attribute14,
182 x_attribute15,
183 x_addr_attribute_categORy,
184 x_addr_attribute1,
185 x_addr_attribute2,
186 x_addr_attribute3,
187 x_addr_attribute4,
188 x_addr_attribute5,
189 x_addr_attribute6,
190 x_addr_attribute7,
191 x_addr_attribute8,
192 x_addr_attribute9,
193 x_addr_attribute10,
194 x_addr_attribute11,
195 x_addr_attribute12,
196 x_addr_attribute13,
197 x_addr_attribute14,
198 x_addr_attribute15,
199 x_ORg_id
200 );
201
202 OPEN ADDR;
203 FETCH ADDR INTO x_address_id;
204 IF (ADDR%NOTFOUND) THEN
205 CLOSE ADDR;
206 RAISE NO_DATA_FOUND;
207 END IF;
208 CLOSE ADDR;
209
210 END INSERT_row;
211
212 -------------------------------------------------------------------------------
213 -- PROCDURE : UPDATE_row
214 -- INVOKED FROM : UPDATE_row procedure
215 -- PURPOSE : UPDATEs the row
216 -- HISTORY :
217 -- 14-JUL-05 hareesha o Bug 4284035 - Replaced pn_addresses with _ALL table
218 -------------------------------------------------------------------------------
219 PROCEDURE UPDATE_row ( x_address_id NUMBER,
220 x_address_line1 VARCHAR2,
221 x_address_line2 VARCHAR2,
222 x_address_line3 VARCHAR2,
223 x_address_line4 VARCHAR2,
224 x_county VARCHAR2,
225 x_city VARCHAR2,
226 x_state VARCHAR2,
227 x_province VARCHAR2,
228 x_zip_code VARCHAR2,
229 x_country VARCHAR2,
230 x_territORy_id NUMBER,
231 x_lASt_UPDATE_date DATE,
232 x_lASt_UPDATEd_by NUMBER,
233 x_lASt_UPDATE_login NUMBER,
234 x_attribute_categORy VARCHAR2,
235 x_attribute1 VARCHAR2,
236 x_attribute2 VARCHAR2,
237 x_attribute3 VARCHAR2,
238 x_attribute4 VARCHAR2,
239 x_attribute5 VARCHAR2,
240 x_attribute6 VARCHAR2,
241 x_attribute7 VARCHAR2,
242 x_attribute8 VARCHAR2,
243 x_attribute9 VARCHAR2,
244 x_attribute10 VARCHAR2,
245 x_attribute11 VARCHAR2,
246 x_attribute12 VARCHAR2,
247 x_attribute13 VARCHAR2,
248 x_attribute14 VARCHAR2,
249 x_attribute15 VARCHAR2,
250 x_addr_attribute_categORy VARCHAR2,
251 x_addr_attribute1 VARCHAR2,
252 x_addr_attribute2 VARCHAR2,
253 x_addr_attribute3 VARCHAR2,
254 x_addr_attribute4 VARCHAR2,
255 x_addr_attribute5 VARCHAR2,
256 x_addr_attribute6 VARCHAR2,
257 x_addr_attribute7 VARCHAR2,
258 x_addr_attribute8 VARCHAR2,
259 x_addr_attribute9 VARCHAR2,
260 x_addr_attribute10 VARCHAR2,
261 x_addr_attribute11 VARCHAR2,
262 x_addr_attribute12 VARCHAR2,
263 x_addr_attribute13 VARCHAR2,
264 x_addr_attribute14 VARCHAR2,
265 x_addr_attribute15 VARCHAR2
266 ) IS
267 BEGIN
268
269 UPDATE pn_addresses_all /* hrodda_MOAC - changed to tablename_all*/
270 SET
271 address_line1 = x_address_line1,
272 address_line2 = x_address_line2,
273 address_line3 = x_address_line3,
274 address_line4 = x_address_line4,
275 county = x_county,
276 city = x_city,
277 state = x_state,
278 province = x_province,
279 zip_code = x_zip_code,
280 country = x_country,
281 territORy_id = x_territORy_id,
282 lASt_UPDATE_date = x_lASt_UPDATE_date,
283 lASt_UPDATEd_by = x_lASt_UPDATEd_by,
284 lASt_UPDATE_login = x_lASt_UPDATE_login,
285 attribute_categORy = x_attribute_categORy,
286 attribute1 = x_attribute1,
287 attribute2 = x_attribute2,
288 attribute3 = x_attribute3,
289 attribute4 = x_attribute4,
290 attribute5 = x_attribute5,
291 attribute6 = x_attribute6,
292 attribute7 = x_attribute7,
293 attribute8 = x_attribute8,
294 attribute9 = x_attribute9,
295 attribute10 = x_attribute10,
296 attribute11 = x_attribute11,
297 attribute12 = x_attribute12,
298 attribute13 = x_attribute13,
299 attribute14 = x_attribute14,
300 attribute15 = x_attribute15,
301 addr_attribute_categORy = x_addr_attribute_categORy,
302 addr_attribute1 = x_addr_attribute1,
303 addr_attribute2 = x_addr_attribute2,
304 addr_attribute3 = x_addr_attribute3,
305 addr_attribute4 = x_addr_attribute4,
306 addr_attribute5 = x_addr_attribute5,
307 addr_attribute6 = x_addr_attribute6,
308 addr_attribute7 = x_addr_attribute7,
309 addr_attribute8 = x_addr_attribute8,
310 addr_attribute9 = x_addr_attribute9,
311 addr_attribute10 = x_addr_attribute10,
312 addr_attribute11 = x_addr_attribute11,
313 addr_attribute12 = x_addr_attribute12,
314 addr_attribute13 = x_addr_attribute13,
315 addr_attribute14 = x_addr_attribute14,
316 addr_attribute15 = x_addr_attribute15
317 WHERE address_id = x_address_id;
318
319 IF (SQL%NOTFOUND) THEN
320 RAISE NO_DATA_FOUND;
321 END IF;
322
323 END UPDATE_row;
324
325 -------------------------------------------------------------------------------
326 -- PROCDURE : lock_row
327 -- INVOKED FROM : lock_row procedure
328 -- PURPOSE : locks the row
329 -- HISTORY :
330 -- 14-JUL-05 hareesha o Bug 4284035 - Replaced pn_addresses with _ALL table.
331 -------------------------------------------------------------------------------
332 PROCEDURE lock_row ( x_address_id NUMBER,
333 x_address_line1 VARCHAR2,
334 x_address_line2 VARCHAR2,
335 x_address_line3 VARCHAR2,
336 x_address_line4 VARCHAR2,
337 x_county VARCHAR2,
338 x_city VARCHAR2,
339 x_state VARCHAR2,
340 x_province VARCHAR2,
341 x_zip_code VARCHAR2,
342 x_country VARCHAR2,
343 x_territORy_id NUMBER,
344 x_attribute_categORy VARCHAR2,
345 x_attribute1 VARCHAR2,
346 x_attribute2 VARCHAR2,
347 x_attribute3 VARCHAR2,
348 x_attribute4 VARCHAR2,
349 x_attribute5 VARCHAR2,
350 x_attribute6 VARCHAR2,
351 x_attribute7 VARCHAR2,
352 x_attribute8 VARCHAR2,
353 x_attribute9 VARCHAR2,
354 x_attribute10 VARCHAR2,
355 x_attribute11 VARCHAR2,
356 x_attribute12 VARCHAR2,
357 x_attribute13 VARCHAR2,
358 x_attribute14 VARCHAR2,
359 x_attribute15 VARCHAR2,
360 x_addr_attribute_categORy VARCHAR2,
361 x_addr_attribute1 VARCHAR2,
362 x_addr_attribute2 VARCHAR2,
363 x_addr_attribute3 VARCHAR2,
364 x_addr_attribute4 VARCHAR2,
365 x_addr_attribute5 VARCHAR2,
366 x_addr_attribute6 VARCHAR2,
367 x_addr_attribute7 VARCHAR2,
368 x_addr_attribute8 VARCHAR2,
369 x_addr_attribute9 VARCHAR2,
370 x_addr_attribute10 VARCHAR2,
371 x_addr_attribute11 VARCHAR2,
372 x_addr_attribute12 VARCHAR2,
373 x_addr_attribute13 VARCHAR2,
374 x_addr_attribute14 VARCHAR2,
375 x_addr_attribute15 VARCHAR2
376 ) IS
377 CURSOR ADDR IS
378 SELECT *
379 FROM pn_addresses_all /* hrodda_MOAC -changed to tablename_All*/
380 WHERE address_id = x_address_id
381 FOR UPDATE of address_id NOWAIT;
382
383 Recinfo ADDR%ROWTYPE;
384
385 BEGIN
386
387 OPEN ADDR;
388 FETCH ADDR INTO Recinfo;
389 IF (ADDR%NOTFOUND) THEN
390 CLOSE ADDR;
391 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
392 APP_EXCEPTION.RaISe_Exception;
393 END IF;
394 CLOSE ADDR;
395
396 IF NOT (Recinfo.address_id = x_Address_Id) THEN
397 pn_var_rent_pkg.lock_row_exception('address_id',Recinfo.address_id);
398 END IF;
399 IF NOT (Recinfo.country = x_Country) THEN
400 pn_var_rent_pkg.lock_row_exception('country',Recinfo.country);
401 END IF;
402 IF NOT ((Recinfo.address_line1 = x_address_line1)
403 OR ((Recinfo.address_line1 IS null) AND (x_address_line1 IS null))) THEN
404 pn_var_rent_pkg.lock_row_exception('address_line1',Recinfo.address_line1);
405 END IF;
406 IF NOT ( (Recinfo.address_line2 = x_address_line2)
407 OR ((Recinfo.address_line2 IS null) AND (x_address_line2 IS null))) THEN
408 pn_var_rent_pkg.lock_row_exception('address_line2',Recinfo.address_line2);
409 END IF;
410 IF NOT ( (Recinfo.address_line3 = x_address_line3)
411 OR ((Recinfo.address_line3 IS null) AND (x_address_line3 IS null))) THEN
412 pn_var_rent_pkg.lock_row_exception('address_line3',Recinfo.address_line3);
413 END IF;
414 IF NOT ( (Recinfo.address_line4 = x_address_line4)
415 OR ((Recinfo.address_line4 IS null) AND (x_address_line4 IS null))) THEN
416 pn_var_rent_pkg.lock_row_exception('address_line4',Recinfo.address_line4);
417 END IF;
418 IF NOT ( (Recinfo.city = x_City)
419 OR ((Recinfo.city IS null) AND (x_City IS null))) THEN
420 pn_var_rent_pkg.lock_row_exception('city',Recinfo.city);
421 END IF;
422 IF NOT ( (Recinfo.zip_code = x_zip_code)
423 OR ((Recinfo.zip_code IS null) AND (x_zip_code IS null))) THEN
424 pn_var_rent_pkg.lock_row_exception('zip_code',Recinfo.zip_code);
425 END IF;
426 IF NOT ( (Recinfo.state = x_State)
427 OR ((Recinfo.state IS null) AND (x_State IS null))) THEN
428 pn_var_rent_pkg.lock_row_exception('state',Recinfo.state);
429 END IF;
430 IF NOT ( (Recinfo.province = x_Province)
431 OR ((Recinfo.province IS null) AND (x_Province IS null))) THEN
432 pn_var_rent_pkg.lock_row_exception('province',Recinfo.province);
433 END IF;
434 IF NOT ( (Recinfo.county = x_County)
435 OR ((Recinfo.county IS null) AND (x_County IS null))) THEN
436 pn_var_rent_pkg.lock_row_exception('county',Recinfo.county);
437 END IF;
438 IF NOT ( (Recinfo.territORy_id = x_TerritORy_Id)
439 OR ((Recinfo.territORy_id IS null) AND (x_TerritORy_Id IS null))) THEN
440 pn_var_rent_pkg.lock_row_exception('territORy_id',Recinfo.territORy_id);
441 END IF;
442 IF NOT ( (Recinfo.attribute_categORy = x_Attribute_CategORy)
443 OR ((Recinfo.attribute_categORy IS null) AND (x_Attribute_CategORy IS null))) THEN
444 pn_var_rent_pkg.lock_row_exception('attribute_categORy',Recinfo.attribute_categORy);
445 END IF;
446 IF NOT ( (Recinfo.attribute1 = x_Attribute1)
447 OR ((Recinfo.attribute1 IS null) AND (x_Attribute1 IS null))) THEN
448 pn_var_rent_pkg.lock_row_exception('attribute1',Recinfo.attribute1);
449 END IF;
450 IF NOT ( (Recinfo.attribute2 = x_Attribute2)
451 OR ((Recinfo.attribute2 IS null) AND (x_Attribute2 IS null))) THEN
452 pn_var_rent_pkg.lock_row_exception('attribute2',Recinfo.attribute2);
453 END IF;
454 IF NOT ( (Recinfo.attribute3 = x_Attribute3)
455 OR ((Recinfo.attribute3 IS null) AND (x_Attribute3 IS null))) THEN
456 pn_var_rent_pkg.lock_row_exception('attribute3',Recinfo.attribute3);
457 END IF;
458 IF NOT ( (Recinfo.attribute4 = x_Attribute4)
459 OR ((Recinfo.attribute4 IS null) AND (x_Attribute4 IS null))) THEN
460 pn_var_rent_pkg.lock_row_exception('attribute4',Recinfo.attribute4);
461 END IF;
462 IF NOT ( (Recinfo.attribute5 = x_Attribute5)
463 OR ((Recinfo.attribute5 IS null) AND (x_Attribute5 IS null))) THEN
464 pn_var_rent_pkg.lock_row_exception('attribute5',Recinfo.attribute5);
465 END IF;
466 IF NOT ( (Recinfo.attribute6 = x_Attribute6)
467 OR ((Recinfo.attribute6 IS null) AND (x_Attribute6 IS null))) THEN
468 pn_var_rent_pkg.lock_row_exception('attribute6',Recinfo.attribute6);
469 END IF;
470 IF NOT ( (Recinfo.attribute7 = x_Attribute7)
471 OR ((Recinfo.attribute7 IS null) AND (x_Attribute7 IS null))) THEN
472 pn_var_rent_pkg.lock_row_exception('attribute7',Recinfo.attribute7);
473 END IF;
474 IF NOT ( (Recinfo.attribute8 = x_Attribute8)
475 OR ((Recinfo.attribute8 IS null) AND (x_Attribute8 IS null))) THEN
476 pn_var_rent_pkg.lock_row_exception('attribute8',Recinfo.attribute8);
477 END IF;
478 IF NOT ( (Recinfo.attribute9 = x_Attribute9)
479 OR ((Recinfo.attribute9 IS null) AND (x_Attribute9 IS null))) THEN
480 pn_var_rent_pkg.lock_row_exception('attribute9',Recinfo.attribute9);
481 END IF;
482 IF NOT ( (Recinfo.attribute10 = x_Attribute10)
483 OR ((Recinfo.attribute10 IS null) AND (x_Attribute10 IS null))) THEN
484 pn_var_rent_pkg.lock_row_exception('attribute10',Recinfo.attribute10);
485 END IF;
486 IF NOT ( (Recinfo.attribute11 = x_Attribute11)
487 OR ((Recinfo.attribute11 IS null) AND (x_Attribute11 IS null))) THEN
488 pn_var_rent_pkg.lock_row_exception('attribute11',Recinfo.attribute11);
489 END IF;
490 IF NOT ( (Recinfo.attribute12 = x_Attribute12)
491 OR ((Recinfo.attribute12 IS null) AND (x_Attribute12 IS null))) THEN
492 pn_var_rent_pkg.lock_row_exception('attribute12',Recinfo.attribute12);
493 END IF;
494 IF NOT ( (Recinfo.attribute13 = x_Attribute13)
495 OR ((Recinfo.attribute13 IS null) AND (x_Attribute13 IS null))) THEN
496 pn_var_rent_pkg.lock_row_exception('attribute13',Recinfo.attribute13);
497 END IF;
498 IF NOT ( (Recinfo.attribute14 = x_Attribute14)
499 OR ((Recinfo.attribute14 IS null) AND (x_Attribute14 IS null))) THEN
500 pn_var_rent_pkg.lock_row_exception('attribute14',Recinfo.attribute14);
501 END IF;
502 IF NOT ( (Recinfo.attribute15 = x_Attribute15)
503 OR ((Recinfo.attribute15 IS null) AND (x_Attribute15 IS null))) THEN
504 pn_var_rent_pkg.lock_row_exception('attribute15',Recinfo.attribute15);
505 END IF;
506 IF NOT ( (Recinfo.addr_attribute_categORy = x_addr_Attribute_CategORy)
507 OR ((Recinfo.addr_attribute_categORy IS null) AND (x_addr_Attribute_CategORy IS null))) THEN
508 pn_var_rent_pkg.lock_row_exception('addr_attribute_categORy',Recinfo.addr_attribute_categORy);
509 END IF;
510 IF NOT ( (Recinfo.addr_attribute1 = x_addr_Attribute1)
511 OR ((Recinfo.addr_attribute1 IS null) AND (x_addr_Attribute1 IS null))) THEN
512 pn_var_rent_pkg.lock_row_exception('addr_attribute1',Recinfo.addr_attribute1);
513 END IF;
514 IF NOT ( (Recinfo.addr_attribute2 = x_addr_Attribute2)
515 OR ((Recinfo.addr_attribute2 IS null) AND (x_addr_Attribute2 IS null))) THEN
516 pn_var_rent_pkg.lock_row_exception('addr_attribute2',Recinfo.addr_attribute2);
517 END IF;
518 IF NOT ( (Recinfo.addr_attribute3 = x_addr_Attribute3)
519 OR ((Recinfo.addr_attribute3 IS null) AND (x_addr_Attribute3 IS null))) THEN
520 pn_var_rent_pkg.lock_row_exception('addr_attribute3',Recinfo.addr_attribute3);
521 END IF;
522 IF NOT ( (Recinfo.addr_attribute4 = x_addr_Attribute4)
523 OR ((Recinfo.addr_attribute4 IS null) AND (x_addr_Attribute4 IS null))) THEN
524 pn_var_rent_pkg.lock_row_exception('addr_attribute4',Recinfo.addr_attribute4);
525 END IF;
526 IF NOT ( (Recinfo.addr_attribute5 = x_addr_Attribute5)
527 OR ((Recinfo.addr_attribute5 IS null) AND (x_addr_Attribute5 IS null))) THEN
528 pn_var_rent_pkg.lock_row_exception('addr_attribute5',Recinfo.addr_attribute5);
529 END IF;
530 IF NOT ( (Recinfo.addr_attribute6 = x_addr_Attribute6)
531 OR ((Recinfo.addr_attribute6 IS null) AND (x_addr_Attribute6 IS null))) THEN
532 pn_var_rent_pkg.lock_row_exception('addr_attribute6',Recinfo.addr_attribute6);
533 END IF;
534 IF NOT ( (Recinfo.addr_attribute7 = x_addr_Attribute7)
535 OR ((Recinfo.addr_attribute7 IS null) AND (x_addr_Attribute7 IS null))) THEN
536 pn_var_rent_pkg.lock_row_exception('addr_attribute7',Recinfo.addr_attribute7);
537 END IF;
538 IF NOT ( (Recinfo.addr_attribute8 = x_addr_Attribute8)
539 OR ((Recinfo.addr_attribute8 IS null) AND (x_addr_Attribute8 IS null))) THEN
540 pn_var_rent_pkg.lock_row_exception('addr_attribute8',Recinfo.addr_attribute8);
541 END IF;
542 IF NOT ( (Recinfo.addr_attribute9 = x_addr_Attribute9)
543 OR ((Recinfo.addr_attribute9 IS null) AND (x_addr_Attribute9 IS null))) THEN
544 pn_var_rent_pkg.lock_row_exception('addr_attribute9',Recinfo.addr_attribute9);
545 END IF;
546 IF NOT ( (Recinfo.addr_attribute10 = x_addr_Attribute10)
547 OR ((Recinfo.addr_attribute10 IS null) AND (x_addr_Attribute10 IS null))) THEN
548 pn_var_rent_pkg.lock_row_exception('addr_attribute10',Recinfo.addr_attribute10);
549 END IF;
550 IF NOT ( (Recinfo.addr_attribute11 = x_addr_Attribute11)
551 OR ((Recinfo.addr_attribute11 IS null) AND (x_addr_Attribute11 IS null))) THEN
552 pn_var_rent_pkg.lock_row_exception('addr_attribute11',Recinfo.addr_attribute11);
553 END IF;
554 IF NOT ( (Recinfo.addr_attribute12 = x_addr_Attribute12)
555 OR ((Recinfo.addr_attribute12 IS null) AND (x_addr_Attribute12 IS null))) THEN
556 pn_var_rent_pkg.lock_row_exception('addr_attribute12',Recinfo.addr_attribute12);
557 END IF;
558 IF NOT ( (Recinfo.addr_attribute13 = x_addr_Attribute13)
559 OR ((Recinfo.addr_attribute13 IS null) AND (x_addr_Attribute13 IS null))) THEN
560 pn_var_rent_pkg.lock_row_exception('addr_attribute13',Recinfo.addr_attribute13);
561 END IF;
562 IF NOT ( (Recinfo.addr_attribute14 = x_addr_Attribute14)
563 OR ((Recinfo.addr_attribute14 IS null) AND (x_addr_Attribute14 IS null))) THEN
564 pn_var_rent_pkg.lock_row_exception('addr_attribute14',Recinfo.addr_attribute14);
565 END IF;
566 IF NOT ( (Recinfo.addr_attribute15 = x_addr_Attribute15)
567 OR ((Recinfo.addr_attribute15 IS null) AND (x_addr_Attribute15 IS null))) THEN
568 pn_var_rent_pkg.lock_row_exception('addr_attribute15',Recinfo.addr_attribute15);
569 END IF;
570
571 END lock_row;
572
573 END PNT_ADDR_PKG;