1: PACKAGE BODY igs_en_inst_wl_stps_pkg AS
2: /* $Header: IGSEI71B.pls 115.1 2003/09/18 03:47:45 svanukur noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_inst_wl_stps%ROWTYPE;
1: PACKAGE BODY igs_en_inst_wl_stps_pkg AS
2: /* $Header: IGSEI71B.pls 115.1 2003/09/18 03:47:45 svanukur noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_inst_wl_stps%ROWTYPE;
6: new_references igs_en_inst_wl_stps%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSEI71B.pls 115.1 2003/09/18 03:47:45 svanukur noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_inst_wl_stps%ROWTYPE;
6: new_references igs_en_inst_wl_stps%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
32: */
33:
34: CURSOR cur_old_ref_values IS
35: SELECT *
36: FROM igs_en_inst_wl_stps
37: WHERE rowid = x_rowid;
38:
39: BEGIN
40:
81: ) RETURN BOOLEAN AS
82:
83: CURSOR cur_rowid IS
84: SELECT rowid
85: FROM IGS_EN_INST_WL_STPS
86: WHERE inst_wlst_setup_id = x_inst_wlst_setup_id
87: FOR UPDATE NOWAIT;
88:
89: lv_rowid cur_rowid%RowType;
128: || (reverse chronological order - newest change first)
129: */
130: CURSOR cur_no_recs IS
131: SELECT count(ROWID)
132: FROM IGS_EN_INST_WL_STPS;
133:
134: v_no_recs NUMBER(1);
135: BEGIN
136:
255: x_last_update_login := -1;
256: END IF;
257: ELSE
258: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
259: fnd_message.set_token ('ROUTINE', 'IGS_EN_INST_WL_STPS_PKG.INSERT_ROW');
260: igs_ge_msg_stack.add;
261: app_exception.raise_exception;
262: END IF;
263:
278: x_last_update_login => x_last_update_login
279: );
280:
281:
282: INSERT INTO igs_en_inst_wl_stps (
283: inst_wlst_setup_id,
284: waitlist_allowed_flag,
285: time_confl_alwd_wlst_flag,
286: simultaneous_wlst_alwd_flag,
342: simultaneous_wlst_alwd_flag,
343: auto_enroll_waitlist_flag,
344: include_waitlist_cp_flag,
345: max_waitlists_student_num
346: FROM igs_en_inst_wl_stps
347: WHERE rowid = x_rowid
348: FOR UPDATE NOWAIT;
349:
350: tlinfo c1%ROWTYPE;
423: x_last_update_login := -1;
424: END IF;
425: ELSE
426: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
427: fnd_message.set_token ('ROUTINE', 'IGS_EN_INST_WL_STPS_PKG.UPDATE_ROW');
428: igs_ge_msg_stack.add;
429: app_exception.raise_exception;
430: END IF;
431:
445: x_last_updated_by => x_last_updated_by,
446: x_last_update_login => x_last_update_login
447: );
448:
449: UPDATE igs_en_inst_wl_stps
450: SET
451: waitlist_allowed_flag = new_references.waitlist_allowed_flag,
452: time_confl_alwd_wlst_flag = new_references.time_confl_alwd_wlst_flag,
453: simultaneous_wlst_alwd_flag = new_references.simultaneous_wlst_alwd_flag,
489: || (reverse chronological order - newest change first)
490: */
491: CURSOR c1 IS
492: SELECT rowid
493: FROM igs_en_inst_wl_stps
494: WHERE inst_wlst_setup_id= x_inst_wlst_setup_id;
495:
496: BEGIN
497:
548: p_action => 'DELETE',
549: x_rowid => x_rowid
550: );
551:
552: DELETE FROM igs_en_inst_wl_stps
553: WHERE rowid = x_rowid;
554:
555: IF (SQL%NOTFOUND) THEN
556: RAISE NO_DATA_FOUND;
560:
561: END delete_row;
562:
563:
564: END igs_en_inst_wl_stps_pkg;