140: from user_objects
141: where object_name = 'JL_BR_INTEREST_HANDLING'
142: and object_type = 'PACKAGE BODY';
143:
144: c := dbms_sql.open_cursor;
145: statement := 'BEGIN
146: JL_BR_INTEREST_HANDLING.JL_BR_INTEREST(' ||
147: 'X_Interest_Type=>:interest_type, ' ||
148: 'X_Interest_Rate_Amount=>:interest_rate_amount, ' ||
160: 'X_Interest_Calculated=>:interest_amount, ' ||
161: 'X_Days_Late=>:days_late, ' ||
162: 'X_Exit_Code=>:exit_code ); END; ';
163:
164: dbms_sql.parse(c, statement, dbms_sql.native);
165:
166: dbms_sql.bind_variable( c, 'interest_type', l_interest_type );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
162: 'X_Exit_Code=>:exit_code ); END; ';
163:
164: dbms_sql.parse(c, statement, dbms_sql.native);
165:
166: dbms_sql.bind_variable( c, 'interest_type', l_interest_type );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
163:
164: dbms_sql.parse(c, statement, dbms_sql.native);
165:
166: dbms_sql.bind_variable( c, 'interest_type', l_interest_type );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
165:
166: dbms_sql.bind_variable( c, 'interest_type', l_interest_type );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
166: dbms_sql.bind_variable( c, 'interest_type', l_interest_type );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
167: dbms_sql.bind_variable( c, 'interest_rate_amount', l_interest_rate_amount
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
168: );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
169: dbms_sql.bind_variable( c, 'interest_period', l_interest_period );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
170: dbms_sql.bind_variable( c, 'interest_formula', l_interest_formula );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
171: dbms_sql.bind_variable( c, 'interest_grace_days', l_interest_grace_days );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
172: dbms_sql.bind_variable( c, 'penalty_type', l_penalty_type );
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
173: dbms_sql.bind_variable( c, 'penalty_rate_amount', l_penalty_rate_amount );
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
174: dbms_sql.bind_variable( c, 'invoice_due_date', p_invoice_due_date );
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
175: dbms_sql.bind_variable( c, 'check_date', p_check_date );
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
176: dbms_sql.bind_variable( c, 'payment_amount', p_payment_amount );
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
177: dbms_sql.bind_variable( c, 'calendar', l_calendar );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
178: dbms_sql.bind_variable( c, 'city', l_city );
179: dbms_sql.bind_variable( c, 'payment_action', l_payment_action );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
180: dbms_sql.bind_variable ( c, 'interest_amount', l_interest_amount);
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
187: dbms_sql.variable_value ( c, 'exit_code', l_exit_code );
188:
181: dbms_sql.bind_variable ( c, 'days_late', l_days_late);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
187: dbms_sql.variable_value ( c, 'exit_code', l_exit_code );
188:
189: dbms_sql.close_cursor(c);
182: dbms_sql.bind_variable ( c, 'exit_code', l_exit_code);
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
187: dbms_sql.variable_value ( c, 'exit_code', l_exit_code );
188:
189: dbms_sql.close_cursor(c);
190:
183:
184: rows := dbms_sql.execute(c);
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
187: dbms_sql.variable_value ( c, 'exit_code', l_exit_code );
188:
189: dbms_sql.close_cursor(c);
190:
191: EXCEPTION
185: dbms_sql.variable_value ( c, 'interest_amount', p_interest_amount );
186: dbms_sql.variable_value ( c, 'days_late', l_days_late );
187: dbms_sql.variable_value ( c, 'exit_code', l_exit_code );
188:
189: dbms_sql.close_cursor(c);
190:
191: EXCEPTION
192: WHEN NO_DATA_FOUND THEN P_INTEREST_AMOUNT := NULL;
193: WHEN OTHERS THEN P_INTEREST_AMOUNT := NULL;