[Home] [Help]
51: Open cur_old_ref_values;
52: Fetch cur_old_ref_values INTO old_references;
53: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
54: Close cur_old_ref_values;
55: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
56: IGS_GE_MSG_STACK.ADD;
57: App_Exception.Raise_Exception;
58: Return;
59: END IF;
118: END IF;
119:
120: IF upper(column_name) = 'CA_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
121: IF new_references.CA_SEQUENCE_NUMBER < 1 OR new_references.CA_SEQUENCE_NUMBER > 999999 then
122: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
123: IGS_GE_MSG_STACK.ADD;
124: App_Exception.Raise_Exception ;
125: END IF;
126: END IF;
126: END IF;
127: IF upper(column_name) = 'FINAL_TITLE_IND' OR COLUMN_NAME IS NULL THEN
128: IF new_references.FINAL_TITLE_IND <> upper(NEW_REFERENCES.FINAL_TITLE_IND) OR
129: new_references.FINAL_TITLE_IND NOT IN ('Y', 'N') then
130: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception ;
133: END IF;
134: END IF;
133: END IF;
134: END IF;
135: IF upper(column_name) = 'SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
136: IF new_references.SEQUENCE_NUMBER < 1 OR new_references.SEQUENCE_NUMBER > 999999 then
137: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
138: IGS_GE_MSG_STACK.ADD;
139: App_Exception.Raise_Exception ;
140: END IF;
141: END IF;
140: END IF;
141: END IF;
142: IF upper(column_name) = 'LIBRARY_CATALOGUE_NUMBER' OR COLUMN_NAME IS NULL THEN
143: IF new_references.LIBRARY_CATALOGUE_NUMBER <> NEW_REFERENCES.LIBRARY_CATALOGUE_NUMBER then
144: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
145: IGS_GE_MSG_STACK.ADD;
146: App_Exception.Raise_Exception ;
147: END IF;
148: END IF;
147: END IF;
148: END IF;
149: IF upper(column_name)= 'THESIS_FORMAT' OR COLUMN_NAME IS NULL THEN
150: IF new_references.THESIS_FORMAT <> NEW_REFERENCES.THESIS_FORMAT then
151: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
152: IGS_GE_MSG_STACK.ADD;
153: App_Exception.Raise_Exception ;
154: END IF;
155: END IF;
154: END IF;
155: END IF;
156: IF upper(column_name) = 'THESIS_RESULT_CD' OR COLUMN_NAME IS NULL THEN
157: IF new_references.THESIS_RESULT_CD <> upper(NEW_REFERENCES.THESIS_RESULT_CD) then
158: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
159: IGS_GE_MSG_STACK.ADD;
160: App_Exception.Raise_Exception ;
161: END IF;
162: END IF;
269: new_references.ca_sequence_number,
270: new_references.sequence_number,
271: new_references.hist_start_dt
272: ) THEN
273: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
274: IGS_GE_MSG_STACK.ADD;
275: App_Exception.Raise_Exception;
276: END IF;
277: Check_Constraints;
284: new_references.ca_sequence_number,
285: new_references.sequence_number,
286: new_references.hist_start_dt
287: ) THEN
288: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
289: IGS_GE_MSG_STACK.ADD;
290: App_Exception.Raise_Exception;
291: END IF;
292: Check_Constraints;
343: if X_LAST_UPDATE_LOGIN is NULL then
344: X_LAST_UPDATE_LOGIN := -1;
345: end if;
346: else
347: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
348: IGS_GE_MSG_STACK.ADD;
349: app_exception.raise_exception;
350: end if;
351:
500: open c1;
501: fetch c1 into tlinfo;
502: if (c1%notfound) then
503: close c1;
504: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
505: app_exception.raise_exception;
506: return;
507: end if;
508: close c1;
557:
558: ) then
559: null;
560: else
561: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
562: app_exception.raise_exception;
563: end if;
564: return;
565: end LOCK_ROW;
606: if X_LAST_UPDATE_LOGIN is NULL then
607: X_LAST_UPDATE_LOGIN := -1;
608: end if;
609: else
610: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
611: IGS_GE_MSG_STACK.ADD;
612: app_exception.raise_exception;
613: end if;
614: