[Home] [Help]
1: PACKAGE BODY igs_ps_usec_x_grp_pkg AS
2: /* $Header: IGSPI2LB.pls 115.5 2002/11/29 02:17:46 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_usec_x_grp%ROWTYPE;
1: PACKAGE BODY igs_ps_usec_x_grp_pkg AS
2: /* $Header: IGSPI2LB.pls 115.5 2002/11/29 02:17:46 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_usec_x_grp%ROWTYPE;
6: new_references igs_ps_usec_x_grp%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSPI2LB.pls 115.5 2002/11/29 02:17:46 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_ps_usec_x_grp%ROWTYPE;
6: new_references igs_ps_usec_x_grp%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
33: */
34:
35: CURSOR cur_old_ref_values IS
36: SELECT *
37: FROM IGS_PS_USEC_X_GRP
38: WHERE rowid = x_rowid;
39:
40: BEGIN
41:
144: || (reverse chronological order - newest change first)
145: */
146: BEGIN
147:
148: igs_ps_usec_x_grpmem_pkg.get_fk_igs_ps_usec_x_grp (
149: old_references.usec_x_listed_group_id
150: );
151:
152: END check_child_existance;
165: || (reverse chronological order - newest change first)
166: */
167: CURSOR cur_rowid IS
168: SELECT rowid
169: FROM igs_ps_usec_x_grp
170: WHERE usec_x_listed_group_id = x_usec_x_listed_group_id
171: FOR UPDATE NOWAIT;
172:
173: lv_rowid cur_rowid%RowType;
202: || (reverse chronological order - newest change first)
203: */
204: CURSOR cur_rowid IS
205: SELECT rowid
206: FROM igs_ps_usec_x_grp
207: WHERE usec_x_listed_group_name = x_usec_x_listed_group_name
208: AND cal_type = x_cal_type
209: AND ci_sequence_number = x_ci_sequence_number
210: AND ((l_rowid IS NULL) OR (rowid <> l_rowid));
240: || (reverse chronological order - newest change first)
241: */
242: CURSOR cur_rowid IS
243: SELECT rowid
244: FROM igs_ps_usec_x_grp
245: WHERE ((cal_type = x_cal_type) AND
246: (ci_sequence_number = x_ci_sequence_number));
247:
248: lv_rowid cur_rowid%RowType;
370: || vvutukur Enh#2613933 Added 2 new columns x_max_enr_group,x_max_ovr_group.
371: */
372: CURSOR c IS
373: SELECT rowid
374: FROM igs_ps_usec_x_grp
375: WHERE usec_x_listed_group_id = x_usec_x_listed_group_id;
376:
377: x_last_update_date DATE;
378: x_last_updated_by NUMBER;
398: igs_ge_msg_stack.add;
399: app_exception.raise_exception;
400: END IF;
401:
402: SELECT igs_ps_usec_x_grp_s.NEXTVAL
403: INTO x_usec_x_listed_group_id
404: FROM dual;
405:
406: before_dml(
419: x_last_updated_by => x_last_updated_by,
420: x_last_update_login => x_last_update_login
421: );
422:
423: INSERT INTO igs_ps_usec_x_grp (
424: usec_x_listed_group_id,
425: usec_x_listed_group_name,
426: location_inheritance,
427: cal_type,
486: cal_type,
487: ci_sequence_number,
488: max_enr_group,
489: max_ovr_group
490: FROM igs_ps_usec_x_grp
491: WHERE rowid = x_rowid
492: FOR UPDATE NOWAIT;
493:
494: tlinfo c1%ROWTYPE;
590: x_last_updated_by => x_last_updated_by,
591: x_last_update_login => x_last_update_login
592: );
593:
594: UPDATE igs_ps_usec_x_grp
595: SET
596: usec_x_listed_group_name = new_references.usec_x_listed_group_name,
597: location_inheritance = new_references.location_inheritance,
598: cal_type = new_references.cal_type,
633: || vvutukur Enh#2613933 Added 2 new columns x_max_enr_group,x_max_ovr_group.
634: */
635: CURSOR c1 IS
636: SELECT rowid
637: FROM igs_ps_usec_x_grp
638: WHERE usec_x_listed_group_id = x_usec_x_listed_group_id;
639:
640: BEGIN
641:
692: p_action => 'DELETE',
693: x_rowid => x_rowid
694: );
695:
696: DELETE FROM igs_ps_usec_x_grp
697: WHERE rowid = x_rowid;
698:
699: IF (SQL%NOTFOUND) THEN
700: RAISE NO_DATA_FOUND;
702:
703: END delete_row;
704:
705:
706: END igs_ps_usec_x_grp_pkg;