DBA Data[Home] [Help]

PACKAGE BODY: APPS.FII_EUL_UTILS_2

Source


1 PACKAGE BODY FII_EUL_UTILS_2 AS
2 /* $Header: FIIEUL2B.pls 120.0 2002/08/24 04:52:51 appldev noship $ */
3 
4 FUNCTION foldersToRename(pBusAreaName VARCHAR2,
5                          pFolderName  VARCHAR2)
6 
7   RETURN VARCHAR2
8 
9 IS
10 
11   RETURN_VALUE VARCHAR2(100) := NULL;
12 
13 BEGIN
14 
15   IF pBusAreaName = 'Revenue Intelligence Business Area' THEN
16 
17       SELECT DECODE(pfolderName,
18                          'Account:Account FK' , 'Accounting Flexfield Dimension:Account' ,
19                         'Company: Company FK' , 'Accounting Flexfield Dimension:Company' ,
20                        'Consolidated Revenue' , 'Consolidated Revenue Fact' ,
21                  'Cost Center:Cost Center FK' , 'Accounting Flexfield Dimension:Cost Center' ,
22    'External Reporting:External Reporting FK' , 'Accounting Flexfield Dimension:External Reporting' ,
23        'Line of Business:Line of Business FK' , 'Accounting Flexfield Dimension:Line of Business' ,
24                  'Sub-Account:Sub-Account FK' , 'Accounting Flexfield Dimension:Sub-Account' ,
25  'Trading Partner Dimension:Bill To Customer' , 'Bill To Customer' ,
26  'Trading Partner Dimension:Ship To Customer' , 'Ship To Customer' ,
27  'Trading Partner Dimension:Sold To Customer' , 'Sold To Customer' ,
28  'Trading Partner Dimension:End User Address' , 'End User Address' ,
29 'Trading Partner Dimension:Reseller Customer' , 'Reseller Customer' ,
30 'Trading Partner Dimension:End User Customer' , 'End User Customer' ,
31                        'Vertical:Vertical FK' , 'Accounting Flexfield Dimension:Vertical' ,
32                                                pFolderName)
33        INTO RETURN_VALUE
34        FROM DUAL;
35 
36   END IF;
37 
38   RETURN RETURN_VALUE;
39 
40 END foldersToRename;
41 
42 FUNCTION  ItemsToHide(pBusAreaNameIn VARCHAR2,
43                       pTableNameIn   VARCHAR2,
44                       pColumnNameIn  VARCHAR2,
45                       pItemNameIn    VARCHAR2)
46   RETURN INTEGER
47 
48   IS
49      RETURN_VALUE INTEGER := -1;
50      --
51   BEGIN
52 
53 --     g_processName := 'itemsToHide';
54       --
55 
56     IF pBusAreaNameIn IN ('Revenue Intelligence Business Area',
57                           'Payables Intelligence Business Area',
58                           'Project Intelligence Business Area') AND
59        pTableNameIn IN (
60                         'EDW_AP_PAYMENT_M'
61                        ,'EDW_AP_PAY_TERM_M'
62                        ,'EDW_AR_TRX_TYPE_M'
63                        /*,'EDW_CURRENCY_M'*/
64                        /*,'EDW_DUNS_M'*/
65                        ,'EDW_GEOGRAPHY_M'
66                        /*,'EDW_GL_BOOK_M'*/
67                        ,'EDW_HOLD_M'
68                        ,'EDW_HR_PERSON_M'
69                        /*,'EDW_INSTANCE_M'*/
70                        ,'EDW_INV_TYPE_M'
71                        ,'EDW_ITEMS_M'
72                        ,'EDW_MTL_UOM_M'
73                        ,'EDW_ORGANIZATION_M'
74                        ,'EDW_PROJECT_M'
75                        ,'EDW_RELEASE_M'
76                        ,'EDW_REV_SOURCE_M'
77                        ,'EDW_SIC_CODE_M'
78                        ,'EDW_TRD_PARTNER_M'
79                        /*,'EDW_UNSPSC_M'*/
80                        ,'abc') THEN
81 
82          IF pBusAreaNameIn = 'Revenue Intelligence Business Area' THEN
83 
84            IF (pTableNameIn = 'EDW_AR_TRX_TYPE_M' AND
85                pColumnNameIn IN ('CODE_ENABLED_FLAG','TYPE_ALLOW_FRT_FLAG',',TYPE_ALLOW_OVAPP_FLAG',
86                                 'TYPE_CREATION_SIGN','TYPE_DEFAULT_STATUS','TYPE_DEFAULT_TERM'))
87 /*              OR
88               (pTableNameIn = 'EDW_INSTANCE_M' AND
89                pColumnNameIn IN ('INST_DESCRIPTION','INST_NAME'))
90 */
91               OR
92               (pTableNameIn = 'EDW_TRD_PARTNER_M' AND
93                SUBSTR(pColumnNameIn,1,4) IN ('PTP1','PTP2','PTP3','PTP4') AND
94                pColumnNameIn NOT LIKE 'PTP__NAME')
95 
96               THEN RETURN_VALUE := 1;
97 
98            END IF;
99 
100 
101          ELSIF pBusAreaNameIn = 'Payables Intelligence Business Area' THEN
102 
103            IF (pTableNameIn = 'EDW_HOLD_M' AND
104                pColumnNameIn IN ('HHLD_POSTABLE_FLAG','HHLD_USER_RELEASEABLE_FLAG','HHLD_USER_UPDATEABLE_FLAG'))
105               OR
106               (pTableNameIn = 'EDW_INV_TYPE_M' AND
107                pColumnNameIn IN ('IVTY_DESCRIPTION'))
108               OR
109               (pTableNameIn = 'EDW_AP_PAYMENT_M' AND
110                pColumnNameIn IN ('PCHK_STATUS_LOOKUP_CODE'))
111               OR
112               (pTableNameIn = 'EDW_RELEASE_M' AND
113                pColumnNameIn IN ('RLSE_USER_RELEASEABLE_FLAG','RLSE_POSTABLE_FLAG'))
114 /*
115               OR
116               (pTableNameIn = 'EDW_INSTANCE_M' AND
117                pColumnNameIn IN ('INST_DESCRIPTION','INST_NAME'))
118 */
119               OR
120               (pTableNameIn = 'EDW_TRD_PARTNER_M' AND
121                SUBSTR(pColumnNameIn,1,4) IN ('PTP1','PTP2','PTP3') AND
122                pColumnNameIn NOT LIKE 'PTP__NAME')
123 
124               THEN RETURN_VALUE := 1;
125 
126            END IF;
127 
128 
129          ELSIF pBusAreaNameIn = 'Project Intelligence Business Area' THEN
130 
131            IF (pTableNameIn = 'EDW_TRD_PARTNER_M' AND
132                SUBSTR(pColumnNameIn,1,4) IN ('PTP1','PTP2','PTP3','PTP4') AND
133                pColumnNameIn NOT LIKE 'PTP__NAME')
134 
135              THEN RETURN_VALUE := 1;
136 
137            END IF;
138 
139          ELSE
140 
141            NULL;
142 
143          END IF;
144 
145            IF
146 /*
147               (pTableNameIn = 'EDW_CURRENCY_M' AND
148                pColumnNameIn IN ('ALL_NAME','CRNC_CURRENCY','CRNC_DATE_EFFECTIVE','CRNC_DATE_END',
149                                  'CRNC_DERIVE_EFFT_DATE','CRNC_DERIVE_FACTOR','CRNC_DERIVE_TYPE',
150                                  'CRNC_DESCRIPTION','CRNC_ENABLED_FLAG','CRNC_ISO_FLAG','CRNC_PRECISION'))
151                OR
152 */
153 /*
154               (pTableNameIn = 'EDW_DUNS_M' AND
155                pColumnNameIn IN (
156                  --'ALL_NAME',
157                  'DNMR_FAILURE_INDU_INCE_DFT','DNMR_FAILURE_INDU_PCNT_RANK','DNMR_FAILURE_NATL_INCE_DFT',
158                  'DNMR_FAILURE_NATL_PCNT_RANK','PRNT_INSTANCE','HQTR_CITY','HQTR_STATE_PROV','HQTR_COUNTRY','DNMR_CITY',
159                  'DNMR_ZIP_CODE','DNMR_LOCATION_STATUS','DNMR_LEGAL_STATUS','DNMR_LABOR_SURPLUS_FLAG','DNMR_ISO9000_REGISTRATION',
160                  'DNMR_INVENTORY','DNMR_FEDERAL_TAX_ID','DNMR_IMPORT_FLAG','PRNT_ADDRESS','DOME_TELEPHONE','DOME_COUNTRY',
161                  'DOME_POSTAL_CODE','DOME_STATE_PROV','DOME_CITY','DOME_ADDRESS','GLBL_STATE_PROV','GLBL_CITY','GLBL_ADDRESS',
162                  'PRNT_TELEPHONE','PRNT_COUNTRY','PRNT_POSTAL_CODE','PRNT_STATE_PROV','PRNT_CITY','DNMR_DOMESTIC_ULT_CITY',
163                  'DNMR_DOMESTIC_ULT_ADDRESS','DNMR_DOMESTIC_ULT_NAME','DNMR_GLOBAL_ULT_TELEPHONE','DNMR_GLOBAL_ULT_COUNTRY',
164                  'DNMR_GLOBAL_ULT_POSTAL_CODE','HQTR_INSTANCE','DNMR_HQ_CITY','DNMR_HQ_ADDRESS','DNMR_HQ_FLAG','DNMR_HQ_NAME',
165                  'DNMR_PARENT_TELEPHONE','DNMR_PARENT_COUNTRY','DNMR_PARENT_POSTAL_CODE','DNMR_PARENT_STATE_PROV','DNMR_GLOBAL_ULT_ADDRESS',
166                  'DNMR_GLOBAL_ULT_NAME','DOME_INSTANCE','DNMR_OWNS_RENTS_IND','DNMR_SLOW_PAYMENTS','DNMR_PAYDEX_PRIOR_Q3',
167                  'DNMR_PAYDEX_PRIOR_Q2','DNMR_PAYDEX_PRIOR_Q1','DNMR_PAYDEX_NORM','DNMR_PAYDEX_CURRENT','DNMR_OOB_IND','DNMR_SUITS_COUNT',
168                  'DNMR_LIENS_COUNT','DNMR_JUDGMENTS_COUNT','DNMR_NEGATIVE_PAYMENTS','DNMR_HISTORY','DNMR_HIGH_RISK_IND','DNMR_HIGH_CREDIT',
169                  'DNMR_FIRE_DISASTER_IND','DNMR_FAILURE_SCORE','DNMR_FAILURE_IND','DNMR_DELINQUENCY_SCORE','DNMR_DEBARMENT_FLAG',
170                  'DNMR_DNB_RATING','DNMR_CRIMINAL_PROCEEDINGS_IND','DNMR_BANKRUPTCY_IND','DNMR_AVERAGE_HIGH_CREDIT','DNMR_PREV_STATEMENT_TYPE',
171                  'DNMR_PREV_STATEMENT_DATE','DNMR_PREV_CURRENT_LIABILITIES','DNMR_PREV_CURRENT_ASSETS','DNMR_PREV_TOTAL_ASSETS',
172                  'DNMR_PREV_NET_WORTH','DNMR_PREV_SALES','DNMR_REPORT_BASE_DATE','DNMR_CONTROL_YEAR','DNMR_CURRENT_STATEMENT_TYPE',
173                  'DNMR_CURRENT_STATEMENT_DATE','DNMR_TOTAL_PAYMENTS','DNMR_ACCOUNTS_RECEIVABLES','DNMR_CURRENT_LIABILITIES',
174                  'DNMR_CASH','DNMR_CURRENT_ASSETS','DNMR_TOTAL_DEBT','DNMR_TOTAL_ASSETS','DNMR_NET_WORTH','DNMR_NET_PROFIT',
175                  'DNMR_SALES','DNMR_TRADE_STYLE','DNMR_GLOBAL_ULT_STATE_PROV','DNMR_GLOBAL_ULT_CITY','DNMR_INSTANCE','DNMR_HQ_TELEPHONE',
176                  'DNMR_HQ_COUNTRY','DNMR_HQ_POSTAL_CODE','DNMR_HQ_STATE_PROV','DNMR_PARENT_CITY','DNMR_PARENT_ADDRESS','DNMR_PARENT_DUNS',
177                  'DNMR_PARENT_NAME','DNMR_DOMESTIC_ULT_TELEPHONE','DNMR_DOMESTIC_ULT_COUNTRY','DNMR_DOMESTIC_ULT_POSTAL_CODE',
178                  'DNMR_DOMESTIC_ULT_STATE_PROV','LAST_UPDATE_DATE','GLBL_INSTANCE','GLBL_TELEPHONE','GLBL_COUNTRY','GLBL_POSTAL_CODE',
179                  'DNMR_EXPORT_FLAG','DNMR_CEO_TITLE','DNMR_CEO_NAME','DNMR_BUSINESS_MOVED_IND','DNMR_WOMAN_OWNED_FLAG','DNMR_SDB_ENTRANCE_DATE',
180                  'DNMR_SDB_EXIT_DATE','DNMR_SMALL_BUSINESS_FLAG','DNMR_MINORITY_OWNED_TYPE','DNMR_MINORITY_OWNED_FLAG','DNMR_DISADVANTAGED_FLAG',
181                  'DNMR_CONG_DIST_CODE3','DNMR_CONG_DIST_CODE2','DNMR_CONG_DIST_CODE1','DNMR_TELEPHONE','DNMR_COUNTRY','DNMR_STATE_PROV',
182                  'DNMR_ADDRESS','DNMR_COMPANY_NAME','HQTR_TELEPHONE','HQTR_POSTAL_CODE','HQTR_DUNS_NUMBER','HQTR_ADDRESS'))
183                 OR
184 */
185                 (pTableNameIn = 'EDW_GEOGRAPHY_M' AND
186                  pColumnNameIn IN ('ARE2_NAME','REGN_NAME','SREG_NAME'))
187                 OR
188                 (pTableNameIn = 'EDW_ITEMS_M' AND
189                  pColumnNameIn IN ('CCIT_CATEGORY_NAME','CCIT_DESCRIPTION',
190                                    'CCAT_CATEGORY_NAME','CCAT_DESCRIPTION',
191                                    'ECIT_CATEGORY_NAME','ECIT_DESCRIPTION',
192                                    'ECAT_CATEGORY_NAME','ECAT_DESCRIPTION',
193                                    'PLIN_NAME','PLIN_DESCRIPTION','PLIN_ENABLE_FLAG',
194                                    'ICIT_CATEGORY_NAME','ICIT_DESCRIPTION',
195                                    'ICAT_CATEGORY_NAME','ICAT_DESCRIPTION',
196                                    'IREV_LEVEL_NAME',
197                                    'ITEM_ONE_TIME_FLAG',
198                                    'MCIT_CATEGORY_NAME','MCIT_DESCRIPTION',
199                                    'MCAT_CATEGORY_NAME','MCAT_DESCRIPTION',
200                                    'OCIT_CATEGORY_NAME','OCIT_DESCRIPTION',
201                                    'OCAT_CATEGORY_NAME','OCAT_DESCRIPTION',
202                                    'LCIT_CATEGORY_NAME','LCIT_DESCRIPTION',
203                                    'LCAT_CATEGORY_NAME','LCAT_DESCRIPTION',
204                                    'PCIT_CATEGORY_NAME','PCIT_DESCRIPTION',
205                                    'PCAT_CATEGORY_NAME','PCAT_DESCRIPTION',
206                                    'IORG_EFFECTIVITY_CONTROL','IORG_EXPRS_DELIVERY',
207                                    'IORG_HAZARD_CLASS_ID','IORG_INSP_REQUIRED',
208                                    'IORG_LOCATOR_CONTROL','IORG_LOT_CONTROL',
209                                    'IORG_MRP_PLN_METHOD','IORG_MAKE_OR_BUY_FLAG',
210                                    'IORG_PRC_TOLERANCE_PCT','IORG_SERIAL_CONTROL',
211                                    'IORG_SHELF_LIFE_CODE','IORG_SHELF_LIFE_DAYS',
212                                    'IORG_SUBSTITUTE_RCPT','IORG_UN_NUMBER_ID',
213                                    'IORG_UNORDERED_RCPT',
214                                    'PCTG_DESCRIPTION','PCTG_ENABLED_FLAG','PCTG_NAME',
215                                    'PRDF_DESCRIPTION','PRDF_NAME','PRDF_PRODUCT_FAMILY',
216                                    'PGRP_DESCRIPTION','PGRP_ENABLED_FLAG','PGRP_NAME',
217                                    'SCIT_CATEGORY_NAME','SCIT_DESCRIPTION',
218                                    'SCAT_CATEGORY_NAME','SCAT_DESCRIPTION',
219                                    'CI11_DESCRIPTION','CI11_CATEGORY_NAME',
220                                    'CI12_DESCRIPTION','CI12_CATEGORY_NAME',
221                                    'CI13_DESCRIPTION','CI13_CATEGORY_NAME',
222                                    'CI14_DESCRIPTION','CI14_CATEGORY_NAME',
223                                    'CI15_DESCRIPTION','CI15_CATEGORY_NAME',
224                                    'CI16_DESCRIPTION','CI16_CATEGORY_NAME',
225                                    'CI21_DESCRIPTION','CI21_CATEGORY_NAME',
226                                    'CI22_DESCRIPTION','CI22_CATEGORY_NAME',
227                                    'CI23_DESCRIPTION','CI23_CATEGORY_NAME',
228                                    'CI24_DESCRIPTION','CI24_CATEGORY_NAME',
229                                    'CI25_DESCRIPTION','CI25_CATEGORY_NAME',
230                                    'CI26_DESCRIPTION','CI26_CATEGORY_NAME',
231                                    'CI31_DESCRIPTION','CI31_CATEGORY_NAME',
232                                   'CI310_DESCRIPTION','CI310_CATEGORY_NAME',
233                                    'CI32_DESCRIPTION','CI32_CATEGORY_NAME',
234                                    'CI33_DESCRIPTION','CI33_CATEGORY_NAME',
235                                    'CI34_DESCRIPTION','CI34_CATEGORY_NAME',
236                                    'CI35_DESCRIPTION','CI35_CATEGORY_NAME',
237                                    'CI36_DESCRIPTION','CI36_CATEGORY_NAME',
238                                    'CI37_DESCRIPTION','CI37_CATEGORY_NAME',
239                                    'CI38_DESCRIPTION','CI38_CATEGORY_NAME',
240                                    'CI39_DESCRIPTION','CI39_CATEGORY_NAME',
241                                    'CO11_DESCRIPTION','CO11_CATEGORY_NAME',
242                                    'CO12_DESCRIPTION','CO12_CATEGORY_NAME',
243                                    'CO13_DESCRIPTION','CO13_CATEGORY_NAME',
244                                    'CO14_DESCRIPTION','CO14_CATEGORY_NAME',
245                                    'CO15_DESCRIPTION','CO15_CATEGORY_NAME',
246                                    'CO16_DESCRIPTION','CO16_CATEGORY_NAME'))
247                  OR
248                 (pTableNameIn = 'EDW_ORGANIZATION_M' AND
249                  pColumnNameIn IN (
250                    'BGRP_DATE_TO',    'BGRP_INT_EXT_FLAG','BGRP_ORG_TYPE', 'BGRP_PRIMARY_CST_MTHD' ,'BGRP_DATE_FROM',
251                    'ORGA_DATE_TO','ORGA_ORG_INT_EXT_FLAG',                'ORGA_ORG_PRIM_CST_MTHD' ,'ORGA_DATE_FROM',
252                    'LGET_DATE_TO',    'LGET_INT_EXT_FLAG','LGET_ORG_TYPE', 'LGET_PRIMARY_CST_MTHD' ,'LGET_DATE_FROM','LGET_SET_OF_BOOKS',
253                    'OPER_DATE_TO',    'OPER_INT_EXT_FLAG','OPER_ORG_TYPE', 'OPER_PRIMARY_CST_MTHD' ,'OPER_DATE_FROM'))
254 /* In OWB
255                 OR
256                 (pTableNameIn = 'EDW_GL_BOOK_M' AND
257                  pColumnNameIn IN ('FABK_BOOK_TYPE_NAME','FABK_CURRENCY_CODE',
258                                    'FABK_DEPRE_CALANDAR','FABK_FA_BOOK','FABK_INSTANCE',
259                                    'FABK_NAME','FABK_PRORATE_CALENDAR'))
260 */
261                 OR
262                 (pTableNameIn = 'EDW_MTL_UOM_M' AND
263                  pColumnNameIn IN ('CREATION_DATE','LAST_UPDATE_DATE'))
264 
265                 THEN RETURN_VALUE := 1;
266 
267            END IF;
268       --
269     END IF;
270 
271       RETURN RETURN_VALUE;
272 
273    END ItemsToHide;
274 
275 END FII_EUL_UTILS_2;