DBA Data[Home] [Help]

APPS.IGS_AD_CD_PKG dependencies on IGS_GE_MSG_STACK

Line 42: IGS_GE_MSG_STACK.ADD;

38: Open cur_old_ref_values;
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;

Line 82: IGS_GE_MSG_STACK.ADD;

78: IF IGS_AD_VAL_ACO.admp_val_tac_closed(
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.

Line 94: IGS_GE_MSG_STACK.ADD;

90: IF IGS_AD_VAL_ACA.admp_val_bfa_closed(
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:

Line 121: IGS_GE_MSG_STACK.ADD;

117:
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

Line 128: IGS_GE_MSG_STACK.ADD;

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
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

Line 135: IGS_GE_MSG_STACK.ADD;

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
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

Line 142: IGS_GE_MSG_STACK.ADD;

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
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;

Line 159: IGS_GE_MSG_STACK.ADD;

155: IF NOT IGS_AD_BASIS_FOR_AD_PKG.Get_PK_For_Validation (
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

Line 171: IGS_GE_MSG_STACK.ADD;

167: IF NOT IGS_AD_TAC_AD_CD_PKG.Get_PK_For_Validation (
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:

Line 228: IGS_GE_MSG_STACK.ADD;

224: Fetch cur_rowid INTO lv_rowid;
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;

Line 254: IGS_GE_MSG_STACK.ADD;

250: Fetch cur_rowid INTO lv_rowid;
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;

Line 299: IGS_GE_MSG_STACK.ADD;

295: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
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;

Line 316: IGS_GE_MSG_STACK.ADD;

312: ELSIF (p_action = 'VALIDATE_INSERT') THEN
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

Line 367: IGS_GE_MSG_STACK.ADD;

363: X_LAST_UPDATE_LOGIN := -1;
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(

Line 446: IGS_GE_MSG_STACK.ADD;

442: open c1;
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;

Line 463: IGS_GE_MSG_STACK.ADD;

459: ) then
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;

Line 497: IGS_GE_MSG_STACK.ADD;

493: X_LAST_UPDATE_LOGIN := -1;
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(