[Home] [Help]
41: Open cur_old_ref_values;
42: Fetch cur_old_ref_values INTO old_references;
43: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
44: Close cur_old_ref_values;
45: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
46: IGS_GE_MSG_STACK.ADD;
47: App_Exception.Raise_Exception;
48: Return;
49: END IF;
90: IF upper(column_name)= 'UNIT_CD' OR
91: column_name is null THEN
92: IF new_references.unit_cd <> UPPER(new_references.unit_cd)
93: THEN
94: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
95: IGS_GE_MSG_STACK.ADD;
96: App_Exception.Raise_Exception;
97: END IF;
98: END IF;
100: IF upper(column_name)= 'UNIT_LEVEL' OR
101: column_name is null THEN
102: IF new_references.unit_level <> UPPER(new_references.unit_level)
103: THEN
104: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
105: IGS_GE_MSG_STACK.ADD;
106: App_Exception.Raise_Exception;
107: END IF;
108: END IF;
118: ELSE
119: IF NOT IGS_PS_UNIT_LEVEL_PKG.Get_PK_For_Validation (
120: new_references.unit_level
121: )THEN
122: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
123: IGS_GE_MSG_STACK.ADD;
124: App_Exception.Raise_Exception;
125: END IF;
126:
135: IF NOT IGS_PS_UNIT_VER_PKG.Get_PK_For_Validation (
136: new_references.unit_cd,
137: new_references.version_number
138: )THEN
139: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception;
142: END IF;
143: END IF;
151: IF NOT IGS_PS_VER_PKG.Get_PK_For_Validation (
152: new_references.course_cd,
153: new_references.course_version_number
154: ) THEN
155: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
156: IGS_GE_MSG_STACK.ADD;
157: App_Exception.Raise_Exception;
158: END IF;
159: END IF;
213: Open cur_rowid;
214: Fetch cur_rowid INTO lv_rowid;
215: IF (cur_rowid%FOUND) THEN
216: Close cur_rowid;
217: Fnd_Message.Set_Name ('IGS', 'IGS_PS_CULH_UV_FK');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: Return;
221: END IF;
236: BEGIN
237: OPEN cur_rowid;
238: FETCH cur_rowid INTO lv_rowid;
239: IF cur_rowid%FOUND THEN
240: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PR_PRA_CRV_FK');
241: IGS_GE_MSG_STACK.ADD;
242: CLOSE CUR_ROWID;
243: APP_EXCEPTION.RAISE_EXCEPTION;
244: RETURN;
300: new_references.hist_start_dt,
301: new_references.course_cd,
302: new_references.course_version_number
303: ) THEN
304: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
305: IGS_GE_MSG_STACK.ADD;
306: App_Exception.Raise_Exception;
307: END IF;
308: Check_Constraints;
319: new_references.hist_start_dt,
320: new_references.course_cd,
321: new_references.course_version_number
322: ) THEN
323: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
324: IGS_GE_MSG_STACK.ADD;
325: App_Exception.Raise_Exception;
326: END IF;
327: Check_Constraints;
382: if X_LAST_UPDATE_LOGIN is NULL then
383: X_LAST_UPDATE_LOGIN := -1;
384: end if;
385: else
386: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
387: IGS_GE_MSG_STACK.ADD;
388: app_exception.raise_exception;
389: end if;
390:
482: open c1;
483: fetch c1 into tlinfo;
484: if (c1%notfound) then
485: close c1;
486: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
487: app_exception.raise_exception;
488: return;
489: end if;
490: close c1;
499: AND (X_WAM_WEIGHTING is null)))
500: ) then
501: null;
502: else
503: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
504: app_exception.raise_exception;
505: end if;
506: return;
507: end LOCK_ROW;
537: if X_LAST_UPDATE_LOGIN is NULL then
538: X_LAST_UPDATE_LOGIN := -1;
539: end if;
540: else
541: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
542: IGS_GE_MSG_STACK.ADD;
543: app_exception.raise_exception;
544: end if;
545: