1: PACKAGE BODY igf_sl_edit AS
2: /* $Header: IGFSL10B.pls 120.0 2005/06/01 13:58:43 appldev noship $ */
3:
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
1: PACKAGE BODY igf_sl_edit AS
2: /* $Header: IGFSL10B.pls 120.0 2005/06/01 13:58:43 appldev noship $ */
3:
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
1: PACKAGE BODY igf_sl_edit AS
2: /* $Header: IGFSL10B.pls 120.0 2005/06/01 13:58:43 appldev noship $ */
3:
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
9: p_field_value igf_sl_edit_report.field_value%TYPE)
2: /* $Header: IGFSL10B.pls 120.0 2005/06/01 13:58:43 appldev noship $ */
3:
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
9: p_field_value igf_sl_edit_report.field_value%TYPE)
10: IS
3:
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
9: p_field_value igf_sl_edit_report.field_value%TYPE)
10: IS
11: /*************************************************************
4: PROCEDURE insert_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
9: p_field_value igf_sl_edit_report.field_value%TYPE)
10: IS
11: /*************************************************************
12: Created By : venagara
5: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE,
6: p_err_type igf_sl_edit_report.sl_error_type%TYPE,
7: p_err_code igf_sl_edit_report.sl_error_code%TYPE,
8: p_field_name igf_sl_edit_report.field_name%TYPE,
9: p_field_value igf_sl_edit_report.field_value%TYPE)
10: IS
11: /*************************************************************
12: Created By : venagara
13: Date Created On : 2000/11/07
23: lv_edtr_id NUMBER;
24: BEGIN
25:
26: IF p_err_code NOT IN ('0','00','000','0000','00000') THEN
27: igf_sl_edit_report_pkg.insert_row (
28: x_mode => 'R',
29: x_rowid => lv_rowid,
30: x_edtr_id => lv_edtr_id,
31: x_loan_number => p_loan_number,
38: END IF;
39: EXCEPTION
40: WHEN others THEN
41: fnd_message.set_name('IGF','IGF_GE_UNHANDLED_EXP');
42: fnd_message.set_token('NAME','igf_sl_edit.insert_edit');
43: igs_ge_msg_stack.add;
44: app_exception.raise_exception;
45: END insert_edit;
46:
44: app_exception.raise_exception;
45: END insert_edit;
46:
47:
48: PROCEDURE delete_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
49: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE)
50: IS
51: /*************************************************************
52: Created By : venagara
45: END insert_edit;
46:
47:
48: PROCEDURE delete_edit(p_loan_number igf_sl_edit_report.loan_number%TYPE,
49: p_orig_chg_code igf_sl_edit_report.orig_chg_code%TYPE)
50: IS
51: /*************************************************************
52: Created By : venagara
53: Date Created On : 2000/11/07
60: ***************************************************************/
61:
62: lv_row_id VARCHAR2(25);
63: CURSOR c_tbh_cur IS
64: SELECT rowid row_id FROM igf_sl_edit_report
65: WHERE loan_number = p_loan_number
66: AND orig_chg_code = p_orig_chg_code;
67: BEGIN
68:
66: AND orig_chg_code = p_orig_chg_code;
67: BEGIN
68:
69: FOR tbh_rec in c_tbh_cur LOOP
70: igf_sl_edit_report_pkg.delete_row (tbh_rec.row_id);
71: END LOOP;
72:
73: END delete_edit;
74:
72:
73: END delete_edit;
74:
75:
76: END igf_sl_edit;