DBA Data[Home] [Help]

PACKAGE: APPS.BSC_DBI_CALENDAR

Source


1 package BSC_DBI_CALENDAR AS
2 /*$Header: BSCDBICS.pls 120.7 2005/11/30 16:47 vsurendr noship $*/
3 ----
4 g_exception EXCEPTION;
5 g_debug boolean;
6 g_status_message varchar2(4000);
7 g_who number;
8 g_lang BSC_IM_UTILS.varchar_tabletype;
9 g_num_lang number;
10 g_src_lang varchar2(100);
11 ----
12 g_options BSC_IM_UTILS.varchar_tabletype;
13 g_number_options number;
14 g_bsc_greg_fiscal_year number;
15 -----
16 g_db_cal_modified boolean;
17 --
18 g_init_mem boolean;
19 --
20 ------records
21 type dbi_cal_record is record(
22 report_date date,
23 cal_day varchar2(40),
24 cal_month varchar2(40),
25 cal_year varchar2(40),
26 month_id varchar2(40),
27 ent_period_id varchar2(40),
28 week_id varchar2(40),
29 ent_week_id number,
30 row_num number,
31 ent_day number, --day 365
32 greg_day number, --day 365
33 p445_day number, --day 365,
34 start_date date,
35 end_date date
36 );
37 type dbi_cal_record_t is table of dbi_cal_record index by binary_integer;
38 g_dbi_cal_record dbi_cal_record_t;
39 g_num_dbi_cal_record number;
40 ---------------ent---------------------------
41 ---
42 type dbi_ent_period is record(
43 ent_period_id number,
44 ent_year_id number,
45 sequence number,
46 name varchar2(400),
47 start_date date,
48 end_date date
49 );
50 type dbi_ent_period_t is table of dbi_ent_period index by binary_integer;
51 g_dbi_ent_period dbi_ent_period_t;
52 g_num_dbi_ent_period number;
53 ---
54 type dbi_ent_qtr is record(
55 ent_qtr_id number,
56 ent_year_id number,
57 sequence number,
58 name varchar2(400),
59 start_date date,
60 end_date date
61 );
62 type dbi_ent_qtr_t is table of dbi_ent_qtr index by binary_integer;
63 g_dbi_ent_qtr dbi_ent_qtr_t;
64 g_num_dbi_ent_qtr number;
65 ---
66 type dbi_ent_year is record(
67 ent_year_id number,
68 sequence number,
69 name varchar2(400),
70 start_date date,
71 end_date date
72 );
73 type dbi_ent_year_t is table of dbi_ent_year index by binary_integer;
74 g_dbi_ent_year dbi_ent_year_t;
75 g_num_dbi_ent_year number;
76 ---
77 ------------------445----------------------------
78 type dbi_445_week is record(
79 week_id number,
80 year_id number,
81 sequence number,
82 name varchar2(400),
83 ent_week_id number,
84 ent_year_id number,
85 start_date date,
86 end_date date
87 );
88 type dbi_445_week_t is table of dbi_445_week index by binary_integer;
89 g_dbi_445_week dbi_445_week_t;
90 g_num_dbi_445_week number;
91 --3990678
92 g_ent_week dbi_445_week_t;--holds only the extra weeks at ent year boundary
93 g_num_ent_week number;
94 ---
95 type dbi_445_p445 is record(
96 period445_id number,
97 year445_id number,
98 sequence number,
99 name varchar2(400),
100 start_date date,
101 end_date date
102 );
103 type dbi_445_p445_t is table of dbi_445_p445 index by binary_integer;
104 g_dbi_445_p445 dbi_445_p445_t;
105 g_num_dbi_445_p445 number;
106 ---
107 type dbi_445_year is record(
108 year445_id number,
109 sequence number,
110 name varchar2(400),
111 start_date date,
112 end_date date
113 );
114 type dbi_445_year_t is table of dbi_445_year index by binary_integer;
115 g_dbi_445_year dbi_445_year_t;
116 g_num_dbi_445_year number;
117 ---
118 ---------------greg----------------------------
119 type dbi_greg_period is record(
120 month_id number,
121 year_id number,
122 sequence number,
123 name varchar2(400),
124 start_date date,
125 end_date date
126 );
127 type dbi_greg_period_t is table of dbi_greg_period index by binary_integer;
128 g_dbi_greg_period dbi_greg_period_t;
129 g_num_dbi_greg_period number;
130 ---
131 type dbi_greg_qtr is record(
132 quarter_id number,
133 year_id number,
134 sequence number,
135 name varchar2(400),
136 start_date date,
137 end_date date
138 );
139 type dbi_greg_qtr_t is table of dbi_greg_qtr index by binary_integer;
140 g_dbi_greg_qtr dbi_greg_qtr_t;
141 g_num_dbi_greg_qtr number;
142 ---
143 type dbi_greg_year is record(
144 year_id number,
145 sequence number,
146 name varchar2(400),
147 start_date date,
148 end_date date
149 );
150 type dbi_greg_year_t is table of dbi_greg_year index by binary_integer;
151 g_dbi_greg_year dbi_greg_year_t;
152 g_num_dbi_greg_year number;
153 ----------
154 g_ent_cal_id number;
155 g_ent_fiscal_change number;
156 g_ent_start_date date;
157 g_ent_day_per_id number;
158 g_ent_week_per_id number;
159 g_ent_period_per_id number;
160 g_ent_qtr_per_id number;
161 g_ent_year_per_id number;
162 ---
163 g_445_cal_id number;
164 g_445_fiscal_change number;
165 g_445_cal_short_name varchar2(100);
166 g_445_start_date date;
167 g_445_day_per_id number;
168 g_445_day_short_name varchar2(100);
169 g_445_week_per_id number;
170 g_445_week_short_name varchar2(100);
171 g_445_p445_per_id number;
172 g_445_p445_short_name varchar2(100);
173 g_445_year_per_id number;
174 g_445_year_short_name varchar2(100);
175 ---
176 g_greg_cal_id number;
177 g_greg_fiscal_change number;
178 g_greg_cal_short_name varchar2(100);
179 g_greg_start_date date;
180 g_greg_day_per_id number;
181 g_greg_day_short_name varchar2(100);
182 g_greg_period_per_id number;
183 g_greg_period_short_name varchar2(100);
184 g_greg_qtr_per_id number;
185 g_greg_qtr_short_name varchar2(100);
186 g_greg_year_per_id number;
187 g_greg_year_short_name varchar2(100);
188 ----------
189 -----------------------------------------------------------------
190 --PUBLIC
191 -----------------------------------------------------------------
192 procedure load_dbi_cal_into_bsc(
193 p_option_string varchar2,
194 p_error_message out nocopy varchar2
195 );
196 procedure load_dbi_cal_into_bsc(
197 Errbuf out nocopy varchar2,
198 Retcode out nocopy varchar2,
199 p_option_string varchar2
200 );
201 -----------------------------------------------------------------
202 --PRIVATE
203 -----------------------------------------------------------------
204 procedure load_dbi_cal_into_bsc_full;
205 procedure load_dbi_ent_cal;
206 procedure load_dbi_445_cal;
207 procedure load_dbi_greg_cal;
208 procedure delete_dbi_calendars;
209 procedure analyze_tables;
210 procedure init_all;
211 procedure write_to_log_file(p_message varchar2);
212 procedure write_to_log_file_n(p_message varchar2);
213 function get_time return varchar2;
214 function get_periodicity_nextval return number;
218 procedure loadmem_ent_full;
215 function get_calendar_nextval return number;
216 procedure init_cal_per_ids;
217 procedure load_fii_time_day_full;
219 procedure loadmem_445_full;
220 procedure loadmem_greg_full;
221 procedure load_dbi_ent_cal_data;
222 procedure load_dbi_445_cal_data;
223 procedure load_dbi_greg_cal_data;
224 function get_day365(
225 p_cal_start_date date,
226 p_this_date date
227 )return number;
228 procedure get_bsc_greg_fiscal_year;
229 procedure get_ent_cal_start_date(p_mode varchar2);
230 procedure get_445_cal_start_date(p_mode varchar2);
231 procedure get_greg_cal_start_date(p_mode varchar2);
232 procedure load_fii_time_day_inc;
233 procedure loadmem_ent_inc;
234 procedure loadmem_445_inc;
235 procedure loadmem_greg_inc;
236 procedure LOAD_DBI_CAL_INTO_BSC_INC;
237 function check_for_inc_refresh return number;
238 function get_bis_dim_long_name(p_dim varchar2, p_lang varchar2, p_source_lang out nocopy varchar2) return varchar2;
239 function get_lookup_value(p_lookup_type varchar2,
240 p_lookup_code varchar2,
241 p_lang varchar2,
242 p_source_lang out nocopy varchar2
243 ) return varchar2;
244 function get_bsc_Periodicity(
245 p_time_level_name varchar2,
246 x_periodicity_id out nocopy number,
247 x_calendar_id out nocopy number,
248 x_message out nocopy varchar2
249 )return boolean;
250 --for PMV
251 procedure get_bsc_Periodicity_jdbc(
252 p_time_level_name varchar2,
253 x_periodicity_id out nocopy number,
254 x_calendar_id out nocopy number,
255 x_status out nocopy number,
256 x_message out nocopy varchar2
257 );
258 procedure load_dbi_cal_metadata(
259 p_error_message out nocopy varchar2
260 );
261 function is_dbi_cal_metadata_loaded return boolean;
262 procedure delete_dbi_calendar_metadata;
263 function check_for_dbi return boolean ;
264 procedure init_mem_values(p_mode varchar2);
265 procedure update_dbi_445_ent_week(
266 p_prev_fii_week varchar2,
267 p_prev_week number,
268 p_prev_year number);
269 procedure correct_ent_week(p_mode varchar2);
270 function get_dbi_445_year(p_prev_fii_week varchar2) return number ;
271 procedure dmp_g_dbi_cal_record;
272 procedure calculate_day365(p_mode varchar2,p_cal_id number) ;
273 procedure calculate_day365_445(p_mode varchar2);
274 --AW_INTEGRATION: New procedure
275 procedure load_dbi_calendars_into_aw;
276 procedure refresh_reporting_calendars(p_error_message out nocopy varchar2);
277 END BSC_DBI_CALENDAR;