1 PACKAGE okl_fe_adj_matrix_pub AS
2 /* $Header: OKLPPAMS.pls 120.0 2005/07/07 10:41:43 viselvar noship $ */
3
4 -- record structures used in the package
5
6 SUBTYPE okl_pamv_rec IS okl_fe_adj_matrix_pvt.okl_pamv_rec; -- standard rate template header record
7
8 SUBTYPE okl_pal_rec IS okl_fe_adj_matrix_pvt.okl_pal_rec; -- standard rate template version record
9
10 SUBTYPE okl_ech_rec IS okl_fe_adj_matrix_pvt.okl_ech_rec; -- Eligibility Criteria set record
11
12 SUBTYPE okl_ecl_tbl IS okl_fe_adj_matrix_pvt.okl_ecl_tbl; -- Eligibility Criteria table
13
14 SUBTYPE okl_ecv_tbl IS okl_fe_adj_matrix_pvt.okl_ecv_tbl; -- Eligibility Criterion values table
15
16 SUBTYPE invalid_object_tbl IS okl_fe_adj_matrix_pvt.invalid_object_tbl;
17
18 ------------------------------------------------------------------------------
19 -- Global Variables
20
21 g_pkg_name CONSTANT VARCHAR2(200) := 'OKL_FE_ADJ_MATRIX_PVT';
22 g_app_name CONSTANT VARCHAR2(3) := okl_api.g_app_name;
23 g_unexpected_error CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
24 g_sqlerrm_token CONSTANT VARCHAR2(200) := 'SQLERRM';
25 g_sqlcode_token CONSTANT VARCHAR2(200) := 'SQLCODE';
26
27 ------------------------------------------------------------------------------
28 --Global Exception
29 ------------------------------------------------------------------------------
30
31 g_exception_halt_validation EXCEPTION;
32
33 ------------------------------------------------------------------------------
34 -- procedure to give the details of the adjustment matrix given the Adjustment
35 -- matrix id and the version number
36
37 PROCEDURE get_version(p_api_version IN NUMBER
38 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
39 ,x_return_status OUT NOCOPY VARCHAR2
40 ,x_msg_count OUT NOCOPY NUMBER
41 ,x_msg_data OUT NOCOPY VARCHAR2
42 ,p_adj_mat_id IN NUMBER
43 ,p_version_number IN NUMBER
44 ,x_pamv_rec OUT NOCOPY okl_pamv_rec
45 ,x_pal_rec OUT NOCOPY okl_pal_rec
46 ,x_ech_rec OUT NOCOPY okl_ech_rec
47 ,x_ecl_tbl OUT NOCOPY okl_ecl_tbl
48 ,x_ecv_tbl OUT NOCOPY okl_ecv_tbl);
49
50 -- procedure to give the details of the latest version of adjustment matrix
51 -- given the adjusment matrix id
52
53 PROCEDURE get_version(p_api_version IN NUMBER
54 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
55 ,x_return_status OUT NOCOPY VARCHAR2
56 ,x_msg_count OUT NOCOPY NUMBER
57 ,x_msg_data OUT NOCOPY VARCHAR2
58 ,p_adj_mat_id IN NUMBER
59 ,x_pamv_rec OUT NOCOPY okl_pamv_rec
60 ,x_pal_rec OUT NOCOPY okl_pal_rec
61 ,x_ech_rec OUT NOCOPY okl_ech_rec
62 ,x_ecl_tbl OUT NOCOPY okl_ecl_tbl
63 ,x_ecv_tbl OUT NOCOPY okl_ecv_tbl);
64
65 -- procedure to create a new version of the Pricing Adjustment Matrix
66
67 PROCEDURE create_version(p_api_version IN NUMBER
68 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
69 ,x_return_status OUT NOCOPY VARCHAR2
70 ,x_msg_count OUT NOCOPY NUMBER
71 ,x_msg_data OUT NOCOPY VARCHAR2
72 ,p_pal_rec IN okl_pal_rec
73 ,x_pal_rec OUT NOCOPY okl_pal_rec);
74
75 --procedure to create a Pricing Adjusment Matrix with the associated adjustment categories
76
77 PROCEDURE insert_adj_mat(p_api_version IN NUMBER
78 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
79 ,x_return_status OUT NOCOPY VARCHAR2
80 ,x_msg_count OUT NOCOPY NUMBER
81 ,x_msg_data OUT NOCOPY VARCHAR2
82 ,p_pamv_rec IN okl_pamv_rec
83 ,p_pal_rec IN okl_pal_rec
84 ,x_pamv_rec OUT NOCOPY okl_pamv_rec
85 ,x_pal_rec OUT NOCOPY okl_pal_rec);
86
87 -- procedure to update a particular version of the Pricing Adjustment matrix
88
89 PROCEDURE update_adj_mat(p_api_version IN NUMBER
90 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
91 ,x_return_status OUT NOCOPY VARCHAR2
92 ,x_msg_count OUT NOCOPY NUMBER
93 ,x_msg_data OUT NOCOPY VARCHAR2
94 ,p_pal_rec IN okl_pal_rec
95 ,x_pal_rec OUT NOCOPY okl_pal_rec);
96
97 -- procedure to raise the workflow which submits the record and changes the status.
98
99 PROCEDURE submit_adj_mat(p_api_version IN NUMBER
100 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
101 ,x_return_status OUT NOCOPY VARCHAR2
102 ,x_msg_count OUT NOCOPY NUMBER
103 ,x_msg_data OUT NOCOPY VARCHAR2
104 ,p_version_id IN NUMBER);
105
106 -- procedure to validate the pricing adjustment matrix
107
108 PROCEDURE validate_adj_mat(p_api_version IN NUMBER
109 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
110 ,x_return_status OUT NOCOPY VARCHAR2
111 ,x_msg_count OUT NOCOPY NUMBER
112 ,x_msg_data OUT NOCOPY VARCHAR2
113 ,p_pal_rec IN okl_pal_rec
114 ,p_ech_rec IN okl_ech_rec
115 ,p_ecl_tbl IN okl_ecl_tbl
116 ,p_ecv_tbl IN okl_ecv_tbl);
117
118 -- procedure to handle when the process is going through the process of approval
119
120 PROCEDURE handle_approval(p_api_version IN NUMBER
121 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
122 ,x_return_status OUT NOCOPY VARCHAR2
123 ,x_msg_count OUT NOCOPY NUMBER
124 ,x_msg_data OUT NOCOPY VARCHAR2
125 ,p_version_id IN NUMBER);
126
127 PROCEDURE invalid_objects(p_api_version IN NUMBER
128 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
129 ,x_return_status OUT NOCOPY VARCHAR2
130 ,x_msg_count OUT NOCOPY NUMBER
131 ,x_msg_data OUT NOCOPY VARCHAR2
132 ,p_version_id IN NUMBER
133 ,x_obj_tbl OUT NOCOPY invalid_object_tbl);
134
135 -- to calculate the start date of the new version
136
137 PROCEDURE calc_start_date(p_api_version IN NUMBER
138 ,p_init_msg_list IN VARCHAR2 DEFAULT okl_api.g_false
139 ,x_return_status OUT NOCOPY VARCHAR2
140 ,x_msg_count OUT NOCOPY NUMBER
141 ,x_msg_data OUT NOCOPY VARCHAR2
142 ,p_pal_rec IN okl_pal_rec
143 ,x_cal_eff_from OUT NOCOPY DATE);
144
145 END okl_fe_adj_matrix_pub;