DBA Data[Home] [Help]

APPS.IGS_AD_CD_PKG dependencies on APP_EXCEPTION

Line 43: App_Exception.Raise_Exception;

39: Fetch cur_old_ref_values INTO old_references;
40: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
41: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
42: IGS_GE_MSG_STACK.ADD;
43: App_Exception.Raise_Exception;
44: Close cur_old_ref_values;
45: Return;
46: END IF;
47: Close cur_old_ref_values;

Line 83: App_Exception.Raise_Exception;

79: new_references.tac_admission_cd,
80: v_message_name) = FALSE THEN
81: Fnd_Message.Set_Name('IGS',v_message_name);
82: IGS_GE_MSG_STACK.ADD;
83: App_Exception.Raise_Exception;
84: END IF;
85: END IF;
86: -- Validate Basis for Admission type.
87: IF p_inserting OR (old_references.basis_for_admission_type <>

Line 95: App_Exception.Raise_Exception;

91: new_references.basis_for_admission_type,
92: v_message_name) = FALSE THEN
93: Fnd_Message.Set_Name('IGS',v_message_name);
94: IGS_GE_MSG_STACK.ADD;
95: App_Exception.Raise_Exception;
96: END IF;
97: END IF;
98:
99: END BeforeRowInsertUpdate1;

Line 122: App_Exception.Raise_Exception;

118: IF upper(column_name) = 'ADMISSION_CD' OR column_name is null Then
119: IF new_references.admission_cd <> UPPER(new_references.admission_cd ) Then
120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
121: IGS_GE_MSG_STACK.ADD;
122: App_Exception.Raise_Exception;
123: END IF;
124: END IF;
125: IF upper(column_name) = 'BASIS_FOR_ADMISSION_TYPE' OR column_name is null Then
126: IF new_references.basis_for_admission_type <> UPPER(new_references.basis_for_admission_type ) Then

Line 129: App_Exception.Raise_Exception;

125: IF upper(column_name) = 'BASIS_FOR_ADMISSION_TYPE' OR column_name is null Then
126: IF new_references.basis_for_admission_type <> UPPER(new_references.basis_for_admission_type ) Then
127: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception;
130: END IF;
131: END IF;
132: IF upper(column_name) = 'CLOSED_IND' OR column_name is null Then
133: IF new_references.closed_ind NOT IN ( 'Y' , 'N' ) Then

Line 136: App_Exception.Raise_Exception;

132: IF upper(column_name) = 'CLOSED_IND' OR column_name is null Then
133: IF new_references.closed_ind NOT IN ( 'Y' , 'N' ) Then
134: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
135: IGS_GE_MSG_STACK.ADD;
136: App_Exception.Raise_Exception;
137: END IF;
138: END IF;
139: IF upper(column_name) = 'TAC_ADMISSION_CD' OR column_name is null Then
140: IF new_references.tac_admission_cd <> UPPER(new_references.tac_admission_cd ) Then

Line 143: App_Exception.Raise_Exception;

139: IF upper(column_name) = 'TAC_ADMISSION_CD' OR column_name is null Then
140: IF new_references.tac_admission_cd <> UPPER(new_references.tac_admission_cd ) Then
141: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
142: IGS_GE_MSG_STACK.ADD;
143: App_Exception.Raise_Exception;
144: END IF;
145: END IF;
146: END Check_Constraints;
147:

Line 160: App_Exception.Raise_Exception;

156: new_references.basis_for_admission_type,
157: 'N') THEN
158: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
159: IGS_GE_MSG_STACK.ADD;
160: App_Exception.Raise_Exception;
161: END IF;
162: END IF;
163: IF (((old_references.tac_admission_cd = new_references.tac_admission_cd)) OR
164: ((new_references.tac_admission_cd IS NULL))) THEN

Line 172: App_Exception.Raise_Exception;

168: new_references.tac_admission_cd ,
169: 'N') THEN
170: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
171: IGS_GE_MSG_STACK.ADD;
172: App_Exception.Raise_Exception;
173: END IF;
174: END IF;
175:
176: END Check_Parent_Existance;

Line 229: App_Exception.Raise_Exception;

225: IF (cur_rowid%FOUND) THEN
226: Close cur_rowid;
227: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACO_BFA_FK');
228: IGS_GE_MSG_STACK.ADD;
229: App_Exception.Raise_Exception;
230: Return;
231: END IF;
232: Close cur_rowid;
233:

Line 255: App_Exception.Raise_Exception;

251: IF (cur_rowid%FOUND) THEN
252: Close cur_rowid;
253: Fnd_Message.Set_Name ('IGS', 'IGS_AD_ACO_TAC_FK');
254: IGS_GE_MSG_STACK.ADD;
255: App_Exception.Raise_Exception;
256: Return;
257: END IF;
258: Close cur_rowid;
259:

Line 300: App_Exception.Raise_Exception;

296: IF Get_PK_For_Validation (
297: new_references.admission_cd ) THEN
298: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
299: IGS_GE_MSG_STACK.ADD;
300: App_Exception.Raise_Exception;
301: END IF;
302: Check_Constraints;
303: Check_Parent_Existance;
304: ELSIF (p_action = 'UPDATE') THEN

Line 317: App_Exception.Raise_Exception;

313: IF Get_PK_For_Validation (
314: new_references.admission_cd ) THEN
315: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
316: IGS_GE_MSG_STACK.ADD;
317: App_Exception.Raise_Exception;
318: END IF;
319: Check_Constraints;
320: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
321: Check_Constraints;

Line 368: app_exception.raise_exception;

364: end if;
365: else
366: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
367: IGS_GE_MSG_STACK.ADD;
368: app_exception.raise_exception;
369: end if;
370:
371: Before_DML(
372: p_action=>'INSERT',

Line 447: app_exception.raise_exception;

443: fetch c1 into tlinfo;
444: if (c1%notfound) then
445: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
446: IGS_GE_MSG_STACK.ADD;
447: app_exception.raise_exception;
448: close c1;
449: return;
450: end if;
451: close c1;

Line 464: app_exception.raise_exception;

460: null;
461: else
462: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
463: IGS_GE_MSG_STACK.ADD;
464: app_exception.raise_exception;
465: end if;
466: return;
467: end LOCK_ROW;
468:

Line 498: app_exception.raise_exception;

494: end if;
495: else
496: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
497: IGS_GE_MSG_STACK.ADD;
498: app_exception.raise_exception;
499: end if;
500:
501: Before_DML(
502: p_action=>'UPDATE',