[Home] [Help]
35: -- Populate Old Values.
36: Open cur_old_ref_values;
37: Fetch cur_old_ref_values INTO old_references;
38: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
39: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
40: IGS_GE_MSG_STACK.ADD;
41: Close cur_old_ref_values;
42: App_Exception.Raise_Exception;
43: Return;
75: IF IGS_PE_VAL_PIGS.idgp_val_pigs_iud (
76: new_references.group_id,
77: new_references.person_id,
78: v_message_name ) = FALSE THEN
79: Fnd_Message.Set_Name('IGS', v_message_name);
80: IGS_GE_MSG_STACK.ADD;
81: App_Exception.Raise_Exception;
82: END IF;
83: END IF;
86: IF IGS_PE_VAL_PIGS.idgp_val_pigs_iud (
87: old_references.group_id,
88: old_references.person_id,
89: v_message_name ) = FALSE THEN
90: Fnd_Message.Set_Name('IGS', v_message_name);
91: IGS_GE_MSG_STACK.ADD;
92: App_Exception.Raise_Exception;
93: END IF;
94: END IF;
100: p_message_name VARCHAR2(30);
101: BEGIN
102: IF ( p_inserting = TRUE OR (p_updating = TRUE AND new_references.group_id <> old_references.group_id ) ) THEN
103: IF NOT IGS_PE_PERSID_GROUP_PKG.val_persid_group(new_references.group_id,p_message_name) THEN
104: Fnd_Message.Set_Name('IGS', p_message_name);
105: IGS_GE_MSG_STACK.ADD;
106: App_Exception.Raise_Exception;
107: END IF;
108: END IF;
130:
131: IF upper(column_name) = 'INSERT_IND' OR
132: column_name is null Then
133: IF new_references.insert_ind NOT IN ( 'Y' , 'N' ) Then
134: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
135: IGS_GE_MSG_STACK.ADD;
136: App_Exception.Raise_Exception;
137: END IF;
138: END IF;
139:
140: IF upper(column_name) = 'UPDATE_IND' OR
141: column_name is null Then
142: IF new_references.update_ind NOT IN ( 'Y' , 'N' ) Then
143: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
144: IGS_GE_MSG_STACK.ADD;
145: App_Exception.Raise_Exception;
146: END IF;
147: END IF;
147: END IF;
148: IF upper(column_name) = 'DELETE_IND' OR
149: column_name is null Then
150: IF new_references.delete_ind NOT IN ( 'Y' , 'N' ) 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;
155: END IF;
156: IF upper(column_name) = 'GROUP_ID' OR
157: column_name is null Then
158: IF new_references.group_id < 1 OR new_references.group_id > 999999 Then
159: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: END IF;
172: NULL;
173: ELSE
174: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
175: new_references.person_id ) THEN
176: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
177: IGS_GE_MSG_STACK.ADD;
178: App_Exception.Raise_Exception;
179: END IF;
180: END IF;
185: ELSE
186:
187: IF NOT IGS_PE_PERSID_GROUP_PKG.Get_PK_For_Validation (
188: new_references.group_id ) THEN
189: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
190: IGS_GE_MSG_STACK.ADD;
191: App_Exception.Raise_Exception;
192: END IF;
193: END IF;
236:
237: Open cur_rowid;
238: Fetch cur_rowid INTO lv_rowid;
239: IF (cur_rowid%FOUND) THEN
240: Fnd_Message.Set_Name ('IGS', 'IGS_PE_PIGS_PE_FK');
241: IGS_GE_MSG_STACK.ADD;
242: Close cur_rowid;
243: App_Exception.Raise_Exception;
244: Return;
284: BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );
285: IF Get_PK_For_Validation (
286: new_references.group_id ,
287: new_references.person_id) THEN
288: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
289: IGS_GE_MSG_STACK.ADD;
290: App_Exception.Raise_Exception;
291: END IF;
292:
307: ELSIF (p_action = 'VALIDATE_INSERT') THEN
308: IF Get_PK_For_Validation (
309: new_references.group_id ,
310: new_references.person_id) THEN
311: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
312: IGS_GE_MSG_STACK.ADD;
313: App_Exception.Raise_Exception;
314: END IF;
315:
390: else
391: X_PROGRAM_UPDATE_DATE := SYSDATE;
392: end if;
393: else
394: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
395: IGS_GE_MSG_STACK.ADD;
396: app_exception.raise_exception;
397: end if;
398: Before_DML(
475: begin
476: open c1;
477: fetch c1 into tlinfo;
478: if (c1%notfound) then
479: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
480:
481: close c1;
482: App_Exception.Raise_Exception;
483: return;
489: AND (tlinfo.DELETE_IND = X_DELETE_IND)
490: ) then
491: null;
492: else
493: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
494: app_exception.raise_exception;
495: end if;
496: return;
497: end LOCK_ROW;
526: if X_LAST_UPDATE_LOGIN is NULL then
527: X_LAST_UPDATE_LOGIN := -1;
528: end if;
529: else
530: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
531: IGS_GE_MSG_STACK.ADD;
532: app_exception.raise_exception;
533: end if;
534: