DBA Data[Home] [Help]

PACKAGE BODY: APPS.ICX_POR_POPULATE_DESC

Source


1 PACKAGE BODY ICX_POR_POPULATE_DESC AS
2 -- $Header: ICXPLCDB.pls 115.8 2004/03/31 21:52:02 vkartik ship $
3 
4 
5 /*
6 ** Procedure : populateCtxDescAll
7 ** Synopsis  : Update the ctx_desc column
8 **
9 ** Parameter:  p_jobno - number of the job to rebuild
10 ** Parameter:  Rebuild = Y/N  - 'Y'  - rebuild all ctx_<lang> columns
11 **                              'N'  - populate the ctx_<lang> column for
12 **                                     all items where the column is null
13 */
14 PROCEDURE populateCtxDescAll(p_jobno IN INTEGER := 0,
15 			     p_rebuildAll IN VARCHAR2 := 'N') IS
16 
17   xErrLoc PLS_INTEGER;
18 
19 BEGIN
20   xErrLoc := 100;
21 
22   ICX_POR_CTX_DESC.populateCtxDescAll(p_jobno, p_rebuildAll, 'CONCURRENT');
23 
24 EXCEPTION
25 
26     WHEN OTHERS THEN
27       rollback;
28       RAISE_APPLICATION_ERROR
29         (-20000, 'Exception at ICX_POR_POPULATE_DESC.populateCtxDescAll('||
30 		xErrLoc||'), '|| SQLERRM );
31 END populateCtxDescAll;
32 
33 /*
34 ** Procedure : populateCtxDescAll
35 ** Synopsis  : Update the ctx_desc column
36 **
37 ** Parameter:  p_jobno - number of the job to rebuild
38 ** Parameter:  Rebuild = Y/N  - 'Y'  - rebuild all ctx_<lang> columns
39 **                              'N'  - populate the ctx_<lang> column for
40 **                                     all items where the column is null
41 */
42 PROCEDURE populateCtxDescAll(p_jobno IN INTEGER := 0,
43                              p_rebuildAll IN VARCHAR2 := 'N',
44                              p_loglevel IN NUMBER,
45 			     p_logfile IN VARCHAR2) IS
46   xErrLoc PLS_INTEGER := 1000;
47 BEGIN
48   ICX_POR_EXT_UTL.gDebugLevel := p_loglevel;
49   populateCtxDescAll(p_jobno, p_rebuildAll, p_logfile);
50 
51 EXCEPTION
52 
53     WHEN OTHERS THEN
54       rollback;
55       RAISE_APPLICATION_ERROR
56         (-20000, 'Exception at ICX_POR_POPULATE_DESC.populateCtxDescAll('||
57 		xErrLoc||'), '|| SQLERRM );
58 END populateCtxDescAll;
59 
60 PROCEDURE populateCtxDescAll(p_jobno IN INTEGER := 0,
61                              p_rebuildAll IN VARCHAR2 := 'Y',
62 			     p_logfile IN VARCHAR2) IS
63   xErrLoc PLS_INTEGER := 2000;
64 
65 BEGIN
66   xErrLoc := 2000;
67   if ( p_logfile is not NULL ) then
68      ICX_POR_EXT_UTL.openLog(p_logfile);
69   end if;
70 
71   xErrLoc := 2010;
72   populateCtxDescAll(p_jobno, p_rebuildAll);
73 
74 EXCEPTION
75 
76     WHEN OTHERS THEN
77       icx_por_ext_utl.debug(icx_por_ext_utl.DEBUG_LEVEL,
78 		'Exception at ICX_POR_POPULATE_DESC.populateCtxDescAll('||
79                 xErrLoc || '), ' || SQLERRM);
80       rollback;
81       ICX_POR_EXT_UTL.printStackTrace;
82       ICX_POR_EXT_UTL.closeLog;
83       RAISE_APPLICATION_ERROR
84         (-20000, 'Exception at ICX_POR_POPULATE_DESC.populateCtxDescAll('||
85 		xErrLoc||'), '|| SQLERRM );
86 END populateCtxDescAll;
87 
88 
89 /*
90 ** Procedure : populateDescAll
91 ** Synopsis  : Update the ctx_desc column
92 */
93 PROCEDURE populateDescAll(p_jobno IN INTEGER := 0) IS
94     xErrLoc PLS_INTEGER := 100;
95 
96 BEGIN
97 
98     xErrLoc := 100;
99     ICX_POR_CTX_DESC.populateCtxDescAll(p_jobno, 'CONCURRENT');
100 
101 EXCEPTION
102 
103     WHEN OTHERS THEN
104       icx_por_ext_utl.debug(-- icx_por_ext_utl.DEBUG_LEVEL,
105 		'Exception at ICX_POR_POPULATE_DESC.populateDescAll('||
106                 xErrLoc || '), ' || SQLERRM);
107       rollback;
108       RAISE_APPLICATION_ERROR
109         (-20000, 'Exception at ICX_POR_POPULATE_DESC.populateDescAll('||
110 		xErrLoc||'), '|| SQLERRM );
111 
112 END populateDescAll;
113 
114 /*
115 ** Procedure : rebuildAll
116 ** Synopsis  : Update the ctx_desc column
117 **
118 */
119 PROCEDURE rebuildAll IS
120 
121   xErrLoc PLS_INTEGER := 100;
122 BEGIN
123   ICX_POR_CTX_DESC.populateDescAll;
124 EXCEPTION
125 
126     WHEN OTHERS THEN
127       icx_por_ext_utl.debug(-- icx_por_ext_utl.DEBUG_LEVEL,
128 		'Exception at ICX_POR_POPULATE_DESC.rebuildAll('||
129                 xErrLoc || '), ' || SQLERRM);
130       rollback;
131       RAISE_APPLICATION_ERROR
132         (-20000, 'Exception at ICX_POR_POPULATE_DESC.rebuildAll('||
133 		xErrLoc||'), '|| SQLERRM );
134 
135 END rebuildAll;
136 
137 PROCEDURE rebuild_indexes is
138   xErrLoc PLS_INTEGER := 100;
139 BEGIN
140 
141   ICX_POR_CTX_DESC.rebuild_indexes;
142 
143 EXCEPTION
144     WHEN OTHERS THEN
145         icx_por_ext_utl.debug(-- icx_por_ext_utl.DEBUG_LEVEL,
146 		'Exception at ICX_POR_POPULATE_DESC.rebuild_indexes('||
147                 xErrLoc || '), ' || SQLERRM);
148 
149         RAISE_APPLICATION_ERROR(-20000, 'Exception at '||
150 		'ICX_POR_POPULATE_DESC.rebuild_indexes(' ||
151                 xErrLoc||'), '|| SQLERRM );
152 END rebuild_indexes;
153 
154 
155 END ICX_POR_POPULATE_DESC;