APPS.IGS_PS_UNIT_STAT_PKG dependencies on IGS_PS_UNIT_STAT

Line 1: package body IGS_PS_UNIT_STAT_PKG as

1: package body IGS_PS_UNIT_STAT_PKG as
2: /* $Header: IGSPI91B.pls 115.4 2002/11/29 02:41:49 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_PS_UNIT_STAT%RowType;

Line 5: old_references IGS_PS_UNIT_STAT%RowType;

1: package body IGS_PS_UNIT_STAT_PKG as
2: /* $Header: IGSPI91B.pls 115.4 2002/11/29 02:41:49 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_PS_UNIT_STAT%RowType;
6: new_references IGS_PS_UNIT_STAT%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,

Line 6: new_references IGS_PS_UNIT_STAT%RowType;

2: /* $Header: IGSPI91B.pls 115.4 2002/11/29 02:41:49 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_PS_UNIT_STAT%RowType;
6: new_references IGS_PS_UNIT_STAT%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,

Line 24: FROM IGS_PS_UNIT_STAT

20: ) AS
21:
22: CURSOR cur_old_ref_values IS
23: SELECT *
24: FROM IGS_PS_UNIT_STAT
25: WHERE rowid = x_rowid;
26:
27: BEGIN
28:

Line 109: IGS_PS_UNIT_VER_PKG.GET_FK_IGS_PS_UNIT_STAT (

105:
106: PROCEDURE Check_Child_Existance AS
107: BEGIN
108:
109: IGS_PS_UNIT_VER_PKG.GET_FK_IGS_PS_UNIT_STAT (
110: old_references.unit_status );
111:
112: END Check_Child_Existance;
113:

Line 120: FROM IGS_PS_UNIT_STAT

116: ) RETURN BOOLEAN AS
117:
118: CURSOR cur_rowid IS
119: SELECT rowid
120: FROM IGS_PS_UNIT_STAT
121: WHERE unit_status = x_unit_status
122: FOR UPDATE NOWAIT;
123:
124: lv_rowid cur_rowid%RowType;

Line 219: cursor C is select ROWID from IGS_PS_UNIT_STAT

215: X_S_UNIT_STATUS in VARCHAR2,
216: X_CLOSED_IND in VARCHAR2,
217: X_MODE in VARCHAR2 default 'R'
218: ) AS
219: cursor C is select ROWID from IGS_PS_UNIT_STAT
220: where UNIT_STATUS = X_UNIT_STATUS;
221: X_LAST_UPDATE_DATE DATE;
222: X_LAST_UPDATED_BY NUMBER;
223: X_LAST_UPDATE_LOGIN NUMBER;

Line 258: insert into IGS_PS_UNIT_STAT (

254: x_last_updated_by => X_LAST_UPDATED_BY,
255: x_last_update_login => X_LAST_UPDATE_LOGIN
256: );
257:
258: insert into IGS_PS_UNIT_STAT (
259: UNIT_STATUS,
260: DESCRIPTION,
261: S_UNIT_STATUS,
262: CLOSED_IND,

Line 305: from IGS_PS_UNIT_STAT

301: cursor c1 is select
302: DESCRIPTION,
303: S_UNIT_STATUS,
304: CLOSED_IND
305: from IGS_PS_UNIT_STAT
306: where ROWID = X_ROWID
307: for update nowait;
308: tlinfo c1%rowtype;
309:

Line 380: update IGS_PS_UNIT_STAT set

376: x_last_updated_by => X_LAST_UPDATED_BY,
377: x_last_update_login => X_LAST_UPDATE_LOGIN
378: );
379:
380: update IGS_PS_UNIT_STAT set
381: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
382: S_UNIT_STATUS = NEW_REFERENCES.S_UNIT_STATUS,
383: CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
384: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,

Line 406: cursor c1 is select rowid from IGS_PS_UNIT_STAT

402: X_S_UNIT_STATUS in VARCHAR2,
403: X_CLOSED_IND in VARCHAR2,
404: X_MODE in VARCHAR2 default 'R'
405: ) AS
406: cursor c1 is select rowid from IGS_PS_UNIT_STAT
407: where UNIT_STATUS = X_UNIT_STATUS
408: ;
409: begin
410: open c1;

Line 441: delete from IGS_PS_UNIT_STAT

437: Before_DML (
438: p_action => 'DELETE',
439: x_rowid => X_ROWID
440: );
441: delete from IGS_PS_UNIT_STAT
442: where ROWID = X_ROWID;
443: if (sql%notfound) then
444: raise no_data_found;
445: end if;

Line 452: end IGS_PS_UNIT_STAT_PKG;

448: x_rowid => X_ROWID
449: );
450: end DELETE_ROW;
451:
452: end IGS_PS_UNIT_STAT_PKG;