DBA Data[Home] [Help]

APPS.IGS_RU_SET_PKG dependencies on IGS_RU_SET

Line 1: package body IGS_RU_SET_PKG as

1: package body IGS_RU_SET_PKG as
2: /* $Header: IGSUI12B.pls 115.9 2002/11/29 04:28:04 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_RU_SET%RowType;

Line 5: old_references IGS_RU_SET%RowType;

1: package body IGS_RU_SET_PKG as
2: /* $Header: IGSUI12B.pls 115.9 2002/11/29 04:28:04 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_RU_SET%RowType;
6: new_references IGS_RU_SET%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,

Line 6: new_references IGS_RU_SET%RowType;

2: /* $Header: IGSUI12B.pls 115.9 2002/11/29 04:28:04 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_RU_SET%RowType;
6: new_references IGS_RU_SET%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 ,

Line 22: FROM IGS_RU_SET

18: ) as
19:
20: CURSOR cur_old_ref_values IS
21: SELECT *
22: FROM IGS_RU_SET
23: WHERE rowid = x_rowid;
24:
25: BEGIN
26:

Line 35: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION INSERT VALIDATE_INSERT : IGSUI12B.PLS');

31: Open cur_old_ref_values;
32: Fetch cur_old_ref_values INTO old_references;
33: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
34: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
35: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION INSERT VALIDATE_INSERT : IGSUI12B.PLS');
36: IGS_GE_MSG_STACK.ADD;
37: App_Exception.Raise_Exception;
38: Close cur_old_ref_values;
39: Return;

Line 82: IGS_RU_ITEM_PKG.GET_FK_IGS_RU_SET (

78:
79: PROCEDURE Check_Child_Existance as
80: BEGIN
81:
82: IGS_RU_ITEM_PKG.GET_FK_IGS_RU_SET (
83: old_references.sequence_number
84: );
85:
86: IGS_RU_SET_MEMBER_PKG.GET_FK_IGS_RU_SET (

Line 86: IGS_RU_SET_MEMBER_PKG.GET_FK_IGS_RU_SET (

82: IGS_RU_ITEM_PKG.GET_FK_IGS_RU_SET (
83: old_references.sequence_number
84: );
85:
86: IGS_RU_SET_MEMBER_PKG.GET_FK_IGS_RU_SET (
87: old_references.sequence_number
88: );
89:
90: END Check_Child_Existance;

Line 98: FROM IGS_RU_SET

94: )return BOOLEAN as
95:
96: CURSOR cur_rowid IS
97: SELECT rowid
98: FROM IGS_RU_SET
99: WHERE sequence_number = x_sequence_number
100: FOR UPDATE NOWAIT;
101:
102: lv_rowid cur_rowid%RowType;

Line 190: cursor C is select ROWID from IGS_RU_SET

186: X_SEQUENCE_NUMBER in NUMBER,
187: X_SET_TYPE in VARCHAR2,
188: X_MODE in VARCHAR2
189: ) as
190: cursor C is select ROWID from IGS_RU_SET
191: where SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;
192: X_LAST_UPDATE_DATE DATE;
193: X_LAST_UPDATED_BY NUMBER;
194: X_LAST_UPDATE_LOGIN NUMBER;

Line 199: FROM igs_ru_set

195: l_sequence_number NUMBER;
196:
197: CURSOR cur_max_plus_one IS
198: SELECT (sequence_number + 1) sequence_number
199: FROM igs_ru_set
200: WHERE sequence_number =
201: (SELECT MAX (sequence_number)
202: FROM igs_ru_set
203: WHERE sequence_number < 499999)

Line 202: FROM igs_ru_set

198: SELECT (sequence_number + 1) sequence_number
199: FROM igs_ru_set
200: WHERE sequence_number =
201: (SELECT MAX (sequence_number)
202: FROM igs_ru_set
203: WHERE sequence_number < 499999)
204: FOR UPDATE OF sequence_number NOWAIT;
205:
206: begin

Line 258: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : Sequence_number > 499999 : IGSUI12B.PLS');

254: -- Seeded Sequences can go upto 499999 only else raise an error
255: --
256: IF (l_sequence_number > 499999) THEN
257: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
258: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : Sequence_number > 499999 : IGSUI12B.PLS');
259: IGS_GE_MSG_STACK.ADD;
260: App_Exception.Raise_Exception ;
261: END IF;
262: ELSE

Line 266: insert into IGS_RU_SET (

262: ELSE
263: l_sequence_number := NEW_REFERENCES.SEQUENCE_NUMBER;
264: END IF;
265:
266: insert into IGS_RU_SET (
267: SEQUENCE_NUMBER,
268: SET_TYPE,
269: CREATION_DATE,
270: CREATED_BY,

Line 305: from IGS_RU_SET

301: X_SET_TYPE in VARCHAR2
302: ) as
303: cursor c1 is select
304: SET_TYPE
305: from IGS_RU_SET
306: where ROWID = X_ROWID for update nowait;
307: tlinfo c1%rowtype;
308:
309: begin

Line 314: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION LOCK_ROW : IGSUI12B.PLS');

310: open c1;
311: fetch c1 into tlinfo;
312: if (c1%notfound) then
313: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
314: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION LOCK_ROW : IGSUI12B.PLS');
315: IGS_GE_MSG_STACK.ADD;
316: app_exception.raise_exception;
317: close c1;
318: return;

Line 327: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION LOCK_ROW FORM_RECORD_CHANGED : IGSUI12B.PLS');

323: ) then
324: null;
325: else
326: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
327: IGS_RU_GEN_006.SET_TOKEN(' IGS_RU_SET : P_ACTION LOCK_ROW FORM_RECORD_CHANGED : IGSUI12B.PLS');
328: IGS_GE_MSG_STACK.ADD;
329: app_exception.raise_exception;
330: end if;
331: return;

Line 375: update IGS_RU_SET set

371: x_last_updated_by=>X_LAST_UPDATED_BY,
372: x_last_update_login=>X_LAST_UPDATE_LOGIN
373: );
374:
375: update IGS_RU_SET set
376: SET_TYPE = NEW_REFERENCES.SET_TYPE,
377: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
378: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
379: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN

Line 398: cursor c1 is select rowid from IGS_RU_SET

394: X_SEQUENCE_NUMBER in NUMBER,
395: X_SET_TYPE in VARCHAR2,
396: X_MODE in VARCHAR2
397: ) as
398: cursor c1 is select rowid from IGS_RU_SET
399: where SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
400: ;
401: begin
402: open c1;

Line 430: delete from IGS_RU_SET

426: Before_DML (
427: p_action => 'DELETE',
428: x_rowid => X_ROWID);
429:
430: delete from IGS_RU_SET
431: where ROWID = X_ROWID;
432: if (sql%notfound) then
433: raise no_data_found;
434: end if;

Line 442: end IGS_RU_SET_PKG;

438: x_rowid => X_ROWID);
439:
440: end DELETE_ROW;
441:
442: end IGS_RU_SET_PKG;