[Home] [Help]
40: Open cur_old_ref_values;
41: Fetch cur_old_ref_values INTO old_references;
42: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
43: Close cur_old_ref_values;
44: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
45: IGS_GE_MSG_STACK.ADD;
46: App_Exception.Raise_Exception;
47: Return;
48: END IF;
94: IF IGS_PS_VAL_UNIT.crsp_val_iud_uv_dtl (
95: v_unit_cd,
96: v_version_number,
97: v_message_name) = FALSE THEN
98: Fnd_Message.Set_Name('IGS',v_message_name);
99: IGS_GE_MSG_STACK.ADD;
100: App_Exception.Raise_Exception;
101: END IF;
102: IF p_inserting THEN
104: IF IGS_aS_VAL_uai.crsp_val_crs_ci (
105: new_references.cal_type,
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: -- Validate calendar type.
113: -- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_UOp.crsp_val_uo_cal_type
114: IF IGS_AS_VAL_UAI.crsp_val_uo_cal_type (
115: new_references.cal_type,
116: v_message_name) = FALSE THEN
117: Fnd_Message.Set_Name('IGS',v_message_name);
118: IGS_GE_MSG_STACK.ADD;
119: App_Exception.Raise_Exception;
120: END IF;
121: END IF;
144: END IF;
145:
146: IF UPPER(column_name)='CAL_TYPE' OR Column_Name IS NULL Then
147: IF New_References.Cal_Type <> UPPER(New_References.Cal_Type) Then
148: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;
152: END IF;
152: END IF;
153:
154: IF UPPER(column_name)='UNIT_CD' OR Column_Name IS NULL Then
155: IF New_References.Unit_Cd <> UPPER(New_References.Unit_CD) Then
156: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
157: IGS_GE_MSG_STACK.ADD;
158: App_Exception.Raise_Exception;
159: END IF;
160: END IF;
160: END IF;
161:
162: IF UPPER(column_name)='WAITLIST_ALLOWED' OR Column_Name IS NULL Then
163: IF New_References.waitlist_allowed NOT IN ( 'Y' , 'N' ) Then
164: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
165: IGS_GE_MSG_STACK.ADD;
166: App_Exception.Raise_Exception;
167: END IF;
168: END IF;
168: END IF;
169:
170: IF UPPER(column_name)='DELETE_FLAG' OR Column_Name IS NULL THEN
171: IF New_References.delete_flag NOT IN ( 'Y' , 'N' ) THEN
172: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
173: IGS_GE_MSG_STACK.ADD;
174: App_Exception.Raise_Exception;
175: END IF;
176: END IF;
176: END IF;
177:
178: IF UPPER(column_name)='ABORT_FLAG' OR Column_Name IS NULL THEN
179: IF New_References.abort_flag NOT IN ( 'Y' , 'N' ) THEN
180: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
181: IGS_GE_MSG_STACK.ADD;
182: App_Exception.Raise_Exception;
183: END IF;
184: END IF;
186:
187:
188: IF UPPER(column_name)='MAX_STUDENTS_PER_WAITLIST' OR Column_Name IS NULL Then
189: IF New_References.MAX_STUDENTS_PER_WAITLIST < 0 OR New_References.MAX_STUDENTS_PER_WAITLIST > 999999 Then
190: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
191: IGS_GE_MSG_STACK.ADD;
192: App_Exception.Raise_Exception;
193: END IF;
194: END IF;
195:
196: IF Column_name is NULL THEN
197: /* check for NOT NULL constraint in two new columns added in 115 */
198: IF (new_references.waitlist_allowed is NULL)THEN
199: Fnd_Message.Set_Name ('IGS', 'IGS_PS_MAND_WLST_ALLOW');
200: IGS_GE_MSG_STACK.ADD;
201: App_Exception.Raise_Exception;
202: END IF;
203:
201: App_Exception.Raise_Exception;
202: END IF;
203:
204: IF (new_references.max_students_per_waitlist is NULL)THEN
205: Fnd_Message.Set_Name ('IGS', 'IGS_PS_MAND_MAX_STDNT_WLST');
206: IGS_GE_MSG_STACK.ADD;
207: App_Exception.Raise_Exception;
208: END IF;
209: END IF;
227: new_references.cal_type,
228: new_references.ci_sequence_number,
229: new_references.ci_start_dt,
230: new_references.ci_end_dt) 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:
246: IF NOT IGS_PS_UNIT_OFR_PKG.Get_PK_For_Validation (
247: new_references.unit_cd,
248: new_references.version_number,
249: new_references.cal_type) THEN
250: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
251: IGS_GE_MSG_STACK.ADD;
252: App_Exception.Raise_Exception;
253: END IF;
254:
372: Open cur_rowid;
373: Fetch cur_rowid INTO lv_rowid;
374: IF (cur_rowid%FOUND) THEN
375: Close cur_rowid;
376: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UOP_CI_UFK');
377: IGS_GE_MSG_STACK.ADD;
378: App_Exception.Raise_Exception;
379: Return;
380: END IF;
403: Open cur_rowid;
404: Fetch cur_rowid INTO lv_rowid;
405: IF (cur_rowid%FOUND) THEN
406: Close cur_rowid;
407: Fnd_Message.Set_Name ('IGS', 'IGS_PS_UOP_UO_FK');
408: IGS_GE_MSG_STACK.ADD;
409: App_Exception.Raise_Exception;
410: Return;
411: END IF;
462: IF Get_PK_For_Validation (New_References.unit_cd,
463: New_References.version_number,
464: New_References.cal_type,
465: New_References.ci_sequence_number ) 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_Constraints;
482: IF Get_PK_For_Validation (New_References.unit_cd,
483: New_References.version_number,
484: New_References.cal_type,
485: New_References.ci_sequence_number ) THEN
486: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
487: IGS_GE_MSG_STACK.ADD;
488: App_Exception.Raise_Exception;
489: END IF;
490: Check_Constraints;
564: else
565: X_PROGRAM_UPDATE_DATE := SYSDATE;
566: end if;
567: else
568: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
569: IGS_GE_MSG_STACK.ADD;
570: app_exception.raise_exception;
571: end if;
572:
700: open c1;
701: fetch c1 into tlinfo;
702: if (c1%notfound) then
703: close c1;
704: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
705: IGS_GE_MSG_STACK.ADD;
706: app_exception.raise_exception;
707: return;
708: end if;
719: AND (tlinfo.ABORT_FLAG = X_ABORT_FLAG)
720: ) then
721: null;
722: else
723: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
724: IGS_GE_MSG_STACK.ADD;
725: app_exception.raise_exception;
726: end if;
727: return;
762: if X_LAST_UPDATE_LOGIN is NULL then
763: X_LAST_UPDATE_LOGIN := -1;
764: end if;
765: else
766: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
767: IGS_GE_MSG_STACK.ADD;
768: app_exception.raise_exception;
769: end if;
770: