Puedes hacerlo con esta sentencia directamente ó bien, meter la sentencia dentro de un procedimiento, al que le pases el CODIGO-02 como parámetro para la citada sentencia.
INSERT INTO TABLA01 (CODIGO-01, DETALLE-01)
SELECT T2.CODIGO-01, T2.DETALLE-01 FROM TABLA02 T2
WHERE T2.CODIGO-02 = 'AAA3';
A ver si te funciona.
Un saludo
__________________
Óscar Salvador Páez Aprendiendo a aprehender de quienes aprehenden, sin cerciorarse de sus edades, culturas, sexos, razas, creencias u orígenes, es la forma más sabia de aprehender.