[Home] [Help]
46: Fetch cur_old_ref_values INTO old_references;
47: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
48: Close cur_old_ref_values;
49: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
50: IGS_GE_MSG_STACK.ADD;
51: App_Exception.Raise_Exception;
52: Return;
53: END IF;
54: Close cur_old_ref_values;
91: new_references.course_cd,
92: new_references.crv_version_number,
93: v_message_name) = FALSE THEN
94: FND_MESSAGE.SET_NAME('IGS',v_message_name);
95: IGS_GE_MSG_STACK.ADD;
96: APP_EXCEPTION.RAISE_EXCEPTION;
97: END IF;
98: --
99: -- Can only create against ACTIVE or PLANNED IGS_PS_UNIT sets
101: new_references.unit_set_cd,
102: new_references.us_version_number,
103: v_message_name) = FALSE THEN
104: FND_MESSAGE.SET_NAME('IGS',v_message_name);
105: IGS_GE_MSG_STACK.ADD;
106: APP_EXCEPTION.RAISE_EXCEPTION;
107: END IF;
108: END IF;
109:
154: IF upper(column_name) = 'ATTENDANCE_MODE' OR
155: column_name is null Then
156: IF new_references.attendance_mode <> UPPER(new_references.attendance_mode) Then
157: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
158: IGS_GE_MSG_STACK.ADD;
159: App_Exception.Raise_Exception;
160: END IF;
161: END IF;
162: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
162: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
163: column_name is null Then
164: IF new_references.attendance_type <> UPPER(new_references.attendance_type) Then
165: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
166: IGS_GE_MSG_STACK.ADD;
167: App_Exception.Raise_Exception;
168: END IF;
169: END IF;
170: IF upper(column_name) = 'CAL_TYPE' OR
170: IF upper(column_name) = 'CAL_TYPE' OR
171: column_name is null Then
172: IF new_references.cal_type <> UPPER(new_references.cal_type) Then
173: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
174: IGS_GE_MSG_STACK.ADD;
175: App_Exception.Raise_Exception;
176: END IF;
177: END IF;
178: IF upper(column_name) = 'COURSE_CD' OR
178: IF upper(column_name) = 'COURSE_CD' OR
179: column_name is null Then
180: IF new_references.course_cd <> UPPER(new_references.course_cd) Then
181: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
182: IGS_GE_MSG_STACK.ADD;
183: App_Exception.Raise_Exception;
184: END IF;
185: END IF;
186: IF upper(column_name) = 'LOCATION_CD' OR
186: IF upper(column_name) = 'LOCATION_CD' OR
187: column_name is null Then
188: IF new_references.location_cd <> UPPER(new_references.location_cd) Then
189: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
190: IGS_GE_MSG_STACK.ADD;
191: App_Exception.Raise_Exception;
192: END IF;
193: END IF;
194: IF upper(column_name) = 'UNIT_SET_CD' OR
194: IF upper(column_name) = 'UNIT_SET_CD' OR
195: column_name is null Then
196: IF new_references.unit_set_cd <> UPPER(new_references.unit_set_cd) Then
197: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
198: IGS_GE_MSG_STACK.ADD;
199: App_Exception.Raise_Exception;
200: END IF;
201: END IF;
202:
228: new_references.attendance_mode,
229: new_references.attendance_type
230: )THEN
231: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
232: IGS_GE_MSG_STACK.ADD;
233: App_Exception.Raise_Exception;
234: END IF;
235: END IF;
236:
241: IF NOT IGS_PS_OFR_OPT_PKG.Get_UK_For_Validation (
242: new_references.coo_id
243: ) THEN
244: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
245: IGS_GE_MSG_STACK.ADD;
246: App_Exception.Raise_Exception;
247: END IF;
248: END IF;
249:
266: new_references.unit_set_cd,
267: new_references.us_version_number
268: ) THEN
269: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
270: IGS_GE_MSG_STACK.ADD;
271: App_Exception.Raise_Exception;
272: END IF;
273:
274: END IF;
341: Fetch cur_rowid INTO lv_rowid;
342: IF (cur_rowid%FOUND) THEN
343: Close cur_rowid;
344: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COOUS_COO_UFK');
345: IGS_GE_MSG_STACK.ADD;
346: App_Exception.Raise_Exception;
347: Return;
348: END IF;
349: Close cur_rowid;
367: Fetch cur_rowid INTO lv_rowid;
368: IF (cur_rowid%FOUND) THEN
369: Close cur_rowid;
370: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COOUS_COO_UFK');
371: IGS_GE_MSG_STACK.ADD;
372: App_Exception.Raise_Exception;
373: Return;
374: END IF;
375: 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_PS_COOUS_COUS_FK');
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: Return;
408: END IF;
409: Close cur_rowid;
463: new_references.unit_set_cd,
464: new_references.us_version_number
465: ) THEN
466: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
467: IGS_GE_MSG_STACK.ADD;
468: App_Exception.Raise_Exception;
469: END IF;
470: Check_Constraints;
471: Check_Parent_Existance;
485: new_references.unit_set_cd,
486: new_references.us_version_number
487: ) THEN
488: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
489: IGS_GE_MSG_STACK.ADD;
490: App_Exception.Raise_Exception;
491: END IF;
492: Check_Constraints;
493: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
546: X_LAST_UPDATE_LOGIN := -1;
547: end if;
548: else
549: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
550: IGS_GE_MSG_STACK.ADD;
551: app_exception.raise_exception;
552: end if;
553:
554: Before_DML( p_action => 'INSERT',
637: fetch c1 into tlinfo;
638: if (c1%notfound) then
639: close c1;
640: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
641: IGS_GE_MSG_STACK.ADD;
642: app_exception.raise_exception;
643: return;
644: end if;
645: close c1;
648: ) then
649: null;
650: else
651: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
652: IGS_GE_MSG_STACK.ADD;
653: app_exception.raise_exception;
654: end if;
655: return;
656: end LOCK_ROW;
686: X_LAST_UPDATE_LOGIN := -1;
687: end if;
688: else
689: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
690: IGS_GE_MSG_STACK.ADD;
691: app_exception.raise_exception;
692: end if;
693: Before_DML( p_action => 'UPDATE',
694: x_rowid => X_ROWID,