Thank you all, that one here is the one that worked
*declare* /r/ record;*begin for* /r/ *in* /*select* * *from* original *order by* num *asc*/ *loop* *insert into* copia(num) *values*(r.num); *end loop*;*end;*