1: package body IGS_OR_UNIT_PKG AS
2: /* $Header: IGSOI10B.pls 115.6 2003/12/17 08:54:41 pkpatel ship $ */
3: /*************************************************************
4: Changed By : smanglm
5: Date : 2000/08/25
13: Who When What
14: pkpatel 26-OCT-2002 Bug 2613704
15: Removed GET_FK_IGS_OR_MEMBER_TYPE and GET_FK_IGS_OR_MEMBER_TYPE procedures since
16: the tables will be obsolete for lookup migration
17: pkpatel 17-DEC-2003 Bug 3319026 (Replaced ROWID with ROW_ID while selecting from the complex view IGS_OR_UNIT)
18: (reverse chronological order - newest change first)
19: ***************************************************************/
20:
21: l_rowid VARCHAR2(25);
25: x_start_dt IN DATE
26: )RETURN BOOLEAN AS
27: CURSOR cur_rowid IS
28: SELECT row_id
29: FROM IGS_OR_UNIT
30: WHERE org_unit_cd = x_org_unit_cd
31: AND start_dt = x_start_dt;
32:
33: lv_rowid cur_rowid%RowType;
52: )RETURN BOOLEAN AS
53:
54: CURSOR cur_rowid IS
55: SELECT row_id
56: FROM IGS_OR_UNIT
57: WHERE org_unit_cd = x_org_unit_cd;
58:
59: lv_rowid cur_rowid%RowType;
60: BEGIN
75: x_institution_cd IN VARCHAR2
76: ) AS
77: CURSOR cur_rowid IS
78: SELECT row_id
79: FROM IGS_OR_UNIT
80: WHERE institution_cd = x_institution_cd ;
81: lv_rowid cur_rowid%RowType;
82: BEGIN
83: Open cur_rowid;
96: x_org_status IN VARCHAR2
97: ) AS
98: CURSOR cur_rowid IS
99: SELECT row_id
100: FROM IGS_OR_UNIT
101: WHERE org_status = x_org_status ;
102: lv_rowid cur_rowid%RowType;
103: BEGIN
104: Open cur_rowid;
112: END IF;
113: Close cur_rowid;
114: END GET_FK_IGS_OR_STATUS;
115:
116: END igs_or_unit_pkg ;