[Home] [Help]
35: Open cur_old_ref_values;
36: Fetch cur_old_ref_values INTO old_references;
37: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
38: Close cur_old_ref_values;
39: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
40: IGS_RU_GEN_006.SET_TOKEN('IGS_RU_DESCRIPTION : P_ACTION INSERT, VALIDATE_INSERT : IGSUI03B.PLS');
41: IGS_GE_MSG_STACK.ADD;
42: App_Exception.Raise_Exception;
43: Return;
88: new_references.s_return_type,
89: new_references.rule_description,
90: v_message_name) = FALSE
91: THEN
92: Fnd_Message.Set_Name('IGS',v_message_name);
93: IGS_GE_MSG_STACK.ADD;
94: App_Exception.Raise_Exception;
95: END IF;
96: END IF;
195: END IF ;
196:
197: IF upper(Column_name) = 'S_RETURN_TYPE' OR COLUMN_NAME IS NULL THEN
198: IF new_references.S_RETURN_TYPE<> upper(new_references.S_RETURN_TYPE) then
199: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
200: IGS_GE_MSG_STACK.ADD;
201: App_Exception.Raise_Exception ;
202: END IF;
203:
204: END IF ;
205:
206: IF upper(Column_name) = 'SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
207: IF new_references.SEQUENCE_NUMBER < 0 or new_references.SEQUENCE_NUMBER > 999999 then
208: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception ;
211: END IF;
212:
213: END IF ;
214:
215: IF upper(Column_name) = 'PARENTHESIS_IND' OR COLUMN_NAME IS NULL THEN
216: IF new_references.PARENTHESIS_IND not in ('Y','N') then
217: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception ;
220: END IF;
221:
233: ELSE
234: IF not IGS_RU_RET_TYPE_PKG.Get_PK_For_Validation (
235: new_references.s_return_type
236: ) THEN
237: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
238: IGS_RU_GEN_006.SET_TOKEN('IGS_RU_RET_TYPE : P_ACTION Check_Parent_Existance new_references.s_return_type : IGSUI03B.PLS');
239: IGS_GE_MSG_STACK.ADD;
240: App_Exception.Raise_Exception;
241: END IF;
246: ELSE
247: IF NOT IGS_RU_TURIN_FNC_PKG.Get_PK_For_Validation (
248: new_references.s_turin_function
249: ) THEN
250: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
251: IGS_RU_GEN_006.SET_TOKEN('IGS_RU_TURIN_FNC : P_ACTION Check_Parent_Existance new_references.s_turin_function : IGSUI03B.PLS');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
280: BEGIN
281: IF GET_UK1_FOR_VALIDATION ( new_references.s_return_type ,
282: new_references.rule_description
283: ) THEN
284: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288:
363: Open cur_rowid;
364: Fetch cur_rowid INTO lv_rowid;
365: IF (cur_rowid%FOUND) THEN
366: Close cur_rowid;
367: Fnd_Message.Set_Name ('IGS', 'IGS_RU_RUD_SRRT_FK');
368: IGS_GE_MSG_STACK.ADD;
369: App_Exception.Raise_Exception;
370: Return;
371: END IF;
389: Open cur_rowid;
390: Fetch cur_rowid INTO lv_rowid;
391: IF (cur_rowid%FOUND) THEN
392: Close cur_rowid;
393: Fnd_Message.Set_Name ('IGS', 'IGS_RU_RUD_STF_FK');
394: IGS_GE_MSG_STACK.ADD;
395: App_Exception.Raise_Exception;
396: Return;
397: END IF;
436: BeforeRowInsertUpdate1 ( p_inserting => TRUE, p_updating => FALSE, p_deleting => FALSE );
437: IF Get_PK_For_Validation (
438: new_references.sequence_number
439: ) THEN
440: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
441: IGS_GE_MSG_STACK.ADD;
442: App_Exception.Raise_Exception;
443: END IF;
444: Check_Uniqueness;
456: ELSIF (p_action = 'VALIDATE_INSERT') THEN
457: IF Get_PK_For_Validation (
458: new_references.sequence_number
459: ) THEN
460: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
461: IGS_GE_MSG_STACK.ADD;
462: App_Exception.Raise_Exception;
463: END IF;
464: check_uniqueness;
539: if X_LAST_UPDATE_LOGIN is NULL then
540: X_LAST_UPDATE_LOGIN := -1;
541: end if;
542: else
543: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
544: IGS_GE_MSG_STACK.ADD;
545: app_exception.raise_exception;
546: end if;
547:
579: --
580: -- Seeded Sequences can go upto 499999 only else raise an error
581: --
582: IF (l_sequence_number > 499999) THEN
583: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
584: IGS_GE_MSG_STACK.ADD;
585: App_Exception.Raise_Exception ;
586: END IF;
587: ELSE
650: open c1;
651: fetch c1 into tlinfo;
652: if (c1%notfound) then
653: close c1;
654: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
655: IGS_RU_GEN_006.SET_TOKEN('IGS_RU_DESCRIPTION : P_ACTION LOCK_ROW : IGSUI03B.PLS');
656: IGS_GE_MSG_STACK.ADD;
657: app_exception.raise_exception;
658: return;
672: AND (X_PARENTHESIS_IND is null)))
673: ) then
674: null;
675: else
676: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
677: IGS_RU_GEN_006.SET_TOKEN('IGS_RU_DESCRIPTION : P_ACTION LOCK_ROW FORM_RECORD_CHANGED : IGSUI03B.PLS');
678: IGS_GE_MSG_STACK.ADD;
679: app_exception.raise_exception;
680: end if;
708: if X_LAST_UPDATE_LOGIN is NULL then
709: X_LAST_UPDATE_LOGIN := -1;
710: end if;
711: else
712: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
713: IGS_GE_MSG_STACK.ADD;
714: app_exception.raise_exception;
715: end if;
716: