[Home] [Help]
PACKAGE: APPS.OKL_VFA_PVT
Source
1 Package OKL_VFA_PVT AS
2 /* $Header: OKLSVFAS.pls 120.3 2006/11/13 07:35:35 dpsingh noship $ */
3 ---------------------------------------------------------------------------
4 -- GLOBAL DATASTRUCTURES
5 ---------------------------------------------------------------------------
6 TYPE vfav_rec_type IS RECORD (
7 id NUMBER := OKL_API.G_MISS_NUM
8 ,major_version NUMBER := OKL_API.G_MISS_NUM
9 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
10 ,dnz_chr_id NUMBER := OKL_API.G_MISS_NUM
11 ,fa_cle_id NUMBER := OKL_API.G_MISS_NUM
12 ,name OKL_CONTRACT_ASSET_HV.NAME%TYPE := OKL_API.G_MISS_CHAR
13 ,description OKL_CONTRACT_ASSET_HV.DESCRIPTION%TYPE := OKL_API.G_MISS_CHAR
14 ,asset_id NUMBER := OKL_API.G_MISS_NUM
15 ,asset_number OKL_CONTRACT_ASSET_HV.ASSET_NUMBER%TYPE := OKL_API.G_MISS_CHAR
16 ,corporate_book OKL_CONTRACT_ASSET_HV.CORPORATE_BOOK%TYPE := OKL_API.G_MISS_CHAR
17 ,life_in_months NUMBER := OKL_API.G_MISS_NUM
18 ,original_cost NUMBER := OKL_API.G_MISS_NUM
19 ,cost NUMBER := OKL_API.G_MISS_NUM
20 ,adjusted_cost NUMBER := OKL_API.G_MISS_NUM
21 ,current_units NUMBER := OKL_API.G_MISS_NUM
22 ,new_used OKL_CONTRACT_ASSET_HV.NEW_USED%TYPE := OKL_API.G_MISS_CHAR
23 ,in_service_date OKL_CONTRACT_ASSET_HV.IN_SERVICE_DATE%TYPE := OKL_API.G_MISS_DATE
24 ,model_number OKL_CONTRACT_ASSET_HV.MODEL_NUMBER%TYPE := OKL_API.G_MISS_CHAR
25 ,asset_type OKL_CONTRACT_ASSET_HV.ASSET_TYPE%TYPE := OKL_API.G_MISS_CHAR
26 ,salvage_value NUMBER := OKL_API.G_MISS_NUM
27 ,percent_salvage_value NUMBER := OKL_API.G_MISS_NUM
28 ,depreciation_category NUMBER := OKL_API.G_MISS_NUM
29 ,deprn_start_date OKL_CONTRACT_ASSET_HV.DEPRN_START_DATE%TYPE := OKL_API.G_MISS_DATE
30 ,deprn_method_code OKL_CONTRACT_ASSET_HV.DEPRN_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR
31 ,rate_adjustment_factor NUMBER := OKL_API.G_MISS_NUM
32 ,basic_rate NUMBER := OKL_API.G_MISS_NUM
33 ,adjusted_rate NUMBER := OKL_API.G_MISS_NUM
34 ,start_date_active OKL_CONTRACT_ASSET_HV.START_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE
35 ,end_date_active OKL_CONTRACT_ASSET_HV.END_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE
36 ,status OKL_CONTRACT_ASSET_HV.STATUS%TYPE := OKL_API.G_MISS_CHAR
37 ,primary_uom_code OKL_CONTRACT_ASSET_HV.PRIMARY_UOM_CODE%TYPE := OKL_API.G_MISS_CHAR
38 ,recoverable_cost NUMBER := OKL_API.G_MISS_NUM
39 --Bug# 2981308 :
40 ,asset_key_id NUMBER := OKL_API.G_MISS_NUM
41 ,attribute_category OKL_CONTRACT_ASSET_HV.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
42 ,attribute1 OKL_CONTRACT_ASSET_HV.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
43 ,attribute2 OKL_CONTRACT_ASSET_HV.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
44 ,attribute3 OKL_CONTRACT_ASSET_HV.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
45 ,attribute4 OKL_CONTRACT_ASSET_HV.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
46 ,attribute5 OKL_CONTRACT_ASSET_HV.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
47 ,attribute6 OKL_CONTRACT_ASSET_HV.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
48 ,attribute7 OKL_CONTRACT_ASSET_HV.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
49 ,attribute8 OKL_CONTRACT_ASSET_HV.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
50 ,attribute9 OKL_CONTRACT_ASSET_HV.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
51 ,attribute10 OKL_CONTRACT_ASSET_HV.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
52 ,attribute11 OKL_CONTRACT_ASSET_HV.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
53 ,attribute12 OKL_CONTRACT_ASSET_HV.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
54 ,attribute13 OKL_CONTRACT_ASSET_HV.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
55 ,attribute14 OKL_CONTRACT_ASSET_HV.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
56 ,attribute15 OKL_CONTRACT_ASSET_HV.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
57 ,created_by NUMBER := OKL_API.G_MISS_NUM
58 ,creation_date OKL_CONTRACT_ASSET_HV.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
59 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
60 ,last_update_date OKL_CONTRACT_ASSET_HV.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
61 ,last_update_login NUMBER := OKL_API.G_MISS_NUM
62 --Added by dpsingh for LE uptake
63 ,legal_entity_id NUMBER := OKL_API.G_MISS_NUM);
64 G_MISS_vfav_rec vfav_rec_type;
65 TYPE vfav_tbl_type IS TABLE OF vfav_rec_type
66 INDEX BY BINARY_INTEGER;
67 TYPE vfa_rec_type IS RECORD (
68 id NUMBER := OKL_API.G_MISS_NUM
69 ,major_version NUMBER := OKL_API.G_MISS_NUM
70 ,object_version_number NUMBER := OKL_API.G_MISS_NUM
71 ,dnz_chr_id NUMBER := OKL_API.G_MISS_NUM
72 ,fa_cle_id NUMBER := OKL_API.G_MISS_NUM
73 ,name OKL_CONTRACT_ASSET_H.NAME%TYPE := OKL_API.G_MISS_CHAR
74 ,description OKL_CONTRACT_ASSET_H.DESCRIPTION%TYPE := OKL_API.G_MISS_CHAR
75 ,asset_id NUMBER := OKL_API.G_MISS_NUM
76 ,asset_number OKL_CONTRACT_ASSET_H.ASSET_NUMBER%TYPE := OKL_API.G_MISS_CHAR
77 ,corporate_book OKL_CONTRACT_ASSET_H.CORPORATE_BOOK%TYPE := OKL_API.G_MISS_CHAR
78 ,life_in_months NUMBER := OKL_API.G_MISS_NUM
79 ,original_cost NUMBER := OKL_API.G_MISS_NUM
80 ,cost NUMBER := OKL_API.G_MISS_NUM
81 ,adjusted_cost NUMBER := OKL_API.G_MISS_NUM
82 ,current_units NUMBER := OKL_API.G_MISS_NUM
83 ,new_used OKL_CONTRACT_ASSET_H.NEW_USED%TYPE := OKL_API.G_MISS_CHAR
84 ,in_service_date OKL_CONTRACT_ASSET_H.IN_SERVICE_DATE%TYPE := OKL_API.G_MISS_DATE
85 ,model_number OKL_CONTRACT_ASSET_H.MODEL_NUMBER%TYPE := OKL_API.G_MISS_CHAR
86 ,asset_type OKL_CONTRACT_ASSET_H.ASSET_TYPE%TYPE := OKL_API.G_MISS_CHAR
87 ,salvage_value NUMBER := OKL_API.G_MISS_NUM
88 ,percent_salvage_value NUMBER := OKL_API.G_MISS_NUM
89 ,depreciation_category NUMBER := OKL_API.G_MISS_NUM
90 ,deprn_start_date OKL_CONTRACT_ASSET_H.DEPRN_START_DATE%TYPE := OKL_API.G_MISS_DATE
91 ,deprn_method_code OKL_CONTRACT_ASSET_H.DEPRN_METHOD_CODE%TYPE := OKL_API.G_MISS_CHAR
92 ,rate_adjustment_factor NUMBER := OKL_API.G_MISS_NUM
93 ,basic_rate NUMBER := OKL_API.G_MISS_NUM
94 ,adjusted_rate NUMBER := OKL_API.G_MISS_NUM
95 ,start_date_active OKL_CONTRACT_ASSET_H.START_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE
96 ,end_date_active OKL_CONTRACT_ASSET_H.END_DATE_ACTIVE%TYPE := OKL_API.G_MISS_DATE
97 ,status OKL_CONTRACT_ASSET_H.STATUS%TYPE := OKL_API.G_MISS_CHAR
98 ,primary_uom_code OKL_CONTRACT_ASSET_H.PRIMARY_UOM_CODE%TYPE := OKL_API.G_MISS_CHAR
99 ,recoverable_cost NUMBER := OKL_API.G_MISS_NUM
100 --Bug# 2981308 :
101 ,asset_key_id NUMBER := OKL_API.G_MISS_NUM
102 ,attribute_category OKL_CONTRACT_ASSET_H.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
103 ,attribute1 OKL_CONTRACT_ASSET_H.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
104 ,attribute2 OKL_CONTRACT_ASSET_H.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
105 ,attribute3 OKL_CONTRACT_ASSET_H.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
106 ,attribute4 OKL_CONTRACT_ASSET_H.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
107 ,attribute5 OKL_CONTRACT_ASSET_H.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
108 ,attribute6 OKL_CONTRACT_ASSET_H.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
109 ,attribute7 OKL_CONTRACT_ASSET_H.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
110 ,attribute8 OKL_CONTRACT_ASSET_H.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
111 ,attribute9 OKL_CONTRACT_ASSET_H.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
112 ,attribute10 OKL_CONTRACT_ASSET_H.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
113 ,attribute11 OKL_CONTRACT_ASSET_H.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
114 ,attribute12 OKL_CONTRACT_ASSET_H.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
115 ,attribute13 OKL_CONTRACT_ASSET_H.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
116 ,attribute14 OKL_CONTRACT_ASSET_H.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
117 ,attribute15 OKL_CONTRACT_ASSET_H.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
118 ,created_by NUMBER := OKL_API.G_MISS_NUM
119 ,creation_date OKL_CONTRACT_ASSET_H.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
120 ,last_updated_by NUMBER := OKL_API.G_MISS_NUM
121 ,last_update_date OKL_CONTRACT_ASSET_H.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
122 ,last_update_login NUMBER := OKL_API.G_MISS_NUM
123 --Added by dpsingh for LE uptake
124 ,legal_entity_id NUMBER := OKL_API.G_MISS_NUM);
125 G_MISS_vfa_rec vfa_rec_type;
126 TYPE vfa_tbl_type IS TABLE OF vfa_rec_type
127 INDEX BY BINARY_INTEGER;
128 ---------------------------------------------------------------------------
129 -- GLOBAL MESSAGE CONSTANTS
130 ---------------------------------------------------------------------------
131 G_FND_APP CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
132 G_FORM_UNABLE_TO_RESERVE_REC CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
133 G_FORM_RECORD_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
134 G_FORM_RECORD_CHANGED CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
135 G_RECORD_LOGICALLY_DELETED CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
136 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := 'OKL_REQUIRED_VALUE';
137 G_INVALID_VALUE CONSTANT VARCHAR2(200) := 'OKL_INVALID_VALUE';
138 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
139 G_PARENT_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
140 G_CHILD_TABLE_TOKEN CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
141 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKL_UNEXPECTED_ERROR';
142 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
143 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
144
145 ---------------------------------------------------------------------------
146 -- GLOBAL EXCEPTIONS
147 ---------------------------------------------------------------------------
148 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
149
150 ---------------------------------------------------------------------------
151 -- GLOBAL VARIABLES
152 ---------------------------------------------------------------------------
153 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_VFA_PVT';
154 G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
155 ---------------------------------------------------------------------------
156 -- Procedures and Functions
157 ---------------------------------------------------------------------------
158
159 PROCEDURE qc;
160 PROCEDURE change_version;
161 PROCEDURE api_copy;
162 PROCEDURE insert_row(
163 p_api_version IN NUMBER,
164 p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_vfav_rec IN vfav_rec_type,
169 x_vfav_rec OUT NOCOPY vfav_rec_type);
170 PROCEDURE insert_row(
171 p_api_version IN NUMBER,
172 p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_vfav_tbl IN vfav_tbl_type,
177 x_vfav_tbl OUT NOCOPY vfav_tbl_type);
178 PROCEDURE lock_row(
179 p_api_version IN NUMBER,
180 p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_vfav_rec IN vfav_rec_type);
185 PROCEDURE lock_row(
186 p_api_version IN NUMBER,
187 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
188 x_return_status OUT NOCOPY VARCHAR2,
189 x_msg_count OUT NOCOPY NUMBER,
190 x_msg_data OUT NOCOPY VARCHAR2,
191 p_vfav_tbl IN vfav_tbl_type);
192 PROCEDURE update_row(
193 p_api_version IN NUMBER,
194 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
195 x_return_status OUT NOCOPY VARCHAR2,
196 x_msg_count OUT NOCOPY NUMBER,
197 x_msg_data OUT NOCOPY VARCHAR2,
198 p_vfav_rec IN vfav_rec_type,
199 x_vfav_rec OUT NOCOPY vfav_rec_type);
200 PROCEDURE update_row(
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKL_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_vfav_tbl IN vfav_tbl_type,
207 x_vfav_tbl OUT NOCOPY vfav_tbl_type);
208 PROCEDURE delete_row(
209 p_api_version IN NUMBER,
210 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
211 x_return_status OUT NOCOPY VARCHAR2,
212 x_msg_count OUT NOCOPY NUMBER,
213 x_msg_data OUT NOCOPY VARCHAR2,
214 p_vfav_rec IN vfav_rec_type);
215 PROCEDURE delete_row(
216 p_api_version IN NUMBER,
217 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
218 x_return_status OUT NOCOPY VARCHAR2,
219 x_msg_count OUT NOCOPY NUMBER,
220 x_msg_data OUT NOCOPY VARCHAR2,
221 p_vfav_tbl IN vfav_tbl_type);
222 PROCEDURE validate_row(
223 p_api_version IN NUMBER,
224 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
225 x_return_status OUT NOCOPY VARCHAR2,
226 x_msg_count OUT NOCOPY NUMBER,
227 x_msg_data OUT NOCOPY VARCHAR2,
228 p_vfav_rec IN vfav_rec_type);
229 PROCEDURE validate_row(
230 p_api_version IN NUMBER,
231 p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
232 x_return_status OUT NOCOPY VARCHAR2,
233 x_msg_count OUT NOCOPY NUMBER,
234 x_msg_data OUT NOCOPY VARCHAR2,
235 p_vfav_tbl IN vfav_tbl_type);
236 END OKL_VFA_PVT;