DBA Data[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;