[Home] [Help]
42: x_msg_data OUT NOCOPY VARCHAR2,
43: p_credit_rec IN credit_rec_type,
44: p_attribute_record IN igs_fi_credits_api_pub.attribute_rec_type,
45: x_credit_id OUT NOCOPY igs_fi_credits_all.credit_id%TYPE,
46: x_credit_activity_id OUT NOCOPY igs_fi_cr_activities.credit_activity_id%TYPE,
47: x_credit_number OUT NOCOPY igs_fi_credits_all.credit_number%TYPE
48: ) AS
49: /*----------------------------------------------------------------------------
50: || Created By : vvutukur
57: || pathipat 17-May-2006 Bug 5104599 - After call to igs_fi_prc_balances.update_balances, added condition to not raise
58: || exception if the messages were regd exclusion of credit types or fee types
59: || svuppala 05-May-2006 Enh#3924836 Precision Issue. Done the formatting of amount in the beginning itslef
60: || sapanigr 03-May-2006 Enh#3924836 Precision Issue. Amount values being inserted to igs_fi_credits and
61: || igs_fi_cr_activities_pkg are now rounded off to currency precision
62: uudayapr 8-Oct-2005 BUG 4660773 Commentted the Code LOgic introduced as part of Credit Card Enryption enhancement
63: || gurprsin 26-Sep-2005 Bug 4607540, Credit Card Enryption enhancement, Modified the call to igs_fi_credits_pkg.insert_row method.
64: || pmarada 26-JUL-2005 Enh 3392095, modifed as per tution waiver build, passing p_api_version
65: || parameter value as 2.1 to the igs_fi_credit_pvt.create_credit call
131: l_v_message_name fnd_new_messages.message_name%TYPE := NULL;
132: l_v_currency_cd igs_fi_control_all.currency_cd%TYPE := NULL;
133: l_n_amount igs_fi_credits_all.amount%TYPE;
134:
135: l_n_dr_gl_ccid igs_fi_cr_activities.dr_gl_ccid%TYPE;
136: l_n_cr_gl_ccid igs_fi_cr_activities.cr_gl_ccid%TYPE;
137: l_v_dr_account_cd igs_fi_cr_activities.dr_account_cd%TYPE;
138: l_v_cr_account_cd igs_fi_cr_activities.cr_account_cd%TYPE;
139: l_n_err_type NUMBER(2) := NULL;
132: l_v_currency_cd igs_fi_control_all.currency_cd%TYPE := NULL;
133: l_n_amount igs_fi_credits_all.amount%TYPE;
134:
135: l_n_dr_gl_ccid igs_fi_cr_activities.dr_gl_ccid%TYPE;
136: l_n_cr_gl_ccid igs_fi_cr_activities.cr_gl_ccid%TYPE;
137: l_v_dr_account_cd igs_fi_cr_activities.dr_account_cd%TYPE;
138: l_v_cr_account_cd igs_fi_cr_activities.cr_account_cd%TYPE;
139: l_n_err_type NUMBER(2) := NULL;
140: l_v_err_string VARCHAR2(2000) := NULL;
133: l_n_amount igs_fi_credits_all.amount%TYPE;
134:
135: l_n_dr_gl_ccid igs_fi_cr_activities.dr_gl_ccid%TYPE;
136: l_n_cr_gl_ccid igs_fi_cr_activities.cr_gl_ccid%TYPE;
137: l_v_dr_account_cd igs_fi_cr_activities.dr_account_cd%TYPE;
138: l_v_cr_account_cd igs_fi_cr_activities.cr_account_cd%TYPE;
139: l_n_err_type NUMBER(2) := NULL;
140: l_v_err_string VARCHAR2(2000) := NULL;
141:
134:
135: l_n_dr_gl_ccid igs_fi_cr_activities.dr_gl_ccid%TYPE;
136: l_n_cr_gl_ccid igs_fi_cr_activities.cr_gl_ccid%TYPE;
137: l_v_dr_account_cd igs_fi_cr_activities.dr_account_cd%TYPE;
138: l_v_cr_account_cd igs_fi_cr_activities.cr_account_cd%TYPE;
139: l_n_err_type NUMBER(2) := NULL;
140: l_v_err_string VARCHAR2(2000) := NULL;
141:
142: l_rec_cur_override_dr cur_override_dr%ROWTYPE;
144: l_v_acct_mthd igs_fi_control_all.accounting_method%TYPE;
145: l_var VARCHAR2(1);
146:
147: l_n_credit_id igs_fi_credits.credit_id%TYPE := NULL;
148: l_n_credit_activity_id igs_fi_cr_activities.credit_activity_id%TYPE := NULL;
149: l_v_rowid VARCHAR2(25) := NULL;
150:
151: l_adm_app_number igs_ad_appl_all.admission_appl_number%TYPE;
152: l_v_manage_accounts igs_fi_control_all.manage_accounts%TYPE;
456: --Initilialize local variable of rowid to null values, as this value would be populated thru tbh call.
457: l_v_rowid := NULL;
458:
459: --Call the table handler insert row procedure for creating the records in the credit activities table.
460: igs_fi_cr_activities_pkg.insert_row(x_rowid => l_v_rowid,
461: x_credit_activity_id => l_n_credit_activity_id,
462: x_credit_id => l_n_credit_id,
463: x_status => p_credit_rec.p_credit_status,
464: x_transaction_date => TRUNC(l_d_transaction_date),