[Home] [Help]
PACKAGE: APPS.OKL_SPLIT_ASSET_PVT
Source
1 PACKAGE okl_split_asset_pvt As
2 /* $Header: OKLRSPAS.pls 120.5 2007/12/20 22:50:55 srsreeni ship $ */
3
4 subtype trxv_rec_type is OKL_TRX_ASSETS_PUB.thpv_rec_type;
5 subtype txlv_rec_type is OKL_TXL_ASSETS_PUB.tlpv_rec_type;
6 subtype txdv_rec_type is OKL_TXD_ASSETS_PUB.adpv_rec_type;
7 subtype txdv_tbl_type is OKL_TXD_ASSETS_PUB.adpv_tbl_type;
8 subtype itiv_rec_type is OKL_TXL_ITM_INSTS_PUB.iipv_rec_type;
9 subtype itiv_tbl_type is OKL_TXL_ITM_INSTS_PUB.iipv_tbl_type;
10 -- subtype cimv_rec_type is OKC_CONTRACT_ITEM_PUB.cimv_rec_type;
11 subtype cimv_rec_type is OKL_OKC_MIGRATION_PVT.cimv_rec_type;
12 subtype klev_rec_type is OKL_CONTRACT_PUB.klev_rec_type;
13 -- subtype clev_rec_type is OKC_CONTRACT_PUB.clev_rec_type;
14 subtype clev_rec_type is OKL_OKC_MIGRATION_PVT.clev_rec_type;
15
16 type cle_rec_type is record (cle_id NUMBER := OKL_API.G_MISS_NUM);
17 type cle_tbl_type is table of cle_rec_type INDEX BY BINARY_INTEGER;
18
19 type ast_line_rec_type is record (
20 ID1 NUMBER:= OKL_API.G_MISS_NUM,
21 ID2 OKX_ASSET_LINES_V.ID2%TYPE := OKL_API.G_MISS_CHAR,
22 NAME OKX_ASSET_LINES_V.NAME%TYPE := OKL_API.G_MISS_CHAR,
23 DESCRIPTION OKX_ASSET_LINES_V.DESCRIPTION%TYPE := OKL_API.G_MISS_CHAR,
24 ITEM_DESCRIPTION OKX_ASSET_LINES_V.ITEM_DESCRIPTION%TYPE := OKL_API.G_MISS_CHAR,
25 COMMENTS OKX_ASSET_LINES_V.COMMENTS%TYPE := OKL_API.G_MISS_CHAR,
26 CHR_ID NUMBER := OKL_API.G_MISS_NUM,
27 DNZ_CHR_ID NUMBER := OKL_API.G_MISS_NUM,
28 LTY_CODE OKX_ASSET_LINES_V.LTY_CODE%TYPE := OKL_API.G_MISS_CHAR,
29 LSE_TYPE OKX_ASSET_LINES_V.LSE_TYPE%TYPE := OKL_API.G_MISS_CHAR,
30 LSE_PARENT_ID NUMBER := OKL_API.G_MISS_NUM,
31 PARENT_LINE_ID NUMBER := OKL_API.G_MISS_NUM,
32 LINE_NUMBER OKX_ASSET_LINES_V.LINE_NUMBER%TYPE := OKL_API.G_MISS_CHAR,
33 DATE_TERMINATED OKX_ASSET_LINES_V.DATE_TERMINATED%TYPE := OKL_API.G_MISS_DATE,
34 START_DATE_ACTIVE OKX_ASSET_LINES_V.START_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE,
35 END_DATE_ACTIVE OKX_ASSET_LINES_V.END_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE,
36 STATUS OKX_ASSET_LINES_V.STATUS%TYPE := OKL_API.G_MISS_CHAR,
37 ASSET_ID NUMBER := OKL_API.G_MISS_NUM,
38 QUANTITY NUMBER := OKL_API.G_MISS_NUM,
39 UNIT_OF_MEASURE_CODE OKX_ASSET_LINES_V.UNIT_OF_MEASURE_CODE%TYPE := OKL_API.G_MISS_CHAR,
40 ASSET_NUMBER OKX_ASSET_LINES_V.ASSET_NUMBER%TYPE := OKL_API.G_MISS_CHAR,
41 CORPORATE_BOOK OKX_ASSET_LINES_V.CORPORATE_BOOK%TYPE := OKL_API.G_MISS_CHAR,
42 LIFE_IN_MONTHS NUMBER := OKL_API.G_MISS_NUM,
43 ORIGINAL_COST NUMBER := OKL_API.G_MISS_NUM,
44 COST NUMBER := OKL_API.G_MISS_NUM,
45 ADJUSTED_COST NUMBER := OKL_API.G_MISS_NUM,
46 TAG_NUMBER OKX_ASSET_LINES_V.TAG_NUMBER%TYPE := OKL_API.G_MISS_CHAR,
47 CURRENT_UNITS NUMBER := OKL_API.G_MISS_NUM,
48 SERIAL_NUMBER OKX_ASSET_LINES_V.SERIAL_NUMBER%TYPE := OKL_API.G_MISS_CHAR,
49 REVAL_CEILING NUMBER := OKL_API.G_MISS_NUM,
50 NEW_USED OKX_ASSET_LINES_V.NEW_USED%TYPE := OKL_API.G_MISS_CHAR,
51 IN_SERVICE_DATE OKX_ASSET_LINES_V.IN_SERVICE_DATE%TYPE := OKL_API.G_MISS_DATE,
52 MANUFACTURER_NAME OKX_ASSET_LINES_V.MANUFACTURER_NAME%TYPE := OKL_API.G_MISS_CHAR,
53 MODEL_NUMBER OKX_ASSET_LINES_V.MODEL_NUMBER%TYPE := OKL_API.G_MISS_CHAR,
54 ASSET_TYPE OKX_ASSET_LINES_V.ASSET_TYPE%TYPE := OKL_API.G_MISS_CHAR,
55 SALVAGE_VALUE NUMBER := OKL_API.G_MISS_NUM,
56 PERCENT_SALVAGE_VALUE NUMBER := OKL_API.G_MISS_NUM,
57 DEPRECIATION_CATEGORY NUMBER := OKL_API.G_MISS_NUM,
58 DEPRN_START_DATE OKX_ASSET_LINES_V.DEPRN_START_DATE%TYPE := OKL_API.G_MISS_DATE,
59 DEPRN_METHOD_CODE OKX_ASSET_LINES_V.DEPRN_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR,
60 RATE_ADJUSTMENT_FACTOR NUMBER := OKL_API.G_MISS_NUM,
61 BASIC_RATE NUMBER := OKL_API.G_MISS_NUM,
62 ADJUSTED_RATE NUMBER := OKL_API.G_MISS_NUM,
63 RECOVERABLE_COST NUMBER := OKL_API.G_MISS_NUM,
64 ORG_ID NUMBER := OKL_API.G_MISS_NUM,
65 SET_OF_BOOKS_ID NUMBER := OKL_API.G_MISS_NUM,
66 PROPERTY_TYPE_CODE OKX_ASSET_LINES_V.PROPERTY_TYPE_CODE%TYPE := OKL_API.G_MISS_CHAR,
67 PROPERTY_1245_1250_CODE OKX_ASSET_LINES_V.PROPERTY_1245_1250_CODE%TYPE := OKL_API.G_MISS_CHAR,
68 IN_USE_FLAG OKX_ASSET_LINES_V.IN_USE_FLAG%TYPE := OKL_API.G_MISS_CHAR,
69 OWNED_LEASED OKX_ASSET_LINES_V.OWNED_LEASED%TYPE := OKL_API.G_MISS_CHAR,
70 INVENTORIAL OKX_ASSET_LINES_V.INVENTORIAL%TYPE := OKL_API.G_MISS_CHAR,
71 LINE_STATUS OKX_ASSET_LINES_V.LINE_STATUS%TYPE := OKL_API.G_MISS_CHAR
72 );
73
74 --Bug #2723498 : 11.5.9 Split by serial numbers
75
76 type ib_rec_type is record
77 (id NUMBER := OKL_API.G_MISS_NUM);
78
79 type ib_tbl_type is table of ib_rec_type INDEX BY BINARY_INTEGER;
80
81
82 --Bug #2723498 Overloaded
83 PROCEDURE Create_Split_Transaction(p_api_version IN NUMBER,
84 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
85 x_return_status OUT NOCOPY VARCHAR2,
86 x_msg_count OUT NOCOPY NUMBER,
87 x_msg_data OUT NOCOPY VARCHAR2,
88 p_cle_id IN NUMBER,
89 p_split_into_individuals_yn IN VARCHAR2,
90 p_split_into_units IN NUMBER,
91 p_ib_tbl IN ib_tbl_type,
92 x_txdv_tbl OUT NOCOPY txdv_tbl_type,
93 x_txlv_rec OUT NOCOPY txlv_rec_type,
94 x_trxv_rec OUT NOCOPY trxv_rec_type);
95 --Bug #2723498
96 FUNCTION is_serialized(p_cle_id IN NUMBER) Return VARCHAR2;
97 --
98 PROCEDURE Create_Split_Transaction(p_api_version IN NUMBER,
99 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
100 x_return_status OUT NOCOPY VARCHAR2,
101 x_msg_count OUT NOCOPY NUMBER,
102 x_msg_data OUT NOCOPY VARCHAR2,
103 p_cle_id IN NUMBER,
104 p_split_into_individuals_yn IN VARCHAR2,
105 p_split_into_units IN NUMBER,
106 x_txdv_tbl OUT NOCOPY txdv_tbl_type,
107 x_txlv_rec OUT NOCOPY txlv_rec_type,
108 x_trxv_rec OUT NOCOPY trxv_rec_type);
109 ------------------------
110 --Bug# 3156924
111 ------------------------
112 Procedure validate_trx_date(p_api_version IN NUMBER,
113 p_init_msg_list IN VARCHAR2,
114 x_return_status OUT NOCOPY VARCHAR2,
115 x_msg_count OUT NOCOPY NUMBER,
116 x_msg_data OUT NOCOPY VARCHAR2,
117 p_chr_id IN NUMBER,
118 p_trx_date IN VARCHAR2);
119
120 PROCEDURE Create_Split_Transaction(p_api_version IN NUMBER,
121 p_init_msg_list IN VARCHAR2,
122 x_return_status OUT NOCOPY VARCHAR2,
123 x_msg_count OUT NOCOPY NUMBER,
124 x_msg_data OUT NOCOPY VARCHAR2,
125 p_cle_id IN NUMBER,
126 p_split_into_individuals_yn IN VARCHAR2,
127 p_split_into_units IN NUMBER,
128 p_ib_tbl IN ib_tbl_type,
129 --Bug# 3156924
130 p_trx_date IN DATE,
131 --bug# 3156924
132 x_txdv_tbl OUT NOCOPY txdv_tbl_type,
133 x_txlv_rec OUT NOCOPY txlv_rec_type,
134 x_trxv_rec OUT NOCOPY trxv_rec_type);
135
136 PROCEDURE Create_Split_Transaction(p_api_version IN NUMBER,
137 p_init_msg_list IN VARCHAR2,
138 x_return_status OUT NOCOPY VARCHAR2,
139 x_msg_count OUT NOCOPY NUMBER,
140 x_msg_data OUT NOCOPY VARCHAR2,
141 p_cle_id IN NUMBER,
142 p_split_into_individuals_yn IN VARCHAR2,
143 p_split_into_units IN NUMBER,
144 p_trx_date IN DATE,
145 x_txdv_tbl OUT NOCOPY txdv_tbl_type,
146 x_txlv_rec OUT NOCOPY txlv_rec_type,
147 x_trxv_rec OUT NOCOPY trxv_rec_type);
148 ------------------------
149 --Bug# 3156924
150 ------------------------
151
152 Procedure Update_Split_Transaction(p_api_version IN NUMBER,
153 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
154 x_return_status OUT NOCOPY VARCHAR2,
155 x_msg_count OUT NOCOPY NUMBER,
156 x_msg_data OUT NOCOPY VARCHAR2,
157 p_cle_id IN NUMBER,
158 p_txdv_tbl IN txdv_tbl_type,
159 x_txdv_tbl OUT NOCOPY txdv_tbl_type);
160
161 PROCEDURE Split_Fixed_Asset(p_api_version IN NUMBER,
162 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
163 x_return_status OUT NOCOPY VARCHAR2,
164 x_msg_count OUT NOCOPY NUMBER,
165 x_msg_data OUT NOCOPY VARCHAR2,
166 p_txdv_tbl IN txdv_tbl_type,
167 p_txlv_rec IN txlv_rec_type,
168 x_cle_tbl OUT NOCOPY cle_tbl_type,
169 --Bug# 6344223
170 p_source_call IN VARCHAR2 DEFAULT 'UI');
171
172 Procedure Split_Fixed_Asset(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_cle_id IN NUMBER,
178 x_cle_tbl OUT NOCOPY cle_tbl_type,
179 --Bug# 6344223
180 p_source_call IN VARCHAR2 DEFAULT 'UI');
181
182 Procedure Is_Inv_Item_Serialized(p_api_version IN NUMBER,
183 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
184 x_return_status OUT NOCOPY VARCHAR2,
185 x_msg_count OUT NOCOPY NUMBER,
186 x_msg_data OUT NOCOPY VARCHAR2,
187 p_inv_item_id IN NUMBER,
188 p_chr_id IN NUMBER,
189 p_cle_id IN NUMBER,
190 x_serialized OUT NOCOPY VARCHAR2);
191
192 Procedure Is_Asset_Serialized(p_api_version IN NUMBER,
193 p_init_msg_list IN VARCHAR2,
194 x_return_status OUT NOCOPY VARCHAR2,
195 x_msg_count OUT NOCOPY NUMBER,
196 x_msg_data OUT NOCOPY VARCHAR2,
197 p_cle_id IN NUMBER,
198 x_serialized OUT NOCOPY VARCHAR2);
199
200 Procedure Asset_Not_Srlz_Halt(p_api_version IN NUMBER,
201 p_init_msg_list IN VARCHAR2,
202 x_return_status OUT NOCOPY VARCHAR2,
203 x_msg_count OUT NOCOPY NUMBER,
204 x_msg_data OUT NOCOPY VARCHAR2,
205 p_cle_id IN NUMBER,
206 x_serialized OUT NOCOPY VARCHAR2);
207
208 Procedure Item_Not_Srlz_Halt(p_api_version IN NUMBER,
209 p_init_msg_list IN VARCHAR2,
210 x_return_status OUT NOCOPY VARCHAR2,
211 x_msg_count OUT NOCOPY NUMBER,
212 x_msg_data OUT NOCOPY VARCHAR2,
213 p_inv_item_id IN NUMBER,
214 p_chr_id IN NUMBER,
215 p_cle_id IN NUMBER,
216 x_serialized OUT NOCOPY VARCHAR2);
217
218 Procedure create_split_comp_srl_num(p_api_version IN NUMBER,
219 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
220 x_return_status OUT NOCOPY VARCHAR2,
221 x_msg_count OUT NOCOPY NUMBER,
222 x_msg_data OUT NOCOPY VARCHAR2,
223 p_itiv_tbl IN itiv_tbl_type,
224 x_itiv_tbl OUT NOCOPY itiv_tbl_type);
225
226 Procedure Cancel_Split_Asset_Trs
227 (p_api_version IN NUMBER,
228 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
229 x_return_status OUT NOCOPY VARCHAR2,
230 x_msg_count OUT NOCOPY NUMBER,
231 x_msg_data OUT NOCOPY VARCHAR2,
232 p_cle_id IN NUMBER);
233
234 --Bug# 6344223
235 PROCEDURE SPLIT_ASSET_AFTER_YIELD (p_api_version IN NUMBER,
236 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
237 x_return_status OUT NOCOPY VARCHAR2,
238 x_msg_count OUT NOCOPY NUMBER,
239 x_msg_data OUT NOCOPY VARCHAR2,
240 p_chr_id IN NUMBER);
241 --Bug 6667726
242 Procedure check_ser_num_checked(x_return_status OUT NOCOPY VARCHAR2,
243 x_msg_count OUT NOCOPY NUMBER,
244 x_msg_data OUT NOCOPY VARCHAR2,
245 p_cle_id IN NUMBER);
246 END OKL_SPLIT_ASSET_PVT;