PACKAGE: APPS.PN_RETRO_ADJUSTMENT_PKG

Source

1 PACKAGE pn_retro_adjustment_pkg AS
2 /* $Header: PNRTADJS.pls 120.1 2005/08/17 01:34:18 appldev noship $ */
3 
4 ------------------------------ DECLARATIONS ----------------------------------+
5 
6 TYPE payment_item_rec IS RECORD(
7    item_id        pn_payment_items.payment_item_id%TYPE,
8    start_date     pn_payment_items.adj_start_date%TYPE,
9    end_date       pn_payment_items.adj_end_date%TYPE,
10    trx_date       pn_payment_items.due_date%TYPE,
11    amount         pn_payment_terms.actual_amount%TYPE,
12    new_amount     pn_payment_terms.actual_amount%TYPE,
13    payment_status pn_payment_schedules.payment_status_lookup_code%TYPE,
14    schedule_date  pn_payment_schedules.schedule_date%TYPE,
15    schedule_id    pn_payment_schedules.payment_schedule_id%TYPE,
16    adj_summ_id    pn_adjustment_summaries.adjustment_summary_id%TYPE,
17    adj_date       pn_adjustment_summaries.adj_schedule_date%TYPE);
18 
19 TYPE payment_item_tbl_type IS TABLE OF payment_item_rec INDEX BY BINARY_INTEGER;
20 
21 --------------------------- PUBLIC PROCEDURES --------------------------------+
22 
23 PROCEDURE create_retro_adjustments(
24             p_lease_id      pn_payment_terms.lease_id%TYPE,
25             p_lease_chg_id  pn_lease_changes.lease_change_id%TYPE,
26             p_term_id       pn_payment_terms.payment_term_id%TYPE,
27             p_term_start_dt pn_payment_terms.start_date%TYPE,
28             p_term_end_dt   pn_payment_terms.end_date%TYPE,
29             p_term_sch_day  pn_payment_terms.schedule_day%TYPE,
30             p_term_act_amt  pn_payment_terms.actual_amount%TYPE,
31             p_term_freq     pn_payment_terms.frequency_code%TYPE,
32             p_term_hist_id  pn_payment_terms_history.term_history_id%TYPE,
33             p_adj_type_cd   pn_payment_items.last_adjustment_type_code%TYPE
34          );
35 
36 PROCEDURE find_schedule (
37             p_lease_id        pn_leases.lease_id%TYPE,
38             p_lease_change_id pn_lease_changes.lease_change_id%TYPE,
39             p_term_id         pn_payment_terms.payment_term_id%TYPE,
40             p_schedule_date   pn_payment_schedules.schedule_date%TYPE,
41             p_schedule_id     OUT NOCOPY pn_payment_schedules.payment_schedule_id%TYPE
42          );
43 
44 PROCEDURE create_virtual_schedules(
45             p_start_date pn_payment_terms.start_date%TYPE,
46             p_end_date   pn_payment_terms.end_date%TYPE,
47             p_sch_day    pn_payment_terms.schedule_day%TYPE,
48             p_amount     pn_payment_terms.actual_amount%TYPE,
49             p_term_freq  pn_payment_terms.frequency_code%TYPE,
50             x_sched_tbl  OUT NOCOPY payment_item_tbl_type
51          );
52 
53 PROCEDURE cleanup_schedules(p_lease_id        pn_leases_all.lease_id%TYPE);
54 
55 END pn_retro_adjustment_pkg;