从SELECT插入但更改一列？

心静如止水

想知道是否有一种方法可以将一行中的一行插入另一张表中，但一列除外？
对于有限的列数，这当然很容易，但是当列数增加时，列出所有列会很麻烦。
我在想以下方面的事情：
Insert into table
select * replace col1 with current date
9 d" c& r! {, m& B2 nfrom table
where yada yada yada
一种可能是复制一行并执行和更新，但是由于索引或其他原因，这不是一种选择。
有任何想法吗？
/ ]3 u. W: o4 S  b' {; H编辑：这是DB2 v10，但问题出在纯出于好奇。只是想知道是否有可能…
               
' g7 y! a0 o4 {3 b% E# I8 X解决方案:
               

; g# C8 @. t) r
* w5 }7 t/ g) `8 w8 H( C* i                使用Oracle
% k+ q  f% B5 c  `3 Y- T- B4 F* j; bDECLARE
CURSOR CUR_D IS
; D% x* E! X3 e& T+ I  `  SELECT *
  FROM TABLE
  WHERE id = some id;
ROW_D CUR_D%ROWTYPE;
BEGIN
  OPEN CUR_D;
  FETCH CUR_D INTO ROW_D;
  CLOSE CUR_D;
  ROW_D.column := 'some data';
8 j2 h0 N* J# B2 E6 q( U% L  INSERT INTO some table
- q' ^% ]9 w6 S$ k" k  VALUES ROW_D;
6 _0 U: I+ o5 J3 Z( M( pEND;
- x* a$ r, M9 k/ `! `* \/