1: PACKAGE BODY igf_aw_fund_feeclas_pkg AS
2: /* $Header: IGFWI49B.pls 115.1 2002/11/28 14:43:04 nsidana noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igf_aw_fund_feeclas_all%ROWTYPE;
6: new_references igf_aw_fund_feeclas_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGFWI49B.pls 115.1 2002/11/28 14:43:04 nsidana noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igf_aw_fund_feeclas_all%ROWTYPE;
6: new_references igf_aw_fund_feeclas_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,
28: */
29:
30: CURSOR cur_old_ref_values IS
31: SELECT *
32: FROM igf_aw_fund_feeclas_all
33: WHERE rowid = x_rowid;
34:
35: BEGIN
36:
133: || (reverse chronological order - newest change first)
134: */
135: CURSOR cur_rowid IS
136: SELECT rowid
137: FROM igf_aw_fund_feeclas_all
138: WHERE fclass_id = x_fclass_id
139: FOR UPDATE NOWAIT;
140:
141: lv_rowid cur_rowid%RowType;
205: || (reverse chronological order - newest change first)
206: */
207: CURSOR cur_rowid IS
208: SELECT rowid
209: FROM igf_aw_fund_feeclas_all
210: WHERE ((fund_id = x_fund_id));
211:
212: lv_rowid cur_rowid%RowType;
213:
315: || (reverse chronological order - newest change first)
316: */
317: CURSOR c IS
318: SELECT rowid
319: FROM igf_aw_fund_feeclas_all
320: WHERE fclass_id = x_fclass_id;
321:
322: x_last_update_date DATE;
323: x_last_updated_by NUMBER;
362: x_last_updated_by => x_last_updated_by,
363: x_last_update_login => x_last_update_login
364: );
365:
366: INSERT INTO igf_aw_fund_feeclas_all (
367: fclass_id,
368: fund_id,
369: fee_class,
370: org_id,
414: CURSOR c1 IS
415: SELECT
416: fund_id,
417: fee_class
418: FROM igf_aw_fund_feeclas_all
419: WHERE rowid = x_rowid
420: FOR UPDATE NOWAIT;
421:
422: tlinfo c1%ROWTYPE;
503: x_last_updated_by => x_last_updated_by,
504: x_last_update_login => x_last_update_login
505: );
506:
507: UPDATE igf_aw_fund_feeclas_all
508: SET
509: fund_id = new_references.fund_id,
510: fee_class = new_references.fee_class,
511: last_update_date = x_last_update_date,
537: || (reverse chronological order - newest change first)
538: */
539: CURSOR c1 IS
540: SELECT rowid
541: FROM igf_aw_fund_feeclas_all
542: WHERE fclass_id = x_fclass_id;
543:
544: BEGIN
545:
588: p_action => 'DELETE',
589: x_rowid => x_rowid
590: );
591:
592: DELETE FROM igf_aw_fund_feeclas_all
593: WHERE rowid = x_rowid;
594:
595: IF (SQL%NOTFOUND) THEN
596: RAISE NO_DATA_FOUND;