1 PACKAGE igf_sl_roundoff_digits_pkg AUTHID CURRENT_USER AS
2 /* $Header: IGFSL14S.pls 115.8 2003/12/04 15:48:15 sjadhav ship $ */
3
4 --
5 -----------------------------------------------------------------
6 -- Created By : prchandr
7 -- Created On :06-APR-2001
8 -- Purpose : Rounding off Logic implemented
9 -- Known limitations, enhancements or remarks :
10 -- Change History :
11 -----------------------------------------------------------------
12 -- Who When What
13 -----------------------------------------------------------------
14 -- sjadhav 4-Dec-2003 Removed p_curr_disb_num
15 -----------------------------------------------------------------
16 -- sjadhav 3-Dec-2003 Removed fee perct from
17 -- cl round off
18 -----------------------------------------------------------------
19 -- sjadhav 28-Nov-2003 Use Disb Numbers instead
20 -- of % as the % may not total
21 -- to 100% all the time
22 -----------------------------------------------------------------
23 --
24
25 PROCEDURE gross_fees_roundoff
26 (
27 p_last_disb_num IN NUMBER,
28 p_offered_amt IN NUMBER,
29 p_fee_perct IN NUMBER,
30 p_disb_gross_amt IN OUT NOCOPY NUMBER,
31 p_disb_net_amt OUT NOCOPY NUMBER,
32 p_fee OUT NOCOPY NUMBER
33 );
34
35
36 PROCEDURE cl_gross_fees_roundoff
37 (
38 p_last_disb_num IN NUMBER,
39 p_offered_amt IN NUMBER,
40 p_disb_gross_amt IN OUT NOCOPY NUMBER
41 );
42
43
44 lp_disb_number NUMBER;
45 lp_current_amt NUMBER(12,2);
46
47 END igf_sl_roundoff_digits_pkg;