1: PACKAGE BODY igs_ps_rsv_ext_pkg AS
2: /* $Header: IGSPI2WB.pls 115.8 2003/02/19 13:58:38 shtatiko ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_rsv_ext%ROWTYPE;
1: PACKAGE BODY igs_ps_rsv_ext_pkg AS
2: /* $Header: IGSPI2WB.pls 115.8 2003/02/19 13:58:38 shtatiko ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_rsv_ext%ROWTYPE;
6: new_references igs_ps_rsv_ext%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSPI2WB.pls 115.8 2003/02/19 13:58:38 shtatiko ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_rsv_ext%ROWTYPE;
6: new_references igs_ps_rsv_ext%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 ,
31: */
32:
33: CURSOR cur_old_ref_values IS
34: SELECT *
35: FROM IGS_PS_RSV_EXT
36: WHERE rowid = x_rowid;
37:
38: BEGIN
39:
142: || (reverse chronological order - newest change first)
143: */
144: CURSOR cur_rowid IS
145: SELECT rowid
146: FROM igs_ps_rsv_ext
147: WHERE rsv_ext_id = x_rsv_ext_id ;
148:
149: lv_rowid cur_rowid%RowType;
150:
179: || (reverse chronological order - newest change first)
180: */
181: CURSOR cur_rowid IS
182: SELECT rowid
183: FROM igs_ps_rsv_ext
184: WHERE uoo_id = x_uoo_id
185: AND priority_id = x_priority_id
186: AND preference_id = x_preference_id
187: AND rsv_level = x_rsv_level
217: || (reverse chronological order - newest change first)
218: */
219: CURSOR cur_rowid IS
220: SELECT rowid
221: FROM igs_ps_rsv_ext
222: WHERE ((uoo_id = x_uoo_id));
223:
224: lv_rowid cur_rowid%RowType;
225:
338: || (reverse chronological order - newest change first)
339: */
340: CURSOR c IS
341: SELECT rowid
342: FROM igs_ps_rsv_ext
343: WHERE rsv_ext_id = x_rsv_ext_id;
344:
345: x_last_update_date DATE;
346: x_last_updated_by NUMBER;
366: igs_ge_msg_stack.add;
367: app_exception.raise_exception;
368: END IF;
369:
370: SELECT igs_ps_rsv_ext_s.NEXTVAL
371: INTO x_rsv_ext_id
372: FROM dual;
373:
374: before_dml(
386: x_last_updated_by => x_last_updated_by,
387: x_last_update_login => x_last_update_login
388: );
389:
390: INSERT INTO igs_ps_rsv_ext (
391: rsv_ext_id,
392: uoo_id,
393: priority_id,
394: preference_id,
448: priority_id,
449: preference_id,
450: rsv_level,
451: actual_seat_enrolled
452: FROM igs_ps_rsv_ext
453: WHERE rowid = x_rowid
454: FOR UPDATE NOWAIT;
455:
456: tlinfo c1%ROWTYPE;
546: x_last_updated_by => x_last_updated_by,
547: x_last_update_login => x_last_update_login
548: );
549:
550: UPDATE igs_ps_rsv_ext
551: SET
552: uoo_id = new_references.uoo_id,
553: priority_id = new_references.priority_id,
554: preference_id = new_references.preference_id,
586: || (reverse chronological order - newest change first)
587: */
588: CURSOR c1 IS
589: SELECT rowid
590: FROM igs_ps_rsv_ext
591: WHERE rsv_ext_id = x_rsv_ext_id;
592:
593: BEGIN
594:
623: );
624:
625: END add_row;
626:
627: END igs_ps_rsv_ext_pkg;