159: v_old_seq_Stmt VARCHAR2(2000);
160: BEGIN
161: SAVEPOINT CCTUPGSEQ;
162: BEGIN
163: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
164: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
165: --dbms_output.put_line(v_old_seq_stmt);
166: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
167: --dbms_output.put_line('after parsing');
162: BEGIN
163: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
164: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
165: --dbms_output.put_line(v_old_seq_stmt);
166: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
167: --dbms_output.put_line('after parsing');
168: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
169: --dbms_output.put_line('after define column');
170: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
164: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
165: --dbms_output.put_line(v_old_seq_stmt);
166: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
167: --dbms_output.put_line('after parsing');
168: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
169: --dbms_output.put_line('after define column');
170: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
171: --dbms_output.put_line('after execute');
172: Loop
166: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
167: --dbms_output.put_line('after parsing');
168: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
169: --dbms_output.put_line('after define column');
170: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
171: --dbms_output.put_line('after execute');
172: Loop
173: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
174: --dbms_output.put_line('exiting');
169: --dbms_output.put_line('after define column');
170: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
171: --dbms_output.put_line('after execute');
172: Loop
173: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
174: --dbms_output.put_line('exiting');
175: exit;
176: end if;
177: --dbms_output.put_line('before col valu');
174: --dbms_output.put_line('exiting');
175: exit;
176: end if;
177: --dbms_output.put_line('before col valu');
178: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_old_seq_val);
179: --dbms_output.put_line(l_old_Seq_val);
180: END LOOP;
181: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
182: Exception
177: --dbms_output.put_line('before col valu');
178: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_old_seq_val);
179: --dbms_output.put_line(l_old_Seq_val);
180: END LOOP;
181: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
182: Exception
183: When others then
184: l_missing_sequence:=old_sequence_name;
185: raise sequence_not_found;
236:
237: -- Getting the Old Sequence value
238:
239: BEGIN
240: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
241: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
242: --dbms_output.put_line(v_old_seq_stmt);
243: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
244: --dbms_output.put_line('after parsing');
239: BEGIN
240: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
241: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
242: --dbms_output.put_line(v_old_seq_stmt);
243: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
244: --dbms_output.put_line('after parsing');
245: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
246: --dbms_output.put_line('after define column');
247: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
241: v_old_seq_stmt:='SELECT '||schema_name||'.'||old_sequence_name||'.NEXTVAL from dual';
242: --dbms_output.put_line(v_old_seq_stmt);
243: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
244: --dbms_output.put_line('after parsing');
245: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
246: --dbms_output.put_line('after define column');
247: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
248: --dbms_output.put_line('after execute');
249: Loop
243: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
244: --dbms_output.put_line('after parsing');
245: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_old_seq_val,10);
246: --dbms_output.put_line('after define column');
247: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
248: --dbms_output.put_line('after execute');
249: Loop
250: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
251: --dbms_output.put_line('exiting');
246: --dbms_output.put_line('after define column');
247: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
248: --dbms_output.put_line('after execute');
249: Loop
250: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
251: --dbms_output.put_line('exiting');
252: exit;
253: end if;
254: --dbms_output.put_line('before col valu');
251: --dbms_output.put_line('exiting');
252: exit;
253: end if;
254: --dbms_output.put_line('before col valu');
255: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_old_seq_val);
256: --dbms_output.put_line(l_old_seq_val);
257: END LOOP;
258: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
259: Exception
254: --dbms_output.put_line('before col valu');
255: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_old_seq_val);
256: --dbms_output.put_line(l_old_seq_val);
257: END LOOP;
258: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
259: Exception
260: When others then
261: l_missing_sequence:=old_sequence_name;
262: raise sequence_not_found;
264:
265: -- Getting the New Sequence value
266:
267: BEGIN
268: v_cursorID1:=DBMS_SQL.OPEN_CURSOR;
269: v_new_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
270: --dbms_output.put_line(v_new_seq_stmt);
271: DBMS_SQL.PARSE(v_cursorID1,v_new_seq_stmt,DBMS_SQL.V7);
272: --dbms_output.put_line('after parsing');
267: BEGIN
268: v_cursorID1:=DBMS_SQL.OPEN_CURSOR;
269: v_new_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
270: --dbms_output.put_line(v_new_seq_stmt);
271: DBMS_SQL.PARSE(v_cursorID1,v_new_seq_stmt,DBMS_SQL.V7);
272: --dbms_output.put_line('after parsing');
273: DBMS_SQL.DEFINE_COLUMN(v_cursorID1,1,l_new_seq_val,10);
274: --dbms_output.put_line('after define column');
275: v_dummy1:=DBMS_SQL.EXECUTE(v_cursorID1);
269: v_new_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
270: --dbms_output.put_line(v_new_seq_stmt);
271: DBMS_SQL.PARSE(v_cursorID1,v_new_seq_stmt,DBMS_SQL.V7);
272: --dbms_output.put_line('after parsing');
273: DBMS_SQL.DEFINE_COLUMN(v_cursorID1,1,l_new_seq_val,10);
274: --dbms_output.put_line('after define column');
275: v_dummy1:=DBMS_SQL.EXECUTE(v_cursorID1);
276: --dbms_output.put_line('after execute');
277: Loop
271: DBMS_SQL.PARSE(v_cursorID1,v_new_seq_stmt,DBMS_SQL.V7);
272: --dbms_output.put_line('after parsing');
273: DBMS_SQL.DEFINE_COLUMN(v_cursorID1,1,l_new_seq_val,10);
274: --dbms_output.put_line('after define column');
275: v_dummy1:=DBMS_SQL.EXECUTE(v_cursorID1);
276: --dbms_output.put_line('after execute');
277: Loop
278: if DBMS_SQL.FETCH_ROWS(v_cursorID1)=0 THEN
279: --dbms_output.put_line('exiting');
274: --dbms_output.put_line('after define column');
275: v_dummy1:=DBMS_SQL.EXECUTE(v_cursorID1);
276: --dbms_output.put_line('after execute');
277: Loop
278: if DBMS_SQL.FETCH_ROWS(v_cursorID1)=0 THEN
279: --dbms_output.put_line('exiting');
280: exit;
281: end if;
282: --dbms_output.put_line('before col valu');
279: --dbms_output.put_line('exiting');
280: exit;
281: end if;
282: --dbms_output.put_line('before col valu');
283: DBMS_SQL.COLUMN_VALUE(v_cursorID1,1,l_new_seq_val);
284: --dbms_output.put_line(l_new_seq_val);
285: END LOOP;
286: DBMS_SQL.CLOSE_CURSOR(v_cursorID1);
287: Exception
282: --dbms_output.put_line('before col valu');
283: DBMS_SQL.COLUMN_VALUE(v_cursorID1,1,l_new_seq_val);
284: --dbms_output.put_line(l_new_seq_val);
285: END LOOP;
286: DBMS_SQL.CLOSE_CURSOR(v_cursorID1);
287: Exception
288: When others then
289: l_missing_sequence:=sequence_name;
290: l_missing_sequence:=l_missing_sequence||' SQLERRM::'||sqlerrm;
923:
924:
925: -- Getting the Current Sequence value
926: BEGIN
927: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
928: v_old_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
929: --dbms_output.put_line(v_old_seq_stmt);
930: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
931: --dbms_output.put_line('after parsing');
926: BEGIN
927: v_cursorID:=DBMS_SQL.OPEN_CURSOR;
928: v_old_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
929: --dbms_output.put_line(v_old_seq_stmt);
930: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
931: --dbms_output.put_line('after parsing');
932: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_seq_val,10);
933: --dbms_output.put_line('after define column');
934: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
928: v_old_seq_stmt:='SELECT '||schema_name||'.'||sequence_name||'.NEXTVAL from dual';
929: --dbms_output.put_line(v_old_seq_stmt);
930: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
931: --dbms_output.put_line('after parsing');
932: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_seq_val,10);
933: --dbms_output.put_line('after define column');
934: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
935: --dbms_output.put_line('after execute');
936: Loop
930: DBMS_SQL.PARSE(v_cursorID,v_old_seq_stmt,DBMS_SQL.V7);
931: --dbms_output.put_line('after parsing');
932: DBMS_SQL.DEFINE_COLUMN(v_cursorID,1,l_seq_val,10);
933: --dbms_output.put_line('after define column');
934: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
935: --dbms_output.put_line('after execute');
936: Loop
937: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
938: --dbms_output.put_line('exiting');
933: --dbms_output.put_line('after define column');
934: v_dummy:=DBMS_SQL.EXECUTE(v_cursorID);
935: --dbms_output.put_line('after execute');
936: Loop
937: if DBMS_SQL.FETCH_ROWS(v_cursorID)=0 THEN
938: --dbms_output.put_line('exiting');
939: exit;
940: end if;
941: --dbms_output.put_line('before col valu');
938: --dbms_output.put_line('exiting');
939: exit;
940: end if;
941: --dbms_output.put_line('before col valu');
942: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_seq_val);
943: --dbms_output.put_line(l_seq_val);
944: END LOOP;
945: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
946: Exception
941: --dbms_output.put_line('before col valu');
942: DBMS_SQL.COLUMN_VALUE(v_cursorID,1,l_seq_val);
943: --dbms_output.put_line(l_seq_val);
944: END LOOP;
945: DBMS_SQL.CLOSE_CURSOR(v_cursorID);
946: Exception
947: When others then
948: l_missing_sequence:=sequence_name;
949: raise sequence_not_found;