[Home] [Help]
PACKAGE: APPS.MSC_SDA_UTILS
Source
1 package MSC_SDA_UTILS as
2 /* $Header: MSCSDAUS.pls 120.10 2008/03/05 23:02:45 pabram noship $ */
3
4 --constants DataStructures
5 TYPE char20Tbl IS TABLE OF varchar2(20) index by binary_integer;
6 TYPE char80Tbl IS TABLE OF varchar2(80) index by binary_integer;
7 TYPE numberTbl IS TABLE OF number index by binary_integer;
8 TYPE longCharTbl IS TABLE of varchar2(200) index by binary_integer;
9 TYPE maxCharTbl IS TABLE of varchar2(32000);
10
11 TYPE date_arr IS TABLE OF date;
12 TYPE number_arr IS TABLE OF number;
13 TYPE char_arr IS TABLE OF varchar2(300);
14
15 g_log_flag boolean := true;
16 g_log_row number := 0;
17 g_log_file_dir varchar2(250);
18 g_log_file_name varchar2(250);
19 g_log_file_handle utl_file.file_type;
20
21 c_field_seperator CONSTANT VARCHAR2(5) := '|';
22 c_record_seperator CONSTANT VARCHAR2(5) := '&';
23 c_bang_separator CONSTANT VARCHAR2(20) := '!';
24 c_comma_separator CONSTANT VARCHAR2(20) := ',';
25 c_field_seperator_ESC CONSTANT VARCHAR2(10) := '%pipe;';
26 c_record_seperator_esc CONSTANT VARCHAR2(10) := '%amp;';
27 c_mbp_null_value CONSTANT NUMBER := -23453;
28 c_mbp_not_null_value CONSTANT NUMBER := -23454;
29 c_date_format CONSTANT VARCHAR2(20) := 'MM/DD/YYYY';
30 c_datetime_format CONSTANT VARCHAR2(20) :='MM/DD/YYYY HH24:MI';
31 c_null_space constant varchar2(1):= ' ';
32 c_sys_yes constant INTEGER := 1;
33 c_sys_no constant INTEGER := 2;
34
35 c_comment_entity_type constant varchar2(50) := 'ITEM';
36
37 --item part condition id and values from msc tables
38 c_part_cond_id constant integer := 401; --part-condition-id
39 c_part_good constant integer := 1; --good item
40 c_part_bad constant integer := 2; --bad item
41
42
43 -- relationship type values in msc_item_substitutes table
44 c_mis_substitute_type constant number := 2; --substitution
45 c_mis_supersession_type constant number := 8; --supersession
46 c_mis_repair_to_type constant number := 18; --repair-to
47 c_mis_service_type constant number := 5; --service
48
49 --constants folders
50 c_item_folder constant varchar2(50) := 'MSC_SDA_ITEMS';
51 c_comments_folder constant varchar2(50) := 'MSC_SDA_COMMENTS';
52 c_excp_folder constant varchar2(50) := 'MSC_SDA_EXCP_SUMMARY';
53
54 --mfg_lookups lookup_type for supplydemand view and forecast view
55 c_sdview_rowtype_lookup constant varchar2(80) := 'MSC_SD_VIEW_ROW_TYPE';
56 c_fcstview_rowtype_lookup constant varchar2(80) := 'MSC_FCST_VIEW_ROW_TYPE';
57 c_histview_rowtype_lookup constant varchar2(80) := 'MSC_HIST_VIEW_ROW_TYPE';
58
59 --constants p_region_type
60 c_reg_list_view constant number := 1;
61 c_reg_view constant number := 2;
62
63 --constants p_org_type
64 c_org_list_view constant number :=1;
65 c_org_view constant number := 2;
66
67 --constant for regions
68 c_all_region_type constant number := -100;
69 c_all_org_type constant number := -200;
70 c_global_reg_type constant number := -300;
71 c_local_reg_type constant number := -400;
72
73 c_global_reg_type_text varchar2(300) := 'Global';
74 c_local_reg_type_text varchar2(300) := 'Local';
75 c_all_region_type_text varchar2(300) := 'All Zones';
76 c_all_org_type_text varchar2(300) := 'All Orgs';
77
78 --constants p_item_view_type
79 c_item_view constant number := 1;
80 c_prime_view constant number := 2;
81 c_supersession_view constant number := 3;
82
83 --constants row-types count
84 c_sd_total_row_types constant number := 45;
85 c_fcst_total_row_types constant number := 16;
86 c_hist_total_row_types constant number := 2;
87
88 --c_sdview_items_count constant number := 74;
89 --c_sdview_comments_count constant number := 4;
90 --c_sdview_excp_count constant number := 3;
91
92 --constants forms tokens
93 c_sdview_rowtypes constant varchar2(80) := 'SDVIEW_ROWTYPES';
94 c_fcstview_rowtypes constant varchar2(80) := 'FCSTVIEW_ROWTYPES';
95 c_histview_rowtypes constant varchar2(80) := 'HISTVIEW_ROWTYPES';
96 c_fcstview_rowtypes_show constant varchar2(80) := 'FCSTVIEW_ROWTYPES_SHOW';
97 c_fcstview_rowtypes_rel constant varchar2(80) := 'FCSTVIEW_ROWTYPES_RELATION';
98
99 c_sdview_nls_messages constant varchar2(80) := 'SDVIEW_NLS_MESSAGES';
100
101 c_sdview_comments_data constant varchar2(80) := 'SDVIEW_COMMENTS_DATA';
102 c_sdview_comments_data_ref constant varchar2(80) := 'SDVIEW_COMMENTS_DATA_REFRESH';
103 c_sdview_items_data constant varchar2(80) := 'SDVIEW_ITEMS_DATA';
104 c_sdview_excp_data constant varchar2(80) := 'SDVIEW_EXCP_DATA';
105 c_sdview_prefset_data constant varchar2(80) := 'SDVIEW_PREFSET_DATA';
106 c_sdview_prefset_data_ref constant varchar2(80) := 'SDVIEW_PREFSET_DATA_REFRESH';
107
108 c_sdview_bucket_data constant varchar2(80) := 'SDVIEW_BUCKET_DATA';
109 c_sdview_week_data constant varchar2(80) := 'SDVIEW_WEEK_DATA';
110 c_sdview_period_data constant varchar2(80) := 'SDVIEW_PERIOD_DATA';
111 c_sdview_rheader_data constant varchar2(80) := 'SDVIEW_RHEADER_DATA';
112 c_sdview_data constant varchar2(80) := 'SDVIEW_DATA';
113
114 c_fcstview_bucket_data constant varchar2(80) := 'FCSTVIEW_BUCKET_DATA';
115 c_fcstview_week_data constant varchar2(80) := 'FCSTVIEW_WEEK_DATA';
116 c_fcstview_period_data constant varchar2(80) := 'FCSTVIEW_PERIOD_DATA';
117 c_fcstview_rheader_data constant varchar2(80) := 'FCSTVIEW_RHEADER_DATA';
118 c_fcstview_data constant varchar2(80) := 'FCSTVIEW_DATA';
119 c_fcstview_addl_data constant varchar2(80) := 'FCSTVIEW_DATA_ADDL';
120
121 c_histview_bucket_data constant varchar2(80) := 'HISTVIEW_BUCKET_DATA';
122 c_histview_rheader_data constant varchar2(80) := 'HISTVIEW_RHEADER_DATA';
123 c_histview_data constant varchar2(80) := 'HISTVIEW_DATA';
124
125 c_sdview_items_messages constant varchar2(80) := 'SDA_ITEMS_MESSAGES';
126 c_sdview_comments_messages constant varchar2(80) := 'SDA_COMMENTS_MESSAGES';
127 c_sdview_excp_messages constant varchar2(80) := 'SDA_EXCP_MESSAGES';
128
129 c_sda_save_item_folder constant varchar2(50) := 'SDA_SAVE_ITEM_FOLDER';
130 c_sda_save_settings constant varchar2(50) := 'SDA_SAVE_SETTINGS';
131
132 --worksheet preferences
133 SET_FROM_LIST constant varchar2(50) := 'SET_FROM_LIST';
134 SET_TO_LIST constant varchar2(50) := 'SET_TO_LIST';
135 c_sda_pref_set constant varchar2(80) := 'SDA_PREF_SET';
136
137 c_keys_days constant varchar2(80) := 'DISPLAY_DAYS';
138 c_keys_weeks constant varchar2(80) := 'DISPLAY_WEEKS';
139 c_keys_periods constant varchar2(80) := 'DISPLAY_PERIODS';
140 c_keys_factor constant varchar2(80) := 'DISPLAY_FACTOR';
141 c_keys_decimals constant varchar2(80) := 'DECIMAL_PLACES';
142 c_keys_sd constant varchar2(80) := 'SD_VIEW_ROW_TYPE';
143 c_keys_fcst constant varchar2(80) := 'FCST_VIEW_ROW_TYPE';
144
145
146 procedure println(p_msg varchar2);
147
148 function check_row_exists(p_query_id number, p_row_index number,
149 p_org_list_id number, p_inst_id number, p_org_id number,
150 p_top_item_id number, p_item_id number, p_orglist_action number, p_itemlist_action number) return number;
151
152 function getRepairItem(p_plan_id number, p_lower_item_id number, p_highest_item_id number) return number;
153 function flushSupersessionChain(p_plan number, p_item number) return number;
154
155 --misc apis
156 function escapeSplChars(p_value varchar2) return varchar2;
157 function getNewFormQueryId return number;
158 function getNewAnalysisQueryId return number;
159
160 procedure addRecordToOutStream(p_one_record varchar2,
161 p_out_data_index in out nocopy number,
162 p_out_data in out nocopy msc_sda_utils.maxchartbl) ;
163
164 procedure addToOutStream(p_one_record varchar2,
165 p_out_data_index in out nocopy number,
166 p_out_data in out nocopy msc_sda_utils.maxchartbl,
167 p_debug_flag number default null);
168
169 procedure flushRegsOrgsIntoMfq(p_plan_id number, p_region_type number, p_region_list number,
170 p_org_type number, p_org_list varchar2,
171 p_region_query_id out nocopy number, p_org_query_id out nocopy number);
172
173 function flushOrgsIntoMfq(p_query_id number, p_row_index number, p_org_type number) return number;
174
175 function flushChainIntoMfq(p_query_id number, p_plan_id number,
176 p_item_view_type number, p_item_id number) return number;
177
178 function getRegionName(p_region_id number) return varchar2;
179 function getOrgList(p_query_id number) return varchar2;
180
181 procedure getRegListValues(p_region_list varchar2, p_region_type number,
182 p_reg_list_id out nocopy number, p_reg_list out nocopy varchar2,
183 p_region_id out nocopy number, p_region_code out nocopy varchar2);
184
185 procedure getOrgListValues(p_orglist varchar2, p_org_type number,
186 p_org_list_id out nocopy number, p_org_list out nocopy varchar2,
187 p_inst_id out nocopy number, p_org_id out nocopy number,
188 p_org_code out nocopy varchar2);
189
190 procedure getItemListValues(p_cur_item_id number, p_item_view_type number,
191 p_top_item_id out nocopy number, p_top_item_name out nocopy varchar2,
192 p_item_id out nocopy number, p_item_name out nocopy varchar2);
193
194 procedure getItemPrimeSS(p_plan_id number, p_item_id number,
195 p_prime_item_id out nocopy number, p_ss_item_id out nocopy number);
196
197 function createHistCalInMfq(p_start_date date, p_end_date date) return number;
198
199 procedure getCommentsData(p_plan_id number, p_chain_query_id number,
200 p_out_data in out nocopy msc_sda_utils.maxCharTbl, p_stream_label varchar2);
201 procedure getItemsData(p_plan_id number, p_org_query_id number, p_chain_query_id number, p_out_data in out nocopy maxCharTbl);
202 procedure getExceptionsData(p_plan_id number, p_chain_query_id number, p_org_query_id number,
203 p_out_data in out nocopy maxCharTbl);
204 procedure getWorkSheetPrefData(p_out_data in out nocopy maxCharTbl, p_refresh_flag number);
205
206 procedure sendSDRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
207 procedure sendFcstRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
208 procedure sendHistRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
209
210 procedure sendNlsMessages(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
211 procedure spreadTableMessages(p_out_data in out nocopy msc_sda_utils.maxCharTbl);
212
213 procedure set_shuttle_from_to(p_lookup_type varchar2, p_lookup_code_list varchar2,
214 p_from_list out nocopy varchar2, p_to_list out nocopy varchar2);
215
216 procedure update_pref_set (p_name varchar2, p_desc varchar2,
217 p_days number, p_weeks number, p_periods number,
218 p_factor number, p_decimal_places number,
219 p_sd_row_list varchar2, p_fcst_row_list varchar2);
220
221 procedure save_item_folder(p_folder_name varchar, p_folder_value varchar,
222 p_default_flag number, p_public_flag number);
223
224 procedure update_close_settings (p_event varchar2, p_event_list varchar2);
225 procedure send_close_settings(p_item_folder_save_list out nocopy varchar2,
226 p_save_settings_list out nocopy varchar2);
227
228 end MSC_SDA_UTILS;