[Home] [Help]
41: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
42: Close cur_old_ref_values;
43: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
44: IGS_GE_MSG_STACK.ADD;
45: App_Exception.Raise_Exception;
46: Return;
47: END IF;
48: Close cur_old_ref_values;
49:
112: v_version_number,
113: v_message_name) = FALSE THEN
114: Fnd_Message.Set_Name('IGS', v_message_name);
115: IGS_GE_MSG_STACK.ADD;
116: App_Exception.Raise_Exception;
117: END IF;
118: -- Validate the org IGS_PS_UNIT is not inactive.
119: IF p_inserting THEN
120: -- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_TRo.crsp_val_ou_sys_sts
123: new_references.ou_start_dt,
124: v_message_name) = FALSE THEN
125: Fnd_Message.Set_Name('IGS', v_message_name);
126: IGS_GE_MSG_STACK.ADD;
127: App_Exception.Raise_Exception;
128: END IF;
129: END IF;
130:
131:
206: column_name is null Then
207: IF new_references.ci_sequence_number < 1 OR new_references.ci_sequence_number > 999999 Then
208: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: END IF;
212: END IF;
213:
214: IF upper(column_name) = 'PERCENTAGE' OR
215: column_name is null Then
216: IF new_references.percentage < 000.01 OR new_references.percentage > 100.00 Then
217: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: END IF;
221: END IF;
222:
223: IF upper(column_name) = 'UOO_ID' OR
224: column_name is null Then
225: IF new_references.uoo_id < 1 OR new_references.uoo_id > 999999 Then
226: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
227: IGS_GE_MSG_STACK.ADD;
228: App_Exception.Raise_Exception;
229: END IF;
230: END IF;
231:
232: IF upper(column_name) = 'CAL_TYPE' OR
233: column_name is null Then
234: IF new_references.cal_type <> UPPER(new_references.cal_type) Then
235: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
240:
241: IF upper(column_name) = 'LOCATION_CD' OR
242: column_name is null Then
243: IF new_references.location_cd <> UPPER(new_references.location_cd) Then
244: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
245: IGS_GE_MSG_STACK.ADD;
246: App_Exception.Raise_Exception;
247: END IF;
248: END IF;
249:
250: IF upper(column_name) = 'UNIT_CLASS' OR
251: column_name is null Then
252: IF new_references.unit_class <> UPPER(new_references.unit_class) Then
253: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
254: IGS_GE_MSG_STACK.ADD;
255: App_Exception.Raise_Exception;
256: END IF;
257: END IF;
258:
259: IF upper(column_name) = 'UNIT_CD' OR
260: column_name is null Then
261: IF new_references.unit_cd <> UPPER(new_references.unit_cd) Then
262: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
263: IGS_GE_MSG_STACK.ADD;
264: App_Exception.Raise_Exception;
265: END IF;
266: END IF;
267:
268: END check_constraints;
281: new_references.ou_start_dt
282: ) THEN
283: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
284: IGS_GE_MSG_STACK.ADD;
285: App_Exception.Raise_Exception;
286: END IF;
287: END IF;
288:
289: IF (((old_references.unit_cd = new_references.unit_cd) AND
309: new_references.unit_class
310: ) THEN
311: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
312: IGS_GE_MSG_STACK.ADD;
313: App_Exception.Raise_Exception;
314: END IF;
315: END IF;
316:
317: IF (((old_references.uoo_id = new_references.uoo_id)) OR
322: new_references.uoo_id
323: ) THEN
324: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
325: IGS_GE_MSG_STACK.ADD;
326: App_Exception.Raise_Exception;
327: END IF;
328: END IF;
329: END Check_Parent_Existance;
330:
387: IF (cur_rowid%FOUND) THEN
388: Close cur_rowid;
389: Fnd_Message.Set_Name ('IGS', 'IGS_PS_TRO_OU_FK');
390: IGS_GE_MSG_STACK.ADD;
391: App_Exception.Raise_Exception;
392: Return;
393: END IF;
394: Close cur_rowid;
395:
423: IF (cur_rowid%FOUND) THEN
424: Close cur_rowid;
425: Fnd_Message.Set_Name ('IGS', 'IGS_PS_TRO_UOO_FK');
426: IGS_GE_MSG_STACK.ADD;
427: App_Exception.Raise_Exception;
428: Return;
429: END IF;
430: Close cur_rowid;
431:
449: IF (cur_rowid%FOUND) THEN
450: Close cur_rowid;
451: Fnd_Message.Set_Name ('IGS', 'IGS_PS_TRO_UOO_FK');
452: IGS_GE_MSG_STACK.ADD;
453: App_Exception.Raise_Exception;
454: Return;
455: END IF;
456: Close cur_rowid;
457:
515: new_references.ou_start_dt
516: ) THEN
517: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
518: IGS_GE_MSG_STACK.ADD;
519: App_Exception.Raise_Exception;
520: END IF;
521: Check_Constraints;
522: Check_Parent_Existance;
523: ELSIF (p_action = 'UPDATE') THEN
540: new_references.ou_start_dt
541: ) THEN
542: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
543: IGS_GE_MSG_STACK.ADD;
544: App_Exception.Raise_Exception;
545: END IF;
546: Check_Constraints;
547: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
548: Check_Constraints;
629:
630: else
631: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
632: IGS_GE_MSG_STACK.ADD;
633: app_exception.raise_exception;
634: end if;
635:
636: Before_DML(
637: p_action => 'INSERT',
740: if (c1%notfound) then
741: close c1;
742: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
743: IGS_GE_MSG_STACK.ADD;
744: app_exception.raise_exception;
745: return;
746: end if;
747: close c1;
748:
753: null;
754: else
755: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
756: IGS_GE_MSG_STACK.ADD;
757: app_exception.raise_exception;
758: end if;
759: return;
760: end LOCK_ROW;
761:
798: end if;
799: else
800: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
801: IGS_GE_MSG_STACK.ADD;
802: app_exception.raise_exception;
803: end if;
804: Before_DML(
805: p_action => 'UPDATE',
806: x_rowid => X_ROWID,