[Home] [Help]
43: Open cur_old_ref_values;
44: Fetch cur_old_ref_values INTO old_references;
45: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
46: Close cur_old_ref_values;
47: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
48: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_TURIN_RULE_GR : P_ACTION INSERT, VALIDATE_INSERT : IGSUI19B.PLS');
49: IGS_GE_MSG_STACK.ADD;
50: App_Exception.Raise_Exception;
51: Return;
99: IF Upper(Column_Name) = 'RUG_SEQUENCE_NUMBER' OR
100: Column_Name IS NULL THEN
101: IF NOT (new_references.rug_sequence_number BETWEEN 1
102: AND 999999) THEN
103: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106: END IF;
107: END IF;
125: begin
126: IF Get_Uk_For_Validation (
127: new_references.rug_sequence_number
128: ) THEN
129: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
130: IGS_GE_MSG_STACK.ADD;
131: app_exception.raise_exception;
132: END IF;
133: END Check_Uniqueness ;
151: NULL;
152: ELSIF NOT Igs_Ru_Group_Pkg.Get_PK_For_Validation (
153: new_references.rug_sequence_number
154: ) THEN
155: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
156: IGS_RU_GEN_006.SET_TOKEN(' Igs_Ru_Group : P_ACTION Check_Parent_Existance rug_sequence_number : IGSUI19B.PLS');
157: IGS_GE_MSG_STACK.ADD;
158: App_Exception.Raise_Exception;
159: END IF;
163: NULL;
164: ELSIF NOT Igs_Ru_Trg_Group_Cd_Pkg.Get_PK_For_Validation (
165: new_references.group_cd
166: ) THEN
167: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
168: IGS_RU_GEN_006.SET_TOKEN(' Igs_Ru_Trg_Group_Cd : P_ACTION Check_Parent_Existance group_cd : IGSUI19B.PLS');
169: IGS_GE_MSG_STACK.ADD;
170: App_Exception.Raise_Exception;
171: END IF;
273: Open cur_rowid;
274: Fetch cur_rowid INTO lv_rowid;
275: IF (cur_rowid%FOUND) THEN
276: Close cur_rowid;
277: Fnd_Message.Set_Name ('IGS', 'IGS_RU_TRG_RUG_FK');
278: IGS_GE_MSG_STACK.ADD;
279: App_Exception.Raise_Exception;
280: Return;
281: END IF;
310: Open cur_rowid;
311: Fetch cur_rowid INTO lv_rowid;
312: IF (cur_rowid%FOUND) THEN
313: Close cur_rowid;
314: Fnd_Message.Set_Name ('IGS', 'IGS_RU_TRG_TGC_FK');
315: IGS_GE_MSG_STACK.ADD;
316: App_Exception.Raise_Exception;
317: Return;
318: END IF;
366: Null;
367: IF Get_Pk_For_Validation(
368: new_references.group_cd,
369: new_references.name_cd) THEN
370: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
371: IGS_GE_MSG_STACK.ADD;
372: App_Exception.Raise_Exception;
373: END IF;
374: Check_Uniqueness;
387: -- Call all the procedures related to Before Insert.
388: IF Get_PK_For_Validation (
389: new_references.group_cd,
390: new_references.name_cd) THEN
391: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
392: IGS_GE_MSG_STACK.ADD;
393: App_Exception.Raise_Exception;
394: END IF;
395: Check_Uniqueness;
477: if X_LAST_UPDATE_LOGIN is NULL then
478: X_LAST_UPDATE_LOGIN := -1;
479: end if;
480: else
481: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
482: IGS_GE_MSG_STACK.ADD;
483: app_exception.raise_exception;
484: end if;
485: Before_DML(
554: begin
555: open c1;
556: fetch c1 into tlinfo;
557: if (c1%notfound) then
558: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
559: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_TURIN_RULE_GR : P_ACTION LOCK_ROW : IGSUI19B.PLS');
560: IGS_GE_MSG_STACK.ADD;
561: close c1;
562: app_exception.raise_exception;
567: AND (tlinfo.RUG_SEQUENCE_NUMBER = X_RUG_SEQUENCE_NUMBER)
568: ) then
569: null;
570: else
571: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
572: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_TURIN_RULE_GR : P_ACTION LOCK_ROW FORM_RECORD_CHANGED : IGSUI19B.PLS');
573: IGS_GE_MSG_STACK.ADD;
574: app_exception.raise_exception;
575: end if;
612: if X_LAST_UPDATE_LOGIN is NULL then
613: X_LAST_UPDATE_LOGIN := -1;
614: end if;
615: else
616: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
617: IGS_GE_MSG_STACK.ADD;
618: app_exception.raise_exception;
619: end if;
620: Before_DML(