[Home] [Help]
118: SELECT HZ_ADDRESS_USAGES_S.nextval
119: INTO l_usage_id
120: FROM dual;
121:
122: hz_address_usages_pkg.insert_row(
123: l_usage_row_id,
124: l_usage_id,
125: p_address_usages_rec.map_id,
126: p_address_usages_rec.usage_code,
416: FND_MSG_PUB.ADD;
417: RAISE FND_API.G_EXC_ERROR;
418: END IF;
419:
420: hz_address_usages_pkg.Lock_Row (
421: x_rowid => l_usage_row_id,
422: x_usage_id => l_usage_id,
423: x_map_id => db_map_id,
424: x_usage_code => db_usage_code,
434:
435: --dbms_output.put_line(' message update : l_usage_row_id '|| l_usage_row_id);
436: l_object_version_number := x_object_version_number +1;
437:
438: hz_address_usages_pkg.Update_Row (
439: x_rowid => l_usage_row_id,
440: x_usage_id => l_usage_id,
441: x_map_id => db_map_id,
442: x_usage_code => db_usage_code,
817: -- delete the other usage detail also because it is only
818: -- one left can can not exist without any other usage detail
819: -- Bug 5096570 (Nishant 10-Apr-2006)
820: hz_address_usage_dtls_pkg.delete_row(l_last_usg_dtl_id);
821: hz_address_usages_pkg.delete_row(p_usage_id);
822: -- Set i to LAST, so that it does not check any other geo type
823: -- as there is no use (all are deleted)
824: i := p_address_usage_dtls_tbl.LAST;
825: EXCEPTION WHEN NO_DATA_FOUND THEN
831: -- At least two geography types are required for a usage
832: FND_MSG_PUB.ADD;
833: RAISE FND_API.G_EXC_ERROR;
834: */
835: hz_address_usages_pkg.delete_row(p_usage_id);
836: i := p_address_usage_dtls_tbl.LAST;
837: END;
838:
839: END IF;
849: LOOP
850: hz_address_usage_dtls_pkg.delete_row(i.usage_dtl_id);
851: EXIT WHEN c_address_usage_dtls%NOTFOUND;
852: END LOOP;
853: hz_address_usages_pkg.delete_row(p_usage_id);
854: END IF;
855:
856: SELECT count(*)
857: INTO l_count