[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;
84: IF p_inserting OR (old_references.funding_source <> new_references.funding_source) THEN
85: IF IGS_AD_VAL_SAFT.crsp_val_fs_closed(
86: new_references.funding_source,
87: v_message_name) = FALSE THEN
88: Fnd_Message.Set_Name('IGS', v_message_name);
89: IGS_GE_MSG_STACK.ADD;
90: App_Exception.Raise_Exception;
91: END IF;
92: END IF;
97: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
98: new_references.course_cd,
99: new_references.crv_version_number,
100: v_message_name) = FALSE THEN
101: Fnd_Message.Set_Name('IGS', v_message_name);
102: IGS_GE_MSG_STACK.ADD;
103: App_Exception.Raise_Exception;
104: END IF;
105: IF IGS_AD_VAL_SCFT.admp_val_scft_cop(
107: new_references.submission_number,
108: new_references.course_cd,
109: new_references.crv_version_number,
110: v_message_name) = FALSE THEN
111: Fnd_Message.Set_Name('IGS', v_message_name);
112: IGS_GE_MSG_STACK.ADD;
113: App_Exception.Raise_Exception;
114: END IF;
115: END IF;
126: new_references.location_cd,
127: new_references.attendance_mode,
128: new_references.attendance_type,
129: v_message_name) = FALSE THEN
130: Fnd_Message.Set_Name('IGS', v_message_name);
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception;
133: END IF;
134: END IF;
147: new_references.location_cd,
148: new_references.attendance_mode,
149: new_references.attendance_type,
150: v_message_name) = FALSE THEN
151: Fnd_Message.Set_Name('IGS', v_message_name);
152: IGS_GE_MSG_STACK.ADD;
153: App_Exception.Raise_Exception;
154: END IF;
155: END IF;
162: new_references.course_cd,
163: new_references.crv_version_number,
164: new_references.funding_source,
165: v_message_name) = FALSE THEN
166: Fnd_Message.Set_Name('IGS', v_message_name);
167: IGS_GE_MSG_STACK.ADD;
168: App_Exception.Raise_Exception;
169: END IF;
170: END IF;
191: new_references.attendance_type,
192: new_references.unit_set_cd,
193: new_references.us_version_number,
194: v_message_name) = FALSE THEN
195: Fnd_Message.Set_Name('IGS', v_message_name);
196: IGS_GE_MSG_STACK.ADD;
197: App_Exception.Raise_Exception;
198: END IF;
199: END IF;
224: END IF;
225:
226: IF upper(Column_Name) = 'SEQUENCE_NUMBER' OR Column_Name IS NULL THEN
227: IF new_references.sequence_number < 1 OR new_references.sequence_number > 9999999999 THEN
228: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
229: IGS_GE_MSG_STACK.ADD;
230: App_Exception.Raise_Exception;
231: END IF;
232: END IF;
231: END IF;
232: END IF;
233: IF upper(Column_Name) = 'ATTENDANCE_MODE' OR Column_Name IS NULL THEN
234: IF new_references.attendance_mode <> UPPER(new_references.attendance_mode) THEN
235: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
238: END IF;
239: END IF;
240: IF upper(Column_Name) = 'ATTENDANCE_TYPE' OR Column_Name IS NULL THEN
241: IF new_references.attendance_type <> UPPER(new_references.attendance_type) THEN
242: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
243: IGS_GE_MSG_STACK.ADD;
244: App_Exception.Raise_Exception;
245: END IF;
246: END IF;
245: END IF;
246: END IF;
247: IF upper(Column_Name) = 'COURSE_CD' OR Column_Name IS NULL THEN
248: IF new_references.course_cd <> UPPER(new_references.course_cd) THEN
249: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
250: IGS_GE_MSG_STACK.ADD;
251: App_Exception.Raise_Exception;
252: END IF;
253: END IF;
252: END IF;
253: END IF;
254: IF upper(Column_Name) = 'FUNDING_SOURCE' OR Column_Name IS NULL THEN
255: IF new_references.funding_source <> UPPER(new_references.funding_source) THEN
256: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
257: IGS_GE_MSG_STACK.ADD;
258: App_Exception.Raise_Exception;
259: END IF;
260: END IF;
259: END IF;
260: END IF;
261: IF upper(Column_Name) = 'LOCATION_CD' OR Column_Name IS NULL THEN
262: IF new_references.location_cd <> UPPER(new_references.location_cd) THEN
263: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
264: IGS_GE_MSG_STACK.ADD;
265: App_Exception.Raise_Exception;
266: END IF;
267: END IF;
266: END IF;
267: END IF;
268: IF upper(Column_Name) = 'UNIT_SET_CD' OR Column_Name IS NULL THEN
269: IF new_references.unit_set_cd <> UPPER(new_references.unit_set_cd) THEN
270: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
271: IGS_GE_MSG_STACK.ADD;
272: App_Exception.Raise_Exception;
273: END IF;
274: END IF;
284: ELSE
285: IF NOT IGS_EN_ATD_MODE_PKG.Get_PK_For_Validation (
286: new_references.attendance_mode
287: ) THEN
288: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
289: IGS_GE_MSG_STACK.ADD;
290: App_Exception.Raise_Exception;
291: END IF;
292: END IF;
297: ELSE
298: IF NOT IGS_EN_ATD_TYPE_PKG.Get_PK_For_Validation (
299: new_references.attendance_type
300: ) THEN
301: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
302: IGS_GE_MSG_STACK.ADD;
303: App_Exception.Raise_Exception;
304: END IF;
305: END IF;
313: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
314: new_references.course_cd,
315: new_references.crv_version_number
316: ) THEN
317: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
318: IGS_GE_MSG_STACK.ADD;
319: App_Exception.Raise_Exception;
320: END IF;
321: END IF;
326: ELSE
327: IF NOT IGS_FI_FUND_SRC_PKG.Get_PK_For_Validation (
328: new_references.funding_source
329: ) THEN
330: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
331: IGS_GE_MSG_STACK.ADD;
332: App_Exception.Raise_Exception;
333: END IF;
334: END IF;
342: IF NOT IGS_ST_GVT_SPSHT_CTL_PKG.Get_PK_For_Validation (
343: new_references.submission_yr,
344: new_references.submission_number
345: ) THEN
346: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
347: IGS_GE_MSG_STACK.ADD;
348: App_Exception.Raise_Exception;
349: END IF;
350: END IF;
356: IF NOT IGS_AD_LOCATION_PKG.Get_PK_For_Validation (
357: new_references.location_cd,
358: 'N'
359: ) THEN
360: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
361: IGS_GE_MSG_STACK.ADD;
362: App_Exception.Raise_Exception;
363: END IF;
364: END IF;
372: IF NOT IGS_EN_UNIT_SET_PKG.Get_PK_For_Validation (
373: new_references.unit_set_cd,
374: new_references.us_version_number
375: ) THEN
376: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
377: IGS_GE_MSG_STACK.ADD;
378: App_Exception.Raise_Exception;
379: END IF;
380: END IF;
447: Open cur_rowid;
448: Fetch cur_rowid INTO lv_rowid;
449: IF (cur_rowid%FOUND) THEN
450: Close cur_rowid;
451: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_AM_FK');
452: IGS_GE_MSG_STACK.ADD;
453: App_Exception.Raise_Exception;
454: Return;
455: END IF;
473: Open cur_rowid;
474: Fetch cur_rowid INTO lv_rowid;
475: IF (cur_rowid%FOUND) THEN
476: Close cur_rowid;
477: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_ATT_FK');
478: IGS_GE_MSG_STACK.ADD;
479: App_Exception.Raise_Exception;
480: Return;
481: END IF;
501: Open cur_rowid;
502: Fetch cur_rowid INTO lv_rowid;
503: IF (cur_rowid%FOUND) THEN
504: Close cur_rowid;
505: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_CRV_FK');
506: IGS_GE_MSG_STACK.ADD;
507: App_Exception.Raise_Exception;
508: Return;
509: END IF;
528: Fetch cur_rowid INTO lv_rowid;
529: IF (cur_rowid%FOUND) THEN
530: Close cur_rowid;
531:
532: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_FS_FK');
533: IGS_GE_MSG_STACK.ADD;
534: App_Exception.Raise_Exception;
535: Return;
536: END IF;
556: Open cur_rowid;
557: Fetch cur_rowid INTO lv_rowid;
558: IF (cur_rowid%FOUND) THEN
559: Close cur_rowid;
560: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_GSC_FK');
561: IGS_GE_MSG_STACK.ADD;
562: App_Exception.Raise_Exception;
563: Return;
564: END IF;
582: Open cur_rowid;
583: Fetch cur_rowid INTO lv_rowid;
584: IF (cur_rowid%FOUND) THEN
585: Close cur_rowid;
586: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_LOC_FK');
587: IGS_GE_MSG_STACK.ADD;
588: App_Exception.Raise_Exception;
589: Return;
590: END IF;
610: Open cur_rowid;
611: Fetch cur_rowid INTO lv_rowid;
612: IF (cur_rowid%FOUND) THEN
613: Close cur_rowid;
614: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFT_US_FK');
615: IGS_GE_MSG_STACK.ADD;
616: App_Exception.Raise_Exception;
617: Return;
618: END IF;
672: new_references.crv_version_number,
673: new_references.funding_source,
674: new_references.sequence_number
675: ) THEN
676: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
677: IGS_GE_MSG_STACK.ADD;
678: App_Exception.Raise_Exception;
679: END IF;
680: Check_Constraints;
694: new_references.crv_version_number,
695: new_references.funding_source,
696: new_references.sequence_number
697: ) THEN
698: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
699: IGS_GE_MSG_STACK.ADD;
700: App_Exception.Raise_Exception;
701: END IF;
702: Check_Constraints;
755: if X_LAST_UPDATE_LOGIN is NULL then
756: X_LAST_UPDATE_LOGIN := -1;
757: end if;
758: else
759: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
760: IGS_GE_MSG_STACK.ADD;
761: app_exception.raise_exception;
762: end if;
763: Before_DML (
860: open c1;
861: fetch c1 into tlinfo;
862: if (c1%notfound) then
863: close c1;
864: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
865: IGS_GE_MSG_STACK.ADD;
866: app_exception.raise_exception;
867: return;
868: end if;
885: AND (X_US_VERSION_NUMBER is null)))
886: ) then
887: null;
888: else
889: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
890: IGS_GE_MSG_STACK.ADD;
891: app_exception.raise_exception;
892: end if;
893: return;
925: if X_LAST_UPDATE_LOGIN is NULL then
926: X_LAST_UPDATE_LOGIN := -1;
927: end if;
928: else
929: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
930: IGS_GE_MSG_STACK.ADD;
931: app_exception.raise_exception;
932: end if;
933: Before_DML (