[Home] [Help]
39: -- Populate Old Values.
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: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
44: IGS_GE_MSG_STACK.ADD;
45: App_Exception.Raise_Exception;
46: Close cur_old_ref_values;
47: Return;
94: IF IGS_AD_VAL_SAFT.crsp_val_fs_closed(
95: new_references.funding_source,
96: v_message_name) = FALSE THEN
97: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
98: FND_MESSAGE.SET_NAME('IGS',v_message_name);
99: IGS_GE_MSG_STACK.ADD;
100: APP_EXCEPTION.RAISE_EXCEPTION;
101: END IF;
102: END IF;
108: new_references.org_unit_cd,
109: new_references.ou_start_dt,
110: v_message_name) = FALSE THEN
111: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
112: FND_MESSAGE.SET_NAME('IGS',v_message_name);
113: IGS_GE_MSG_STACK.ADD;
114: APP_EXCEPTION.RAISE_EXCEPTION;
115: END IF;
116: END IF;
120: IF igs_ad_val_apcoo.crsp_val_am_closed(
121: new_references.attendance_mode,
122: v_message_name) = FALSE THEN
123: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
124: FND_MESSAGE.SET_NAME('IGS',v_message_name);
125: IGS_GE_MSG_STACK.ADD;
126: APP_EXCEPTION.RAISE_EXCEPTION;
127: END IF;
128: END IF;
132: IF IGS_AD_VAL_SIT.admp_val_itt_closed(
133: new_references.intake_target_type,
134: v_message_name) = FALSE THEN
135: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
136: FND_MESSAGE.SET_NAME('IGS',v_message_name);
137: IGS_GE_MSG_STACK.ADD;
138: APP_EXCEPTION.RAISE_EXCEPTION;
139: END IF;
140: END IF;
148: v_s_amount_type,
149: new_references.override_s_amount_type,
150: v_message_name) = FALSE THEN
151: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
152: FND_MESSAGE.SET_NAME('IGS',v_message_name);
153: IGS_GE_MSG_STACK.ADD;
154: APP_EXCEPTION.RAISE_EXCEPTION;
155: END IF;
156: END IF;
167: new_references.target,
168: new_references.max_target,
169: v_message_name) = FALSE THEN
170: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
171: FND_MESSAGE.SET_NAME('IGS',v_message_name);
172: IGS_GE_MSG_STACK.ADD;
173: APP_EXCEPTION.RAISE_EXCEPTION;
174: END IF;
175: ELSE
178: new_references.target,
179: new_references.max_target,
180: v_message_name) = FALSE THEN
181: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
182: FND_MESSAGE.SET_NAME('IGS',v_message_name);
183: IGS_GE_MSG_STACK.ADD;
184: APP_EXCEPTION.RAISE_EXCEPTION;
185: END IF;
186: END IF;
199: ELSE
200: IF NOT IGS_EN_ATD_MODE_PKG.Get_PK_For_Validation (
201: new_references.attendance_mode
202: )THEN
203: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
204: IGS_GE_MSG_STACK.ADD;
205: APP_EXCEPTION.RAISE_EXCEPTION;
206: END IF;
207: END IF;
212: ELSE
213: IF NOT IGS_FI_FUND_SRC_PKG.Get_PK_For_Validation (
214: new_references.funding_source
215: )THEN
216: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
217: IGS_GE_MSG_STACK.ADD;
218: APP_EXCEPTION.RAISE_EXCEPTION;
219: END IF;
220: END IF;
228: IF NOT IGS_ST_GVT_SPSHT_CTL_PKG.Get_PK_For_Validation (
229: new_references.submission_yr,
230: new_references.submission_number
231: )THEN
232: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
233: IGS_GE_MSG_STACK.ADD;
234: APP_EXCEPTION.RAISE_EXCEPTION;
235: END IF;
236: END IF;
242: IF NOT IGS_AD_INTAK_TRG_TYP_PKG.Get_PK_For_Validation (
243: new_references.intake_target_type,
244: 'N'
245: )THEN
246: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
247: IGS_GE_MSG_STACK.ADD;
248: APP_EXCEPTION.RAISE_EXCEPTION;
249: END IF;
250: END IF;
258: IF NOT IGS_OR_UNIT_PKG.Get_PK_For_Validation (
259: new_references.org_unit_cd,
260: new_references.ou_start_dt
261: )THEN
262: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
263: IGS_GE_MSG_STACK.ADD;
264: APP_EXCEPTION.RAISE_EXCEPTION;
265: END IF;
266: END IF;
272: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
273: 'AMOUNT_TYPE',
274: new_references.override_s_amount_type
275: ) THEN
276: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
277: IGS_GE_MSG_STACK.ADD;
278: App_Exception.Raise_Exception;
279: END IF;
280: END IF;
335: Open cur_rowid;
336: Fetch cur_rowid INTO lv_rowid;
337: IF (cur_rowid%FOUND) THEN
338: Close cur_rowid;
339: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SAFAT_AM_FK');
340: IGS_GE_MSG_STACK.ADD;
341: App_Exception.Raise_Exception;
342: Return;
343: END IF;
361: Open cur_rowid;
362: Fetch cur_rowid INTO lv_rowid;
363: IF (cur_rowid%FOUND) THEN
364: Close cur_rowid;
365: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SAFAT_FS_FK');
366: IGS_GE_MSG_STACK.ADD;
367: App_Exception.Raise_Exception;
368: Return;
369: END IF;
388: Open cur_rowid;
389: Fetch cur_rowid INTO lv_rowid;
390: IF (cur_rowid%FOUND) THEN
391: Close cur_rowid;
392: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SAFAT_GSC_FK');
393: IGS_GE_MSG_STACK.ADD;
394: App_Exception.Raise_Exception;
395: Return;
396: END IF;
414: Open cur_rowid;
415: Fetch cur_rowid INTO lv_rowid;
416: IF (cur_rowid%FOUND) THEN
417: Close cur_rowid;
418: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SAFAT_ITT_FK');
419: IGS_GE_MSG_STACK.ADD;
420: App_Exception.Raise_Exception;
421: Return;
422: END IF;
442: Open cur_rowid;
443: Fetch cur_rowid INTO lv_rowid;
444: IF (cur_rowid%FOUND) THEN
445: Close cur_rowid;
446: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SAFAT_OU_FK');
447: IGS_GE_MSG_STACK.ADD;
448: App_Exception.Raise_Exception;
449: Return;
450: END IF;
468: Open cur_rowid;
469: Fetch cur_rowid INTO lv_rowid;
470: IF (cur_rowid%FOUND) THEN
471: Close cur_rowid;
472: Fnd_Message.Set_Name ('IGS', 'IGS_AD_OVR_AMT_SLV_FK');
473: IGS_GE_MSG_STACK.ADD;
474: App_Exception.Raise_Exception;
475: Return;
476: END IF;
503: END IF;
504:
505: IF upper(column_name) = 'TARGET' OR column_name IS NULL THEN
506: IF new_references.target < 00000.000 OR new_references.target > 99999.999 THEN
507: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
508: IGS_GE_MSG_STACK.ADD;
509: APP_EXCEPTION.RAISE_EXCEPTION;
510: END IF;
511: END IF;
510: END IF;
511: END IF;
512: IF upper(column_name) = 'MAX_TARGET' OR column_name IS NULL THEN
513: IF new_references.max_target < 00000.000 OR new_references.max_target > 99999.999 THEN
514: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
515: IGS_GE_MSG_STACK.ADD;
516: APP_EXCEPTION.RAISE_EXCEPTION;
517: END IF;
518: END IF;
517: END IF;
518: END IF;
519: IF upper(column_name) = 'ACTUAL_ENROLMENT' OR column_name IS NULL THEN
520: IF new_references.actual_enrolment < 00000.000 OR new_references.actual_enrolment > 99999.999 THEN
521: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
522: IGS_GE_MSG_STACK.ADD;
523: APP_EXCEPTION.RAISE_EXCEPTION;
524: END IF;
525: END IF;
524: END IF;
525: END IF;
526: IF upper(column_name) = 'FUNDING_SOURCE' OR column_name IS NULL THEN
527: IF new_references.funding_source <> UPPER(new_references.funding_source) THEN
528: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
529: IGS_GE_MSG_STACK.ADD;
530: APP_EXCEPTION.RAISE_EXCEPTION;
531: END IF;
532: END IF;
531: END IF;
532: END IF;
533: IF upper(column_name) = 'INTAKE_TARGET_TYPE' OR column_name IS NULL THEN
534: IF new_references.intake_target_type <> UPPER(new_references.intake_target_type) THEN
535: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
536: IGS_GE_MSG_STACK.ADD;
537: APP_EXCEPTION.RAISE_EXCEPTION;
538: END IF;
539: END IF;
538: END IF;
539: END IF;
540: IF upper(column_name) = 'ATTENDANCE_MODE' OR column_name IS NULL THEN
541: IF new_references.attendance_mode <> UPPER(new_references.attendance_mode) THEN
542: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
543: IGS_GE_MSG_STACK.ADD;
544: APP_EXCEPTION.RAISE_EXCEPTION;
545: END IF;
546: END IF;
603: new_references.funding_source,
604: new_references.attendance_mode,
605: new_references.intake_target_type
606: )THEN
607: FND_MESSAGE.SET_NAME('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
608: IGS_GE_MSG_STACK.ADD;
609: APP_EXCEPTION.RAISE_EXCEPTION;
610: END IF;
611: Check_Constraints;
628: new_references.funding_source,
629: new_references.attendance_mode,
630: new_references.intake_target_type
631: )THEN
632: FND_MESSAGE.SET_NAME('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
633: IGS_GE_MSG_STACK.ADD;
634: APP_EXCEPTION.RAISE_EXCEPTION;
635: END IF;
636: Check_Constraints;
694: if X_LAST_UPDATE_LOGIN is NULL then
695: X_LAST_UPDATE_LOGIN := -1;
696: end if;
697: else
698: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
699: IGS_GE_MSG_STACK.ADD;
700: app_exception.raise_exception;
701: end if;
702:
804: begin
805: open c1;
806: fetch c1 into tlinfo;
807: if (c1%notfound) then
808: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
809: IGS_GE_MSG_STACK.ADD;
810: app_exception.raise_exception;
811: close c1;
812: return;
829: AND (X_ACTUAL_ENR_EFFECTIVE_DT is null)))
830: ) then
831: null;
832: else
833: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
834: IGS_GE_MSG_STACK.ADD;
835: app_exception.raise_exception;
836: end if;
837: return;
870: if X_LAST_UPDATE_LOGIN is NULL then
871: X_LAST_UPDATE_LOGIN := -1;
872: end if;
873: else
874: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
875: IGS_GE_MSG_STACK.ADD;
876: app_exception.raise_exception;
877: end if;
878: