9: -- as the existing records shld be updatable.
10:
11: -------------------------------------------------------------------------------------------
12: --------------------------------------------------------------------------------------
13: -- Bug ID : 2203134 - NEED MORE UNIQUENESS ON IGS_PE_PERSID_GROUP_ALL
14: -- who when what
15: -- kpadiyar Mar 14,2002 Added Function get_uk_for_validation and check_uniqueness
16: -- for group_cd column
17:
42: */
43:
44: l_rowid VARCHAR2(25);
45:
46: old_references IGS_PE_PERSID_GROUP_ALL%RowType;
47:
48: new_references IGS_PE_PERSID_GROUP_ALL%RowType;
49:
50:
44: l_rowid VARCHAR2(25);
45:
46: old_references IGS_PE_PERSID_GROUP_ALL%RowType;
47:
48: new_references IGS_PE_PERSID_GROUP_ALL%RowType;
49:
50:
51:
52: PROCEDURE Set_Column_Values (
113: CURSOR cur_old_ref_values IS
114:
115: SELECT *
116:
117: FROM IGS_PE_PERSID_GROUP_ALL
118:
119: WHERE rowid = x_rowid;
120:
121:
325: CURSOR cur_rowid IS
326:
327: SELECT rowid
328:
329: FROM IGS_PE_PERSID_GROUP_ALL
330:
331: WHERE group_id = x_group_id;
332:
333:
370: ***************************************************************/
371:
372: CURSOR cur_rowid IS
373: SELECT rowid
374: FROM igs_pe_persid_group_all
375: WHERE group_cd = x_group_cd AND
376: ((l_rowid is null) or (rowid <> l_rowid)) ;
377:
378: lv_rowid cur_rowid%RowType;
392:
393: FUNCTION val_persid_group(p_group_id IN NUMBER ,
394: p_message_name OUT NOCOPY VARCHAR2 )
395: RETURN BOOLEAN IS
396: v_closed_ind igs_pe_persid_group_all.closed_ind%TYPE;
397:
398: CURSOR c_get_closed_ind ( cp_group_id igs_pe_persid_group_all.group_id%TYPE) IS
399: SELECT closed_ind
400: FROM igs_pe_persid_group_all
394: p_message_name OUT NOCOPY VARCHAR2 )
395: RETURN BOOLEAN IS
396: v_closed_ind igs_pe_persid_group_all.closed_ind%TYPE;
397:
398: CURSOR c_get_closed_ind ( cp_group_id igs_pe_persid_group_all.group_id%TYPE) IS
399: SELECT closed_ind
400: FROM igs_pe_persid_group_all
401: WHERE group_id = cp_group_id;
402:
396: v_closed_ind igs_pe_persid_group_all.closed_ind%TYPE;
397:
398: CURSOR c_get_closed_ind ( cp_group_id igs_pe_persid_group_all.group_id%TYPE) IS
399: SELECT closed_ind
400: FROM igs_pe_persid_group_all
401: WHERE group_id = cp_group_id;
402:
403: BEGIN
404: p_message_name := NULL;
429: CURSOR cur_rowid IS
430:
431: SELECT rowid
432:
433: FROM IGS_PE_PERSID_GROUP_ALL
434:
435: WHERE creator_person_id = x_person_id ;
436:
437:
704: X_ATTRIBUTE20 in VARCHAR2 DEFAULT NULL,
705: X_ORG_ID in NUMBER,
706: X_MODE in VARCHAR2 default 'R'
707: ) AS
708: cursor C is select ROWID from IGS_PE_PERSID_GROUP_ALL
709: where GROUP_ID = X_GROUP_ID;
710: X_LAST_UPDATE_DATE DATE;
711: X_LAST_UPDATED_BY NUMBER;
712: X_LAST_UPDATE_LOGIN NUMBER;
819:
820: x_last_update_login=>X_LAST_UPDATE_LOGIN
821:
822: );
823: insert into IGS_PE_PERSID_GROUP_ALL (
824: GROUP_ID,
825: GROUP_CD,
826: CREATOR_PERSON_ID,
827: DESCRIPTION,
988: ATTRIBUTE17,
989: ATTRIBUTE18,
990: ATTRIBUTE19,
991: ATTRIBUTE20
992: from IGS_PE_PERSID_GROUP_ALL
993: where ROWID = X_ROWID
994: for update nowait;
995: tlinfo c1%rowtype;
996:
1198:
1199: end if;
1200:
1201:
1202: update IGS_PE_PERSID_GROUP_ALL set
1203: GROUP_CD = NEW_REFERENCES.GROUP_CD,
1204: CREATOR_PERSON_ID = NEW_REFERENCES.CREATOR_PERSON_ID,
1205: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
1206: CREATE_DT = NEW_REFERENCES.CREATE_DT,
1288: x_attribute19 IN VARCHAR2 DEFAULT NULL,
1289: x_attribute20 IN VARCHAR2 DEFAULT NULL,
1290: X_MODE in VARCHAR2 default 'R'
1291: ) AS
1292: cursor c1 is select rowid from IGS_PE_PERSID_GROUP_ALL
1293: where GROUP_ID = X_GROUP_ID
1294: ;
1295:
1296: begin