1 PACKAGE igf_gr_pell_calc AS
2 /* $Header: IGFGR11S.pls 120.2 2005/09/26 08:41:08 appldev ship $ */
3
4 -- Pell award and its disbursements will be returned via this PL/SQL Table
5 TYPE pell_rec IS RECORD(
6 process_id NUMBER,
7 sl_number NUMBER,
8 fund_id NUMBER,
9 base_id NUMBER,
10 disb_dt DATE,
11 ld_cal_type VARCHAR2(10),
12 ld_sequence_number NUMBER,
13 tp_cal_type VARCHAR2(10),
14 tp_sequence_number NUMBER,
15 offered_amt NUMBER,
16 accepted_amt NUMBER,
17 paid_amt NUMBER,
18 app_trans_num_txt VARCHAR2(30),
19 adplans_id NUMBER,
20 DISB_EXP_DT DATE,
21 MIN_CREDIT_PTS NUMBER,
22 VERF_ENFR_DT DATE,
23 SHOW_ON_BILL VARCHAR2(30),
24 ATTENDANCE_TYPE_CODE VARCHAR2(30),
25 BASE_ATTENDANCE_TYPE_CODE VARCHAR2(30),
26 term_amt NUMBER
27 );
28
29 TYPE pell_tab IS TABLE OF pell_rec;
30
31
32 PROCEDURE get_pell_setup ( cp_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
33 cp_course_cd IN igf_gr_pell_setup_all.course_cd%TYPE,
34 cp_version_number IN igf_gr_pell_setup_all.version_number%TYPE,
35 cp_cal_type IN igs_ca_inst.cal_type%TYPE,
36 cp_sequence_number IN igs_ca_inst.sequence_number%TYPE,
37 cp_pell_setup_rec IN OUT NOCOPY igf_gr_pell_setup_all%ROWTYPE ,
38 cp_message OUT NOCOPY VARCHAR2,
39 cp_return_status OUT NOCOPY VARCHAR2
40 );
41
42 PROCEDURE get_pell_coa_efc (
43 cp_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
44 cp_attendance_type IN igf_ap_attend_map.attendance_type%TYPE,
45 cp_pell_setup_rec IN igf_gr_pell_setup_all%ROWTYPE ,
46 cp_coa OUT NOCOPY NUMBER,
47 cp_efc OUT NOCOPY NUMBER,
48 cp_pell_schedule_code OUT NOCOPY VARCHAR2,
49 cp_message OUT NOCOPY VARCHAR2,
50 cp_return_status OUT NOCOPY VARCHAR2
51 );
52
53 PROCEDURE get_pell_attendance_type (
54 cp_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
55 cp_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
56 cp_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
57 cp_pell_setup_rec IN igf_gr_pell_setup_all%ROWTYPE ,
58 cp_attendance_type IN OUT NOCOPY igf_ap_attend_map.attendance_type%TYPE,
59 cp_message OUT NOCOPY VARCHAR2,
60 cp_return_status OUT NOCOPY VARCHAR2
61 ) ;
62
63 PROCEDURE get_pell_matrix_amt(
64 cp_cal_type IN igs_ca_inst.cal_type%TYPE,
65 cp_sequence_num IN igs_ca_inst.sequence_number%TYPE,
66 cp_efc IN NUMBER,
67 cp_pell_schd IN VARCHAR2,
68 cp_enrl_stat IN VARCHAR2,
69 cp_pell_coa IN NUMBER,
70 cp_pell_alt_exp IN NUMBER,
71 cp_called_from IN VARCHAR2,
72 cp_return_status IN OUT NOCOPY VARCHAR2,
73 cp_message IN OUT NOCOPY VARCHAR2,
74 cp_aid IN OUT NOCOPY NUMBER );
75
76 PROCEDURE calc_pell(
77 cp_fund_id IN igf_aw_fund_mast_all.fund_id%TYPE,
78 cp_plan_id IN igf_aw_awd_dist_plans.adplans_id%TYPE,
79 cp_base_id IN igf_ap_fa_base_rec.base_id%TYPE,
80 cp_aid IN OUT NOCOPY NUMBER,
81 cp_pell_tab IN OUT NOCOPY pell_tab,
82 cp_return_status IN OUT NOCOPY VARCHAR2,
83 cp_message IN OUT NOCOPY VARCHAR2,
84 cp_called_from IN VARCHAR2,
85 cp_pell_seq_id OUT NOCOPY igf_gr_pell_setup_all.pell_seq_id%TYPE,
86 cp_pell_schedule_code OUT NOCOPY VARCHAR2
87 );
88
89
90 PROCEDURE pell_elig( cp_base_id IN igf_ap_fa_base_rec.base_id%TYPE,
91 cp_return_status IN OUT NOCOPY VARCHAR2
92 );
93
94
95 PROCEDURE calc_term_pell(
96 cp_base_id IN igf_ap_fa_base_rec.base_id%TYPE,
97 cp_attendance_type IN igf_ap_attend_map.attendance_type%TYPE,
98 cp_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
99 cp_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
100 cp_term_aid IN OUT NOCOPY NUMBER,
101 cp_return_status IN OUT NOCOPY VARCHAR2,
102 cp_message IN OUT NOCOPY VARCHAR2,
103 cp_called_from IN VARCHAR2,
104 cp_pell_schedule_code OUT NOCOPY VARCHAR2
105 );
106
107 PROCEDURE calc_ft_max_pell(
108 cp_base_id IN igf_ap_fa_base_rec.base_id%TYPE,
109 cp_cal_type IN igf_ap_fa_base_rec.ci_cal_type%TYPE,
110 cp_sequence_number IN igf_ap_fa_base_rec.ci_sequence_number%TYPE,
111 cp_flag IN VARCHAR2,
112 cp_aid IN OUT NOCOPY NUMBER,
113 cp_ft_aid IN OUT NOCOPY NUMBER,
114 cp_return_status IN OUT NOCOPY VARCHAR2,
115 cp_message IN OUT NOCOPY VARCHAR2
116 );
117
118 FUNCTION num_disb(
119 p_adplans_id igf_aw_awd_dist_plans.adplans_id%TYPE,
120 p_ld_cal_type igs_ca_inst_all.cal_type%TYPE,
121 p_ld_sequence_number igs_ca_inst_all.sequence_number%TYPE
122 ) RETURN NUMBER;
123 END igf_gr_pell_calc;