[Home] [Help]
PACKAGE: APPS.OKL_BPD_TERMINATION_ADJ_PVT
Source
1 PACKAGE OKL_BPD_TERMINATION_ADJ_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLRBAJS.pls 120.4 2005/09/23 12:17:55 varangan noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6
7 --define input record type
8 TYPE input_rec_type IS RECORD (
9 khr_id NUMBER ,
10 kle_id NUMBER ,
11 term_date_from OKL_STRM_ELEMENTS.STREAM_ELEMENT_DATE%TYPE,
12 term_date_to OKL_STRM_ELEMENTS.STREAM_ELEMENT_DATE%TYPE
13 );
14
15 g_miss_input_rec input_rec_type;
16
17 TYPE input_tbl_type IS TABLE OF input_rec_type
18 INDEX BY BINARY_INTEGER;
19
20 --define Adjusment record type
21 TYPE baj_rec_type IS RECORD (
22 khr_id NUMBER ,
23 kle_id NUMBER ,
24 stream_element_date OKL_STRM_ELEMENTS.STREAM_ELEMENT_DATE%TYPE,
25 sel_id NUMBER,
26 stm_id NUMBER,
27 sty_id NUMBER ,
28 sty_name OKL_STRM_TYPE_V.NAME%TYPE,
29 amount NUMBER,
30 se_line_number OKL_STRM_ELEMENTS.SE_LINE_NUMBER%TYPE,
31 source_id NUMBER,
32 source_table OKL_STRM_ELEMENTS.SOURCE_TABLE%TYPE
33 );
34
35 g_miss_baj_rec baj_rec_type;
36
37 TYPE baj_tbl_type IS TABLE OF baj_rec_type
38 INDEX BY BINARY_INTEGER;
39
40 -- for rebook adj type by fmiao
41 SUBTYPE rebook_adj_tbl IS OKL_REBOOK_CM_PVT.rebook_adj_tbl_type;
42 SUBTYPE disb_rec_type IS OKL_PAY_INVOICES_DISB_PVT.disb_rec_type;
43 -- end rebook adj type by fmiao
44
45 ------------------------------------------------------------------------------
46 -- Global Variables
47 ------------------------------------------------------------------------------
48 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_BPD_TERMINATION_ADJ_PVT';
49 G_APP_NAME CONSTANT VARCHAR2(3) := 'OKL';
50 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_CONTRACTS_UNEXPECTED_ERROR';
51 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
52 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
53
54 ------------------------------------------------------------------------------
55 --Global Exception
56 ------------------------------------------------------------------------------
57 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
58
59 FUNCTION get_kle_status_code(p_kle_id IN NUMBER) RETURN VARCHAR2;
60 PRAGMA RESTRICT_REFERENCES(get_kle_status_code, WNDS);
61
62 --return billing adjustment amount, stream type, and Asset Id from
63 --termination date (for prior dated termination)
64 PROCEDURE get_billing_adjust(
65 p_api_version IN NUMBER,
66 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
67 p_input_tbl IN input_tbl_type,
68 x_baj_tbl OUT NOCOPY baj_tbl_type,
69 x_return_status OUT NOCOPY VARCHAR2,
70 x_msg_count OUT NOCOPY NUMBER,
71 x_msg_data OUT NOCOPY VARCHAR2);
72
73 --return future billing amount, stream type, and Asset Id from
74 --termination date (for future dated termination)
75 PROCEDURE get_unbilled_recvbl(
76 p_api_version IN NUMBER,
77 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
78 p_input_tbl IN input_tbl_type,
79 x_baj_tbl OUT NOCOPY baj_tbl_type,
80 x_return_status OUT NOCOPY VARCHAR2,
81 x_msg_count OUT NOCOPY NUMBER,
82 x_msg_data OUT NOCOPY VARCHAR2);
83
84 --return unbilled estimated property tax amount
85 PROCEDURE get_unbilled_prop_tax(
86 p_api_version IN NUMBER,
87 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
88 p_input_tbl IN input_tbl_type,
89 x_baj_tbl OUT NOCOPY baj_tbl_type,
90 x_return_status OUT NOCOPY VARCHAR2,
91 x_msg_count OUT NOCOPY NUMBER,
92 x_msg_data OUT NOCOPY VARCHAR2);
93
94
95 --create adjustments of passthru from the termination date
96 PROCEDURE create_passthru_adj(
97 p_api_version IN NUMBER,
98 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
99 p_baj_tbl IN baj_tbl_type,
100 x_return_status OUT NOCOPY VARCHAR2,
101 x_msg_count OUT NOCOPY NUMBER,
102 x_msg_data OUT NOCOPY VARCHAR2);
103
104
105 --interface between rebook api and bpd processing apis by fmiao
106 PROCEDURE create_rbk_passthru_adj(
107 p_api_version IN NUMBER,
108 p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
109 p_rebook_adj_tbl IN rebook_adj_tbl,
110 x_disb_rec OUT NOCOPY disb_rec_type,
111 x_return_status OUT NOCOPY VARCHAR2,
112 x_msg_count OUT NOCOPY NUMBER,
113 x_msg_data OUT NOCOPY VARCHAR2);
114
115
116 END OKL_BPD_TERMINATION_ADJ_PVT;