1 PACKAGE PSB_EXCEL_PVT AUTHID CURRENT_USER AS
2 /* $Header: PSBVXLES.pls 115.5 2002/11/18 16:31:11 mgoel ship $ */
3
4
5 /* ----------------------------------------------------------------------- */
6 -- API name : Move_To_Interface
7 -- Type : Private <Implementation>
8 -- Pre-reqs :
9 -- Parameters :
10 -- IN : p_export_name IN VARCHAR2 Required
11 -- p_worksheet_id IN NUMBER Required
12 -- p_stage_id IN NUMBER Optional
13 -- p_export_worksheet_type IN VARCHAR2 Optional
14 -- (B-Both (default), A-Account, P-Position)
15 -- Version : Current version 1.0
16 -- Initial version 1.0
17 -- Created 10/16/1997 by L Sekar
18 --
19 -- Notes : Moves data from PSB to Interface
20
21 PROCEDURE Move_To_Interface
22 (
23 p_api_version IN NUMBER ,
24 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
25 p_commit IN VARCHAR2 := FND_API.G_FALSE ,
26 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
27 p_return_status OUT NOCOPY VARCHAR2 ,
28 p_msg_count OUT NOCOPY NUMBER ,
29 p_msg_data OUT NOCOPY VARCHAR2 ,
30 --
31 p_export_name IN VARCHAR2,
32 p_worksheet_id IN NUMBER,
33 p_stage_id IN NUMBER := FND_API.G_MISS_NUM,
34 p_export_worksheet_type IN VARCHAR2 := FND_API.G_MISS_CHAR
35 );
36
37 /* ----------------------------------------------------------------------- */
38 -- API name : Move_To_PSB
39 -- Type : Private <Implementation>
40 -- Pre-reqs :
41 -- Parameters :
42 -- IN : p_export_id IN NUMBER Required
43 -- p_import_worksheet_type IN VARCHAR2 Optional
44 -- ( B-Both (default), A-Account, P-Position)
45 -- p_amt_tolerance_value_type IN VARCHAR2 Optional
46 -- p_amt_tolerance_value IN NUMBER Optional
47 -- p_pct_tolerance_value_type IN VARCHAR2 Optional
48 -- p_pct_tolerance_value IN NUMBER Optional
49 --
50 -- Version : Current version 1.0
51 -- Initial version 1.0
52 -- Created 10/16/1997 by L Sekar
53 --
54 -- Notes : Moves data from Interface to PSB
55
56 PROCEDURE Move_To_PSB
57 (
58 p_api_version IN NUMBER ,
59 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
60 p_commit IN VARCHAR2 := FND_API.G_FALSE ,
61 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
62 p_return_status OUT NOCOPY VARCHAR2 ,
63 p_msg_count OUT NOCOPY NUMBER ,
64 p_msg_data OUT NOCOPY VARCHAR2 ,
65 --
66 p_export_id IN NUMBER,
67 p_import_worksheet_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
68 p_amt_tolerance_value_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
69 p_amt_tolerance_value IN NUMBER := FND_API.G_MISS_NUM,
70 p_pct_tolerance_value_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
71 p_pct_tolerance_value IN NUMBER := FND_API.G_MISS_NUM
72 );
73
74 /* ----------------------------------------------------------------------- */
75
76
77 -- To store WS Columns
78 TYPE g_ws_col_rec_type IS RECORD
79 ( budget_year_id NUMBER,
80 budget_year_name VARCHAR2(15),
81 balance_type VARCHAR2(1),
82 /* Bug No 2656353 Start */
83 -- display_balance_type VARCHAR2(10),
84 display_balance_type VARCHAR2(15),
85 /* Bug No 2656353 End */
86 year_category_type VARCHAR2(2)
87 );
88
89 TYPE g_ws_col_tbl_type IS TABLE OF g_ws_col_rec_type
90 INDEX BY BINARY_INTEGER;
91 g_ws_cols g_ws_col_tbl_type;
92
93 -- To store Position WS Columns
94 TYPE g_pos_ws_col_rec_type IS RECORD
95 ( column_type VARCHAR2(1),
96 budget_year_id NUMBER,
97 budget_year_name VARCHAR2(15),
98 budget_period_id NUMBER,
99 budget_period_name VARCHAR2(15),
100 balance_type VARCHAR2(1),
101 /* Bug No 2656353 Start */
102 -- display_balance_type VARCHAR2(10),
103 display_balance_type VARCHAR2(15),
104 /* Bug No 2656353 End */
105 year_category_type VARCHAR2(2)
106 );
107
108 TYPE g_pos_ws_col_tbl_type IS TABLE OF g_pos_ws_col_rec_type
109 INDEX BY BINARY_INTEGER;
110 g_pos_ws_cols g_pos_ws_col_tbl_type;
111
112
113 -- To store Percent of Salary Elements
114 TYPE g_ps_element_rec_type IS RECORD
115 (
116 pay_element_id NUMBER,
117 pay_element_period_type VARCHAR2(10),
118 pay_element_name VARCHAR2(30),
119 pay_element_set_id NUMBER
120 );
121
122 TYPE g_ps_elements_tbl_type IS TABLE OF g_ps_element_rec_type
123 INDEX BY BINARY_INTEGER;
124
125 g_ps_elements g_ps_elements_tbl_type;
126
127 -- Store year amounts
128 TYPE g_year_amount_type IS RECORD
129 ( amount NUMBER
130 );
131 TYPE g_year_amount_tbl_type IS TABLE of g_year_amount_type
132 INDEX BY BINARY_INTEGER;
133 g_year_amts g_year_amount_tbl_type;
134
135
136 -- To store the number of periods in each year, index by the year id
137 TYPE g_year_num_periods_type IS RECORD
138 ( num_of_periods NUMBER
139 );
140 TYPE g_year_num_periods_tbl_type IS TABLE of g_year_num_periods_type
141 INDEX BY BINARY_INTEGER;
142 g_year_num_periods g_year_num_periods_tbl_type;
143
144 -- Store the account line IDs 1.. 12
145 TYPE g_acl_id_type IS RECORD
146 ( acl_id NUMBER
147 );
148 TYPE g_acl_id_tbl_type IS TABLE of g_acl_id_type
149 INDEX BY BINARY_INTEGER;
150 g_acl_ids g_acl_id_tbl_type;
151
152
153 -- Store the period amounts
154 TYPE g_period_amount_type IS RECORD
155 ( amount NUMBER
156 );
157 TYPE g_period_amount_tbl_type IS TABLE of g_period_amount_type
158 INDEX BY BINARY_INTEGER;
159
160 g_wlbi_amounts g_period_amount_tbl_type; --1.. 192 for inserting into wlbi
161 g_wal_period_amounts g_period_amount_tbl_type; --1..12(upto 60)
162 g_ps_element_pct g_period_amount_tbl_type; --1..12(upto 60)
163
164 FUNCTION Get_Next_Export_Seq RETURN NUMBER;
165
166
167 /* ----------------------------------------------------------------------- */
168 -- Calls used by both Export and Import Procedures
169 PROCEDURE Clear_WS_Cols;
170 PROCEDURE Get_Calendar_Dates
171 ( p_budget_calendar_id IN NUMBER,
172 p_calendar_start_date OUT NOCOPY DATE,
173 p_calendar_end_date OUT NOCOPY DATE,
174 p_cy_end_date OUT NOCOPY DATE,
175 p_pp_start_date OUT NOCOPY DATE
176 );
177 /* ----------------------------------------------------------------------- */
178
179
180
181 /* ----------------------------------------------------------------------- */
182 -- Start of comments
183 --
184 -- API name : Move_To_Inter_CP
185 -- Type : Private
186 -- Pre-reqs : Move_To_Interface
187 -- Parameters :
188 -- IN :
189 -- p_export_name IN VARCHAR2 Required
190 -- p_worksheet_id IN NUMBER Required
191 -- p_stage_id IN NUMBER Optional
192 -- p_export_worksheet_type IN VARCHAR2 Required
193 --
194 -- OUT NOCOPY :
195 -- errbuf OUT NOCOPY VARCHAR2 Required
196 -- retcode OUT NOCOPY NUMBER Required
197 --
198 -- Version : Current version 1.0
199 -- Initial version 1.0 ( 25-AUG-1998 SRawat )
200 --
201 -- Notes : The concurrent execution file for the concurrent program
202 -- 'Move from PSB to Interface'.
203 --
204 -- End of comments
205
206 PROCEDURE Move_To_Inter_CP
207 (
208 errbuf OUT NOCOPY VARCHAR2 ,
209 retcode OUT NOCOPY VARCHAR2 ,
210 --
211 p_export_name IN VARCHAR2 ,
212 p_worksheet_id IN NUMBER ,
213 p_stage_id IN NUMBER := FND_API.G_MISS_NUM ,
214 p_export_worksheet_type IN VARCHAR2
215 );
216
217 /* ----------------------------------------------------------------------- */
218
219
220
221 /* ----------------------------------------------------------------------- */
222 -- Start of comments
223 --
224 -- API name : Move_To_PSB_CP
225 -- Type : Private
226 -- Pre-reqs : Move_To_PSB
227 -- Parameters :
228 -- IN :
229 -- p_export_id IN NUMBER Required
230 -- p_import_worksheet_type IN VARCHAR2 Required
231 -- p_amt_tolerance_value_type IN VARCHAR2 Optional
232 -- p_amt_tolerance_value IN NUMBER Optional
233 -- p_pct_tolerance_value_type IN VARCHAR2 Optional
234 -- p_pct_tolerance_valuepe IN NUMBER Optional
235 --
236 -- OUT NOCOPY :
237 -- errbuf OUT NOCOPY VARCHAR2 Required
238 -- retcode OUT NOCOPY NUMBER Required
239 --
240 -- Version : Current version 1.0
241 -- Initial version 1.0 ( 24-AUG-1998 SRawat )
242 --
243 -- Notes : The concurrent execution file for the concurrent program
244 -- 'Move from PSB to interface'.
245 --
246 -- End of comments
247
248 PROCEDURE Move_To_PSB_CP
249 (
250 errbuf OUT NOCOPY VARCHAR2 ,
251 retcode OUT NOCOPY VARCHAR2 ,
252 --
253 p_export_id IN NUMBER ,
254 p_import_worksheet_type IN VARCHAR2 ,
255 p_amt_tolerance_value_type IN VARCHAR2 := FND_API.G_MISS_CHAR ,
259 );
256 p_amt_tolerance_value IN NUMBER := FND_API.G_MISS_NUM ,
257 p_pct_tolerance_value_type IN VARCHAR2 := FND_API.G_MISS_CHAR ,
258 p_pct_tolerance_value IN NUMBER := FND_API.G_MISS_NUM
260
261 /* ----------------------------------------------------------------------- */
262
263
264
265
266 /* ----------------------------------------------------------------------- */
267 -- API name : Del_Worksheet
268 -- Type : Private <Implementation>
269 -- Pre-reqs :
270 -- Parameters :
271 -- IN : p_export_id IN NUMBER Required
272 -- Version : Current version 1.0
273 -- Initial version 1.0
274 -- Created 10/20/1999 by Sivakumar Annamalai
275 --
276 -- Notes : Deletes Worksheet from the Interface
277
278 PROCEDURE Del_Worksheet
279 (
280 p_api_version IN NUMBER ,
281 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
282 p_commit IN VARCHAR2 := FND_API.G_FALSE ,
283 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
284 p_return_status OUT NOCOPY VARCHAR2 ,
285 p_msg_count OUT NOCOPY NUMBER ,
286 p_msg_data OUT NOCOPY VARCHAR2 ,
287 --
288 p_export_id IN NUMBER
289 );
290
291
292 /* ----------------------------------------------------------------------- */
293 -- API name : Del_Worksheet_CP
294 -- Type : Private <Implementation>
295 -- Pre-reqs : Del_Worksheet
296 -- Parameters :
297 -- IN : p_export_id IN NUMBER Required
298 -- Version : Current version 1.0
299 -- Initial version 1.0
300 -- Created 10/20/1999 by Sivakumar Annamalai
301 --
302 -- Notes : Concurrent Program Definition procedure for
303 -- 'Deletes Worksheet from the Interface'
304
305 PROCEDURE Del_Worksheet_CP
306 (
307 errbuf OUT NOCOPY VARCHAR2 ,
308 retcode OUT NOCOPY VARCHAR2 ,
309 --
310 p_export_id IN NUMBER
311 );
312
313
314 END PSB_EXCEL_PVT;