APPS.IGS_AD_BASIS_FOR_AD_PKG dependencies on IGS_AD_BASIS_FOR_AD

Line 1: package body IGS_AD_BASIS_FOR_AD_PKG as

1: package body IGS_AD_BASIS_FOR_AD_PKG as
2: /* $Header: IGSAI69B.pls 115.6 2003/10/30 13:16:28 akadam ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_AD_BASIS_FOR_AD%RowType;

Line 5: old_references IGS_AD_BASIS_FOR_AD%RowType;

1: package body IGS_AD_BASIS_FOR_AD_PKG as
2: /* $Header: IGSAI69B.pls 115.6 2003/10/30 13:16:28 akadam ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references IGS_AD_BASIS_FOR_AD%RowType;
6: new_references IGS_AD_BASIS_FOR_AD%RowType;
7:
8: PROCEDURE Set_Column_Values (
9: p_action IN VARCHAR2,

Line 6: new_references IGS_AD_BASIS_FOR_AD%RowType;

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

Line 24: FROM IGS_AD_BASIS_FOR_AD

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

Line 143: IGS_AD_CD_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (

139:
140: PROCEDURE Check_Child_Existance as
141: BEGIN
142:
143: IGS_AD_CD_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (
144: old_references.basis_for_admission_type
145: );
146:
147: IGS_AD_PS_APPL_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (

Line 147: IGS_AD_PS_APPL_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (

143: IGS_AD_CD_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (
144: old_references.basis_for_admission_type
145: );
146:
147: IGS_AD_PS_APPL_PKG.GET_FK_IGS_AD_BASIS_FOR_AD (
148: old_references.basis_for_admission_type
149: );
150:
151: END Check_Child_Existance;

Line 160: FROM IGS_AD_BASIS_FOR_AD

156: )return BOOLEAN as
157:
158: CURSOR cur_rowid IS
159: SELECT rowid
160: FROM IGS_AD_BASIS_FOR_AD
161: WHERE basis_for_admission_type = x_basis_for_admission_type AND
162: closed_ind = NVL(x_closed_ind,closed_ind);
163:
164: lv_rowid cur_rowid%RowType;

Line 186: FROM IGS_AD_BASIS_FOR_AD

182: ) as
183:
184: CURSOR cur_rowid IS
185: SELECT rowid
186: FROM IGS_AD_BASIS_FOR_AD
187: WHERE govt_basis_for_adm_type = x_govt_basis_for_adm_type ;
188:
189: lv_rowid cur_rowid%RowType;
190:

Line 287: cursor C is select ROWID from IGS_AD_BASIS_FOR_AD

283: X_GOVT_BASIS_FOR_ADM_TYPE in VARCHAR2,
284: X_CLOSED_IND in VARCHAR2,
285: X_MODE in VARCHAR2 default 'R'
286: ) as
287: cursor C is select ROWID from IGS_AD_BASIS_FOR_AD
288: where BASIS_FOR_ADMISSION_TYPE = X_BASIS_FOR_ADMISSION_TYPE;
289: X_LAST_UPDATE_DATE DATE;
290: X_LAST_UPDATED_BY NUMBER;
291: X_LAST_UPDATE_LOGIN NUMBER;

Line 326: insert into IGS_AD_BASIS_FOR_AD (

322: x_last_updated_by=>X_LAST_UPDATED_BY,
323: x_last_update_login=>X_LAST_UPDATE_LOGIN
324: );
325:
326: insert into IGS_AD_BASIS_FOR_AD (
327: BASIS_FOR_ADMISSION_TYPE,
328: DESCRIPTION,
329: GOVT_BASIS_FOR_ADM_TYPE,
330: CLOSED_IND,

Line 373: from IGS_AD_BASIS_FOR_AD

369: cursor c1 is select
370: DESCRIPTION,
371: GOVT_BASIS_FOR_ADM_TYPE,
372: CLOSED_IND
373: from IGS_AD_BASIS_FOR_AD
374: where ROWID = X_ROWID for update nowait;
375: tlinfo c1%rowtype;
376:
377: begin

Line 449: update IGS_AD_BASIS_FOR_AD set

445: x_last_updated_by=>X_LAST_UPDATED_BY,
446: x_last_update_login=>X_LAST_UPDATE_LOGIN
447: );
448:
449: update IGS_AD_BASIS_FOR_AD set
450: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
451: GOVT_BASIS_FOR_ADM_TYPE = NEW_REFERENCES.GOVT_BASIS_FOR_ADM_TYPE,
452: CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
453: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,

Line 476: cursor c1 is select rowid from IGS_AD_BASIS_FOR_AD

472: X_GOVT_BASIS_FOR_ADM_TYPE in VARCHAR2,
473: X_CLOSED_IND in VARCHAR2,
474: X_MODE in VARCHAR2 default 'R'
475: ) as
476: cursor c1 is select rowid from IGS_AD_BASIS_FOR_AD
477: where BASIS_FOR_ADMISSION_TYPE = X_BASIS_FOR_ADMISSION_TYPE
478: ;
479: begin
480: open c1;

Line 512: delete from IGS_AD_BASIS_FOR_AD

508: Before_DML (
509: p_action => 'DELETE',
510: x_rowid => X_ROWID);
511:
512: delete from IGS_AD_BASIS_FOR_AD
513: where ROWID = X_ROWID;
514: if (sql%notfound) then
515: raise no_data_found;
516: end if;

Line 524: end IGS_AD_BASIS_FOR_AD_PKG;

520: x_rowid => X_ROWID);
521:
522: end DELETE_ROW;
523:
524: end IGS_AD_BASIS_FOR_AD_PKG;