[Home] [Help]
30: -- Populate Old Values.
31: Open cur_old_ref_values;
32: FETCH cur_old_ref_values INTO old_references;
33: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
34: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
35: IGS_GE_MSG_STACK.ADD;
36: Close cur_old_ref_values;
37: App_Exception.Raise_Exception;
38: Return;
80: CLOSE c_deceased;
81: -- Validate that inserts/updates/deletes are allowed if a person is deceased
82: -- Validate that the person is not deceased
83: IF v_deceased_ind = 'Y' THEN
84: Fnd_Message.Set_Name('IGS', 'IGS_IN_DEC_NO_INQ');
85: IGS_GE_MSG_STACK.ADD;
86: App_Exception.Raise_Exception;
87: END IF;
88:
95: IF IGR_GEN_001.ADMP_INS_EAP_EITPI(new_references.person_id,
96: new_references.enquiry_appl_number,
97: p_enquiry_information_type,
98: v_message_name) = FALSE THEN
99: Fnd_Message.Set_Name('IGS', v_message_name);
100: IGS_GE_MSG_STACK.ADD;
101: App_Exception.Raise_Exception;
102: END IF;
103: END IF;
117: IF NOT(IGR_I_APPL_PKG.Get_PK_For_Validation (
118: new_references.person_id,
119: new_references.enquiry_appl_number
120: ))THEN
121: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
122: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_APPL'));
123: IGS_GE_MSG_STACK.ADD;
124: App_Exception.Raise_Exception;
125: END IF;
118: new_references.person_id,
119: new_references.enquiry_appl_number
120: ))THEN
121: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
122: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_APPL'));
123: IGS_GE_MSG_STACK.ADD;
124: App_Exception.Raise_Exception;
125: END IF;
126:
132: ELSE
133: IF NOT(IGR_I_PKG_ITEM_PKG.Get_PK_For_Validation (
134: new_references.INFO_TYPE_ID
135: ))THEN
136: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
137: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_INFO_TYPE'));
138: IGS_GE_MSG_STACK.ADD;
139: App_Exception.Raise_Exception;
140: END IF ;
133: IF NOT(IGR_I_PKG_ITEM_PKG.Get_PK_For_Validation (
134: new_references.INFO_TYPE_ID
135: ))THEN
136: FND_MESSAGE.SET_NAME('IGS','IGS_GE_PK_UK_NOT_FOUND');
137: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_INFO_TYPE'));
138: IGS_GE_MSG_STACK.ADD;
139: App_Exception.Raise_Exception;
140: END IF ;
141: END IF;
154: END IF;
155: IF upper(column_name) = 'INFO_TYPE_ID' OR
156: column_name is null Then
157: IF new_references.INFO_TYPE_ID <> UPPER(new_references.INFO_TYPE_ID) Then
158: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
159: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_INFO_TYPE'));
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
155: IF upper(column_name) = 'INFO_TYPE_ID' OR
156: column_name is null Then
157: IF new_references.INFO_TYPE_ID <> UPPER(new_references.INFO_TYPE_ID) Then
158: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_VALUE_WITH_CTXT');
159: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('IGS','IGS_AD_ENQ_INFO_TYPE'));
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: END IF;
211:
212: Open cur_rowid;
213: Fetch cur_rowid INTO lv_rowid;
214: IF (cur_rowid%FOUND) THEN
215: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAPIT_EAP_FK');
216: IGS_GE_MSG_STACK.ADD;
217: Close cur_rowid;
218: App_Exception.Raise_Exception;
219: Return;
237:
238: Open cur_rowid;
239: Fetch cur_rowid INTO lv_rowid;
240: IF (cur_rowid%FOUND) THEN
241: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAPIT_EIT_FK');
242: IGS_GE_MSG_STACK.ADD;
243: Close cur_rowid;
244: App_Exception.Raise_Exception;
245: Return;
282: new_references.person_id ,
283: new_references.enquiry_appl_number ,
284: new_references.INFO_TYPE_ID
285: ) THEN
286: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
287: IGS_GE_MSG_STACK.ADD;
288: App_Exception.Raise_Exception;
289: END IF;
290: Check_Constraints;
302: new_references.person_id ,
303: new_references.enquiry_appl_number ,
304: new_references.INFO_TYPE_ID
305: ) THEN
306: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
307: IGS_GE_MSG_STACK.ADD;
308: App_Exception.Raise_Exception;
309: END IF;
310: Check_Constraints;
345: if X_LAST_UPDATE_LOGIN is NULL then
346: X_LAST_UPDATE_LOGIN := -1;
347: end if;
348: else
349: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
350: IGS_GE_MSG_STACK.ADD;
351: app_exception.raise_exception;
352: end if;
353:
408: begin
409: open c1;
410: fetch c1 into tlinfo;
411: if (c1%notfound) then
412: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
413: IGS_GE_MSG_STACK.ADD;
414: close c1;
415: app_exception.raise_exception;
416: return;