36: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
37: Close cur_old_ref_values;
38: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
39: IGS_GE_MSG_STACK.ADD;
40: App_Exception.Raise_Exception;
41: Return;
42: END IF;
43: Close cur_old_ref_values;
44:
89: v_message_name) = FALSE THEN
90: v_message_name := 'IGS_ST_GOVT_SUBM_COMPLETE';
91: Fnd_Message.Set_Name('IGS',v_message_name);
92: IGS_GE_MSG_STACK.ADD;
93: App_Exception.Raise_Exception;
94: END IF;
95: -- Validate the calendar instance.
96: IF p_inserting OR
97: (p_updating AND
106: new_references.ci_sequence_number,
107: v_message_name) = FALSE THEN
108: Fnd_Message.Set_Name('IGS',v_message_name);
109: IGS_GE_MSG_STACK.ADD;
110: App_Exception.Raise_Exception;
111: END IF;
112: END IF;
113:
114:
123: new_references.ci_sequence_number,
124: new_references.teach_cal_type) THEN
125: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
126: IGS_GE_MSG_STACK.ADD;
127: App_Exception.Raise_Exception;
128: END IF;
129: END Check_uniqueness;
130:
131: PROCEDURE Check_Constraints (
149: IF new_references.ci_sequence_number < 1 OR
150: new_references.ci_sequence_number > 999999 Then
151: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
152: IGS_GE_MSG_STACK.ADD;
153: App_Exception.Raise_Exception;
154: END IF;
155: END IF;
156: IF upper(column_name) = 'CAL_TYPE' OR
157: column_name is null Then
157: column_name is null Then
158: IF new_references.cal_type <> UPPER(new_references.cal_type) Then
159: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: END IF;
164:
165: IF upper(column_name) = 'TEACH_CAL_TYPE' OR
166: column_name is null Then
167: IF new_references.teach_cal_type <> UPPER(new_references.teach_cal_type) Then
168: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
169: IGS_GE_MSG_STACK.ADD;
170: App_Exception.Raise_Exception;
171: END IF;
172: END IF;
173: END Check_Constraints;
174:
189: new_references.teach_cal_type
190: ) THEN
191: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
192: IGS_GE_MSG_STACK.ADD;
193: App_Exception.Raise_Exception;
194: END IF;
195: END IF;
196:
197: IF (((old_references.submission_yr = new_references.submission_yr) AND
208: new_references.govt_semester
209: ) THEN
210: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
211: IGS_GE_MSG_STACK.ADD;
212: App_Exception.Raise_Exception;
213: END IF;
214: END IF;
215:
216: END Check_Parent_Existance;
310: IF (cur_rowid%FOUND) THEN
311: Close cur_rowid;
312: Fnd_Message.Set_Name ('IGS', 'IGS_ST_GSLOV_DLA_FK');
313: IGS_GE_MSG_STACK.ADD;
314: App_Exception.Raise_Exception;
315: Return;
316: END IF;
317: Close cur_rowid;
318:
340: IF (cur_rowid%FOUND) THEN
341: Close cur_rowid;
342: Fnd_Message.Set_Name ('IGS', 'IGS_ST_GSLOV_GSEM_FK');
343: IGS_GE_MSG_STACK.ADD;
344: App_Exception.Raise_Exception;
345: Return;
346: END IF;
347: Close cur_rowid;
348:
392: new_references.teach_cal_type
393: ) THEN
394: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
395: IGS_GE_MSG_STACK.ADD;
396: App_Exception.Raise_Exception;
397: END IF;
398: Check_Uniqueness;
399: Check_Constraints;
400: Check_Parent_Existance;
415: new_references.teach_cal_type
416: ) THEN
417: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
418: IGS_GE_MSG_STACK.ADD;
419: App_Exception.Raise_Exception;
420: END IF;
421: Check_Uniqueness;
422: Check_Constraints;
423: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
472: end if;
473: else
474: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
475: IGS_GE_MSG_STACK.ADD;
476: app_exception.raise_exception;
477: end if;
478:
479: Before_DML (
480: p_action => 'INSERT',
552: if (c1%notfound) then
553: close c1;
554: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
555: IGS_GE_MSG_STACK.ADD;
556: app_exception.raise_exception;
557: return;
558: end if;
559: close c1;
560: