[Home] [Help]
69: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
70: Close cur_old_ref_values;
71: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
72: IGS_GE_MSG_STACK.ADD;
73: App_Exception.Raise_Exception;
74: Return;
75: END IF;
76: Close cur_old_ref_values;
77:
143: new_references.location_type,
144: v_message_name) = FALSE THEN
145: Fnd_Message.Set_Name('IGS',v_message_name);
146: IGS_GE_MSG_STACK.ADD;
147: App_Exception.Raise_Exception;
148: END IF;
149: END IF;
150: IF p_inserting OR p_updating THEN
151: IF new_references.location_cd <> old_references.location_cd THEN
154: new_references.location_type,
155: v_message_name) = FALSE THEN
156: Fnd_Message.Set_Name('IGS',v_message_name);
157: IGS_GE_MSG_STACK.ADD;
158: App_Exception.Raise_Exception;
159: END IF;
160: END IF;
161: IF IGS_OR_VAL_LOC.assp_val_loc_ve_open (
162: new_references.location_cd,
164: new_references.closed_ind,
165: v_message_name) = FALSE THEN
166: Fnd_Message.Set_Name('IGS',v_message_name);
167: IGS_GE_MSG_STACK.ADD;
168: App_Exception.Raise_Exception;
169: END IF;
170: IF IGS_OR_VAL_LOC.assp_val_loc_coord (
171: new_references.location_type,
172: new_references.coord_person_id,
172: new_references.coord_person_id,
173: v_message_name) = FALSE THEN
174: Fnd_Message.Set_Name('IGS',v_message_name);
175: IGS_GE_MSG_STACK.ADD;
176: App_Exception.Raise_Exception;
177: END IF;
178: IF (new_references.coord_person_id IS NOT NULL and
179: new_references.coord_person_id <> old_references.coord_person_id) THEN
180: IF IGS_CO_VAL_OC.genp_val_prsn_id (
181: new_references.coord_person_id,
182: v_message_name) = FALSE THEN
183: Fnd_Message.Set_Name('IGS',v_message_name);
184: IGS_GE_MSG_STACK.ADD;
185: App_Exception.Raise_Exception;
186: END IF;
187: END IF;
188: END IF;
189:
219: IF upper(Column_Name) = 'MAIL_DLVRY_WRK_DAYS' OR Column_Name IS NULL THEN
220: IF new_references.mail_dlvry_wrk_days < 0 OR new_references.mail_dlvry_wrk_days > 99 THEN
221: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
222: IGS_GE_MSG_STACK.ADD;
223: App_Exception.Raise_Exception;
224: END IF;
225: END IF;
226: IF upper(Column_Name) = 'CLOSED_IND' OR Column_Name IS NULL THEN
227: IF new_references.closed_ind NOT IN ('Y','N') THEN
226: IF upper(Column_Name) = 'CLOSED_IND' OR Column_Name IS NULL THEN
227: IF new_references.closed_ind NOT IN ('Y','N') THEN
228: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
229: IGS_GE_MSG_STACK.ADD;
230: App_Exception.Raise_Exception;
231: END IF;
232: END IF;
233:
234: IF upper(Column_Name) = 'LOCATION_CD' OR Column_Name IS NULL THEN
234: IF upper(Column_Name) = 'LOCATION_CD' OR Column_Name IS NULL THEN
235: IF new_references.location_cd <> UPPER(new_references.location_cd) THEN
236: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: END IF;
240: END IF;
241: IF upper(Column_Name) = 'LOCATION_TYPE' OR Column_Name IS NULL THEN
242: IF new_references.location_type <> UPPER(new_references.location_type) THEN
241: IF upper(Column_Name) = 'LOCATION_TYPE' OR Column_Name IS NULL THEN
242: IF new_references.location_type <> UPPER(new_references.location_type) THEN
243: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
244: IGS_GE_MSG_STACK.ADD;
245: App_Exception.Raise_Exception;
246: END IF;
247: END IF;
248:
249: END Check_Constraints;
269: new_references.location_type ,
270: 'N' ) THEN
271: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
272: IGS_GE_MSG_STACK.ADD;
273: App_Exception.Raise_Exception;
274: END IF;
275: END IF;
276:
277: IF (((old_references.coord_person_id = new_references.coord_person_id)) OR
282: new_references.coord_person_id
283: ) THEN
284: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288: END IF;
289:
290: IF ((old_references.rev_account_cd = new_references.rev_account_cd) OR
295: new_references.rev_account_cd
296: ) THEN
297: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
298: IGS_GE_MSG_STACK.ADD;
299: App_Exception.Raise_Exception;
300: END IF;
301: END IF;
302:
303: END Check_Parent_Existance;
489: IF (cur_rowid%FOUND) THEN
490: Close cur_rowid;
491: Fnd_Message.Set_Name ('IGS', 'IGS_AD_LOC_LOT_FK');
492: IGS_GE_MSG_STACK.ADD;
493: App_Exception.Raise_Exception;
494: Return;
495: END IF;
496: Close cur_rowid;
497:
523: IF (cur_rowid%FOUND) THEN
524: Close cur_rowid;
525: Fnd_Message.Set_Name ('IGS', 'IGS_AD_LOC_PE_FK');
526: IGS_GE_MSG_STACK.ADD;
527: App_Exception.Raise_Exception;
528: Return;
529: END IF;
530: Close cur_rowid;
531:
627: new_references.location_cd
628: ) THEN
629: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
630: IGS_GE_MSG_STACK.ADD;
631: App_Exception.Raise_Exception;
632: END IF;
633: Check_Constraints;
634: Check_Parent_Existance;
635: ELSIF (p_action = 'UPDATE') THEN
643: new_references.location_cd
644: ) THEN
645: Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');
646: IGS_GE_MSG_STACK.ADD;
647: App_Exception.Raise_Exception;
648: END IF;
649: Check_Constraints;
650: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
651: Check_Constraints;
741: end if;
742: else
743: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
744: IGS_GE_MSG_STACK.ADD;
745: app_exception.raise_exception;
746: end if;
747:
748: Before_DML (
749: p_action => 'INSERT' ,
948: if (c1%notfound) then
949: close c1;
950: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
951: IGS_GE_MSG_STACK.ADD;
952: app_exception.raise_exception;
953: return;
954: end if;
955: close c1;
956:
1033: NULL;
1034: ELSE
1035: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1036: IGS_GE_MSG_STACK.ADD;
1037: app_exception.raise_exception;
1038: END IF;
1039: RETURN;
1040: END LOCK_ROW;
1041:
1101: end if;
1102: else
1103: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1104: IGS_GE_MSG_STACK.ADD;
1105: app_exception.raise_exception;
1106: end if;
1107: Before_DML (
1108: p_action => 'UPDATE' ,
1109: x_rowid => X_ROWID,