APPS.IGS_AD_TAC_AD_CD_PKG dependencies on IGS_AD_TAC_AD_CD

Line 1: package body IGS_AD_TAC_AD_CD_PKG as

1: package body IGS_AD_TAC_AD_CD_PKG as
2: /* $Header: IGSAI58B.pls 115.5 2003/10/30 13:13:46 akadam ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_AD_TAC_AD_CD%RowType;

Line 5: old_references IGS_AD_TAC_AD_CD%RowType;

1: package body IGS_AD_TAC_AD_CD_PKG as
2: /* $Header: IGSAI58B.pls 115.5 2003/10/30 13:13:46 akadam ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_AD_TAC_AD_CD%RowType;
6: new_references IGS_AD_TAC_AD_CD%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,

Line 6: new_references IGS_AD_TAC_AD_CD%RowType;

2: /* $Header: IGSAI58B.pls 115.5 2003/10/30 13:13:46 akadam ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_AD_TAC_AD_CD%RowType;
6: new_references IGS_AD_TAC_AD_CD%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,

Line 23: FROM IGS_AD_TAC_AD_CD

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

Line 116: IGS_AD_CD_PKG.GET_FK_IGS_AD_TAC_AD_CD (

112:
113: PROCEDURE Check_Child_Existance as
114: BEGIN
115:
116: IGS_AD_CD_PKG.GET_FK_IGS_AD_TAC_AD_CD (
117: old_references.tac_admission_cd
118: );
119:
120: END Check_Child_Existance;

Line 129: FROM IGS_AD_TAC_AD_CD

125: )return BOOLEAN as
126:
127: CURSOR cur_rowid IS
128: SELECT rowid
129: FROM IGS_AD_TAC_AD_CD
130: WHERE tac_admission_cd = x_tac_admission_cd AND
131: closed_ind = NVL(x_closed_ind,closed_ind);
132:
133: lv_rowid cur_rowid%RowType;

Line 224: cursor C is select ROWID from IGS_AD_TAC_AD_CD

220: X_DESCRIPTION in VARCHAR2,
221: X_CLOSED_IND in VARCHAR2,
222: X_MODE in VARCHAR2 default 'R'
223: ) as
224: cursor C is select ROWID from IGS_AD_TAC_AD_CD
225: where TAC_ADMISSION_CD = X_TAC_ADMISSION_CD;
226: X_LAST_UPDATE_DATE DATE;
227: X_LAST_UPDATED_BY NUMBER;
228: X_LAST_UPDATE_LOGIN NUMBER;

Line 262: insert into IGS_AD_TAC_AD_CD (

258: x_last_updated_by => X_LAST_UPDATED_BY,
259: x_last_update_login => X_LAST_UPDATE_LOGIN
260: );
261:
262: insert into IGS_AD_TAC_AD_CD (
263: TAC_ADMISSION_CD,
264: DESCRIPTION,
265: CLOSED_IND,
266: CREATION_DATE,

Line 305: from IGS_AD_TAC_AD_CD

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

Line 375: update IGS_AD_TAC_AD_CD set

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

Line 399: cursor c1 is select rowid from IGS_AD_TAC_AD_CD

395: X_DESCRIPTION in VARCHAR2,
396: X_CLOSED_IND in VARCHAR2,
397: X_MODE in VARCHAR2 default 'R'
398: ) as
399: cursor c1 is select rowid from IGS_AD_TAC_AD_CD
400: where TAC_ADMISSION_CD = X_TAC_ADMISSION_CD
401: ;
402: begin
403: open c1;

Line 432: delete from IGS_AD_TAC_AD_CD

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

Line 443: end IGS_AD_TAC_AD_CD_PKG;

439: x_rowid => X_ROWID
440: );
441: end DELETE_ROW;
442:
443: end IGS_AD_TAC_AD_CD_PKG;