1: package body IGS_EN_ENROLMENT_CAT_PKG AS
2: /* $Header: IGSEI22B.pls 120.1 2005/09/08 14:48:02 appldev noship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_EN_ENROLMENT_CAT%RowType;
5: new_references IGS_EN_ENROLMENT_CAT%RowType;
1: package body IGS_EN_ENROLMENT_CAT_PKG AS
2: /* $Header: IGSEI22B.pls 120.1 2005/09/08 14:48:02 appldev noship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_EN_ENROLMENT_CAT%RowType;
5: new_references IGS_EN_ENROLMENT_CAT%RowType;
6:
7: PROCEDURE beforerowdelete;
8:
1: package body IGS_EN_ENROLMENT_CAT_PKG AS
2: /* $Header: IGSEI22B.pls 120.1 2005/09/08 14:48:02 appldev noship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_EN_ENROLMENT_CAT%RowType;
5: new_references IGS_EN_ENROLMENT_CAT%RowType;
6:
7: PROCEDURE beforerowdelete;
8:
9: PROCEDURE Set_Column_Values (
20: ) AS
21:
22: CURSOR cur_old_ref_values IS
23: SELECT *
24: FROM IGS_EN_ENROLMENT_CAT
25: WHERE rowid = x_rowid;
26:
27: BEGIN
28:
60:
61: -- Trigger description :-
62: -- "OSS_TST".trg_ec_br_u
63: -- BEFORE UPDATE
64: -- ON IGS_EN_ENROLMENT_CAT
65: -- FOR EACH ROW
66:
67: PROCEDURE BeforeRowUpdate1(
68: p_inserting IN BOOLEAN DEFAULT FALSE,
122:
123: PROCEDURE Check_Child_Existance AS
124: BEGIN
125:
126: IGS_AD_PS_APPL_INST_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
127: old_references.enrolment_cat
128: );
129:
130: IGS_EN_CAT_MAPPING_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
126: IGS_AD_PS_APPL_INST_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
127: old_references.enrolment_cat
128: );
129:
130: IGS_EN_CAT_MAPPING_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
131: old_references.enrolment_cat
132: );
133:
134: IGS_EN_CAT_PRC_DTL_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
130: IGS_EN_CAT_MAPPING_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
131: old_references.enrolment_cat
132: );
133:
134: IGS_EN_CAT_PRC_DTL_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
135: old_references.enrolment_cat
136: );
137:
138: IGS_AS_SC_ATMPT_ENR_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
134: IGS_EN_CAT_PRC_DTL_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
135: old_references.enrolment_cat
136: );
137:
138: IGS_AS_SC_ATMPT_ENR_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
139: old_references.enrolment_cat
140: );
141: igs_en_cpd_ext_pkg.get_fk_igs_en_enrolment_cat(
142: old_references.enrolment_cat
137:
138: IGS_AS_SC_ATMPT_ENR_PKG.GET_FK_IGS_EN_ENROLMENT_CAT (
139: old_references.enrolment_cat
140: );
141: igs_en_cpd_ext_pkg.get_fk_igs_en_enrolment_cat(
142: old_references.enrolment_cat
143: );
144: IGS_PS_TYPE_PKG.GET_FK_IGS_EN_ENROLMENT_CAT(
145: old_references.enrolment_cat
140: );
141: igs_en_cpd_ext_pkg.get_fk_igs_en_enrolment_cat(
142: old_references.enrolment_cat
143: );
144: IGS_PS_TYPE_PKG.GET_FK_IGS_EN_ENROLMENT_CAT(
145: old_references.enrolment_cat
146: );
147:
148: END Check_Child_Existance;
152: )RETURN BOOLEAN AS
153:
154: CURSOR cur_rowid IS
155: SELECT rowid
156: FROM IGS_EN_ENROLMENT_CAT
157: WHERE enrolment_cat = x_enrolment_cat;
158:
159: lv_rowid cur_rowid%RowType;
160:
260: X_DESCRIPTION in VARCHAR2,
261: X_CLOSED_IND in VARCHAR2,
262: X_MODE in VARCHAR2 default 'R'
263: ) AS
264: cursor C is select ROWID from IGS_EN_ENROLMENT_CAT
265: where ENROLMENT_CAT = X_ENROLMENT_CAT;
266: X_LAST_UPDATE_DATE DATE;
267: X_LAST_UPDATED_BY NUMBER;
268: X_LAST_UPDATE_LOGIN NUMBER;
296: x_last_update_date => X_LAST_UPDATE_DATE,
297: x_last_updated_by => X_LAST_UPDATED_BY,
298: x_last_update_login => X_LAST_UPDATE_LOGIN
299: );
300: insert into IGS_EN_ENROLMENT_CAT (
301: ENROLMENT_CAT,
302: DESCRIPTION,
303: CLOSED_IND,
304: CREATION_DATE,
339: ) AS
340: cursor c1 is select
341: DESCRIPTION,
342: CLOSED_IND
343: from IGS_EN_ENROLMENT_CAT
344: where ROWID = X_ROWID for update nowait;
345: tlinfo c1%rowtype;
346:
347: begin
408: x_last_update_date => X_LAST_UPDATE_DATE,
409: x_last_updated_by => X_LAST_UPDATED_BY,
410: x_last_update_login => X_LAST_UPDATE_LOGIN
411: );
412: update IGS_EN_ENROLMENT_CAT set
413: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
414: CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
415: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
416: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
431: X_DESCRIPTION in VARCHAR2,
432: X_CLOSED_IND in VARCHAR2,
433: X_MODE in VARCHAR2 default 'R'
434: ) AS
435: cursor c1 is select rowid from IGS_EN_ENROLMENT_CAT
436: where ENROLMENT_CAT = X_ENROLMENT_CAT
437: ;
438:
439: begin
464: Before_DML (
465: p_action => 'DELETE',
466: x_rowid => X_ROWID
467: );
468: delete from IGS_EN_ENROLMENT_CAT
469: where ROWID = X_ROWID;
470: if (sql%notfound) then
471: raise no_data_found;
472: end if;
504:
505: END beforerowdelete;
506:
507:
508: end IGS_EN_ENROLMENT_CAT_PKG;