DBA Data[Home] [Help]

PACKAGE BODY: APPS.EDW_POA_CONTRACT_HOOK

Source


1 PACKAGE BODY EDW_POA_CONTRACT_HOOK as
2 /*$Header: poahkctb.pls 115.11 2002/01/24 17:54:22 pkm ship    $ */
3 function Pre_Fact_Collect(p_object_name varchar2) return boolean  is
4  begin
5    EDW_OWB_COLLECTION_UTIL.write_to_log_file('Entering Contract  Pre Fact Hook Procedure');
6    IF (fnd_profile.value('POA_DNB_HOOKS') = 'N') THEN
7      EDW_OWB_COLLECTION_UTIL.write_to_log_file('Updating Staging Table to reference DUNS and SIC Code Dimension');
8 
9      Update POA_EDW_CONTRACT_FSTG Fact
10      set (DUNS_FK, SIC_CODE_FK) =
11          (select Com.DUNS, Com.SIC_Code
12           from POA_DNB_TRD_PRTNR Com
13           where (Fact.Supplier_Site_FK = Com.Trading_Partner_PK))
14      where ((Fact.Collection_Status = 'READY') and
15             (Fact.Supplier_Site_FK IN (select Trading_Partner_PK
16                                        from POA_DNB_TRD_PRTNR)));
17   ELSE
18     EDW_OWB_COLLECTION_UTIL.write_to_log_file('DNB is disabled');
19   END IF;
20 
21   return true;
22 end Pre_Fact_Collect;
23 
24 END EDW_POA_CONTRACT_HOOK;
25