DBA Data[Home] [Help]

PACKAGE: APPS.MSC_SDA_UTILS

Source


1 package MSC_SDA_UTILS AUTHID CURRENT_USER as
2 /* $Header: MSCSDAUS.pls 120.13 2010/11/24 23:07:25 pabram ship $ */
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    c_ritems_view constant number := 4;
83 
84    --constants row-types count
85    c_sd_total_row_types constant number := 46;
86    c_fcst_total_row_types constant number := 16;
87    c_hist_total_row_types constant number := 2;
88 
89    --c_sdview_items_count constant number := 74;
90    --c_sdview_comments_count constant number := 4;
91    --c_sdview_excp_count constant number := 3;
92 
93    --constants forms tokens
94    c_sdview_rowtypes constant varchar2(80) := 'SDVIEW_ROWTYPES';
95    c_fcstview_rowtypes constant varchar2(80) := 'FCSTVIEW_ROWTYPES';
96    c_histview_rowtypes constant varchar2(80) := 'HISTVIEW_ROWTYPES';
97    c_fcstview_rowtypes_show constant varchar2(80) := 'FCSTVIEW_ROWTYPES_SHOW';
98    c_fcstview_rowtypes_rel constant varchar2(80) := 'FCSTVIEW_ROWTYPES_RELATION';
99 
100    c_sdview_nls_messages constant varchar2(80) := 'SDVIEW_NLS_MESSAGES';
101 
102    c_sdview_comments_data constant varchar2(80) := 'SDVIEW_COMMENTS_DATA';
103    c_sdview_comments_data_ref constant varchar2(80) := 'SDVIEW_COMMENTS_DATA_REFRESH';
104    c_sdview_items_data constant varchar2(80) := 'SDVIEW_ITEMS_DATA';
105    c_sdview_excp_data constant varchar2(80) := 'SDVIEW_EXCP_DATA';
106    c_sdview_prefset_data constant varchar2(80) := 'SDVIEW_PREFSET_DATA';
107    c_sdview_prefset_data_ref constant varchar2(80) := 'SDVIEW_PREFSET_DATA_REFRESH';
108 
109    c_sdview_bucket_data constant varchar2(80) := 'SDVIEW_BUCKET_DATA';
110    c_sdview_week_data constant varchar2(80) := 'SDVIEW_WEEK_DATA';
111    c_sdview_period_data constant varchar2(80) := 'SDVIEW_PERIOD_DATA';
112    c_sdview_rheader_data constant varchar2(80) := 'SDVIEW_RHEADER_DATA';
113    c_sdview_data constant varchar2(80) := 'SDVIEW_DATA';
114 
115    c_fcstview_bucket_data constant varchar2(80) := 'FCSTVIEW_BUCKET_DATA';
116    c_fcstview_week_data constant varchar2(80) := 'FCSTVIEW_WEEK_DATA';
117    c_fcstview_period_data constant varchar2(80) := 'FCSTVIEW_PERIOD_DATA';
118    c_fcstview_rheader_data constant varchar2(80) := 'FCSTVIEW_RHEADER_DATA';
119    c_fcstview_data constant varchar2(80) := 'FCSTVIEW_DATA';
120    c_fcstview_addl_data constant varchar2(80) := 'FCSTVIEW_DATA_ADDL';
121 
122    c_histview_bucket_data constant varchar2(80) := 'HISTVIEW_BUCKET_DATA';
123    c_histview_rheader_data constant varchar2(80) := 'HISTVIEW_RHEADER_DATA';
124    c_histview_data constant varchar2(80) := 'HISTVIEW_DATA';
125 
126    c_sdview_items_messages constant varchar2(80) := 'SDA_ITEMS_MESSAGES';
127    c_sdview_comments_messages constant varchar2(80) := 'SDA_COMMENTS_MESSAGES';
128    c_sdview_excp_messages constant varchar2(80) := 'SDA_EXCP_MESSAGES';
129 
130    c_sda_save_item_folder  constant varchar2(50) := 'SDA_SAVE_ITEM_FOLDER';
131    c_sda_save_settings  constant varchar2(50) := 'SDA_SAVE_SETTINGS';
132 
133    --worksheet preferences
134    SET_FROM_LIST constant varchar2(50) := 'SET_FROM_LIST';
135    SET_TO_LIST constant varchar2(50) := 'SET_TO_LIST';
136    c_sda_pref_set constant varchar2(80) := 'SDA_PREF_SET';
137 
138    c_keys_days constant varchar2(80) := 'DISPLAY_DAYS';
139    c_keys_weeks constant varchar2(80) := 'DISPLAY_WEEKS';
140    c_keys_periods constant varchar2(80) := 'DISPLAY_PERIODS';
141    c_keys_factor constant varchar2(80) := 'DISPLAY_FACTOR';
142    c_keys_decimals constant varchar2(80) := 'DECIMAL_PLACES';
143    c_keys_sd constant varchar2(80) := 'SD_VIEW_ROW_TYPE';
144    c_keys_fcst constant varchar2(80) := 'FCST_VIEW_ROW_TYPE';
145 
146 
147   procedure println(p_msg varchar2);
148 
149   function check_row_exists(p_query_id number, p_row_index number,
150     p_org_list_id number, p_inst_id number, p_org_id number,
151     p_top_item_id number, p_item_id number, p_orglist_action number, p_itemlist_action number) return number;
152 
153   function getRepairItem(p_plan_id number, p_lower_item_id number, p_highest_item_id number) return number;
154   function flushSupersessionChain(p_plan number, p_item number,p_related_flag number default null) return number;
155 
156   --misc apis
157   function escapeSplChars(p_value varchar2) return varchar2;
158   function getNewFormQueryId return number;
159   function getNewAnalysisQueryId return number;
160 
161   procedure addRecordToOutStream(p_one_record varchar2,
162     p_out_data_index in out nocopy number,
163     p_out_data in out nocopy msc_sda_utils.maxchartbl) ;
164 
165   procedure addToOutStream(p_one_record varchar2,
166     p_out_data_index in out nocopy number,
167     p_out_data in out nocopy msc_sda_utils.maxchartbl,
168     p_debug_flag number default null);
169 
170   procedure flushRegsOrgsIntoMfq(p_plan_id number, p_region_type number, p_region_list number,
171     p_org_type number, p_org_list varchar2,
172     p_region_query_id out nocopy number, p_org_query_id out nocopy number);
173 
174   function flushOrgsIntoMfq(p_query_id number, p_row_index number, p_org_type number) return number;
175 
176   function flushChainIntoMfq(p_query_id number, p_plan_id number,
177     p_item_view_type number, p_item_id number) return number;
178 
179   function getRegionName(p_region_id number) return varchar2;
180   function getOrgList(p_query_id number) return varchar2;
181 
182   procedure  getRegListValues(p_region_list varchar2, p_region_type number,
183     p_reg_list_id out nocopy number, p_reg_list out nocopy varchar2,
184     p_region_id out nocopy number, p_region_code out nocopy varchar2);
185 
186   procedure  getOrgListValues(p_orglist varchar2, p_org_type number,
187     p_org_list_id out nocopy number, p_org_list out nocopy varchar2,
188     p_inst_id out nocopy number, p_org_id out nocopy number,
189     p_org_code out nocopy varchar2);
190 
191   procedure  getItemListValues(p_cur_item_id number, p_item_view_type number,
192     p_top_item_id out nocopy number, p_top_item_name out nocopy varchar2,
193     p_item_id out nocopy number, p_item_name out nocopy varchar2);
194 
195   procedure  getItemPrimeSS(p_plan_id number, p_item_id number,
196     p_prime_item_id out nocopy number, p_ss_item_id out nocopy number);
197 
198   function createHistCalInMfq(p_start_date date, p_end_date date) return number;
199 
200   procedure getCommentsData(p_plan_id number, p_chain_query_id number,
201     p_out_data in out nocopy msc_sda_utils.maxCharTbl, p_stream_label varchar2);
202   procedure getItemsData(p_plan_id number, p_org_query_id number, p_chain_query_id number, p_out_data in out nocopy maxCharTbl);
203   procedure getExceptionsData(p_plan_id number, p_chain_query_id number, p_org_query_id number,
204     p_out_data in out nocopy maxCharTbl);
205   procedure getWorkSheetPrefData(p_out_data in out nocopy maxCharTbl, p_refresh_flag number);
206 
207   procedure sendSDRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
208   procedure sendFcstRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
209   procedure sendHistRowTypes(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
210 
211   procedure sendNlsMessages(p_out_data IN OUT NOCOPY msc_sda_utils.maxCharTbl);
212   procedure spreadTableMessages(p_out_data in out nocopy msc_sda_utils.maxCharTbl);
213 
214   procedure set_shuttle_from_to(p_lookup_type varchar2, p_lookup_code_list varchar2,
215     p_from_list out nocopy varchar2, p_to_list out nocopy varchar2);
216 
217   procedure update_pref_set (p_name varchar2, p_desc varchar2,
218     p_days number, p_weeks number, p_periods number,
219     p_factor number, p_decimal_places number,
220     p_sd_row_list varchar2, p_fcst_row_list varchar2);
221 
222   procedure save_item_folder(p_folder_name varchar, p_folder_value varchar,
223     p_default_flag number, p_public_flag number);
224 
225   procedure update_close_settings (p_event varchar2, p_event_list varchar2);
226   procedure send_close_settings(p_item_folder_save_list out nocopy varchar2,
227     p_save_settings_list out nocopy varchar2);
228 
229   procedure attachment_flag(p_flag out nocopy number,
230     p_inst_id number, p_entity_name number,
231     p_pk_value1 number,
232     p_pk_value2 number default null,
233     p_pk_value3 number default null,
234     p_pk_value4 number default null,
235     p_pk_value5 number default null);
236 
237 end MSC_SDA_UTILS;