[Home] [Help]
1: package body IGS_AV_STND_CONF_PKG as
2: /* $Header: IGSBI03B.pls 115.11 2003/01/07 07:22:04 nalkumar ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_AV_STND_CONF_ALL%RowType;
5: new_references IGS_AV_STND_CONF_ALL%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,
1: package body IGS_AV_STND_CONF_PKG as
2: /* $Header: IGSBI03B.pls 115.11 2003/01/07 07:22:04 nalkumar ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_AV_STND_CONF_ALL%RowType;
5: new_references IGS_AV_STND_CONF_ALL%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,
9: x_rowid IN VARCHAR2,
20: ) AS
21:
22: CURSOR cur_old_ref_values IS
23: SELECT *
24: FROM IGS_AV_STND_CONF_ALL
25: WHERE rowid = x_rowid;
26:
27: BEGIN
28:
125: ) RETURN BOOLEAN
126: AS
127: CURSOR cur_rowid IS
128: SELECT rowid
129: FROM IGS_AV_STND_CONF_ALL
130: WHERE s_control_num = x_s_control_num
131: FOR UPDATE NOWAIT;
132:
133: lv_rowid cur_rowid%RowType;
220: X_ADV_STND_BASIS_INST in VARCHAR2,
221: X_MODE in VARCHAR2,
222: X_ORG_ID in NUMBER
223: ) AS
224: cursor C is select ROWID from IGS_AV_STND_CONF_ALL
225: where S_CONTROL_NUM = NEW_REFERENCES.S_CONTROL_NUM;
226: X_LAST_UPDATE_DATE DATE;
227: X_LAST_UPDATED_BY NUMBER;
228: X_LAST_UPDATE_LOGIN NUMBER;
260: x_last_update_login=>X_LAST_UPDATE_LOGIN,
261: x_org_id=>igs_ge_gen_003.get_org_id
262: );
263:
264: insert into IGS_AV_STND_CONF_ALL (
265: S_CONTROL_NUM,
266: EXPIRY_DT_INCREMENT,
267: ADV_STND_EXPIRY_DT_ALIAS,
268: ADV_STND_BASIS_INST,
305: cursor c1 is select
306: EXPIRY_DT_INCREMENT,
307: ADV_STND_EXPIRY_DT_ALIAS,
308: ADV_STND_BASIS_INST
309: from IGS_AV_STND_CONF_ALL
310: where ROWID = X_ROWID
311: for update nowait;
312: tlinfo c1%rowtype;
313:
383: x_last_update_date=>X_LAST_UPDATE_DATE,
384: x_last_updated_by=>X_LAST_UPDATED_BY,
385: x_last_update_login=>X_LAST_UPDATE_LOGIN
386: );
387: update IGS_AV_STND_CONF_ALL set
388: EXPIRY_DT_INCREMENT = NEW_REFERENCES.EXPIRY_DT_INCREMENT,
389: ADV_STND_EXPIRY_DT_ALIAS = NEW_REFERENCES.ADV_STND_EXPIRY_DT_ALIAS,
390: ADV_STND_BASIS_INST = NEW_REFERENCES.ADV_STND_BASIS_INST,
391: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
407: X_ADV_STND_BASIS_INST in VARCHAR2,
408: X_MODE in VARCHAR2,
409: X_ORG_ID in NUMBER
410: ) AS
411: cursor c1 is select rowid from IGS_AV_STND_CONF_ALL
412: where S_CONTROL_NUM = NVL(X_S_CONTROL_NUM,1)
413: ;
414: begin
415: open c1;
443: Before_DML(
444: p_action => 'DELETE',
445: x_rowid => X_ROWID
446: );
447: delete from IGS_AV_STND_CONF_ALL
448: where ROWID = X_ROWID ;
449: if (sql%notfound) then
450: raise no_data_found;
451: end if;