[Home] [Help]
49: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
50: Close cur_old_ref_values;
51: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
52: IGS_GE_MSG_STACK.ADD;
53: App_Exception.Raise_Exception;
54:
55: Return;
56: END IF;
57: Close cur_old_ref_values;
125: v_version_number,
126: v_message_name) = FALSE THEN
127: Fnd_Message.Set_Name('IGS',v_message_name);
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception;
130: END IF;
131: IF p_inserting THEN
132: -- Validate IGS_PS_COURSE offering option
133: -- IGS_GE_NOTE:crsp_val_iud_crv_dtl called from this function
140: new_references.attendance_type,
141: v_message_name) = FALSE THEN
142: Fnd_Message.Set_Name('IGS',v_message_name);
143: IGS_GE_MSG_STACK.ADD;
144: App_Exception.Raise_Exception;
145: END IF;
146: -- Validate reference code type
147: IF IGS_PS_VAL_CRFC.crsp_val_ref_cd_type(
148: new_references.reference_cd_type,
148: new_references.reference_cd_type,
149: v_message_name) = FALSE THEN
150: Fnd_Message.Set_Name('IGS',v_message_name);
151: IGS_GE_MSG_STACK.ADD;
152: App_Exception.Raise_Exception;
153: END IF;
154: END IF;
155: IF p_inserting OR p_updating THEN
156: -- Validate IGS_PS_UNIT sets are valid for the IGS_PS_COURSE offering option
162: new_references.us_version_number,
163: v_message_name) = 'FALSE' THEN
164: Fnd_Message.Set_Name('IGS',v_message_name);
165: IGS_GE_MSG_STACK.ADD;
166: App_Exception.Raise_Exception;
167: END IF;
168: END IF;
169: END IF;
170: IF p_inserting THEN
176: new_references.us_version_number,
177: v_message_name) = FALSE THEN
178: Fnd_Message.Set_Name('IGS',v_message_name);
179: IGS_GE_MSG_STACK.ADD;
180: App_Exception.Raise_Exception;
181: END IF;
182: --As a part of the bug #2146753 removed the call to the function
183: --igs_ps_val_ceprc.crsp_val_ceprc_uref
184: END IF;
186: IF IGS_PS_VAL_ATL.chk_mandatory_ref_cd(
187: new_references.reference_cd_type) = TRUE THEN
188: Fnd_Message.Set_Name('IGS','IGS_PS_REF_CD_MANDATORY');
189: IGS_GE_MSG_STACK.ADD;
190: App_Exception.Raise_Exception;
191: END IF;
192: END IF;
193: END BeforeRowInsertUpdateDelete1;
194:
225: column_name is null Then
226: IF ( new_references.attendance_mode <> UPPER(new_references.attendance_mode) ) Then
227: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
228: IGS_GE_MSG_STACK.ADD;
229: App_Exception.Raise_Exception;
230: END IF;
231: END IF;
232:
233: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
234: column_name is null Then
235: IF ( new_references.attendance_type <> UPPER(new_references.attendance_type) ) Then
236: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: END IF;
240: END IF;
241:
242: IF upper(column_name) = 'CAL_TYPE' OR
243: column_name is null Then
244: IF ( new_references.cal_type <> UPPER(new_references.cal_type) ) Then
245: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
246: IGS_GE_MSG_STACK.ADD;
247: App_Exception.Raise_Exception;
248: END IF;
249: END IF;
250:
251: IF upper(column_name) = 'COURSE_CD' OR
252: column_name is null Then
253: IF ( new_references.course_cd <> UPPER(new_references.course_cd) ) Then
254: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
255: IGS_GE_MSG_STACK.ADD;
256: App_Exception.Raise_Exception;
257: END IF;
258: END IF;
259:
260: IF upper(column_name) = 'LOCATION_CD' OR
261: 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;
268:
269: IF upper(column_name) = 'REFERENCE_CD' OR
270: column_name is null Then
271: IF ( new_references.reference_cd <> UPPER(new_references.reference_cd) ) Then
272: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
273: IGS_GE_MSG_STACK.ADD;
274: App_Exception.Raise_Exception;
275: END IF;
276: END IF;
277:
278: IF upper(column_name) = 'REFERENCE_CD_TYPE' OR
279: column_name is null Then
280: IF ( new_references.reference_cd_type <> UPPER(new_references.reference_cd_type) ) Then
281: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
282: IGS_GE_MSG_STACK.ADD;
283: App_Exception.Raise_Exception;
284: END IF;
285: END IF;
286:
287: IF upper(column_name) = 'UNIT_SET_CD' OR
288: column_name is null Then
289: IF ( new_references.unit_set_cd <> UPPER(new_references.unit_set_cd) ) Then
290: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
291: IGS_GE_MSG_STACK.ADD;
292: App_Exception.Raise_Exception;
293: END IF;
294: END IF;
295:
296: IF upper(column_name) = 'SEQUENCE_NUMBER' OR
297: column_name is null Then
298: IF ( new_references.sequence_number < 1 OR new_references.sequence_number > 999999 ) Then
299: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
300: IGS_GE_MSG_STACK.ADD;
301: App_Exception.Raise_Exception;
302: END IF;
303: END IF;
304:
305: END Check_Constraints;
359: new_references.attendance_type
360: ) THEN
361: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
362: IGS_GE_MSG_STACK.ADD;
363: App_Exception.Raise_Exception;
364: END IF;
365: END IF;
366:
367: IF (((old_references.coo_id = new_references.coo_id)) OR
372: new_references.coo_id
373: ) THEN
374: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
375: IGS_GE_MSG_STACK.ADD;
376: App_Exception.Raise_Exception;
377: END IF;
378: END IF;
379:
380: IF (((old_references.reference_cd_type = new_references.reference_cd_type)) OR
385: new_references.reference_cd_type
386: ) THEN
387: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
388: IGS_GE_MSG_STACK.ADD;
389: App_Exception.Raise_Exception;
390: END IF;
391: END IF;
392:
393: IF (((old_references.unit_set_cd = new_references.unit_set_cd) AND
401: new_references.us_version_number
402: ) THEN
403: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
404: IGS_GE_MSG_STACK.ADD;
405: App_Exception.Raise_Exception;
406: END IF;
407:
408: --Added the check parent existance for the IGS_PS_OFR_UNIT_SET and IGS_PS_OF_OPT_UNT_ST
409: OPEN cur_check( new_references.course_cd,
418: IF cur_check%NOTFOUND THEN
419: CLOSE cur_check;
420: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
421: IGS_GE_MSG_STACK.ADD;
422: App_Exception.Raise_Exception;
423: END IF;
424: CLOSE cur_check;
425: END IF;
426:
437: new_references.reference_cd
438: ) THEN
439: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
440: IGS_GE_MSG_STACK.ADD;
441: App_Exception.Raise_Exception;
442: END IF;
443: END IF;
444: CLOSE cur_reference_cd_chk;
445:
515: IF (cur_rowid%FOUND) THEN
516: Close cur_rowid;
517: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CEPRC_COO_FK');
518: IGS_GE_MSG_STACK.ADD;
519: App_Exception.Raise_Exception;
520: Return;
521: END IF;
522: Close cur_rowid;
523:
541: IF (cur_rowid%FOUND) THEN
542: Close cur_rowid;
543: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CEPRC_COO_FK');
544: IGS_GE_MSG_STACK.ADD;
545: App_Exception.Raise_Exception;
546: Return;
547: END IF;
548: Close cur_rowid;
549:
567: IF (cur_rowid%FOUND) THEN
568: Close cur_rowid;
569: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CEPRC_RCT_FK');
570: IGS_GE_MSG_STACK.ADD;
571: App_Exception.Raise_Exception;
572: Return;
573: END IF;
574: Close cur_rowid;
575:
595: IF (cur_rowid%FOUND) THEN
596: Close cur_rowid;
597: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CEPRC_US_FK');
598: IGS_GE_MSG_STACK.ADD;
599: App_Exception.Raise_Exception;
600: Return;
601: END IF;
602: Close cur_rowid;
603:
638: IF (cur_rowid%FOUND) THEN
639: Close cur_rowid;
640: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CEPRC_US_FK');
641: IGS_GE_MSG_STACK.ADD;
642: App_Exception.Raise_Exception;
643: Return;
644: END IF;
645: Close cur_rowid;
646:
679: IF (cur_rowid%FOUND) THEN
680: CLOSE cur_rowid;
681: fnd_message.set_name ('IGS', 'IGS_PS_CRCC_RC_FK');
682: igs_ge_msg_stack.add;
683: app_exception.raise_exception;
684: RETURN;
685: END IF;
686: CLOSE cur_rowid;
687:
747: new_references.reference_cd_type,
748: new_references.sequence_number) THEN
749: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
750: IGS_GE_MSG_STACK.ADD;
751: App_Exception.Raise_Exception;
752: END IF;
753: Check_Constraints;
754: Check_Parent_Existance;
755: ELSIF (p_action = 'UPDATE') THEN
771: new_references.reference_cd_type,
772: new_references.sequence_number) THEN
773: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
774: IGS_GE_MSG_STACK.ADD;
775: App_Exception.Raise_Exception;
776: END IF;
777: Check_Constraints;
778: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
779: Check_Constraints;
837: end if;
838: else
839: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
840: IGS_GE_MSG_STACK.ADD;
841: app_exception.raise_exception;
842: end if;
843:
844: Before_DML (
845: p_action => 'INSERT',
961: if (c1%notfound) then
962: close c1;
963: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
964: IGS_GE_MSG_STACK.ADD;
965: app_exception.raise_exception;
966: return;
967: end if;
968: close c1;
969:
992: null;
993: else
994: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
995: IGS_GE_MSG_STACK.ADD;
996: app_exception.raise_exception;
997: end if;
998: return;
999: end LOCK_ROW;
1000:
1034: end if;
1035: else
1036: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1037: IGS_GE_MSG_STACK.ADD;
1038: app_exception.raise_exception;
1039: end if;
1040:
1041: Before_DML (
1042: p_action => 'UPDATE',