[Home] [Help]
47: Open cur_old_ref_values;
48: Fetch cur_old_ref_values INTO old_references;
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;
123: -- Validate that inserts/updates/deletes are allowed
124: IF IGS_PS_VAL_CRS.CRSP_VAL_IUD_CRV_DTL(v_course_cd,
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
138: new_references.location_cd,
139: new_references.attendance_mode,
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
146: -- Validate reference code type
147: IF IGS_PS_VAL_CRFC.crsp_val_ref_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;
160: new_references.coo_id,
161: new_references.unit_set_cd,
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;
174: new_references.sequence_number,
175: new_references.unit_set_cd,
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
184: END IF;
185: IF p_deleting THEN
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;
223:
224: IF upper(column_name) = 'ATTENDANCE_MODE' OR
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;
357: new_references.location_cd,
358: new_references.attendance_mode,
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;
370: ELSE
371: IF NOT IGS_PS_OFR_OPT_PKG.Get_UK_For_Validation (
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;
383: ELSE
384: IF NOT IGS_GE_REF_CD_TYPE_PKG.Get_PK_For_Validation (
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;
399: IF NOT IGS_EN_UNIT_SET_PKG.Get_PK_For_Validation (
400: new_references.unit_set_cd,
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:
416: new_references.us_version_number);
417: FETCH cur_check INTO l_c_var;
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;
435: ELSIF NOT igs_ge_ref_cd_pkg.get_uk_for_validation (
436: new_references.reference_cd_type,
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;
513: Open cur_rowid;
514: Fetch cur_rowid INTO lv_rowid;
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;
539: Open cur_rowid;
540: Fetch cur_rowid INTO lv_rowid;
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;
565: Open cur_rowid;
566: Fetch cur_rowid INTO lv_rowid;
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;
593: Open cur_rowid;
594: Fetch cur_rowid INTO lv_rowid;
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;
636: Open cur_rowid;
637: Fetch cur_rowid INTO lv_rowid;
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;
677: OPEN cur_rowid;
678: FETCH cur_rowid INTO lv_rowid;
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;
745: new_references.attendance_mode,
746: new_references.attendance_type,
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;
769: new_references.attendance_mode,
770: new_references.attendance_type,
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;
835: if X_LAST_UPDATE_LOGIN is NULL then
836: X_LAST_UPDATE_LOGIN := -1;
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:
959: open c1;
960: fetch c1 into tlinfo;
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;
990: AND (X_DESCRIPTION is null)))
991: ) then
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;
1032: if X_LAST_UPDATE_LOGIN is NULL then
1033: X_LAST_UPDATE_LOGIN := -1;
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: