1: package body IGS_CA_TYPE_PKG AS
2: /* $Header: IGSCI17B.pls 115.9 2003/09/02 08:44:43 svanukur ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_CA_TYPE%RowType;
5: new_references IGS_CA_TYPE%RowType;
1: package body IGS_CA_TYPE_PKG AS
2: /* $Header: IGSCI17B.pls 115.9 2003/09/02 08:44:43 svanukur ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_CA_TYPE%RowType;
5: new_references IGS_CA_TYPE%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,
1: package body IGS_CA_TYPE_PKG AS
2: /* $Header: IGSCI17B.pls 115.9 2003/09/02 08:44:43 svanukur ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_CA_TYPE%RowType;
5: new_references IGS_CA_TYPE%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,
9: x_rowid IN VARCHAR2 ,
22: ) AS
23:
24: CURSOR cur_old_ref_values IS
25: SELECT *
26: FROM IGS_CA_TYPE
27: WHERE rowid = x_rowid;
28:
29: BEGIN
30:
66:
67: -- Trigger description :-
68: -- "OSS_TST".trg_cat_br_iu
69: -- BEFORE INSERT OR UPDATE
70: -- ON IGS_CA_TYPE
71: -- FOR EACH ROW
72:
73: PROCEDURE BeforeRowInsertUpdate1(
74: p_inserting IN BOOLEAN ,
204:
205: PROCEDURE Check_Child_Existance AS
206: BEGIN
207:
208: IGS_EN_ATD_TYPE_LOAD_PKG.GET_FK_IGS_CA_TYPE (
209: old_references.cal_type
210: );
211:
212: IGS_CA_INST_PKG.GET_FK_IGS_CA_TYPE (
208: IGS_EN_ATD_TYPE_LOAD_PKG.GET_FK_IGS_CA_TYPE (
209: old_references.cal_type
210: );
211:
212: IGS_CA_INST_PKG.GET_FK_IGS_CA_TYPE (
213: old_references.cal_type
214: );
215:
216: IGS_PS_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
212: IGS_CA_INST_PKG.GET_FK_IGS_CA_TYPE (
213: old_references.cal_type
214: );
215:
216: IGS_PS_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
217: old_references.cal_type
218: );
219:
220: IGS_PS_OFR_PKG.GET_FK_IGS_CA_TYPE (
216: IGS_PS_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
217: old_references.cal_type
218: );
219:
220: IGS_PS_OFR_PKG.GET_FK_IGS_CA_TYPE (
221: old_references.cal_type
222: );
223:
224: IGS_ST_DFT_LOAD_APPO_PKG.GET_FK_IGS_CA_TYPE (
220: IGS_PS_OFR_PKG.GET_FK_IGS_CA_TYPE (
221: old_references.cal_type
222: );
223:
224: IGS_ST_DFT_LOAD_APPO_PKG.GET_FK_IGS_CA_TYPE (
225: old_references.cal_type
226: );
227:
228: IGS_PS_PAT_OF_STUDY_PKG.GET_FK_IGS_CA_TYPE (
224: IGS_ST_DFT_LOAD_APPO_PKG.GET_FK_IGS_CA_TYPE (
225: old_references.cal_type
226: );
227:
228: IGS_PS_PAT_OF_STUDY_PKG.GET_FK_IGS_CA_TYPE (
229: old_references.cal_type
230: );
231:
232: IGS_PS_PAT_STUDY_PRD_PKG.GET_FK_IGS_CA_TYPE (
228: IGS_PS_PAT_OF_STUDY_PKG.GET_FK_IGS_CA_TYPE (
229: old_references.cal_type
230: );
231:
232: IGS_PS_PAT_STUDY_PRD_PKG.GET_FK_IGS_CA_TYPE (
233: old_references.cal_type
234: );
235:
236: IGS_PR_RU_CA_TYPE_PKG.GET_FK_IGS_CA_TYPE (
232: IGS_PS_PAT_STUDY_PRD_PKG.GET_FK_IGS_CA_TYPE (
233: old_references.cal_type
234: );
235:
236: IGS_PR_RU_CA_TYPE_PKG.GET_FK_IGS_CA_TYPE (
237: old_references.cal_type
238: );
239:
240: IGS_AS_UNITASS_ITEM_PKG.GET_FK_IGS_CA_TYPE (
236: IGS_PR_RU_CA_TYPE_PKG.GET_FK_IGS_CA_TYPE (
237: old_references.cal_type
238: );
239:
240: IGS_AS_UNITASS_ITEM_PKG.GET_FK_IGS_CA_TYPE (
241: old_references.cal_type
242: );
243:
244: IGS_FI_UNIT_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
240: IGS_AS_UNITASS_ITEM_PKG.GET_FK_IGS_CA_TYPE (
241: old_references.cal_type
242: );
243:
244: IGS_FI_UNIT_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
245: old_references.cal_type
246: );
247:
248: IGS_PS_UNIT_OFR_PKG.GET_FK_IGS_CA_TYPE (
244: IGS_FI_UNIT_FEE_TRG_PKG.GET_FK_IGS_CA_TYPE (
245: old_references.cal_type
246: );
247:
248: IGS_PS_UNIT_OFR_PKG.GET_FK_IGS_CA_TYPE (
249: old_references.cal_type
250: );
251:
252: IGS_AD_CAL_CONF_PKG.GET_FK_IGS_CA_TYPE (
248: IGS_PS_UNIT_OFR_PKG.GET_FK_IGS_CA_TYPE (
249: old_references.cal_type
250: );
251:
252: IGS_AD_CAL_CONF_PKG.GET_FK_IGS_CA_TYPE (
253: old_references.cal_type
254: );
255:
256: igs_as_anon_method_pkg.GET_FK_IGS_CA_TYPE (
252: IGS_AD_CAL_CONF_PKG.GET_FK_IGS_CA_TYPE (
253: old_references.cal_type
254: );
255:
256: igs_as_anon_method_pkg.GET_FK_IGS_CA_TYPE (
257: old_references.cal_type
258: );
259:
260: igs_en_config_enr_cp_pkg.GET_FK_IGS_CA_TYPE (
256: igs_as_anon_method_pkg.GET_FK_IGS_CA_TYPE (
257: old_references.cal_type
258: );
259:
260: igs_en_config_enr_cp_pkg.GET_FK_IGS_CA_TYPE (
261: old_references.cal_type
262: );
263: igs_en_or_unit_wlst_pkg.GET_FK_IGS_CA_TYPE (
264: old_references.cal_type
259:
260: igs_en_config_enr_cp_pkg.GET_FK_IGS_CA_TYPE (
261: old_references.cal_type
262: );
263: igs_en_or_unit_wlst_pkg.GET_FK_IGS_CA_TYPE (
264: old_references.cal_type
265: );
266: igs_en_inst_wlst_opt_pkg.GET_FK_IGS_CA_TYPE (
267: old_references.cal_type
262: );
263: igs_en_or_unit_wlst_pkg.GET_FK_IGS_CA_TYPE (
264: old_references.cal_type
265: );
266: igs_en_inst_wlst_opt_pkg.GET_FK_IGS_CA_TYPE (
267: old_references.cal_type
268: );
269: END Check_Child_Existance;
270:
273: ) RETURN BOOLEAN AS
274:
275: CURSOR cur_rowid IS
276: SELECT rowid
277: FROM IGS_CA_TYPE
278: WHERE cal_type = x_cal_type
279: FOR UPDATE NOWAIT;
280:
281: lv_rowid cur_rowid%RowType;
299: ) AS
300:
301: CURSOR cur_rowid IS
302: SELECT rowid
303: FROM IGS_CA_TYPE
304: WHERE arts_teaching_cal_type_cd = x_arts_teaching_cal_type_cd ;
305:
306: lv_rowid cur_rowid%RowType;
307:
325: ) AS
326:
327: CURSOR cur_rowid IS
328: SELECT rowid
329: FROM IGS_CA_TYPE
330: WHERE s_cal_cat = x_s_cal_cat ;
331:
332: lv_rowid cur_rowid%RowType;
333:
452: X_CLOSED_IND in VARCHAR2,
453: X_NOTES in VARCHAR2,
454: X_MODE in VARCHAR2
455: ) AS
456: cursor C is select ROWID from IGS_CA_TYPE
457: where CAL_TYPE = X_CAL_TYPE;
458: X_LAST_UPDATE_DATE DATE;
459: X_LAST_UPDATED_BY NUMBER;
460: X_LAST_UPDATE_LOGIN NUMBER;
492: x_last_update_date =>X_LAST_UPDATE_DATE,
493: x_last_updated_by =>X_LAST_UPDATED_BY,
494: x_last_update_login =>X_LAST_UPDATE_LOGIN
495: );
496: insert into IGS_CA_TYPE (
497: CAL_TYPE,
498: DESCRIPTION,
499: S_CAL_CAT,
500: ABBREVIATION,
550: ABBREVIATION,
551: ARTS_TEACHING_CAL_TYPE_CD,
552: CLOSED_IND,
553: NOTES
554: from IGS_CA_TYPE
555: where ROWID=X_ROWID
556: for update nowait;
557: tlinfo c1%rowtype;
558:
638: x_last_update_date =>X_LAST_UPDATE_DATE,
639: x_last_updated_by =>X_LAST_UPDATED_BY,
640: x_last_update_login =>X_LAST_UPDATE_LOGIN
641: );
642: update IGS_CA_TYPE set
643: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
644: S_CAL_CAT = NEW_REFERENCES.S_CAL_CAT,
645: ABBREVIATION = NEW_REFERENCES.ABBREVIATION,
646: ARTS_TEACHING_CAL_TYPE_CD = NEW_REFERENCES.ARTS_TEACHING_CAL_TYPE_CD,
670: X_CLOSED_IND in VARCHAR2,
671: X_NOTES in VARCHAR2,
672: X_MODE in VARCHAR2
673: ) AS
674: cursor c1 is select rowid from IGS_CA_TYPE
675: where CAL_TYPE = X_CAL_TYPE
676: ;
677: begin
678: open c1;
711: Before_DML (
712: p_action =>'DELETE',
713: x_rowid =>X_ROWID
714: );
715: delete from IGS_CA_TYPE
716: where ROWID=X_ROWID;
717: if (sql%notfound) then
718: raise no_data_found;
719: end if;
722: x_rowid =>X_ROWID
723: );
724: end DELETE_ROW;
725:
726: end IGS_CA_TYPE_PKG;