[Home] [Help]
40: -- Populate Old Values.
41: Open cur_old_ref_values;
42: Fetch cur_old_ref_values INTO old_references;
43: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
44: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
45: IGS_GE_MSG_STACK.ADD;
46: App_Exception.Raise_Exception;
47: Close cur_old_ref_values;
48: Return;
96: IF IGS_AD_VAL_SIT.admp_val_itt_closed(
97: new_references.intake_target_type,
98: v_message_name) = FALSE THEN
99: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
100: FND_MESSAGE.SET_NAME('IGS',v_message_name);
101: IGS_GE_MSG_STACK.ADD;
102: APP_EXCEPTION.RAISE_EXCEPTION;
103: END IF;
104: END IF;
112: v_s_amount_type,
113: new_references.override_s_amount_type,
114: v_message_name) = FALSE THEN
115: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
116: FND_MESSAGE.SET_NAME('IGS',v_message_name);
117: IGS_GE_MSG_STACK.ADD;
118: APP_EXCEPTION.RAISE_EXCEPTION;
119: END IF;
120: END IF;
131: new_references.target,
132: new_references.max_target,
133: v_message_name) = FALSE THEN
134: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
135: FND_MESSAGE.SET_NAME('IGS',v_message_name);
136: IGS_GE_MSG_STACK.ADD;
137: APP_EXCEPTION.RAISE_EXCEPTION;
138: END IF;
139: ELSE
142: new_references.target,
143: new_references.max_target,
144: v_message_name) = FALSE THEN
145: --raise_application_error(-20000, IGS_GE_GEN_002.GENP_GET_MESSAGE(v_message_num));
146: FND_MESSAGE.SET_NAME('IGS',v_message_name);
147: IGS_GE_MSG_STACK.ADD;
148: APP_EXCEPTION.RAISE_EXCEPTION;
149: END IF;
150: END IF;
177: new_references.crv_version_number,
178: new_references.funding_source,
179: new_references.sequence_number
180: )THEN
181: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
182: IGS_GE_MSG_STACK.ADD;
183: APP_EXCEPTION.RAISE_EXCEPTION;
184: END IF;
185: END IF;
191: IF NOT IGS_AD_INTAK_TRG_TYP_PKG.Get_PK_For_Validation (
192: new_references.intake_target_type,
193: 'N'
194: )THEN
195: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
196: IGS_GE_MSG_STACK.ADD;
197: APP_EXCEPTION.RAISE_EXCEPTION;
198: END IF;
199: END IF;
205: IF NOT IGS_LOOKUPS_VIEW_PKG.Get_PK_For_Validation (
206: 'AMOUNT_TYPE',
207: new_references.override_s_amount_type
208: ) THEN
209: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
210: IGS_GE_MSG_STACK.ADD;
211: App_Exception.Raise_Exception;
212: END IF;
213: END IF;
279: Open cur_rowid;
280: Fetch cur_rowid INTO lv_rowid;
281: IF (cur_rowid%FOUND) THEN
282: Close cur_rowid;
283: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFIT_SCFT_FK');
284: IGS_GE_MSG_STACK.ADD;
285: App_Exception.Raise_Exception;
286: Return;
287: END IF;
305: Open cur_rowid;
306: Fetch cur_rowid INTO lv_rowid;
307: IF (cur_rowid%FOUND) THEN
308: Close cur_rowid;
309: Fnd_Message.Set_Name ('IGS', 'IGS_AD_SCFIT_ITT_FK');
310: IGS_GE_MSG_STACK.ADD;
311: App_Exception.Raise_Exception;
312: Return;
313: END IF;
331: Open cur_rowid;
332: Fetch cur_rowid INTO lv_rowid;
333: IF (cur_rowid%FOUND) THEN
334: Close cur_rowid;
335: Fnd_Message.Set_Name ('IGS', 'IGS_AD_OVR_AMT_SLV_FK');
336: IGS_GE_MSG_STACK.ADD;
337: App_Exception.Raise_Exception;
338: Return;
339: END IF;
366: END IF;
367:
368: IF upper(column_name) = 'TARGET' OR column_name IS NULL THEN
369: IF new_references.target < 00000.000 OR new_references.target > 99999.999 THEN
370: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
371: IGS_GE_MSG_STACK.ADD;
372: APP_EXCEPTION.RAISE_EXCEPTION;
373: END IF;
374: END IF;
373: END IF;
374: END IF;
375: IF upper(column_name) = 'MAX_TARGET' OR column_name IS NULL THEN
376: IF new_references.max_target < 00000.000 OR new_references.max_target > 99999.999 THEN
377: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
378: IGS_GE_MSG_STACK.ADD;
379: APP_EXCEPTION.RAISE_EXCEPTION;
380: END IF;
381: END IF;
380: END IF;
381: END IF;
382: IF upper(column_name) = 'ACTUAL_ENROLMENT' OR column_name IS NULL THEN
383: IF new_references.actual_enrolment < 00000.000 OR new_references.actual_enrolment > 99999.999 THEN
384: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
385: IGS_GE_MSG_STACK.ADD;
386: APP_EXCEPTION.RAISE_EXCEPTION;
387: END IF;
388: END IF;
387: END IF;
388: END IF;
389: IF upper(column_name) = 'SEQUENCE_NUMBER' OR column_name IS NULL THEN
390: IF new_references.sequence_number < 1 OR new_references.sequence_number > 9999999999 THEN
391: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
392: IGS_GE_MSG_STACK.ADD;
393: APP_EXCEPTION.RAISE_EXCEPTION;
394: END IF;
395: END IF;
394: END IF;
395: END IF;
396: IF upper(column_name) = 'FUNDING_SOURCE' OR column_name IS NULL THEN
397: IF new_references.funding_source <> UPPER(new_references.funding_source) THEN
398: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
399: IGS_GE_MSG_STACK.ADD;
400: APP_EXCEPTION.RAISE_EXCEPTION;
401: END IF;
402: END IF;
401: END IF;
402: END IF;
403: IF upper(column_name) = 'INTAKE_TARGET_TYPE' OR column_name IS NULL THEN
404: IF new_references.intake_target_type <> UPPER(new_references.intake_target_type) THEN
405: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
406: IGS_GE_MSG_STACK.ADD;
407: APP_EXCEPTION.RAISE_EXCEPTION;
408: END IF;
409: END IF;
408: END IF;
409: END IF;
410: IF upper(column_name) = 'COURSE_CD' OR column_name IS NULL THEN
411: IF new_references.course_cd <> UPPER(new_references.course_cd) THEN
412: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
413: IGS_GE_MSG_STACK.ADD;
414: APP_EXCEPTION.RAISE_EXCEPTION;
415: END IF;
416: END IF;
415: END IF;
416: END IF;
417: IF upper(column_name) = 'OVERRIDE_S_AMOUNT_TYPE' OR column_name IS NULL THEN
418: IF new_references.override_s_amount_type <> UPPER(new_references.override_s_amount_type) THEN
419: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE');
420: IGS_GE_MSG_STACK.ADD;
421: APP_EXCEPTION.RAISE_EXCEPTION;
422: END IF;
423: END IF;
482: new_references.funding_source,
483: new_references.sequence_number,
484: new_references.intake_target_type
485: )THEN
486: FND_MESSAGE.SET_NAME('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
487: IGS_GE_MSG_STACK.ADD;
488: APP_EXCEPTION.RAISE_EXCEPTION;
489: END IF;
490: Check_Constraints;
507: new_references.funding_source,
508: new_references.sequence_number,
509: new_references.intake_target_type
510: )THEN
511: FND_MESSAGE.SET_NAME('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
512: IGS_GE_MSG_STACK.ADD;
513: APP_EXCEPTION.RAISE_EXCEPTION;
514: END IF;
515: Check_Constraints;
577: if X_LAST_UPDATE_LOGIN is NULL then
578: X_LAST_UPDATE_LOGIN := -1;
579: end if;
580: else
581: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
582: IGS_GE_MSG_STACK.ADD;
583: app_exception.raise_exception;
584: end if;
585:
692: begin
693: open c1;
694: fetch c1 into tlinfo;
695: if (c1%notfound) then
696: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
697: IGS_GE_MSG_STACK.ADD;
698: app_exception.raise_exception;
699: close c1;
700: return;
719: AND (X_ACTUAL_ENR_EFFECTIVE_DT is null)))
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;
761: if X_LAST_UPDATE_LOGIN is NULL then
762: X_LAST_UPDATE_LOGIN := -1;
763: end if;
764: else
765: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
766: IGS_GE_MSG_STACK.ADD;
767: app_exception.raise_exception;
768: end if;
769: