[Home] [Help]
30: FETCH cur_ref_cd INTO l_ref_cd;
31: IF cur_ref_cd%FOUND THEN
32: IF igs_ps_val_atl.chk_mandatory_ref_cd(l_ref_cd) THEN
33: CLOSE cur_ref_cd;
34: FND_MESSAGE.SET_NAME( 'IGS', 'IGS_PS_REF_CD_MANDATORY');
35: IGS_GE_MSG_STACK.ADD;
36: app_exception.raise_exception;
37: END IF;
38: END IF;
193: Open cur_old_ref_values;
194: Fetch cur_old_ref_values INTO old_references;
195: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
196: Close cur_old_ref_values;
197: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
198: IGS_GE_MSG_STACK.ADD;
199: App_Exception.Raise_Exception;
200: Return;
201: END IF;
314: END IF;
315:
316: IF UPPER(column_name)='NO_SET_DAY_IND' OR column_name IS NULL Then
317: IF new_references.no_set_day_ind NOT IN ( 'Y' , 'N' ) Then
318: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
319: IGS_GE_MSG_STACK.ADD;
320: app_exception.raise_exception;
321: END IF;
322: END IF;
322: END IF;
323:
324: IF UPPER(column_name)='TO_BE_ANNOUNCED' OR column_name IS NULL Then
325: IF new_references.to_be_announced NOT IN ( 'Y' , 'N' ) Then
326: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
327: IGS_GE_MSG_STACK.ADD;
328: app_exception.raise_exception;
329: END IF;
330: END IF;
330: END IF;
331:
332: IF UPPER(column_name)='MONDAY' OR column_name IS NULL Then
333: IF new_references.monday NOT IN ( 'Y' , 'N' ) Then
334: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
335: IGS_GE_MSG_STACK.ADD;
336: app_exception.raise_exception;
337: END IF;
338: END IF;
338: END IF;
339:
340: IF UPPER(column_name)='TUESDAY' OR column_name IS NULL Then
341: IF new_references.tuesday NOT IN ( 'Y' , 'N' ) Then
342: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
343: IGS_GE_MSG_STACK.ADD;
344: app_exception.raise_exception;
345: END IF;
346: END IF;
346: END IF;
347:
348: IF UPPER(column_name)='WEDNESDAY' OR column_name IS NULL Then
349: IF new_references.wednesday NOT IN ( 'Y' , 'N' ) Then
350: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
351: IGS_GE_MSG_STACK.ADD;
352: app_exception.raise_exception;
353: END IF;
354: END IF;
354: END IF;
355:
356: IF UPPER(column_name)='THURSDAY' OR column_name IS NULL Then
357: IF new_references.thursday NOT IN ( 'Y' , 'N' ) Then
358: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
359: IGS_GE_MSG_STACK.ADD;
360: app_exception.raise_exception;
361: END IF;
362: END IF;
362: END IF;
363:
364: IF UPPER(column_name)='FRIDAY' OR column_name IS NULL Then
365: IF new_references.friday NOT IN ( 'Y' , 'N' ) Then
366: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
367: IGS_GE_MSG_STACK.ADD;
368: app_exception.raise_exception;
369: END IF;
370: END IF;
370: END IF;
371:
372: IF UPPER(column_name)='SATURDAY' OR column_name IS NULL Then
373: IF new_references.saturday NOT IN ( 'Y' , 'N' ) Then
374: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
375: IGS_GE_MSG_STACK.ADD;
376: app_exception.raise_exception;
377: END IF;
378: END IF;
378: END IF;
379:
380: IF UPPER(column_name)='SUNDAY' OR column_name IS NULL Then
381: IF new_references.sunday NOT IN ( 'Y' , 'N' ) Then
382: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
383: IGS_GE_MSG_STACK.ADD;
384: app_exception.raise_exception;
385: END IF;
386: END IF;
386: END IF;
387:
388: IF UPPER(column_name)='CANCEL_FLAG' OR column_name IS NULL Then
389: IF new_references.no_set_day_ind NOT IN ( 'Y' , 'N' ) Then
390: fnd_message.set_name ('IGS', 'IGS_GE_INVALID_VALUE');
391: IGS_GE_MSG_STACK.ADD;
392: app_exception.raise_exception;
393: END IF;
394: END IF;
394: END IF;
395:
396: IF UPPER(column_name)='ABORT_FLAG' OR column_name IS NULL THEN
397: IF new_references.abort_flag NOT IN ( 'Y' , 'N' ) 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;
422: IF Get_Uk_For_Validation (
423: new_references.uoo_id
424: ,new_references.occurrence_identifier
425: ) THEN
426: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
427: IGS_GE_MSG_STACK.ADD;
428: app_exception.raise_exception;
429: END IF;
430: END Check_Uniqueness ;
451: ELSIF NOT Igs_Ad_Building_Pkg.Get_PK_For_Validation (
452: new_references.building_code,
453: 'N'
454: ) THEN
455: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
456: IGS_GE_MSG_STACK.ADD;
457: App_Exception.Raise_Exception;
458: END IF;
459:
463: ELSIF NOT Igs_Ad_Room_Pkg.Get_PK_For_Validation (
464: new_references.room_code,
465: 'N'
466: ) THEN
467: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
468: IGS_GE_MSG_STACK.ADD;
469: App_Exception.Raise_Exception;
470: END IF;
471:
474: NULL;
475: ELSIF NOT Igs_Ps_Unit_Ofr_Opt_Pkg.Get_UK_For_Validation (
476: new_references.uoo_id
477: ) THEN
478: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
479: IGS_GE_MSG_STACK.ADD;
480: App_Exception.Raise_Exception;
481: END IF;
482:
485: NULL;
486: ELSIF NOT Igs_Lookups_View_Pkg.Get_PK_For_Validation (
487: 'SCHEDULE_TYPE', new_references.schedule_status
488: ) THEN
489: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
490: IGS_GE_MSG_STACK.ADD;
491: App_Exception.Raise_Exception;
492: END IF;
493:
496: NULL;
497: ELSIF NOT Igs_Lookups_View_Pkg.Get_PK_For_Validation (
498: 'IGS_OR_LOC_REGION', new_references.preferred_region_code
499: ) THEN
500: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
501: IGS_GE_MSG_STACK.ADD;
502: App_Exception.Raise_Exception;
503: END IF;
504:
639: Open cur_rowid;
640: Fetch cur_rowid INTO lv_rowid;
641: IF (cur_rowid%FOUND) THEN
642: Close cur_rowid;
643: Fnd_Message.Set_Name ('IGS', 'IGS_PS_USO_BLDG_FK');
644: IGS_GE_MSG_STACK.ADD;
645: App_Exception.Raise_Exception;
646: Return;
647: 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_USO_ROOM_FK');
682: IGS_GE_MSG_STACK.ADD;
683: App_Exception.Raise_Exception;
684: Return;
685: END IF;
715: Open cur_rowid;
716: Fetch cur_rowid INTO lv_rowid;
717: IF (cur_rowid%FOUND) THEN
718: Close cur_rowid;
719: Fnd_Message.Set_Name ('IGS', 'IGS_PS_USO_UOO_UFK');
720: IGS_GE_MSG_STACK.ADD;
721: App_Exception.Raise_Exception;
722: Return;
723: END IF;
870: -- Call all the procedures related to Before Insert.
871:
872: IF Get_Pk_For_Validation(
873: new_references.unit_section_occurrence_id) THEN
874: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
875: IGS_GE_MSG_STACK.ADD;
876: App_Exception.Raise_Exception;
877: END IF;
878:
890: ELSIF (p_action = 'VALIDATE_INSERT') THEN
891: -- Call all the procedures related to Before Insert.
892: IF Get_PK_For_Validation (
893: new_references.unit_section_occurrence_id) THEN
894: Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
895: IGS_GE_MSG_STACK.ADD;
896: App_Exception.Raise_Exception;
897: END IF;
898: Check_Uniqueness;
1063: ELSE
1064: X_PROGRAM_UPDATE_DATE := SYSDATE;
1065: END IF;
1066: else
1067: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1068: IGS_GE_MSG_STACK.ADD;
1069: app_exception.raise_exception;
1070: end if;
1071: SELECT
1408: begin
1409: open c1;
1410: fetch c1 into tlinfo;
1411: if (c1%notfound) then
1412: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1413: IGS_GE_MSG_STACK.ADD;
1414: close c1;
1415: app_exception.raise_exception;
1416: return;
1570:
1571: ) then
1572: null;
1573: else
1574: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1575: IGS_GE_MSG_STACK.ADD;
1576: app_exception.raise_exception;
1577: end if;
1578: return;
1670: if X_LAST_UPDATE_LOGIN is NULL then
1671: X_LAST_UPDATE_LOGIN := -1;
1672: end if;
1673: else
1674: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1675: IGS_GE_MSG_STACK.ADD;
1676: app_exception.raise_exception;
1677: end if;
1678: Before_DML(