[Home] [Help]
39: Open cur_old_ref_values;
40: Fetch cur_old_ref_values INTO old_references;
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;
110: IF IGS_PS_VAL_UNIT.crsp_val_iud_uv_dtl (
111: v_unit_cd,
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.
121: IF IGS_PS_VAL_CRV.crsp_val_ou_sys_sts (
122: new_references.org_unit_cd,
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;
204:
205: IF upper(column_name) = 'CI_SEQUENCE_NUMBER' OR
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;
279: IF NOT IGS_OR_UNIT_PKG.Get_PK_For_Validation (
280: new_references.org_unit_cd,
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;
307: new_references.ci_sequence_number,
308: new_references.location_cd,
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;
320: ELSE
321: IF NOT IGS_PS_UNIT_OFR_OPT_PKG.Get_UK_For_Validation (
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;
385: Open cur_rowid;
386: Fetch cur_rowid INTO lv_rowid;
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;
421: Open cur_rowid;
422: Fetch cur_rowid INTO lv_rowid;
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;
447: Open cur_rowid;
448: Fetch cur_rowid INTO lv_rowid;
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;
513: new_references.unit_class,
514: new_references.org_unit_cd,
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;
538: new_references.unit_class,
539: new_references.org_unit_cd,
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;
627: X_PROGRAM_UPDATE_DATE := SYSDATE;
628: END IF;
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:
738: open c1;
739: fetch c1 into tlinfo;
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;
751:
752: ) then
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;
796: if X_LAST_UPDATE_LOGIN is NULL then
797: X_LAST_UPDATE_LOGIN := -1;
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(