[Home] [Help]
PACKAGE: APPS.MRP_CL_REFRESH_SNAPSHOT
Source
1 PACKAGE MRP_CL_REFRESH_SNAPSHOT AUTHID CURRENT_USER AS
2 /* $Header: MRPCLEAS.pls 120.10.12020000.2 2012/11/01 08:18:10 zzhen ship $ */
3
4 TYPE SnapTblTyp IS TABLE OF VARCHAR2(30);
5 G_MSC_DEBUG VARCHAR2(1) := NVL(FND_PROFILE.Value('MRP_DEBUG'),'N');
6 v_explode_ato VARCHAR2(1) := NVL(FND_PROFILE.Value('MRP_EXPLODE_ATO'),'Y');
7 ----- CONSTANTS --------------------------------------------------------
8
9 SYS_YES CONSTANT NUMBER := 1;
10 SYS_NO CONSTANT NUMBER := 2;
11
12 G_SUCCESS CONSTANT NUMBER := 0;
13 G_WARNING CONSTANT NUMBER := 1;
14 G_ERROR CONSTANT NUMBER := 2;
15
16 SYS_INCR CONSTANT NUMBER := 3; -- incr refresh in continous collections
17 SYS_TGT CONSTANT NUMBER := 4; -- targeted refresh in continous collections
18
19 G_COLLECTIONS CONSTANT NUMBER := 1;
20 G_MANUAL CONSTANT NUMBER := 2;
21
22 G_NORMAL_COMPLETION CONSTANT NUMBER := 1;
23 G_PENDING_INACTIVE CONSTANT NUMBER := 2;
24 G_OTHERS CONSTANT NUMBER := 3;
25
26 ASL_YES_RETAIN_CP CONSTANT NUMBER :=3;
27
28 G_REFRESH_MODE_FAST CONSTANT NUMBER := 1; --fast refresh
29 G_REFRESH_MODE_COMPLETE CONSTANT NUMBER := 2; --complete refresh
30 G_REFRESH_MODE_AUTOMATIC CONSTANT NUMBER :=3; --automatic refresh
31 G_REFRESH_MODE_FORCE CONSTANT NUMBER :=4; --force refresh
32
33 ----- PARAMETERS --------------------------------------------------------
34
35 v_debug BOOLEAN := FALSE;
36
37 v_cp_enabled NUMBER;
38
39 v_lrn NUMBER;
40 v_request_id NUMBER;
41 v_refresh_type VARCHAR2(1);
42 v_oh_sn_flag NUMBER;
43
44 v_refresh_number NUMBER:= 0;
45
46 -- ================= Procedures ====================
47
48 FUNCTION SETUP_SOURCE_OBJECTS RETURN BOOLEAN ;
49 PROCEDURE REFRESH_SNAPSHOT(
50 ERRBUF OUT NOCOPY VARCHAR2,
51 RETCODE OUT NOCOPY NUMBER,
52 p_user_name IN VARCHAR2,
53 p_resp_name IN VARCHAR2,
54 p_application_name IN VARCHAR2,
55 p_refresh_type IN VARCHAR2 := 'C',
56 o_request_id OUT NOCOPY NUMBER,
57 pInstance_ID IN NUMBER,
58 pInstance_Code IN VARCHAR2,
59 pa2m_dblink IN VARCHAR2);
60
61 PROCEDURE WAIT_FOR_REQUEST(
62 p_timeout IN NUMBER,
63 o_retcode OUT NOCOPY NUMBER);
64
65 PROCEDURE WAIT_FOR_REQUEST(
66 p_request_id in number,
67 p_timeout IN NUMBER,
68 o_retcode OUT NOCOPY NUMBER);
69
70 PROCEDURE check_MV_cont_ref_type(p_MV_name in varchar2,
71 p_entity_lrn in number,
72 entity_flag OUT NOCOPY number,
73 p_ad_table_name in varchar2,
74 p_org_str in varchar2,
75 p_coll_thresh in number,
76 p_last_tgt_cont_coll_time in date,
77 p_ret_code OUT NOCOPY number,
78 p_err_buf OUT NOCOPY varchar2);
79
80 PROCEDURE check_entity_cont_ref_type(p_entity_name in varchar2,
81 p_entity_lrn in number,
82 entity_flag OUT NOCOPY number,
83 p_org_str in varchar2,
84 p_coll_thresh in number,
85 p_last_tgt_cont_coll_time in date,
86 p_ret_code OUT NOCOPY number,
87 p_err_buf OUT NOCOPY varchar2);
88
89 PROCEDURE REFRESH_SINGLE_SNAPSHOT(
90 ERRBUF OUT NOCOPY VARCHAR2,
91 RETCODE OUT NOCOPY NUMBER,
92 pREFRESH_MODE IN NUMBER,
93 pSNAPSHOT_NAME IN VARCHAR2,
94 pDEGREE IN NUMBER,
95 pCURRENT_LRN IN NUMBER default -1,
96 p_NUMBER_OF_ROWS IN NUMBER default 0);
97
98 /* added this procedure for the new conc program defn of Refresh Snapshots */
99 PROCEDURE REFRESH_SNAPSHOT(
100 ERRBUF OUT NOCOPY VARCHAR2,
101 RETCODE OUT NOCOPY NUMBER,
102 pREFRESH_MODE IN NUMBER,
103 pSNAPSHOT_NAME IN VARCHAR2,
104 pNUMBER_OF_ROWS IN NUMBER,
105 pDEGREE IN NUMBER,
106 pCP_ENABLED IN NUMBER default MSC_UTIL.SYS_YES,
107 pREFRESH_TYPE IN VARCHAR2 default 'C',
108 pCALLING_MODULE IN NUMBER DEFAULT G_MANUAL,
109 pINSTANCE_ID IN NUMBER DEFAULT NULL,
110 pINSTANCE_CODE IN VARCHAR2 DEFAULT NULL,
111 pA2M_DBLINK IN VARCHAR2 DEFAULT NULL);
112
113 PROCEDURE DROP_SNAPSHOT(
114 ERRBUF OUT NOCOPY VARCHAR2,
115 RETCODE OUT NOCOPY NUMBER,
116 p_snapshot_str IN VARCHAR2);
117
118 /*Created the below procedure w.r.t bug 12964052 */
119 PROCEDURE DROP_SNAPSHOT_EI(
120 ERRBUF OUT NOCOPY VARCHAR2,
121 RETCODE OUT NOCOPY NUMBER,
122 p_snapshot_str IN VARCHAR2);
123
124
125 PROCEDURE LOG_DEBUG( pBUFF IN VARCHAR2);
126
127 PROCEDURE LOG_ERROR( pBUFF IN VARCHAR2);
128
129
130 PROCEDURE PURGE_OBSOLETE_DATA;
131
132 /* -- Added this procedure to accept application_id instead of application_name */
133
134 PROCEDURE REFRESH_SNAPSHOT(
135 ERRBUF OUT NOCOPY VARCHAR2,
136 RETCODE OUT NOCOPY NUMBER,
137 p_user_name IN VARCHAR2,
138 p_resp_name IN VARCHAR2,
139 p_application_name IN VARCHAR2,
140 p_refresh_type IN VARCHAR2 := 'C',
141 o_request_id OUT NOCOPY NUMBER,
142 pInstance_ID IN NUMBER,
143 pInstance_Code IN VARCHAR2,
144 pa2m_dblink IN VARCHAR2,
145 p_application_id IN NUMBER);
146 /* bug 5959340*/
147 PROCEDURE CREATE_SOURCE_VIEWS(
148 ERRBUF OUT NOCOPY VARCHAR2,
149 RETCODE OUT NOCOPY NUMBER);
150
151 /* bug 5959340*/
152 PROCEDURE CREATE_SOURCE_TRIGGERS(
153 ERRBUF OUT NOCOPY VARCHAR2,
154 RETCODE OUT NOCOPY NUMBER);
155 FUNCTION CHECK_DB_LINK return NUMBER;
156 FUNCTION CHECK_USAF_FLAG return NUMBER;
157 END MRP_CL_REFRESH_SNAPSHOT;