1: PACKAGE BODY igs_da_ftr_val_map_pkg AS
2: /* $Header: IGSKI48B.pls 115.0 2003/04/15 09:23:48 ddey noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_da_ftr_val_map%ROWTYPE;
1: PACKAGE BODY igs_da_ftr_val_map_pkg AS
2: /* $Header: IGSKI48B.pls 115.0 2003/04/15 09:23:48 ddey noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_da_ftr_val_map%ROWTYPE;
6: new_references igs_da_ftr_val_map%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSKI48B.pls 115.0 2003/04/15 09:23:48 ddey noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_da_ftr_val_map%ROWTYPE;
6: new_references igs_da_ftr_val_map%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_da_ftr_val_map
38: WHERE rowid = x_rowid;
39:
40: BEGIN
41:
90: || (reverse chronological order - newest change first)
91: */
92: BEGIN
93:
94: igs_da_cnfg_ftr_pkg.get_fk_igs_da_ftr_val_map (
95: old_references.feature_code
96: );
97:
98: igs_da_req_ftrs_pkg.get_fk_igs_da_ftr_val_map (
94: igs_da_cnfg_ftr_pkg.get_fk_igs_da_ftr_val_map (
95: old_references.feature_code
96: );
97:
98: igs_da_req_ftrs_pkg.get_fk_igs_da_ftr_val_map (
99: x_feature_code => old_references.feature_code);
100:
101: END check_child_existance;
102:
114: || (reverse chronological order - newest change first)
115: */
116: CURSOR cur_rowid IS
117: SELECT rowid
118: FROM igs_da_ftr_val_map
119: WHERE feature_code = x_feature_code
120: FOR UPDATE NOWAIT;
121:
122: lv_rowid cur_rowid%RowType;
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_DA_FTR_VAL_MAP_PKG.INSERT_ROW');
260: igs_ge_msg_stack.add;
261: app_exception.raise_exception;
262: END IF;
263:
280: x_last_updated_by => x_last_updated_by,
281: x_last_update_login => x_last_update_login
282: );
283:
284: INSERT INTO igs_da_ftr_val_map (
285: feature_code,
286: feature_val_type,
287: configure_checked,
288: third_party_ftr_code,
342: allow_disp_chk_flag,
343: single_allowed,
344: batch_allowed,
345: transfer_evaluation_ind
346: FROM igs_da_ftr_val_map
347: WHERE rowid = x_rowid
348: FOR UPDATE NOWAIT;
349:
350: tlinfo c1%ROWTYPE;
424: x_last_update_login := -1;
425: END IF;
426: ELSE
427: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
428: fnd_message.set_token ('ROUTINE', 'IGS_DA_FTR_VAL_MAP_PKG.UPDATE_ROW');
429: igs_ge_msg_stack.add;
430: app_exception.raise_exception;
431: END IF;
432:
449: x_last_updated_by => x_last_updated_by,
450: x_last_update_login => x_last_update_login
451: );
452:
453: UPDATE igs_da_ftr_val_map
454: SET
455: feature_val_type = new_references.feature_val_type,
456: configure_checked = new_references.configure_checked,
457: third_party_ftr_code = new_references.third_party_ftr_code,
493: || (reverse chronological order - newest change first)
494: */
495: CURSOR c1 IS
496: SELECT rowid
497: FROM igs_da_ftr_val_map
498: WHERE feature_code = x_feature_code;
499:
500: BEGIN
501:
554: p_action => 'DELETE',
555: x_rowid => x_rowid
556: );
557:
558: DELETE FROM igs_da_ftr_val_map
559: WHERE rowid = x_rowid;
560:
561: IF (SQL%NOTFOUND) THEN
562: RAISE NO_DATA_FOUND;
564:
565: END delete_row;
566:
567:
568: END igs_da_ftr_val_map_pkg;