[Home] [Help]
67: Open cur_old_ref_values;
68: Fetch cur_old_ref_values INTO old_references;
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;
141: (old_references.location_type <> new_references.location_type) THEN
142: IF IGS_OR_VAL_LOC.orgp_val_loc_type (
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;
152: IF IGS_OR_VAL_LOC.assp_val_loc_ve_xist (
153: new_references.location_cd,
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;
162: new_references.location_cd,
163: new_references.location_type,
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 (
170: IF IGS_OR_VAL_LOC.assp_val_loc_coord (
171: new_references.location_type,
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;
217: END IF;
218:
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;
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
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;
232: END IF;
233:
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;
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
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;
267: ELSE
268: IF NOT IGS_AD_LOCATION_TYPE_PKG.Get_PK_For_Validation (
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;
280: ELSE
281: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
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;
293: ELSE
294: IF NOT IGS_FI_ACC_PKG.Get_PK_For_Validation (
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;
487: Open cur_rowid;
488: Fetch cur_rowid INTO lv_rowid;
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;
521: Open cur_rowid;
522: Fetch cur_rowid INTO lv_rowid;
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;
625: BeforeRowInsertUpdate1 ( p_inserting => TRUE );
626: IF Get_PK_For_Validation (
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;
641: ELSIF (p_action = 'VALIDATE_INSERT') THEN
642: IF Get_PK_For_Validation (
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;
739: if X_LAST_UPDATE_LOGIN is NULL then
740: X_LAST_UPDATE_LOGIN := -1;
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:
946: open c1;
947: fetch c1 into tlinfo;
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;
1031: AND (X_rev_account_cd is null)))
1032: ) THEN
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;
1099: if X_LAST_UPDATE_LOGIN is NULL then
1100: X_LAST_UPDATE_LOGIN := -1;
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 (