DBA Data[Home] [Help]

PACKAGE BODY: APPS.EDW_HR_AGE_BAND_M_C

Source


1 Package Body EDW_HR_AGE_BAND_M_C AS
2 /* $Header: hriepagb.pkb 120.1 2005/06/07 05:46:04 anmajumd noship $ */
3  G_PUSH_DATE_RANGE1         Date:=Null;
4  G_PUSH_DATE_RANGE2         Date:=Null;
5  g_row_count         Number:=0;
6  g_exception_msg     varchar2(2000):=Null;
7 
8 
9  Procedure Push(Errbuf       in out NOCOPY Varchar2,
10                 Retcode      in out NOCOPY Varchar2,
11                 p_from_date  IN   VARCHAR2,
12                 p_to_date    IN   VARCHAR2) IS
13  l_dimension_name   Varchar2(30) :='EDW_HR_AGE_BAND_M'  ;
14  l_temp_date                Date:=Null;
15  l_rows_inserted            Number:=0;
16  l_duration                 Number:=0;
17  l_exception_msg            Varchar2(2000):=Null;
18 
19    -- -------------------------------------------
20    -- Put any additional developer variables here
21    -- -------------------------------------------
22 Begin
23   Errbuf :=NULL;
24    Retcode:=0;
25   IF (Not EDW_COLLECTION_UTIL.setup(l_dimension_name)) THEN
26   errbuf := fnd_message.get;
27     Return;
28   END IF;
29 
30   IF (p_from_date IS NULL) THEN
31 		EDW_HR_AGE_BAND_M_C.g_push_date_range1 :=  EDW_COLLECTION_UTIL.G_local_last_push_start_date -
32 		EDW_COLLECTION_UTIL.g_offset;
33   ELSE
34 	EDW_HR_AGE_BAND_M_C.g_push_date_range1 := to_date(p_from_date, 'YYYY/MM/DD HH24:MI:SS');
35   END IF;
36 
37   IF (p_to_date IS NULL) THEN
38 		EDW_HR_AGE_BAND_M_C.g_push_date_range2 := EDW_COLLECTION_UTIL.G_local_curr_push_start_date;
39   ELSE
40 	EDW_HR_AGE_BAND_M_C.g_push_date_range2 := to_date(p_to_date, 'YYYY/MM/DD HH24:MI:SS');
41   END IF;
42 
43 
44    edw_log.put_line( 'The collection range is from '||
45         to_char(EDW_HR_AGE_BAND_M_C.g_push_date_range1,'MM/DD/YYYY HH24:MI:SS')||' to '||
46         to_char(EDW_HR_AGE_BAND_M_C.g_push_date_range2,'MM/DD/YYYY HH24:MI:SS'));
47    edw_log.put_line(' ');
48 
49 -- -----------------------------------------------------------------------------
50 -- Start of Collection , Developer Customizable Section
51 -- -----------------------------------------------------------------------------
52 
53    edw_log.put_line(' ');
54    edw_log.put_line('Pushing data');
55 
56    l_temp_date := sysdate;
57 
58 
59         Push_EDW_HR_AGE_AGE_BAND_LSTG(EDW_HR_AGE_BAND_M_C.g_push_date_range1, EDW_HR_AGE_BAND_M_C.g_push_date_range2);
60 
61 
62    l_duration := sysdate - l_temp_date;
63 
64    edw_log.put_line('Total rows inserted : '||g_row_count);
65    edw_log.put_line('Process Time: '||edw_log.duration(l_duration));
66    edw_log.put_line(' ');
67 -- ---------------------------------------------------------------------------
68 -- END OF Collection , Developer Customizable Section
69 -- ---------------------------------------------------------------------------
70    EDW_COLLECTION_UTIL.wrapup(TRUE, g_row_count, null, g_push_date_range1, g_push_date_range2 );
71 commit;
72 
73  Exception When others then
74       Errbuf:=sqlerrm;
75       Retcode:=sqlcode;
76    l_exception_msg  := Retcode || ':' || Errbuf;
77    EDW_HR_AGE_BAND_M_C.g_exception_msg  := l_exception_msg;
78    rollback;
79    EDW_COLLECTION_UTIL.wrapup(FALSE, 0, EDW_HR_AGE_BAND_M_C.g_exception_msg, g_push_date_range1, g_push_date_range2);
80 
81 commit;
82 End;
83 
84 
85 Procedure Push_EDW_HR_AGE_AGE_BAND_LSTG(p_from_date IN date, p_to_date IN DATE) IS
86     l_date1 DATE;
87     l_date2 DATE;
88     l_rows_inserted NUMBER :=0;
89 BEGIN
90    edw_log.put_line('Starting Push_EDW_HR_AGE_AGE_BAND_LSTG');
91 l_date1 := p_from_date;
92 l_date2 := p_to_date;
93    Insert Into
94     EDW_HR_AGE_AGE_BAND_LSTG@EDW_APPS_TO_WH(
95     ALL_FK,
96     AGE_BAND_PK,
97     NAME,
98     AGE_BAND_DP,
99     AGE_MIN,
100     AGE_MAX,
101     LAST_UPDATE_DATE,
102     CREATION_DATE,
103     USER_ATTRIBUTE1,
104     USER_ATTRIBUTE2,
105     USER_ATTRIBUTE3,
106     USER_ATTRIBUTE4,
107     USER_ATTRIBUTE5,
108     INSTANCE,
109     OPERATION_CODE,
110     COLLECTION_STATUS,
111     AGE_MIN_YEARS,
112     AGE_MIN_MONTHS,
113     AGE_MAX_YEARS,
114     AGE_MAX_MONTHS)
115    select     NVL(ALL_FK, 'NA_EDW'),
116 AGE_BAND_PK,
117 NAME,
118 AGE_BAND_DP,
119 AGE_MIN,
120 AGE_MAX,
121 LAST_UPDATE_DATE,
122 CREATION_DATE,
123 USER_ATTRIBUTE1,
124 USER_ATTRIBUTE2,
125 USER_ATTRIBUTE3,
126 USER_ATTRIBUTE4,
127 USER_ATTRIBUTE5,
128 INSTANCE,
129     NULL, -- OPERATION_CODE
130     'READY',
131   AGE_MIN_YEARS,
132   AGE_MIN_MONTHS,
133   AGE_MAX_YEARS,
134   AGE_MAX_MONTHS
135    from EDW_HR_AGE_AGE_BAND_LCV@APPS_TO_APPS
136    where last_update_date between l_date1 and l_date2;
137 
138 
139    l_rows_inserted := sql%rowcount;
140    EDW_HR_AGE_BAND_M_C.g_row_count := EDW_HR_AGE_BAND_M_C.g_row_count + l_rows_inserted ;
141    edw_log.put_line('Inserted '||to_char(nvl(sql%rowcount,0))||
142 ' rows into the EDW_HR_AGE_AGE_BAND_LSTG staging table');
143    edw_log.put_line('Commiting records for EDW_HR_AGE_AGE_BAND_LSTG');
144 commit;
145 
146    edw_log.put_line('Completed Push_EDW_HR_AGE_AGE_BAND_LSTG');
147  Exception When others then
148    raise;
149 commit;
150 END;
151 End EDW_HR_AGE_BAND_M_C;