91: if (l_8i = 'Y') then
92:
93: l_progress := '002';
94:
95: cursor_name := DBMS_SQL.OPEN_CURSOR;
96:
97: -- drop the ctx index
98: begin
99: l_progress := '008';
96:
97: -- drop the ctx index
98: begin
99: l_progress := '008';
100: DBMS_SQL.PARSE(cursor_name,
101: 'DROP INDEX ICX.ICX_POR_ITEMS_TL_CTXIDX',
102: DBMS_SQL.NATIVE);
103: l_progress := '009';
104: ret := DBMS_SQL.EXECUTE(cursor_name);
98: begin
99: l_progress := '008';
100: DBMS_SQL.PARSE(cursor_name,
101: 'DROP INDEX ICX.ICX_POR_ITEMS_TL_CTXIDX',
102: DBMS_SQL.NATIVE);
103: l_progress := '009';
104: ret := DBMS_SQL.EXECUTE(cursor_name);
105:
106: exception
100: DBMS_SQL.PARSE(cursor_name,
101: 'DROP INDEX ICX.ICX_POR_ITEMS_TL_CTXIDX',
102: DBMS_SQL.NATIVE);
103: l_progress := '009';
104: ret := DBMS_SQL.EXECUTE(cursor_name);
105:
106: exception
107: when others then Debug('rebuild_index-'||l_progress||' '||SQLERRM);
108: end;
111: l_progress := '010';
112:
113: -- create the index
114:
115: DBMS_SQL.PARSE(cursor_name,
116: 'CREATE INDEX ICX.ICX_POR_ITEMS_TL_CTXIDX ' ||
117: ' on ICX_POR_ITEMS_TL(CTX_DESC) ' ||
118: ' INDEXTYPE IS ctxsys.context',
119: DBMS_SQL.NATIVE);
115: DBMS_SQL.PARSE(cursor_name,
116: 'CREATE INDEX ICX.ICX_POR_ITEMS_TL_CTXIDX ' ||
117: ' on ICX_POR_ITEMS_TL(CTX_DESC) ' ||
118: ' INDEXTYPE IS ctxsys.context',
119: DBMS_SQL.NATIVE);
120: l_progress := '011';
121: ret := DBMS_SQL.EXECUTE(cursor_name);
122:
123: DBMS_SQL.CLOSE_CURSOR(cursor_name);
117: ' on ICX_POR_ITEMS_TL(CTX_DESC) ' ||
118: ' INDEXTYPE IS ctxsys.context',
119: DBMS_SQL.NATIVE);
120: l_progress := '011';
121: ret := DBMS_SQL.EXECUTE(cursor_name);
122:
123: DBMS_SQL.CLOSE_CURSOR(cursor_name);
124:
125: end if;
119: DBMS_SQL.NATIVE);
120: l_progress := '011';
121: ret := DBMS_SQL.EXECUTE(cursor_name);
122:
123: DBMS_SQL.CLOSE_CURSOR(cursor_name);
124:
125: end if;
126:
127: l_progress := '012';