1 PACKAGE okl_lease_rate_sets_pvt AUTHID CURRENT_USER AS
2 /* $Header: OKLRLRSS.pls 120.1 2005/10/30 04:59:07 appldev noship $ */
3
4 -----------------------------------------------------------------------------
5 -- PACKAGE SPECIFIC CONSTANTS
6 -----------------------------------------------------------------------------
7
8 g_pkg_name CONSTANT varchar2(30) := 'okl_lease_rate_sets_pvt';
9 g_api_type CONSTANT varchar2(4) := '_PVT';
10
11 -----------------------------------------------------------------------------
12 -- APPLICATION GLOBAL CONSTANTS
13 -----------------------------------------------------------------------------
14
15 g_app_name CONSTANT varchar2(3) := okl_api.g_app_name;
16 g_api_version CONSTANT number := 1;
17 g_false CONSTANT varchar2(1) := fnd_api.g_false;
18 g_true CONSTANT varchar2(1) := fnd_api.g_true;
19 g_db_error CONSTANT varchar2(12) := 'OKL_DB_ERROR';
20 g_prog_name_token CONSTANT varchar2(9) := 'PROG_NAME';
21 g_sqlcode_token CONSTANT varchar2(7) := 'SQLCODE';
22 g_sqlerrm_token CONSTANT varchar2(7) := 'SQLERRM';
23 g_ret_sts_success CONSTANT varchar2(1) := fnd_api.g_ret_sts_success;
24 g_ret_sts_unexp_error CONSTANT varchar2(1) := fnd_api.g_ret_sts_unexp_error;
25 g_ret_sts_error CONSTANT varchar2(1) := fnd_api.g_ret_sts_error;
26 g_miss_char CONSTANT varchar2(1) := fnd_api.g_miss_char;
27
28 ---------------------------------------------------------------------------
29 -- DATA STRUCTURES
30 ---------------------------------------------------------------------------
31
32 SUBTYPE lrtv_rec_type IS okl_lrt_pvt.lrtv_rec_type;
33
34 SUBTYPE lrtv_tbl_type IS okl_lrt_pvt.lrtv_tbl_type;
35
36 SUBTYPE okl_lrvv_rec IS okl_lrv_pvt.okl_lrvv_rec;
37
38 SUBTYPE lrfv_tbl_type IS okl_lrf_pvt.lrfv_tbl_type;
39
40 SUBTYPE okl_lrlv_tbl IS okl_lrl_pvt.okl_lrlv_tbl;
41
42 SUBTYPE okl_ech_rec IS okl_ech_pvt.okl_ech_rec;
43
44 SUBTYPE okl_ecl_tbl IS okl_ecl_pvt.okl_ecl_tbl;
45
46 SUBTYPE okl_ecv_tbl IS okl_ecv_pvt.okl_ecv_tbl;
47
48 TYPE okl_number_table IS TABLE OF number INDEX BY BINARY_INTEGER;
49
50 ---------------------------------------------------------------------------
51 -- PROGRAM UNITS
52 ---------------------------------------------------------------------------
53
54 PROCEDURE create_lease_rate_set(p_api_version IN number
55 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
56 ,x_return_status OUT NOCOPY varchar2
57 ,x_msg_count OUT NOCOPY number
58 ,x_msg_data OUT NOCOPY varchar2
59 ,p_lrtv_rec IN lrtv_rec_type
60 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
61 ,p_lrvv_rec IN okl_lrvv_rec
62 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
63
64 PROCEDURE update_lease_rate_set(p_api_version IN number
65 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
66 ,x_return_status OUT NOCOPY varchar2
67 ,x_msg_count OUT NOCOPY number
68 ,x_msg_data OUT NOCOPY varchar2
69 ,p_lrtv_rec IN lrtv_rec_type
70 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
71 ,p_lrvv_rec IN okl_lrvv_rec
72 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
73
74 PROCEDURE version_lease_rate_set(p_api_version IN number
75 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
76 ,x_return_status OUT NOCOPY varchar2
77 ,x_msg_count OUT NOCOPY number
78 ,x_msg_data OUT NOCOPY varchar2
79 ,p_lrtv_rec IN lrtv_rec_type
80 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
81 ,p_lrvv_rec IN okl_lrvv_rec
82 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
83
84 FUNCTION get_newversion_effective_from(p_lrv_id number) RETURN date;
85
86 PROCEDURE submit_lease_rate_set(p_api_version IN number
87 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
88 ,x_return_status OUT NOCOPY varchar2
89 ,x_msg_count OUT NOCOPY number
90 ,x_msg_data OUT NOCOPY varchar2
91 ,p_rate_set_version_id IN okl_fe_rate_set_versions.rate_set_version_id%TYPE);
92
93 PROCEDURE activate_lease_rate_set(p_api_version IN number
94 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
95 ,x_return_status OUT NOCOPY varchar2
96 ,x_msg_count OUT NOCOPY number
97 ,x_msg_data OUT NOCOPY varchar2
98 ,p_rate_set_version_id IN okl_fe_rate_set_versions.rate_set_version_id%TYPE);
99
100 PROCEDURE create_lrs_gen_lrf(p_api_version IN number
101 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
102 ,x_return_status OUT NOCOPY varchar2
103 ,x_msg_count OUT NOCOPY number
104 ,x_msg_data OUT NOCOPY varchar2
105 ,p_lrtv_rec IN lrtv_rec_type
106 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
107 ,p_lrvv_rec IN okl_lrvv_rec
108 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
109
110 PROCEDURE update_lrs_gen_lrf(p_api_version IN number
111 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
112 ,x_return_status OUT NOCOPY varchar2
113 ,x_msg_count OUT NOCOPY number
114 ,x_msg_data OUT NOCOPY varchar2
115 ,p_lrtv_rec IN lrtv_rec_type
116 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
117 ,p_lrvv_rec IN okl_lrvv_rec
118 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
119
120 PROCEDURE version_lrs_gen_lrf(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_lrtv_rec IN lrtv_rec_type
126 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
127 ,p_lrvv_rec IN okl_lrvv_rec
128 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
129
130 PROCEDURE create_lrs_gen_lrf_submit(p_api_version IN number
131 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
132 ,x_return_status OUT NOCOPY varchar2
133 ,x_msg_count OUT NOCOPY number
134 ,x_msg_data OUT NOCOPY varchar2
135 ,p_lrtv_rec IN lrtv_rec_type
136 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
137 ,p_lrvv_rec IN okl_lrvv_rec
138 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
139
140 PROCEDURE update_lrs_gen_lrf_submit(p_api_version IN number
141 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
142 ,x_return_status OUT NOCOPY varchar2
143 ,x_msg_count OUT NOCOPY number
144 ,x_msg_data OUT NOCOPY varchar2
145 ,p_lrtv_rec IN lrtv_rec_type
146 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
147 ,p_lrvv_rec IN okl_lrvv_rec
148 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
149
150 PROCEDURE version_lrs_gen_lrf_submit(p_api_version IN number
151 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
152 ,x_return_status OUT NOCOPY varchar2
153 ,x_msg_count OUT NOCOPY number
154 ,x_msg_data OUT NOCOPY varchar2
155 ,p_lrtv_rec IN lrtv_rec_type
156 ,x_lrtv_rec OUT NOCOPY lrtv_rec_type
157 ,p_lrvv_rec IN okl_lrvv_rec
158 ,x_lrvv_rec OUT NOCOPY okl_lrvv_rec);
159
160 PROCEDURE validate_eot_version(p_api_version IN number
161 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
162 ,x_return_status OUT NOCOPY varchar2
163 ,x_msg_count OUT NOCOPY number
164 ,x_msg_data OUT NOCOPY varchar2
165 ,p_eot_id IN number
166 ,p_effective_from IN date
167 ,p_eot_ver_id IN number
168 ,p_rate_set_version_id IN number
169 ,x_eot_ver_id OUT NOCOPY number
170 ,x_version_number OUT NOCOPY varchar2);
171
172 PROCEDURE enddate_lease_rate_set(p_api_version IN number
173 ,p_init_msg_list IN varchar2 DEFAULT okl_api.g_false
174 ,x_return_status OUT NOCOPY varchar2
175 ,x_msg_count OUT NOCOPY number
176 ,x_msg_data OUT NOCOPY varchar2
177 ,p_lrv_id_tbl IN okl_number_table
178 ,p_end_date IN date);
179
180 END okl_lease_rate_sets_pvt;