[Home] [Help]
PACKAGE: APPS.OKL_CREATE_KLE_PUB
Source
1 Package OKL_CREATE_KLE_PUB AUTHID CURRENT_USER as
2 /* $Header: OKLPKLLS.pls 115.5 2002/11/30 08:36:15 spillaip noship $ */
3
4 subtype klev_rec_type is OKL_CREATE_KLE_PVT.klev_rec_type;
5 subtype klev_tbl_type is OKL_CREATE_KLE_PVT.klev_tbl_type;
6 subtype clev_rec_type is OKL_CREATE_KLE_PVT.clev_rec_type;
7 subtype clev_tbl_type is OKL_CREATE_KLE_PVT.clev_tbl_type;
8 subtype cimv_rec_type is OKL_CREATE_KLE_PVT.cimv_rec_type;
9 subtype cimv_tbl_type is OKL_CREATE_KLE_PVT.cimv_tbl_type;
10 subtype cplv_rec_type is OKL_CREATE_KLE_PVT.cplv_rec_type;
11 subtype trxv_rec_type is OKL_CREATE_KLE_PVT.trxv_rec_type;
12 subtype talv_rec_type is OKL_CREATE_KLE_PVT.talv_rec_type;
13 subtype itiv_rec_type is OKL_CREATE_KLE_PVT.itiv_rec_type;
14 subtype itiv_tbl_type is OKL_CREATE_KLE_PVT.itiv_tbl_type;
15 subtype txdv_tbl_type is OKL_TXD_ASSETS_PUB.adpv_tbl_type;
16 subtype txdv_rec_type is OKL_TXD_ASSETS_PUB.adpv_rec_type;
17
18 G_FIN_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FREE_FORM1';
19 G_MODEL_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'ITEM';
20 G_ADDON_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'ADD_ITEM';
21 G_FA_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FIXED_ASSET';
22 G_INST_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'FREE_FORM2';
23 G_IB_LINE_LTY_CODE OKC_LINE_STYLES_V.LTY_CODE%TYPE := 'INST_ITEM';
24
25
26 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
27 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
28 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
29 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
30 G_INVALID_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_INVALID_VALUE;
31 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
32 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLCODE';
33 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLERRM';
34
35 -- Global variables for user hooks
36 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_CREATE_KLE_PUB';
37 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
38
39 g_klev_rec klev_rec_type;
40 g_klev_tbl klev_tbl_type;
41 g_clev_rec clev_rec_type;
42 g_clev_tbl clev_tbl_type;
43
44 g_cimv_rec cimv_rec_type;
45 g_cimv_tbl cimv_tbl_type;
46 g_cplv_rec cplv_rec_type;
47 g_trxv_rec trxv_rec_type;
48 g_talv_rec talv_rec_type;
49 g_itiv_rec itiv_rec_type;
50 g_itiv_tbl itiv_tbl_type;
51
52 g_clev_fin_rec clev_rec_type;
53 g_klev_fin_rec klev_rec_type;
54
55 g_clev_model_rec clev_rec_type;
56 g_klev_model_rec klev_rec_type;
57 g_cimv_model_rec cimv_rec_type;
58
59 g_clev_fa_rec clev_rec_type;
60 g_klev_fa_rec klev_rec_type;
61 g_cimv_fa_rec cimv_rec_type;
62 g_trxv_fa_rec trxv_rec_type;
63 g_talv_fa_rec talv_rec_type;
64
65 g_clev_inst_rec clev_rec_type;
66 g_klev_inst_rec klev_rec_type;
67 g_itiv_inst_tbl itiv_tbl_type;
68
69 g_clev_ib_rec clev_rec_type;
70 g_clev_ib_tbl clev_tbl_type;
71 g_klev_ib_rec klev_rec_type;
72 g_cimv_ib_rec cimv_rec_type;
73 g_trxv_ib_rec trxv_rec_type;
74 g_itiv_ib_tbl itiv_tbl_type;
75 g_itiv_ib_rec itiv_rec_type;
76
77 g_txdv_tbl txdv_tbl_type;
78 g_txdv_rec txdv_rec_type;
79
80 PROCEDURE Update_fin_cap_cost(
81 p_api_version IN NUMBER,
82 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
83 x_return_status OUT NOCOPY VARCHAR2,
84 x_msg_count OUT NOCOPY NUMBER,
85 x_msg_data OUT NOCOPY VARCHAR2,
86 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
87 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
88 p_clev_rec IN clev_rec_type,
89 p_klev_rec IN klev_rec_type,
90 x_clev_rec OUT NOCOPY clev_rec_type,
91 x_klev_rec OUT NOCOPY klev_rec_type);
92
93 Procedure Create_add_on_line(
94 p_api_version IN NUMBER,
95 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
96 x_return_status OUT NOCOPY VARCHAR2,
97 x_msg_count OUT NOCOPY NUMBER,
98 x_msg_data OUT NOCOPY VARCHAR2,
99 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
100 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
101 p_clev_tbl IN clev_tbl_type,
102 p_klev_tbl IN klev_tbl_type,
103 p_cimv_tbl IN cimv_tbl_type,
104 x_clev_tbl OUT NOCOPY clev_tbl_type,
105 x_klev_tbl OUT NOCOPY klev_tbl_type,
106 x_fin_clev_rec OUT NOCOPY clev_rec_type,
107 x_fin_klev_rec OUT NOCOPY klev_rec_type,
108 x_cimv_tbl OUT NOCOPY cimv_tbl_type);
109
110 PROCEDURE update_add_on_line(
111 p_api_version IN NUMBER,
112 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
113 x_return_status OUT NOCOPY VARCHAR2,
114 x_msg_count OUT NOCOPY NUMBER,
115 x_msg_data OUT NOCOPY VARCHAR2,
116 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
117 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
118 p_clev_tbl IN clev_tbl_type,
119 p_klev_tbl IN klev_tbl_type,
120 p_cimv_tbl IN cimv_tbl_type,
121 x_clev_tbl OUT NOCOPY clev_tbl_type,
122 x_klev_tbl OUT NOCOPY klev_tbl_type,
123 x_cimv_tbl OUT NOCOPY cimv_tbl_type,
124 x_fin_clev_rec OUT NOCOPY clev_rec_type,
125 x_fin_klev_rec OUT NOCOPY klev_rec_type);
126
127 PROCEDURE delete_add_on_line(
128 p_api_version IN NUMBER,
129 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
130 x_return_status OUT NOCOPY VARCHAR2,
131 x_msg_count OUT NOCOPY NUMBER,
132 x_msg_data OUT NOCOPY VARCHAR2,
133 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
134 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
135 p_clev_tbl IN clev_tbl_type,
136 p_klev_tbl IN klev_tbl_type,
137 x_fin_clev_rec OUT NOCOPY clev_rec_type,
138 x_fin_klev_rec OUT NOCOPY klev_rec_type);
139
140 PROCEDURE Create_party_roles_rec(
141 p_api_version IN NUMBER,
142 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
143 x_return_status OUT NOCOPY VARCHAR2,
144 x_msg_count OUT NOCOPY NUMBER,
145 x_msg_data OUT NOCOPY VARCHAR2,
146 p_cplv_rec IN cplv_rec_type,
147 x_cplv_rec OUT NOCOPY cplv_rec_type);
148
149 PROCEDURE Update_party_roles_rec(
150 p_api_version IN NUMBER,
151 p_init_msg_list IN VARCHAR2 DEFAULT OKC_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_cplv_rec IN cplv_rec_type,
156 x_cplv_rec OUT NOCOPY cplv_rec_type);
157
158 PROCEDURE Create_all_line(
159 p_api_version IN NUMBER,
160 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
161 x_return_status OUT NOCOPY VARCHAR2,
162 x_msg_count OUT NOCOPY NUMBER,
163 x_msg_data OUT NOCOPY VARCHAR2,
164 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
165 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
166 p_clev_fin_rec IN clev_rec_type,
167 p_klev_fin_rec IN klev_rec_type,
168 p_cimv_model_rec IN cimv_rec_type,
169 p_clev_fa_rec IN clev_rec_type,
170 p_cimv_fa_rec IN cimv_rec_type,
171 p_talv_fa_rec IN talv_rec_type,
172 p_itiv_ib_tbl IN itiv_tbl_type,
173 x_clev_fin_rec OUT NOCOPY clev_rec_type,
174 x_clev_model_rec OUT NOCOPY clev_rec_type,
175 x_clev_fa_rec OUT NOCOPY clev_rec_type,
176 x_clev_ib_rec OUT NOCOPY clev_rec_type);
177
178 PROCEDURE Update_all_line(
179 p_api_version IN NUMBER,
180 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
181 x_return_status OUT NOCOPY VARCHAR2,
182 x_msg_count OUT NOCOPY NUMBER,
183 x_msg_data OUT NOCOPY VARCHAR2,
184 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
185 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
186 p_clev_fin_rec IN clev_rec_type,
187 p_klev_fin_rec IN klev_rec_type,
188 p_clev_model_rec IN clev_rec_type,
189 p_cimv_model_rec IN cimv_rec_type,
190 p_clev_fa_rec IN clev_rec_type,
191 p_cimv_fa_rec IN cimv_rec_type,
192 p_talv_fa_rec IN talv_rec_type,
193 p_clev_ib_rec IN clev_rec_type,
194 p_itiv_ib_rec IN itiv_rec_type,
195 x_clev_fin_rec OUT NOCOPY clev_rec_type,
196 x_clev_model_rec OUT NOCOPY clev_rec_type,
197 x_clev_fa_rec OUT NOCOPY clev_rec_type,
198 x_clev_ib_rec OUT NOCOPY clev_rec_type);
199
200 PROCEDURE create_ints_ib_line(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
207 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
208 p_current_units IN OKL_TXL_ASSETS_V.CURRENT_UNITS%TYPE,
209 p_clev_ib_rec IN clev_rec_type,
210 p_itiv_ib_tbl IN itiv_tbl_type,
211 x_clev_ib_tbl OUT NOCOPY clev_tbl_type,
212 x_itiv_ib_tbl OUT NOCOPY itiv_tbl_type,
213 x_clev_fin_rec OUT NOCOPY clev_rec_type,
214 x_klev_fin_rec OUT NOCOPY klev_rec_type,
215 x_cimv_model_rec OUT NOCOPY cimv_rec_type,
216 x_cimv_fa_rec OUT NOCOPY cimv_rec_type,
217 x_talv_fa_rec OUT NOCOPY talv_rec_type);
218
219 PROCEDURE update_ints_ib_line(
220 p_api_version IN NUMBER,
221 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
222 x_return_status OUT NOCOPY VARCHAR2,
223 x_msg_count OUT NOCOPY NUMBER,
224 x_msg_data OUT NOCOPY VARCHAR2,
225 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
226 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
227 p_top_line_id IN OKC_K_LINES_V.ID%TYPE,
228 p_dnz_chr_id IN OKC_K_HEADERS_V.ID%TYPE,
229 p_itiv_ib_tbl IN itiv_tbl_type,
230 x_clev_ib_tbl OUT NOCOPY clev_tbl_type,
231 x_itiv_ib_tbl OUT NOCOPY itiv_tbl_type);
232
233 PROCEDURE delete_ints_ib_line(
234 p_api_version IN NUMBER,
235 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
236 x_return_status OUT NOCOPY VARCHAR2,
237 x_msg_count OUT NOCOPY NUMBER,
238 x_msg_data OUT NOCOPY VARCHAR2,
239 P_new_yn IN OKL_TXL_ASSETS_V.USED_ASSET_YN%TYPE,
240 p_asset_number IN OKL_TXL_ASSETS_V.ASSET_NUMBER%TYPE,
241 p_clev_ib_tbl IN clev_tbl_type,
242 x_clev_fin_rec OUT NOCOPY clev_rec_type,
243 x_klev_fin_rec OUT NOCOPY klev_rec_type,
244 x_cimv_model_rec OUT NOCOPY cimv_rec_type,
245 x_cimv_fa_rec OUT NOCOPY cimv_rec_type,
246 x_talv_fa_rec OUT NOCOPY talv_rec_type);
247
248 PROCEDURE Create_asset_line_details(
249 p_api_version IN NUMBER,
250 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
251 x_return_status OUT NOCOPY VARCHAR2,
252 x_msg_count OUT NOCOPY NUMBER,
253 x_msg_data OUT NOCOPY VARCHAR2,
254 p_txdv_tbl IN txdv_tbl_type,
255 x_txdv_tbl OUT NOCOPY txdv_tbl_type);
256
257 PROCEDURE update_asset_line_details(
258 p_api_version IN NUMBER,
259 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
260 x_return_status OUT NOCOPY VARCHAR2,
261 x_msg_count OUT NOCOPY NUMBER,
262 x_msg_data OUT NOCOPY VARCHAR2,
263 p_txdv_tbl IN txdv_tbl_type,
264 x_txdv_tbl OUT NOCOPY txdv_tbl_type);
265
266 End OKL_CREATE_KLE_PUB;