[Home] [Help]
PACKAGE: APPS.QP_CURRENCY_PUB
Source
1 PACKAGE QP_Currency_PUB AS
2 /* $Header: QPXPCURS.pls 120.1 2005/06/13 00:25:01 appldev $ */
3 /*#
4 * This package consists of entities to set up Multi-Currency Conversion.
5 *
6 * @rep:scope public
7 * @rep:product QP
8 * @rep:displayname Multi-Currency Conversion Setup
9 * @rep:category BUSINESS_ENTITY QP_PRICE_LIST
10 */
11
12 -- Curr_Lists record type
13
14 TYPE Curr_Lists_Rec_Type IS RECORD
15 ( attribute1 VARCHAR2(240) := FND_API.G_MISS_CHAR
16 , attribute10 VARCHAR2(240) := FND_API.G_MISS_CHAR
17 , attribute11 VARCHAR2(240) := FND_API.G_MISS_CHAR
18 , attribute12 VARCHAR2(240) := FND_API.G_MISS_CHAR
19 , attribute13 VARCHAR2(240) := FND_API.G_MISS_CHAR
20 , attribute14 VARCHAR2(240) := FND_API.G_MISS_CHAR
21 , attribute15 VARCHAR2(240) := FND_API.G_MISS_CHAR
22 , attribute2 VARCHAR2(240) := FND_API.G_MISS_CHAR
23 , attribute3 VARCHAR2(240) := FND_API.G_MISS_CHAR
24 , attribute4 VARCHAR2(240) := FND_API.G_MISS_CHAR
25 , attribute5 VARCHAR2(240) := FND_API.G_MISS_CHAR
26 , attribute6 VARCHAR2(240) := FND_API.G_MISS_CHAR
27 , attribute7 VARCHAR2(240) := FND_API.G_MISS_CHAR
28 , attribute8 VARCHAR2(240) := FND_API.G_MISS_CHAR
29 , attribute9 VARCHAR2(240) := FND_API.G_MISS_CHAR
30 , base_currency_code VARCHAR2(15) := FND_API.G_MISS_CHAR
31 , context VARCHAR2(30) := FND_API.G_MISS_CHAR
32 , created_by NUMBER := FND_API.G_MISS_NUM
33 , creation_date DATE := FND_API.G_MISS_DATE
34 , currency_header_id NUMBER := FND_API.G_MISS_NUM
35 , description VARCHAR2(2000) := FND_API.G_MISS_CHAR
36 , last_updated_by NUMBER := FND_API.G_MISS_NUM
37 , last_update_date DATE := FND_API.G_MISS_DATE
38 , last_update_login NUMBER := FND_API.G_MISS_NUM
39 , name VARCHAR2(240) := FND_API.G_MISS_CHAR
40 , base_rounding_factor NUMBER := FND_API.G_MISS_NUM
41 , base_markup_formula_id NUMBER := FND_API.G_MISS_NUM
42 , base_markup_operator VARCHAR2(30) := FND_API.G_MISS_CHAR
43 , base_markup_value NUMBER := FND_API.G_MISS_NUM
44 , program_application_id NUMBER := FND_API.G_MISS_NUM
45 , program_id NUMBER := FND_API.G_MISS_NUM
46 , program_update_date DATE := FND_API.G_MISS_DATE
47 , request_id NUMBER := FND_API.G_MISS_NUM
48 -- , row_id NUMBER := FND_API.G_MISS_NUM -- Commented by Sunil
49 , return_status VARCHAR2(1) := FND_API.G_MISS_CHAR
50 , db_flag VARCHAR2(1) := FND_API.G_MISS_CHAR
51 , operation VARCHAR2(30) := FND_API.G_MISS_CHAR
52 );
53
54 TYPE Curr_Lists_Tbl_Type IS TABLE OF Curr_Lists_Rec_Type
55 INDEX BY BINARY_INTEGER;
56
57 -- Curr_Lists value record type
58
59 TYPE Curr_Lists_Val_Rec_Type IS RECORD
60 ( base_currency VARCHAR2(240) := FND_API.G_MISS_CHAR
61 , currency_header VARCHAR2(240) := FND_API.G_MISS_CHAR
62 , base_markup_formula VARCHAR2(240) := FND_API.G_MISS_CHAR
63 -- , row VARCHAR2(240) := FND_API.G_MISS_CHAR -- Commented by Sunil
64 );
65
66 TYPE Curr_Lists_Val_Tbl_Type IS TABLE OF Curr_Lists_Val_Rec_Type
67 INDEX BY BINARY_INTEGER;
68
69 -- Curr_Details record type
70
71 TYPE Curr_Details_Rec_Type IS RECORD
72 ( attribute1 VARCHAR2(240) := FND_API.G_MISS_CHAR
73 , attribute10 VARCHAR2(240) := FND_API.G_MISS_CHAR
74 , attribute11 VARCHAR2(240) := FND_API.G_MISS_CHAR
75 , attribute12 VARCHAR2(240) := FND_API.G_MISS_CHAR
76 , attribute13 VARCHAR2(240) := FND_API.G_MISS_CHAR
77 , attribute14 VARCHAR2(240) := FND_API.G_MISS_CHAR
78 , attribute15 VARCHAR2(240) := FND_API.G_MISS_CHAR
79 , attribute2 VARCHAR2(240) := FND_API.G_MISS_CHAR
80 , attribute3 VARCHAR2(240) := FND_API.G_MISS_CHAR
81 , attribute4 VARCHAR2(240) := FND_API.G_MISS_CHAR
82 , attribute5 VARCHAR2(240) := FND_API.G_MISS_CHAR
83 , attribute6 VARCHAR2(240) := FND_API.G_MISS_CHAR
84 , attribute7 VARCHAR2(240) := FND_API.G_MISS_CHAR
85 , attribute8 VARCHAR2(240) := FND_API.G_MISS_CHAR
86 , attribute9 VARCHAR2(240) := FND_API.G_MISS_CHAR
87 , context VARCHAR2(30) := FND_API.G_MISS_CHAR
88 , conversion_date DATE := FND_API.G_MISS_DATE
89 , conversion_date_type VARCHAR2(30) := FND_API.G_MISS_CHAR
90 -- , conversion_method VARCHAR2(30) := FND_API.G_MISS_CHAR
91 , conversion_type VARCHAR2(30) := FND_API.G_MISS_CHAR
92 , created_by NUMBER := FND_API.G_MISS_NUM
93 , creation_date DATE := FND_API.G_MISS_DATE
94 , currency_detail_id NUMBER := FND_API.G_MISS_NUM
95 , currency_header_id NUMBER := FND_API.G_MISS_NUM
96 , end_date_active DATE := FND_API.G_MISS_DATE
97 , fixed_value NUMBER := FND_API.G_MISS_NUM
98 , last_updated_by NUMBER := FND_API.G_MISS_NUM
99 , last_update_date DATE := FND_API.G_MISS_DATE
100 , last_update_login NUMBER := FND_API.G_MISS_NUM
101 , markup_formula_id NUMBER := FND_API.G_MISS_NUM
102 , markup_operator VARCHAR2(30) := FND_API.G_MISS_CHAR
103 , markup_value NUMBER := FND_API.G_MISS_NUM
104 , price_formula_id NUMBER := FND_API.G_MISS_NUM
105 , program_application_id NUMBER := FND_API.G_MISS_NUM
106 , program_id NUMBER := FND_API.G_MISS_NUM
107 , program_update_date DATE := FND_API.G_MISS_DATE
108 , request_id NUMBER := FND_API.G_MISS_NUM
109 , rounding_factor NUMBER := FND_API.G_MISS_NUM
110 , selling_rounding_factor NUMBER := FND_API.G_MISS_NUM
111 , start_date_active DATE := FND_API.G_MISS_DATE
112 , to_currency_code VARCHAR2(15) := FND_API.G_MISS_CHAR
113 , curr_attribute_type VARCHAR2(30) := FND_API.G_MISS_CHAR
114 , curr_attribute_context VARCHAR2(30) := FND_API.G_MISS_CHAR
115 , curr_attribute VARCHAR2(30) := FND_API.G_MISS_CHAR
116 , curr_attribute_value VARCHAR2(240) := FND_API.G_MISS_CHAR
117 , precedence NUMBER := FND_API.G_MISS_NUM
118 , return_status VARCHAR2(1) := FND_API.G_MISS_CHAR
119 , db_flag VARCHAR2(1) := FND_API.G_MISS_CHAR
120 , operation VARCHAR2(30) := FND_API.G_MISS_CHAR
121 );
122
123 TYPE Curr_Details_Tbl_Type IS TABLE OF Curr_Details_Rec_Type
124 INDEX BY BINARY_INTEGER;
125
126 -- Curr_Details value record type
127
128 TYPE Curr_Details_Val_Rec_Type IS RECORD
129 ( currency_detail VARCHAR2(240) := FND_API.G_MISS_CHAR
130 , currency_header VARCHAR2(240) := FND_API.G_MISS_CHAR
131 , markup_formula VARCHAR2(240) := FND_API.G_MISS_CHAR
132 , price_formula VARCHAR2(240) := FND_API.G_MISS_CHAR
133 , to_currency VARCHAR2(240) := FND_API.G_MISS_CHAR
134 );
135
136 TYPE Curr_Details_Val_Tbl_Type IS TABLE OF Curr_Details_Val_Rec_Type
137 INDEX BY BINARY_INTEGER;
138
139 -- Variables representing missing records and tables
140
141 G_MISS_CURR_LISTS_REC Curr_Lists_Rec_Type;
142 G_MISS_CURR_LISTS_VAL_REC Curr_Lists_Val_Rec_Type;
143 G_MISS_CURR_LISTS_TBL Curr_Lists_Tbl_Type;
144 G_MISS_CURR_LISTS_VAL_TBL Curr_Lists_Val_Tbl_Type;
145 G_MISS_CURR_DETAILS_REC Curr_Details_Rec_Type;
146 G_MISS_CURR_DETAILS_VAL_REC Curr_Details_Val_Rec_Type;
147 G_MISS_CURR_DETAILS_TBL Curr_Details_Tbl_Type;
148 G_MISS_CURR_DETAILS_VAL_TBL Curr_Details_Val_Tbl_Type;
149
150 -- Start of Comments
151 -- API name Process_Currency
152 -- Type Public
153 -- Function
154 --
155 -- Pre-reqs
156 --
157 -- Parameters
158 --
159 -- Version Current version = 1.0
160 -- Initial version = 1.0
161 --
162 -- Notes
163 --
164 -- End of Comments
165
166 /*#
167 * Use this API to create and update Multi-Currency Conversions. The
168 * Multi-Currency Conversion cannot be deleted but it can be inactivated by
169 * setting the effective dates.
170 *
171 * @param p_api_version_number the api version number
172 * @param p_init_msg_list true or false if there is an initial message list
173 * @param p_return_values true or false if there are return values
174 * @param p_commit true or false if the modifier should be committed
175 * @param x_return_status the return status
176 * @param x_msg_count the message count
177 * @param x_msg_data the message data
178 * @param p_CURR_LISTS_rec the input record corresponding to the columns in the
179 * multi-currency header tables QP_CURRENCY_LISTS_B and
180 * QP_CURRENCY_LISTS_TL
181 * @param p_CURR_LISTS_val_rec the input record that stores the meaning of id or
182 * code columns in the multi-currency header table
183 * QP_CURRENCY_LISTS_B
184 * @param p_CURR_DETAILS_tbl input table corresponding to the columns in the
185 * multi-currency conversion line table
186 * QP_CURRENCY_DETAILS
187 * @param p_CURR_DETAILS_val_tbl the input record that stores the meaning of id
188 * or code columns in the multi-currency conversion
189 * line table QP_CURRENCY_DETAILS
190 * @param x_CURR_LISTS_rec the output record corresponding to the columns in the
191 * multi-currency header tables QP_CURRENCY_LISTS_B and
192 * QP_CURRENCY_LISTS_TL
193 * @param x_CURR_LISTS_val_rec the output record that stores the meaning of id or
194 * code columns in the multi-currency header table
195 * QP_CURRENCY_LISTS_B
196 * @param x_CURR_DETAILS_tbl the output table corresponding to the columns in the
197 * multi-currency conversion line table
198 * QP_CURRENCY_DETAILS
199 * @param x_CURR_DETAILS_val_tbl the output record that stores the meaning of id
200 * or code columns in the multi-currency conversion
201 * line table QP_CURRENCY_DETAILS
202 *
203 *
204 * @rep:displayname Process Currency
205 */
206 PROCEDURE Process_Currency
207 ( p_api_version_number IN NUMBER
208 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
209 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
210 , p_commit IN VARCHAR2 := FND_API.G_FALSE
211 , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
212 , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
213 , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
214 , p_CURR_LISTS_rec IN Curr_Lists_Rec_Type :=
215 G_MISS_CURR_LISTS_REC
216 , p_CURR_LISTS_val_rec IN Curr_Lists_Val_Rec_Type :=
217 G_MISS_CURR_LISTS_VAL_REC
218 , p_CURR_DETAILS_tbl IN Curr_Details_Tbl_Type :=
219 G_MISS_CURR_DETAILS_TBL
220 , p_CURR_DETAILS_val_tbl IN Curr_Details_Val_Tbl_Type :=
221 G_MISS_CURR_DETAILS_VAL_TBL
222 , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Rec_Type
223 , x_CURR_LISTS_val_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Val_Rec_Type
224 , x_CURR_DETAILS_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Tbl_Type
225 , x_CURR_DETAILS_val_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Val_Tbl_Type
226 );
227
228 -- Start of Comments
229 -- API name Lock_Currency
230 -- Type Public
231 -- Function
232 --
233 -- Pre-reqs
234 --
235 -- Parameters
236 --
237 -- Version Current version = 1.0
238 -- Initial version = 1.0
239 --
240 -- Notes
241 --
242 -- End of Comments
243
244 PROCEDURE Lock_Currency
245 ( p_api_version_number IN NUMBER
246 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
247 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
248 , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
249 , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
250 , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
251 , p_CURR_LISTS_rec IN Curr_Lists_Rec_Type :=
252 G_MISS_CURR_LISTS_REC
253 , p_CURR_LISTS_val_rec IN Curr_Lists_Val_Rec_Type :=
254 G_MISS_CURR_LISTS_VAL_REC
255 , p_CURR_DETAILS_tbl IN Curr_Details_Tbl_Type :=
256 G_MISS_CURR_DETAILS_TBL
257 , p_CURR_DETAILS_val_tbl IN Curr_Details_Val_Tbl_Type :=
258 G_MISS_CURR_DETAILS_VAL_TBL
259 , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Rec_Type
260 , x_CURR_LISTS_val_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Val_Rec_Type
261 , x_CURR_DETAILS_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Tbl_Type
262 , x_CURR_DETAILS_val_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Val_Tbl_Type
263 );
264
265 -- Start of Comments
266 -- API name Get_Currency
267 -- Type Public
268 -- Function
269 --
270 -- Pre-reqs
271 --
272 -- Parameters
273 --
274 -- Version Current version = 1.0
275 -- Initial version = 1.0
276 --
277 -- Notes
278 --
279 -- End of Comments
280
281 PROCEDURE Get_Currency
282 ( p_api_version_number IN NUMBER
283 , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
284 , p_return_values IN VARCHAR2 := FND_API.G_FALSE
285 , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
286 , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
287 , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
288 , p_currency_header_id IN NUMBER :=
289 FND_API.G_MISS_NUM
290 , p_currency_header IN VARCHAR2 :=
291 FND_API.G_MISS_CHAR
292 , x_CURR_LISTS_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Rec_Type
293 , x_CURR_LISTS_val_rec OUT NOCOPY /* file.sql.39 change */ Curr_Lists_Val_Rec_Type
294 , x_CURR_DETAILS_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Tbl_Type
295 , x_CURR_DETAILS_val_tbl OUT NOCOPY /* file.sql.39 change */ Curr_Details_Val_Tbl_Type
296 );
297
298 END QP_Currency_PUB;