1: PACKAGE BODY JG_ZZ_ENTITY_ASSOC_PKG AS
2: /* $Header: jgzzieab.pls 115.6 2002/11/21 18:00:18 thwon ship $ */
3:
4: PROCEDURE insert_row( x_rowid IN OUT NOCOPY VARCHAR2,
5: x_entity_association_id NUMBER,
37: x_last_update_date DATE,
38: x_last_update_login NUMBER ) IS
39:
40: CURSOR C IS SELECT rowid
41: FROM jg_zz_entity_assoc
42: WHERE entity_association_id = x_entity_association_id;
43: BEGIN
44:
45: INSERT INTO jg_zz_entity_assoc( entity_association_id,
41: FROM jg_zz_entity_assoc
42: WHERE entity_association_id = x_entity_association_id;
43: BEGIN
44:
45: INSERT INTO jg_zz_entity_assoc( entity_association_id,
46: primary_id_number,
47: associated_entity_id,
48: id_type,
49: id_number,
163: x_last_update_date DATE,
164: x_last_update_login NUMBER ) IS
165:
166: CURSOR C IS SELECT *
167: FROM jg_zz_entity_assoc
168: WHERE rowid = x_rowid
169: FOR UPDATE OF entity_association_id NOWAIT;
170:
171: recinfo C%ROWTYPE;
317: x_last_update_date DATE,
318: x_last_update_login NUMBER ) IS
319: BEGIN
320:
321: UPDATE jg_zz_entity_assoc
322: SET entity_association_id = x_entity_association_id,
323: primary_id_number = x_primary_id_number,
324: associated_entity_id = x_associated_entity_id,
325: id_type = x_id_type,
363:
364: END update_row;
365:
366:
367: END JG_ZZ_ENTITY_ASSOC_PKG;