[Home] [Help]
PACKAGE: APPS.OKL_ASD_PVT
Source
1 Package OKL_ASD_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSASDS.pls 115.7 2002/12/06 02:15:47 dedey noship $ */
3 -- Badrinath Kuchibholta
4 ---------------------------------------------------------------------------
5 -- GLOBAL DATASTRUCTURES
6 ---------------------------------------------------------------------------
7 TYPE asd_rec_type IS RECORD (
8 id NUMBER := OKC_API.G_MISS_NUM,
9 object_version_number NUMBER := OKC_API.G_MISS_NUM,
10 tal_id NUMBER := OKC_API.G_MISS_NUM,
11 target_kle_id NUMBER := OKC_API.G_MISS_NUM,
12 line_detail_number NUMBER := OKC_API.G_MISS_NUM,
13 asset_number OKL_TXD_ASSETS_B.ASSET_NUMBER%TYPE := OKC_API.G_MISS_CHAR,
14 quantity NUMBER := OKC_API.G_MISS_NUM,
15 cost NUMBER := OKC_API.G_MISS_NUM,
16 tax_book OKL_TXD_ASSETS_B.TAX_BOOK%TYPE := OKC_API.G_MISS_CHAR,
17 life_in_months_tax NUMBER := OKC_API.G_MISS_NUM,
18 deprn_method_tax OKL_TXD_ASSETS_B.DEPRN_METHOD_TAX%TYPE := OKC_API.G_MISS_CHAR,
19 deprn_rate_tax NUMBER := OKC_API.G_MISS_NUM,
20 salvage_value NUMBER := OKC_API.G_MISS_NUM,
21 -- added new columns for split asset component
22 SPLIT_PERCENT NUMBER := OKC_API.G_MISS_NUM,
23 INVENTORY_ITEM_ID NUMBER := OKC_API.G_MISS_NUM,
24 -- end of added new columns for split asset component
25 attribute_category OKL_TXD_ASSETS_B.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
26 attribute1 OKL_TXD_ASSETS_B.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
27 attribute2 OKL_TXD_ASSETS_B.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
28 attribute3 OKL_TXD_ASSETS_B.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
29 attribute4 OKL_TXD_ASSETS_B.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
30 attribute5 OKL_TXD_ASSETS_B.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
31 attribute6 OKL_TXD_ASSETS_B.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
32 attribute7 OKL_TXD_ASSETS_B.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
33 attribute8 OKL_TXD_ASSETS_B.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
34 attribute9 OKL_TXD_ASSETS_B.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
35 attribute10 OKL_TXD_ASSETS_B.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
36 attribute11 OKL_TXD_ASSETS_B.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
37 attribute12 OKL_TXD_ASSETS_B.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
38 attribute13 OKL_TXD_ASSETS_B.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
39 attribute14 OKL_TXD_ASSETS_B.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
40 attribute15 OKL_TXD_ASSETS_B.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
41 created_by NUMBER := OKC_API.G_MISS_NUM,
42 creation_date OKL_TXD_ASSETS_B.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
43 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
44 last_update_date OKL_TXD_ASSETS_B.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
45 last_update_login NUMBER := OKC_API.G_MISS_NUM,
46 -- Multi-Currency Change
47 currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE := OKC_API.G_MISS_CHAR,
51 -- Multi-Currency Change
48 currency_conversion_type OKL_TXD_ASSETS_B.CURRENCY_CONVERSION_TYPE%TYPE := OKC_API.G_MISS_CHAR,
49 currency_conversion_rate NUMBER := OKC_API.G_MISS_NUM,
50 currency_conversion_date OKL_TXD_ASSETS_B.CURRENCY_CONVERSION_DATE%TYPE := OKC_API.G_MISS_DATE);
52
53 g_miss_asd_rec asd_rec_type;
54 TYPE asd_tbl_type IS TABLE OF asd_rec_type
55 INDEX BY BINARY_INTEGER;
56 TYPE okl_txd_assets_tl_rec_type IS RECORD (
57 id NUMBER := OKC_API.G_MISS_NUM,
58 language OKL_TXD_ASSETS_TL.LANGUAGE%TYPE := OKC_API.G_MISS_CHAR,
59 source_lang OKL_TXD_ASSETS_TL.SOURCE_LANG%TYPE := OKC_API.G_MISS_CHAR,
60 sfwt_flag OKL_TXD_ASSETS_TL.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR,
61 description OKL_TXD_ASSETS_TL.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
62 created_by NUMBER := OKC_API.G_MISS_NUM,
63 creation_date OKL_TXD_ASSETS_TL.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
64 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
65 last_update_date OKL_TXD_ASSETS_TL.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
66 last_update_login NUMBER := OKC_API.G_MISS_NUM);
67 g_miss_okl_txd_assets_tl_rec okl_txd_assets_tl_rec_type;
68 TYPE okl_txd_assets_tl_tbl_type IS TABLE OF okl_txd_assets_tl_rec_type
69 INDEX BY BINARY_INTEGER;
70 TYPE asdv_rec_type IS RECORD (
71 id NUMBER := OKC_API.G_MISS_NUM,
72 object_version_number NUMBER := OKC_API.G_MISS_NUM,
73 sfwt_flag OKL_TXL_ASSETS_V.SFWT_FLAG%TYPE := OKC_API.G_MISS_CHAR,
74 tal_id NUMBER := OKC_API.G_MISS_NUM,
75 target_kle_id NUMBER := OKC_API.G_MISS_NUM,
76 line_detail_number NUMBER := OKC_API.G_MISS_NUM,
77 asset_number OKL_TXD_ASSETS_V.ASSET_NUMBER%TYPE := OKC_API.G_MISS_CHAR,
78 description OKL_TXD_ASSETS_V.DESCRIPTION%TYPE := OKC_API.G_MISS_CHAR,
79 quantity NUMBER := OKC_API.G_MISS_NUM,
80 cost NUMBER := OKC_API.G_MISS_NUM,
81 tax_book OKL_TXD_ASSETS_V.TAX_BOOK%TYPE := OKC_API.G_MISS_CHAR,
82 life_in_months_tax NUMBER := OKC_API.G_MISS_NUM,
83 deprn_method_tax OKL_TXD_ASSETS_V.DEPRN_METHOD_TAX%TYPE := OKC_API.G_MISS_CHAR,
84 deprn_rate_tax NUMBER := OKC_API.G_MISS_NUM,
85 salvage_value NUMBER := OKC_API.G_MISS_NUM,
86 -- added new columns for split asset component
87 SPLIT_PERCENT NUMBER := OKC_API.G_MISS_NUM,
88 INVENTORY_ITEM_ID NUMBER := OKC_API.G_MISS_NUM,
89 -- end of added new columns for split asset component
90 attribute_category OKL_TXD_ASSETS_V.ATTRIBUTE_CATEGORY%TYPE := OKC_API.G_MISS_CHAR,
91 attribute1 OKL_TXD_ASSETS_V.ATTRIBUTE1%TYPE := OKC_API.G_MISS_CHAR,
92 attribute2 OKL_TXD_ASSETS_V.ATTRIBUTE2%TYPE := OKC_API.G_MISS_CHAR,
93 attribute3 OKL_TXD_ASSETS_V.ATTRIBUTE3%TYPE := OKC_API.G_MISS_CHAR,
94 attribute4 OKL_TXD_ASSETS_V.ATTRIBUTE4%TYPE := OKC_API.G_MISS_CHAR,
95 attribute5 OKL_TXD_ASSETS_V.ATTRIBUTE5%TYPE := OKC_API.G_MISS_CHAR,
96 attribute6 OKL_TXD_ASSETS_V.ATTRIBUTE6%TYPE := OKC_API.G_MISS_CHAR,
97 attribute7 OKL_TXD_ASSETS_V.ATTRIBUTE7%TYPE := OKC_API.G_MISS_CHAR,
98 attribute8 OKL_TXD_ASSETS_V.ATTRIBUTE8%TYPE := OKC_API.G_MISS_CHAR,
99 attribute9 OKL_TXD_ASSETS_V.ATTRIBUTE9%TYPE := OKC_API.G_MISS_CHAR,
100 attribute10 OKL_TXD_ASSETS_V.ATTRIBUTE10%TYPE := OKC_API.G_MISS_CHAR,
101 attribute11 OKL_TXD_ASSETS_V.ATTRIBUTE11%TYPE := OKC_API.G_MISS_CHAR,
102 attribute12 OKL_TXD_ASSETS_V.ATTRIBUTE12%TYPE := OKC_API.G_MISS_CHAR,
103 attribute13 OKL_TXD_ASSETS_V.ATTRIBUTE13%TYPE := OKC_API.G_MISS_CHAR,
104 attribute14 OKL_TXD_ASSETS_V.ATTRIBUTE14%TYPE := OKC_API.G_MISS_CHAR,
105 attribute15 OKL_TXD_ASSETS_V.ATTRIBUTE15%TYPE := OKC_API.G_MISS_CHAR,
106 created_by NUMBER := OKC_API.G_MISS_NUM,
107 creation_date OKL_TXD_ASSETS_V.CREATION_DATE%TYPE := OKC_API.G_MISS_DATE,
108 last_updated_by NUMBER := OKC_API.G_MISS_NUM,
109 last_update_date OKL_TXD_ASSETS_V.LAST_UPDATE_DATE%TYPE := OKC_API.G_MISS_DATE,
110 last_update_login NUMBER := OKC_API.G_MISS_NUM,
111 -- Multi-Currency Change
112 currency_code OKL_TXD_ASSETS_B.CURRENCY_CODE%TYPE := OKC_API.G_MISS_CHAR,
113 currency_conversion_type OKL_TXD_ASSETS_B.CURRENCY_CONVERSION_TYPE%TYPE := OKC_API.G_MISS_CHAR,
114 currency_conversion_rate NUMBER := OKC_API.G_MISS_NUM,
115 currency_conversion_date OKL_TXD_ASSETS_B.CURRENCY_CONVERSION_DATE%TYPE := OKC_API.G_MISS_DATE);
116 -- Multi-Currency Change
117 g_miss_asdv_rec asdv_rec_type;
118 TYPE asdv_tbl_type IS TABLE OF asdv_rec_type
119 INDEX BY BINARY_INTEGER;
120 ---------------------------------------------------------------------------
121 -- GLOBAL MESSAGE CONSTANTS
122 ---------------------------------------------------------------------------
123 G_FND_APP CONSTANT VARCHAR2(200) := OKC_API.G_FND_APP;
124 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKC_API.G_FORM_UNABLE_TO_RESERVE_REC;
125 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_DELETED;
126 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKC_API.G_FORM_RECORD_CHANGED;
127 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKC_API.G_RECORD_LOGICALLY_DELETED;
128 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
129 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_PARENT_TABLE_TOKEN;
130 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_CHILD_TABLE_TOKEN;
131 ---------------------------------------------------------------------------
132 -- GLOBAL VARIABLES
133 ---------------------------------------------------------------------------
134 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_ASD_PVT';
135 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
136 ---------------------------------------------------------------------------
137 -- Procedures and Functions
138 ---------------------------------------------------------------------------
139
140 PROCEDURE qc;
141 PROCEDURE change_version;
142 PROCEDURE api_copy;
143 PROCEDURE add_language;
144 PROCEDURE insert_row(
145 p_api_version IN NUMBER,
146 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
147 x_return_status OUT NOCOPY VARCHAR2,
148 x_msg_count OUT NOCOPY NUMBER,
149 x_msg_data OUT NOCOPY VARCHAR2,
150 p_asdv_rec IN asdv_rec_type,
151 x_asdv_rec OUT NOCOPY asdv_rec_type);
152
153 PROCEDURE insert_row(
154 p_api_version IN NUMBER,
155 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
156 x_return_status OUT NOCOPY VARCHAR2,
157 x_msg_count OUT NOCOPY NUMBER,
158 x_msg_data OUT NOCOPY VARCHAR2,
159 p_asdv_tbl IN asdv_tbl_type,
160 x_asdv_tbl OUT NOCOPY asdv_tbl_type);
161
162 PROCEDURE lock_row(
163 p_api_version IN NUMBER,
164 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
165 x_return_status OUT NOCOPY VARCHAR2,
166 x_msg_count OUT NOCOPY NUMBER,
167 x_msg_data OUT NOCOPY VARCHAR2,
168 p_asdv_rec IN asdv_rec_type);
169
170 PROCEDURE lock_row(
171 p_api_version IN NUMBER,
172 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
173 x_return_status OUT NOCOPY VARCHAR2,
174 x_msg_count OUT NOCOPY NUMBER,
175 x_msg_data OUT NOCOPY VARCHAR2,
176 p_asdv_tbl IN asdv_tbl_type);
177
178 PROCEDURE update_row(
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_asdv_rec IN asdv_rec_type,
185 x_asdv_rec OUT NOCOPY asdv_rec_type);
186
187 PROCEDURE update_row(
188 p_api_version IN NUMBER,
189 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
190 x_return_status OUT NOCOPY VARCHAR2,
191 x_msg_count OUT NOCOPY NUMBER,
192 x_msg_data OUT NOCOPY VARCHAR2,
193 p_asdv_tbl IN asdv_tbl_type,
194 x_asdv_tbl OUT NOCOPY asdv_tbl_type);
195
196 PROCEDURE delete_row(
197 p_api_version IN NUMBER,
198 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
199 x_return_status OUT NOCOPY VARCHAR2,
200 x_msg_count OUT NOCOPY NUMBER,
201 x_msg_data OUT NOCOPY VARCHAR2,
202 p_asdv_rec IN asdv_rec_type);
203
204 PROCEDURE delete_row(
205 p_api_version IN NUMBER,
206 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
207 x_return_status OUT NOCOPY VARCHAR2,
208 x_msg_count OUT NOCOPY NUMBER,
209 x_msg_data OUT NOCOPY VARCHAR2,
210 p_asdv_tbl IN asdv_tbl_type);
211
212 PROCEDURE validate_row(
213 p_api_version IN NUMBER,
214 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
215 x_return_status OUT NOCOPY VARCHAR2,
216 x_msg_count OUT NOCOPY NUMBER,
217 x_msg_data OUT NOCOPY VARCHAR2,
218 p_asdv_rec IN asdv_rec_type);
219
220 PROCEDURE validate_row(
221 p_api_version IN NUMBER,
222 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
223 x_return_status OUT NOCOPY VARCHAR2,
224 x_msg_count OUT NOCOPY NUMBER,
225 x_msg_data OUT NOCOPY VARCHAR2,
226 p_asdv_tbl IN asdv_tbl_type);
227
228 END OKL_ASD_PVT;