[Home] [Help]
49: Fetch cur_old_ref_values INTO old_references;
50: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
51: Close cur_old_ref_values;
52: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
53: IGS_GE_MSG_STACK.ADD;
54: App_Exception.Raise_Exception;
55: Return;
56: END IF;
57: Close cur_old_ref_values;
108: IF Upper(Column_Name) = 'ASSES_CHRG_FOR_WLST_STUD' OR
109: Column_Name IS NULL THEN
110: IF NOT (new_references.asses_chrg_for_wlst_stud IN ('Y', 'N')) THEN
111: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114: END IF;
115: END IF;
116:
118: IF Upper(Column_Name) = 'SMTANUS_WLST_UNIT_ENR_ALWD' OR
119: Column_Name IS NULL THEN
120: IF NOT (new_references.smtanus_wlst_unit_enr_alwd IN ('Y', 'N')) THEN
121: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
122: IGS_GE_MSG_STACK.ADD;
123: App_Exception.Raise_Exception;
124: END IF;
125: END IF;
126:
145: ,new_references.org_unit_cd
146: ,new_references.start_dt
147: ) THEN
148: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
149: IGS_GE_MSG_STACK.ADD;
150: app_exception.raise_exception;
151: END IF;
152: END Check_Uniqueness ;
153: PROCEDURE Check_Parent_Existance AS
173: new_references.org_unit_cd,
174: new_references.start_dt
175: ) THEN
176: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
177: IGS_GE_MSG_STACK.ADD;
178: App_Exception.Raise_Exception;
179: END IF;
180:
181:
186: ELSIF NOT Igs_Ca_Type_Pkg.Get_PK_For_Validation (
187: new_references.cal_type
188: ) THEN
189: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
190: IGS_GE_MSG_STACK.ADD;
191: App_Exception.Raise_Exception;
192: END IF;
193:
194: END Check_Parent_Existance;
318: Fetch cur_rowid INTO lv_rowid;
319: IF (cur_rowid%FOUND) THEN
320: Close cur_rowid;
321: Fnd_Message.Set_Name ('IGS', 'IGS_EN_OUW_OU_FK');
322: IGS_GE_MSG_STACK.ADD;
323: App_Exception.Raise_Exception;
324: Return;
325: END IF;
326: Close cur_rowid;
360: Fetch cur_rowid INTO lv_rowid;
361: IF (cur_rowid%FOUND) THEN
362: Close cur_rowid;
363: Fnd_Message.Set_Name ('IGS', 'IGS_EN_OUW_OU_FK');
364: IGS_GE_MSG_STACK.ADD;
365: App_Exception.Raise_Exception;
366: Return;
367: END IF;
368: Close cur_rowid; */
401: Fetch cur_rowid INTO lv_rowid;
402: IF (cur_rowid%FOUND) THEN
403: Close cur_rowid;
404: Fnd_Message.Set_Name ('IGS', 'IGS_EN_OUW_OU_FK');
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: Return;
408: END IF;
409: Close cur_rowid;
463: Null;
464: IF Get_Pk_For_Validation(
465: new_references.org_unit_wlst_id) THEN
466: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
467: IGS_GE_MSG_STACK.ADD;
468: App_Exception.Raise_Exception;
469: END IF;
470: Check_Uniqueness;
471: Check_Constraints;
485:
486: IF Get_PK_For_Validation (
487: new_references.org_unit_wlst_id) THEN
488: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
489: IGS_GE_MSG_STACK.ADD;
490: App_Exception.Raise_Exception;
491: END IF;
492: Check_Uniqueness;
493: Check_Constraints;
577: X_LAST_UPDATE_LOGIN := -1;
578: end if;
579: else
580: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
581: IGS_GE_MSG_STACK.ADD;
582: app_exception.raise_exception;
583: end if;
584: SELECT IGS_EN_OR_UNIT_WLST_S.NEXTVAL
585: INTO x_org_unit_wlst_id
680: open c1;
681: fetch c1 into tlinfo;
682: if (c1%notfound) then
683: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
684: IGS_GE_MSG_STACK.ADD;
685: close c1;
686: app_exception.raise_exception;
687: return;
688: end if;
699: ) then
700: null;
701: else
702: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
703: IGS_GE_MSG_STACK.ADD;
704: app_exception.raise_exception;
705: end if;
706: return;
707: end LOCK_ROW;
746: X_LAST_UPDATE_LOGIN := -1;
747: end if;
748: else
749: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
750: IGS_GE_MSG_STACK.ADD;
751: app_exception.raise_exception;
752: end if;
753: Before_DML(
754: p_action=>'UPDATE',